Search the Community

Amigos, alguém pode me ajudar com essa dúvida? No arquivo de retorno do Banco do Brasil, CNAB240, alguns títulos liquidados estão vindo no registro detalhe T, posição 16 à 17 com a ocorrência 06, e na posição 214 à 223, o motivo vem como 99. O que significa esse motivo da ocorrência = 99? Obs.: já conferi no leiaute da Febraban CNAB240, e no leiaute de particularidades do BB e não encontrei a descrição desse motivo. Também entrei em contato com o suporte da Cobrança do BB, e me orientaram enviar um e-mail para [email protected] com a dúvida, porém já faz 15 dias úteis (sendo que o prazo para resposta era de 5 dias úteis) que enviei o e-mail e não tive resposta do BB.

boa tarde, gostaria de pedir através deste post que não houvesse alteração no nome das chaves de retorno, pois isso vem acontecendo em determinadas atualizações e causam transtorno para cliente e para nós, gostaria de dar dois exemplos recentes: 1 - ocorreu com o nome da chave de retorno da MDFE - após atualização do acbr embora estava emitido, o sistema parou de gravar o numero da chave: nome chaves alterado da seção[MDFexxxx] : ChMDFe <> chNFe 2 - nesta ultima atualização ocorreu alteração do nome no retorno da NFE: ChNFe <> chDFe

Alguém sabe se existe um Web Service do Bradesco, que tenha como exportar o arquivo de remessa de boletos, que o componente ACBr Boleto gera, em um formato REST por JSON ou XML para ser cadastrado automaticamente sem usar o Bradesco Net Empresa?

Verifiquei um problema na leitura do retorno CNAB 240 do Bradesco em que no caso de importar mais de um arquivo em sequencia a partir do segundo sempre dava o erro: "Tamanho Máximo do Nosso Número é: 10". Pois bem, pelo manual o tamanho máximo é 11 e no construtor da classe já é inicializada a propriedade "fpTamanhoMaximoNossoNum := 11;", só que, na rotina "TACBrBancoBradesco.LerRetorno240" ao final da mesma havia a linha: ACBrBanco.TamanhoMaximoNossoNum := 10; ...e portanto, na importação seguinte ocorria o erro. Havia também uma linha atribuindo 11 antes do início do "For.." e que estava comentada, a qual removi para evitar mais confusão. Aproveitando a alteração também adicionei na rotina "TACBrBancoBradesco.GerarRegistroTransacao240" mais três códigos de ocorrência que não estavam previstos: toRemessaDispensarMulta : ATipoOcorrencia := '15'; toRemessaNegativacaoSemProtesto : ATipoOcorrencia := '45'; toRemessaBaixaTituloNegativadoSemProtesto : ATipoOcorrencia := '46'; Em anexo unit alterada para, na medida do possível subir para o SVN. Desde já agradeço. ACBrBancoBradesco.pas

Boa tarde a todos da comunidade. A minha situação é a seguinte: Realizo todo meu processo de gestão de cobrança pelo AcbrBoleto no banco Itaú e outros, porem no itau temos o desconto de titulo quando descontado o titulo é baixado do cobrança e vai pro empréstimos solicitamos ao Itaú e passamos a receber o arquivo de retorno referente aos descontados[04-EMPRESTIMO], porem na leitura do retorno a identificação do tipo do serviço é ignorada, ou melhor não temos uma propriedade do componente AcbrBoleto para carregarmos qual serviço estamos tratando. Gostaria de saber dos moderadores e responsáveis se seria viável e interessante o desenvolvimento desta propriedade. Desde já gostaria de me por a disposição para desenvolver uma versão de teste para comunidade.

Bom dia gerei o arquivo de remessa e enviei para o Banco Bradesco onde foi verificado e está tudo ok, porém quando baixo o arquivo de retorno do banco e realizo o processamento pára na seguinte mensagem de erro: Tamanho Máximo do Nosso Numero é: 8 Verifiquei a posição do arquivo de retorno de 071 a 082 e está com o seguinte conteúdo: 00000015233 A carteira que está sendo enviada no arquivo de remessa é: 09 Tem que configurar algo no retorno para informar o tamanho do nosso numero (tipo carteira ou tamanho do nosso numero)? Obrigado Nick ErroRetorno.bmp

Boa tarde, Realizei algumas implementações no arquivo “ACBRNFe2_Trunk2\Fontes\ACBrBoleto\ACBrBancoItau.pas” e gostaria de que a colocar para análise e atualização no projeto. 1 – Add function CodigoLiquidacao_Descricao; 2 – Captura do Sacado.NomeSacado, CodigoLiquidacaoDescricao, Liquidacao.Banco, Liquidacao.Agencia, Liquidacao.Origem na Procedure LerRetorno400; Utilizei como consulta o arquivo AcbrTools\Bancos\Itau\layout_cobranca_400bytes_cnab_itau.pdf e testei com arquivos de retorno cnab 400 na pratica. O arquivo da Caixa, somente ajustei uma tabulação de uma unica linha. Sucesso a todos; ACBrBancoCaixa.pas ACBrBancoItau.pas

Olá pessoal, bom estava verificando e percebi que na leitura do retorno do Banrisul quando a ocorrência retornada era "AB – Cobrança a Creditar (em trânsito)*" a mensagem retornada era a "02 – Entrada Confirmada" por essa ser a mensagem padrão em casos que não são tratados, adicionei ao fonte um tratamento para a ocorrência AB para casos como o meu onde preciso tomar uma decisão com essa ocorrência! Deixo em Anexo os arquivos para análise. Arquivos.rar

Boa tarde, estou homologando os boletos do Itaú no nosso sistema e não pude deixar de notar que na classe TACBrBancoItau as tabela de tipos de ocorrência estão desatualizadas, faltando tratar diversas rejeições. Me baseei no manual de integração do Itaú disponível no seguinte link: Manual de Integração boletos Itaú (pg. 26 a 34, tabela 1 a tabela 12) Alterei o que foi necessário e adicionei as rejeições faltantes. Gostaria de contribuir com minhas alterações. Como devo proceder? Att.

Estou compartilhando uma alteração que fiz no processamento do retorno PRÉ-CRÍTICA para ser enviado ao SVN. Fiz o seguinte: Quando recebo um arquivo de retorno PRÉ-CRÍTICA da CEF e tento processá-lo, o ACBrBoleto me retorna a seguinte mensagem: "ACBrBanco.ACBrBoleto.NomeArqRetorno +'não é um arquivo de retorno do '+ Nome". O que eu fiz foi analisar o arquivo PRÉ-CRÍTICA e retornar uma mensagem mais específica quanto às informações contidas nesse arquivo. O arquivo PRÉ-CRÍTICA retorna na posição 143 os seguintes status: 3 - Arquivo PRÉ-CRITICA PROCESSADO; 5 - Arquivo PRÉ-CRITICA REJEITADO; 5 - Arquivo PRÉ-CRITICA REJEITADO - W (posição 14) - Mostra qual o motivo da rejeição (no caso mostra o código que contém a descrição do motivo da rejeição que está contido no manual CNAB240 da caixa). Criei também um método para retornar o TACBrTipoOcorrencia passando o codOcorrencia. DÚVIDA: Por enquanto, trabalho apenas com a Caixa Econômica federal e estou na dúvida se alteração que fiz poderia servir para qualquer banco, dessa forma eu poderia transferir o tratamento que fiz no arquivo específico da CEF (ACBrBancoCaixa) para o arquivo Geral (ACBrBoleto). Att. Wagner Freitas ACBrBancoCaixa.pas ACBrBoleto.pas

Boa tarde, ao receber os resumos dos documentos pela consulta distribuição DFe existe alguma forma de obter o CNPJ do destinatário do documento? Justifico o porque: Com a inclusão da tag <autXML> tem alguns fornecedores emitindo a nota para filiais da empresa e adicionando o CNPJ da matriz na tag mencionada, com isso quando realiza-se a consulta pelo CNPJ matriz (o que até então retornava apenas os documentos destinados ao CNPJ enviado na consulta) agora retorna também documentos com destinatários diferente do CNPJ consultado. Grato desde já...

Bom dia pessoal, estou com um problema um pouco estranho, ao fazer o retorno de todos os bancos funciona perfeitamente, mas ao tentar fazer do banco bradesco ele pega o nosso número em branco em todos os títulos, vi que que um usuário postou a um tempo atrás no fórum com o mesmo problema, mas infelizmente não postou como fez pra resolver. Segue código que uso pra ler o retorno: ACBrBoleto := TACBrBoleto.Create(Self); ACBrBoleto.LeCedenteRetorno := True; AcbrBoleto.NomeArqRetorno := NomeArquivoRetorno; AcbrBoleto.LerRetorno; NovoPortador := ''; For i := 0 to AcbrBoleto.ListadeBoletos.Count - 1 do Begin If Trim(AcbrBoleto.ListadeBoletos.Objects[i].SeuNumero) <> '' Then Begin Numero := TStringList.Create; ExtractStrings(['-'], [], PWideChar(AcbrBoleto.ListadeBoletos.Objects[i].SeuNumero), Numero); Titulo := Numero[0]; Parcela := Numero[1]; Serie := Numero[2]; End; Essa linha sempre retorna uma string vazia ser for Bradesco: ' ' AcbrBoleto.ListadeBoletos.Objects[i].SeuNumero Vou anexar o arquivo de retorno. Agradeço a ajuda. CB140500.RET

Olá pessoal, bom estive verificando e testando a leitura do arquivo retorno 240 do Banrisul e verifiquei que aparece uma mensagem de erro em relação ao CNPJ da empresa. Debugando o código verifiquei que a mensagem aparece pois ao ler o arquivo o CNPJ é formatado com os caracteres especiais e na verificação onde é visto se o CNPJ do cedente é o mesmo do arquivo ele é formatado com apenas números, sendo assim sempre diferente independente da forma como eu passe na configuração. Acredito que a solução seja apenas remover do fonte do banco banrisul a formatação onde são colocados os caracteres especiais do documento. Ah lembrando que a validação ocorre na Unit ACBrBoleto que é unica e é usada por todos os bancos, sendo assim veirifiquei que em outros apenas existe a Função OnlyNumber ao tratar o CNPJ/CPF do arquivo. Bom no momento seria isso, desde já agradeço a atenção de todos.

Olá! Configurei o ACBrBoleto em um de meus clientes utilizando o Banco Safra, tanto a impressão do boleto quanto o arquivo de remessa foram homologados e já efetuei testes em ambiente de produção. Tive que realizar apenas uma alteração na leitura do arquivo de retorno, tendo em vista que a propriedade TACBrTitulo.OcorrenciaOriginal.CodigoBanco sempre retornava o valor '02'. O arquivo ACBrBancoSafra.pas com a alteração está anexado nesta mensagem. A minha alteração pode ser visualizada na linha 546 do arquivo na procedure LerRetorno400. 546: OcorrenciaOriginal.Tipo := CodOcorrenciaToTipo(StrToIntDef(copy(Linha, 109, 2), 0)); ACBrBancoSafra.pas

Caros Boa Noite Estou com um problema aqui no ACBrBoleto no Itaú Carteira 109 no retorno CNAB 400, ele dá uma mensagem dizendo que o "CNPJ é inválido" se estiver LeCendenteRetorno := True e caso contrário dá uma mensagem dizendo "CNPJ/CPF: 00001111111111 do arquivo não corresponde aos dados do Cedente!" com o CPF do cliente precedido de zeros... O problema é que a conta do meu cliente é uma conta jurídica, mas o cedente do boleto é uma pessoa física e o Banco faz assim e com certeza está errado, pelo próprio manual do Banco, e pelo que vi vai ser bem complicado de solicitar um acerto pela TI do Banco. Ou seja o Itau gera um retorno com identificação de CNPJ para um CPF. Tem alguma forma de contornar isto, sem mudar o código por nós mesmos??? Agradeço Oswaldo dos Santos Araujo

Boa tarde pessoal! Recentemente recebi uma nf-e com desoneração de ICMS, porem tenho que fazer o retorno dessa nota para o emitente. Sou obrigado a fazer o retorno dessa nf-e com desconto de ICMS, referente ao ICMS desonerado? Obrigado

Bom dia! Estou implementando o boleto da CEF e percebi que no arquivo ACBrBoleto, o método LeRetorno contém um teste que lança uma exceção se o código remessa/retorno for diferente de '2'. procedure TACBrBoleto.LerRetorno(AStream: TStream); ... case Length(SlRetorno.Strings[0]) of 240 : begin if (Copy(SlRetorno.Strings[0],143,1) <> '2') then Raise Exception.Create( ACBrStr( NomeArq + sLineBreak + 'Não é um arquivo de Retorno de cobrança com layout CNAB240') ); ... Porém existem outros casos que podem ser tratados e por conta desse teste eu não consigo tratá-los na unit ACBrBancoCaixa. Não seria melhor transferir esse teste para dentro das units de cada banco? Pois dessa forma cada banco poderia implementar o tratamento para estes outros casos. Att.

Ao processar arquivos de retorno do banco do brasil, o componente está informando o motivo da rejeição/complemento da ocorrência incorretamente. Por exemplo: Ao processar o arquivo de retorno anexo, observar que os títulos das linhas 59, 61, 63 e 65 foram pagos em cartório, porém todos os titulos posteriores à este apresentam como motivo "08-Pago em cartório" indevidamente. O problema acontece porque o Result da function abaixo não é inicializado: function TACBrBancoBrasil.CodMotivoRejeicaoToDescricao(const TipoOcorrencia: TACBrTipoOcorrencia; CodMotivo: Integer): String; Por favor enviar a correção para o repositório. ACBrBancoBrasil.pas IEDCBR2871301201913446.ret

Prezados, bom dia! Gostaria de saber se há no ACBr, rotinas para a geração do Arquivo Remessa e leitura do Arquivo Retorno para Débitos Automáticos, no meu caso atual, para o banco Santander. Segue manual: DEBITO-AUTOMATICO-V05-06052008.pdf Poderiam me dar um Apoio?

Boa tarde Ao realizar a consulta de um lote transmitido com sucesso, está retornando o seguinte erro. Ocorrencia Código:102 Descrição: O Evento informado não foi reconhecido pelo sistema. Ação Sugerida: Verificar se o evento informado esta de acordo com a Tabela 9 (Tipos de Arquivo do eSocial) do eSocial. Tipo: 1 Localização: Seria uma falha do servidor da receita ou alguma inconsistência do arquivo q estou enviando? Segue o XML do retorno e do evento S-1000 RespConsulta-154811_827.xml S1000.xml

Boa tarde! Estou com um problema, pois meu cliente tem 3 contas de números diferentes e um único cedente para as contas. O banco me manda um retorno com os títulos e para cada titulo vem a conta que ele pertence. O componente já trata este caso pois não encontrei. Olhei nos fonte e vi que a conta é pega do topo do relatório. Desde já agradeço.

Boa tarde, alguém tem tido problemas recentemente com transmissão de NF-e? Aqui, eventualmente é gerado um erro similar aos prints de tela anexados, aparentemente a Sefaz está mandando um retorno estragado, me parece. Ao tentar fazer o envio das notas novamente, elas são autorizadas.

Pessoal, boa tarde, Estava estudando um pouco sobre o código da pcnRetConsCad, e verifiquei algo estranho, existe a property CEP : Integer. CEP não pode ser Integer pois existem CEPs que iniciam Zero, por exemplo, consultem o CNPJ: 02808708000107 (Ambev), o cep que ficou armazenado é 4530001, ele esta incorreto pois o correto é 04530001 uma possível correção que encontrei para usar-la é: Format('%.8d', [FDM_NotaFiscalEletronica.ACBr_NF_EMISSOR.WebServices.ConsultaCadastro.RetConsCad.InfCad.Items[0].CEP]);

Boa tarde Colegas, Estou utilizando o ACBr para envio da remessa e retorno do banco Santander, mas no processamento do retorno encontrei um problema, ou talvez foi feito para ser assim (MotivoRejeicaoComando - somente motivos de rejeição). Primeiro resumidamente é que o Motivo que vem no arquivo quando é liquidação ou baixa(Ocorrência 06 ou 09) ou não está entrando na rotina Titulo.MotivoRejeicaoComando.Add. Assim não temos disponíveis os motivos das ocorrências na baixa/liquidação. Versão mais detalhada: procedure TACBrBancoSantander.LerRetorno240 Layout: Santander - CNAB 240 - Layout de Arquivo - Padrão 240 – Cobrança - Versão 2.8.3 - Setembro/2017 Nota 41 - Indica que o código de ocorrência 03(03 - Entrada rejeitada), 26(26 - instrução rejeitada) e 30(30 - alteração de dados rejeitada) estão relacionados com a nota 41-a E os códigos 06(liquidação), 09(baixa) e 17 estão relacionados com a nota 41-C - Ai temos uma relação - Códigos de rejeições de 01 a 64 associados ao códigos de movimento 03, 26 e 30 - E temos uma relação de Código de liquidação/baixa de 01 a 13 associados ao código de movimento 06, 09 e 17 Bom, analisando um arquivo de retorno do Santander, no segmento, T, na coluna 209(Motivo), quando a ocorrência vem 06(Liquidação) veio os motivos 03(No próprio banco) e 04(Compensação eletrônica). Ai analisando o arquivo do Acbr ( ACBrBancoSantander.pas ) verifiquei que na leitura do retorno na procedure TACBrBancoSantander.LerRetorno240 - DoVerOcorrencia Só tem a tratativa dos motivos das ocorrências 03, 26 e 30, as quais estão ligadas somente as rejeições. if MatchText(AOcorrencia, ['03', '26', '30']) then Mas eu preciso dos motivos das ocorrências 06, 09 e 17, principalmente da 06 e 09 Então minha sugestão de alteração do código seria: if MatchText(AOcorrencia, ['03', '06', '09', '17', '26', '30']) then begin pMotivoRejeicao:= 209; for I:= 0 to 4 do begin CodMotivo:= StrToIntDef(copy(Linha,pMotivoRejeicao,2),0); if CodMotivo > 0 then begin Titulo.MotivoRejeicaoComando.Add(copy(Linha, pMotivoRejeicao, 2)); Titulo.DescricaoMotivoRejeicaoComando.Add(CodMotivoRejeicaoToDescricao( Titulo.OcorrenciaOriginal.Tipo,CodMotivo)); end; Inc(pMotivoRejeicao, 2); end; if AOcorrencia = '03' then Tipo:= toRetornoRegistroRecusado else if AOcorrencia = '26' then Tipo := toRetornoInstrucaoRejeitada else if AOcorrencia = '30' then Tipo := toRetornoAlteracaoDadosRejeitados else if MatchText(AOcorrencia, ['06', '09']) then Tipo := CodOcorrenciaToTipo(StrToInt(AOcorrencia)) else if AOcorrencia = '17' then Tipo := toRetornoLiquidadoAposBaixaOuNaoRegistro end Ou seja incluir no primeiro if o '06', '09', '17'... E colocar no if do Tipo adicionar o 06 , 09 e 17. os quais puxei de baixo onde ele entrava antes. Ver a possibilidade de alteração para que possamos ter os motivos nas ocorrências: (09-baixa ou 06-liquidação) ou se MotivoRejeicaoComando é somente para rejeições e não tem a opção de pegar o motivo quando da baixa. Mas iria enviar o arquivo em anexo do fonte atualizado (2018.05.30) com a alteração mencionada, caso MotivoRejeicaoComando não seja somente rejeição. Mas fui testar a modificação e ai descobri que os códigos de motivos que retornam são os códigos do layout 400. Layout: PRODUTOS RECEBIMENTOS - CNAB 400 (padrão Santander) - Com Registro - Versão 2.17 – Outubro/2017 Página 22 - Nota 13: Códigos de Ocorrências - temos os códigos com 3 dígitos - e na 240 temos com dois dígitos o motivo. Então, seguindo o padrão do ACBrBancoBrasil.pas eu cadastrei os códigos dos motivos para o CNAB 240. Então tive que mudar na procedure TACBrBancoSantander.LerRetorno240 - DoVerOcorrencia Esse código : if AOcorrencia = '03' then Tipo:= toRetornoRegistroRecusado else if AOcorrencia = '26' then Tipo := toRetornoInstrucaoRejeitada else if AOcorrencia = '30' then Tipo := toRetornoAlteracaoDadosRejeitados else if MatchText(AOcorrencia, ['06', '09']) then Tipo := CodOcorrenciaToTipo(StrToInt(AOcorrencia)) else if AOcorrencia = '17' then Tipo := toRetornoLiquidadoAposBaixaOuNaoRegistro; Antes do código da rejeição, pois é necessário saber o Tipo na rotina CodMotivoRejeicaoToDescricao, então ficou assim esse trecho: if MatchText(AOcorrencia, ['03', '06', '09', '17', '26', '30']) then begin if AOcorrencia = '03' then Tipo:= toRetornoRegistroRecusado else if AOcorrencia = '26' then Tipo := toRetornoInstrucaoRejeitada else if AOcorrencia = '30' then Tipo := toRetornoAlteracaoDadosRejeitados else if MatchText(AOcorrencia, ['06', '09']) then Tipo := CodOcorrenciaToTipo(StrToInt(AOcorrencia)) else if AOcorrencia = '17' then Tipo := toRetornoLiquidadoAposBaixaOuNaoRegistro; pMotivoRejeicao:= 209; for I:= 0 to 4 do begin CodMotivo:= StrToIntDef(copy(Linha,pMotivoRejeicao,2),0); if CodMotivo > 0 then begin Titulo.MotivoRejeicaoComando.Add(copy(Linha, pMotivoRejeicao, 2)); Titulo.DescricaoMotivoRejeicaoComando.Add(CodMotivoRejeicaoToDescricao( Titulo.OcorrenciaOriginal.Tipo,CodMotivo)); end; Inc(pMotivoRejeicao, 2); end; Bom agora a mudança no procedimento CodMotivoRejeicaoToDescricao somente a parte do else para o CNAB 240: else // 240 begin case TipoOcorrencia of toRetornoComandoRecusado: //03 (Entrada rejeitada) case CodMotivo of 01: Result:='Codigo do banco invalido'; 02: Result:='Codigo do registro detalhe invalido'; 03: Result:='Codigo do segmento invalido'; 04: Result:='Codigo do movimento nao permitido para carteira'; 05: Result:='Codigo de movimento invalido'; 06: Result:='Tipo/numero de inscricao do beneficiário invalidos'; 07: Result:='Agencia/Conta/DV invalido'; 08: Result:='Nosso numero invalido'; 09: Result:='Nosso numero duplicado'; 10: Result:='Carteira invalida'; 11: Result:='Forma de cadastramento do titulo invalido'; 12: Result:='Tipo de documento invalido'; 13: Result:='Identificacao da emissao do bloqueto invalida'; 14: Result:='Identificacao da distribuicao do bloqueto invalida'; 15: Result:='Caracteristicas da cobranca incompativeis'; 16: Result:='Data de vencimento invalida'; 17: Result:='Data de vencimento anterior a data de emissao'; 18: Result:='Vencimento fora do prazo de operacao'; 19: Result:='Titulo a cargo de Bancos Correspondentes com vencimento inferior XX dias'; 20: Result:='Valor do titulo invalido'; 21: Result:='Especie do titulo invalida'; 22: Result:='Especie nao permitida para a carteira'; 23: Result:='Aceite invalido'; 24: Result:='Data da emissao invalida'; 25: Result:='Data da emissao posterior a data'; 26: Result:='Codigo de juros de mora invalido'; 27: Result:='Valor/Taxa de juros de mora invalido'; 28: Result:='Codigo do desconto invalido'; 29: Result:='Valor do desconto maior ou igual ao valor do titulo '; 30: Result:='Desconto a conceder nao confere'; 31: Result:='Concessao de desconto - ja existe desconto anterior'; 32: Result:='Valor do IOF invalido'; 33: Result:='Valor do abatimento invalido'; 34: Result:='Valor do abatimento maior ou igual ao valor do titulo'; 35: Result:='Abatimento a conceder nao confere'; 36: Result:='Concessao de abatimento - ja existe abatimento anterior'; 37: Result:='Codigo para protesto invalido'; 38: Result:='Prazo para protesto invalido'; 39: Result:='Pedido de protesto nao permitido para o titulo'; 40: Result:='Titulo com ordem de protesto emitida'; 41: Result:='Pedido de cancelamento/sustacao para titulos sem instrucao de protesto'; 42: Result:='Codigo para baixa/devolucao invalido'; 43: Result:='Prazo para baixa/devolucao invalido'; 44: Result:='Codigo da moeda invalido'; 45: Result:='Nome do pagador nao informado'; 46: Result:='Tipo/numero de inscricao do pagador invalidos'; 47: Result:='Endereco do pagador nao informado'; 48: Result:='CEP invalido'; 49: Result:='CEP sem praca de cobranca /nao localizado'; 50: Result:='CEP referente a um Banco Correspondente'; 51: Result:='CEP incompativel com a unidade da federacao'; 52: Result:='Unidade da federacao invalida'; 53: Result:='Tipo/numero de inscricao do sacador/avalista invalidos'; 54: Result:='Sacador/Avalista nao informado'; 55: Result:='Nosso numero no Banco Correspondente nao informado'; 56: Result:='Codigo do Banco Correspondente nao informado'; 57: Result:='Codigo da multa invalido'; 58: Result:='Data da multa invalida'; 59: Result:='Valor/Percentual da multa invalido'; 60: Result:='Movimento para titulo nao cadastrado'; 61: Result:='Alteracao da agencia cobradora/dv invalida'; 62: Result:='Tipo de impressao invalido'; 63: Result:='Entrada para titulo ja cadastrado'; 64: Result:='Numero da linha invalido'; 65: Result:='A espécie de título não permite a instrução'; 72: Result:='Entrada de título Sem Registro'; 90: Result:='Identificador/Quantidade de Parcelas de carnê invalido'; 92: Result:='Data de Desconto Inválida'; end; toRetornoLiquidadoSemRegistro, toRetornoLiquidado, toRetornoLiquidadoPorConta, toRetornoLiquidadoSaldoRestante, toRetornoLiquidadoEmCartorio: // 05, 06, 07, 08 e 15 (Liquidado) case CodMotivo of 01: Result:='01-Por saldo'; 02: Result:='02-Por conta'; 03: Result:='03-No próprio banco'; 04: Result:='04-Compensação eletrônica'; 05: Result:='05-Compensação convencional'; 06: Result:='06-Arquivo magnético'; 07: Result:='07-Após feriado local'; 08: Result:='08-Em cartório'; 09: Result:='09-Pagamento Parcial'; end; else Result := IntToStrZero(CodMotivo, 2) + ' - Outros Motivos'; end; //case TipoOcorrencia end; //else 240 Assim eu consegui ler código do motivo quando a ocorrência vem como liquidado. Como disse não sei se o MotivoRejeicaoComando utiliza somente rejeição, mas a julgar pelo fonte do banco do Brasil, acredito que não, assim esse correção seria interessante. Estou enviando o fonte do Acbr do Santander para análise para verificar a possível alteração. Caso precisem dos manuais também posso disponibiliza-los aqui. Nos testes que fiz aqui deram certo. Abraços, Rodrigo ACBrBancoSantander.pas

Boa tarde Pessoal, tudo bem? Estou com um problema na leitura do retorno sicoob layout cnab240. Ocorre aqui: if ( (not LeCedenteRetorno) and (rConta + rDigitoConta <> OnlyNumber(Cedente.Conta + Cedente.ContaDigito)) ) then raise Exception.CreateFMT('Conta do arquivo %s inválida, config %s',[rConta,OnlyNumber(Cedente.Conta + Cedente.ContaDigito)]); Erro: Conta do arquivo 000000040813 inválida, config 0000040813. Verifiquei que estava com uma quantidade diferente de 0, e acabei testando desta forma: if ( (not LeCedenteRetorno) and (RemoveZerosEsquerda(rConta) + rDigitoConta <> OnlyNumber(RemoveZerosEsquerda(Cedente.Conta) + Cedente.ContaDigito)) ) then raise Exception.CreateFMT('Conta do arquivo %s inválida, config %s',[rConta,OnlyNumber(Cedente.Conta + Cedente.ContaDigito)]); E consegui realizar a leitura do retorno normalmente. Isso está ocorrendo com mais alguém?