Ir para conteúdo
  • Cadastre-se

ClausquellerMitome

Membros Pro
  • Total de ítens

    39
  • Registro em

  • Última visita

Tudo que ClausquellerMitome postou

  1. Fiz funciona usando o copy(LNossoNumero := TACBrTitulo(FBoleto.ListadeBoletos.Items[0]).NossoNumero, 0, lenght(LNossoNumero := TACBrTitulo(FBoleto.ListadeBoletos.Items[0]).NossoNumero) - 3) Mas vamos ve o comportamento em outros bancos. Obrigado
  2. Então esse código estar vindo ao pegar LNossoNumero := TACBrTitulo(FBoleto.ListadeBoletos.Items[0]).NossoNumero; O motivo e de onde vem esse código eu não sei.
  3. Olá, var LRetorno : Boolean; doc : TACBrTitulo; LNossoNumero : String; begin FBoleto.Configuracoes.WebService.Operacao := tpConsultaDetalhe; LNossoNumero := TACBrTitulo(FBoleto.ListadeBoletos.Items[0]).NossoNumero; FBoleto.ListadeBoletos.Clear; FBoleto.Configuracoes.WebService.Filtro.Clear; FBoleto.Configuracoes.WebService.Operacao := tpConsultaDetalhe; FBoleto.Configuracoes.WebService.Filtro.indiceContinuidade := 0; FBoleto.Configuracoes.WebService.Filtro.indicadorSituacao := TACBrIndicadorSituacaoBoleto.isbAberto; FBoleto.Configuracoes.WebService.Filtro.dataMovimento.DataInicio := Date - 1; FBoleto.Configuracoes.WebService.Filtro.dataMovimento.DataFinal := Date + 1; Result := rrbSalvo; // doc => TACBrTitulo; doc := FBoleto.CriarTituloNaLista; doc.Carteira := '17'; doc.NossoNumero := LNossoNumero; // nosso número no formato 0000001099 : NOSSONUMERO = 0000001 e Código = 099 LRetorno := FBoleto.EnviarBoleto; // if LRetorno then begin Result := rrbRegistrado; end; end; 0000001099 : NOSSONUMERO = 0000001 e Código = 099 0000001099 = Erro de Nosso número invalido retornado pela API; 0000001 = Usando dessa forma funciona funciona normal; Alguma sugestão para resolver esse problema?
  4. Olá, Alguém já passou por esse erro da imagem? Já analisei o arquivo gerado de remessa. Aparentemente tudo correto. Seria algum erro no sistema da caixa? Atenciosamente,
  5. Bom dia, vou fazer um teste eu dou um feedback. Obrigado
  6. Olá, Montei o evento de CCe para a CTe, funcionou tudo perfeitamente em relação ao envio do evento. Entretanto, estou com dificuldades para salvar o arquivo do evento em uma determinada pasta. Olhei o fonte verifiquei que e gerado um temp.xml com os dados, tbm e gerado um outro xml como o nome de 111908-ped-eve.xml o qual tem as informações do evento. Tentei manualmente ler esse arquivo, mas na impressão sempre fica em branco. Resumindo não conseguir salvar o evento e imprimir como e feito no CCe da NFe. Alguém poderia me ajudar com essa questão? Atenciosamente,
  7. Ola, depois de 48 horas, apareceu na portal nacional. Obrigado a todos pela força.
  8. Olá, Fiz o cancelamento da nfe, onde o processo ocorreu tudo normalmente, inclusive no xml conta a mensagem "Cancelamento de NF-e homologado". Mas ao ir no site da SEFAZ a nota continua como senão estivesse cancelada. Fiz a consulta da nota via componente e sempre o retorno é que estar cancelada. Alguém já passou por isso? Existe algum outro lugar que eu possa visualizar esse evento, sem ser pelo componente. Atenciosamente,
  9. O Código acima funcionou bem. Porém no meu caso gostaria de pegar a lista de ocorrências referente ao banco setado no componente. Quando uso GetOcorrenciasRemessa, ele puxa todas as ocorrências e algumas não existe no banco em questão. function GetOcorrenciasRemessa() : TACBrOcorrenciasRemessa; function TACBrBoleto.GetOcorrenciasRemessa(): TACBrOcorrenciasRemessa; var I: Integer; begin SetLength(Result, 77); for I:= 1 to 48 do begin Result[I-1].Tipo := TACBrTipoOcorrencia(I-1); Result[I-1].descricao := cACBrTipoOcorrenciaDecricao[I-1]; end; end;
  10. Ola, Atualmente, uso o método GetOcorrenciasRemessa para obter informações das ocorrências de remessa, entretanto, cada banco tem as suas ocorrências especificas como ilustra o código abaixo do sicred. Gostaria de saber se existe um método que busca a ocorrências do banco em si, depois de setado as configurações do componente. Atenciosamente, function TACBrBancoSicredi.CodOcorrenciaToTipoRemessa(const CodOcorrencia: Integer): TACBrTipoOcorrencia; begin case CodOcorrencia of 02 : Result:= toRemessaBaixar; {Pedido de Baixa} 04 : Result:= toRemessaConcederAbatimento; {Concessão de Abatimento} 05 : Result:= toRemessaCancelarAbatimento; {Cancelamento de Abatimento concedido} 06 : Result:= toRemessaAlterarVencimento; {Alteração de vencimento} 09 : Result:= toRemessaProtestar; {Pedido de protesto} 18 : Result:= toRemessaCancelarInstrucaoProtestoBaixa; {Sustar protesto e baixar} 19 : Result:= toRemessaCancelarInstrucaoProtesto; {Sustar protesto e manter na carteira} 31 : Result:= toRemessaOutrasOcorrencias; {Alteração de Outros Dados} else Result:= toRemessaRegistrar; {Remessa} end; end;
  11. @Juliana Tamizou Foi finalizado esse processo, estou iniciando o processo de homologação para a caixa via webservice, gostaria de entender se ja foi finalizado ou não. Obrigado
  12. Olá, existe alguma previsão da funcionalidade de registro on-line para Bradesco funcionar no acbr?
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.