Jump to content

Search the Community

Showing results for tags 'acbrboleto'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Categories

There are no results to display.

Forums

  • Fórum Aberto - ACBr
    • ACBr News
    • Equipamentos testados
    • Base de Conhecimento
    • Dúvidas Gerais sobre o ACBr
    • ACBrSerial
    • ACBrSAT
    • ACBrNFe
    • ACBrMonitor PLUS
    • ACBrDFe
    • ACBrTEFD e Dúvidas sobre TEF
    • ACBrTXT
    • ACBrBoleto
    • ACBrDiversos
    • ACBrTCP
    • ACBrFramework
    • ACBrLIB
    • Dia do ACBr
  • Suporte Pago - SAC
    • Dúvidas gerais
    • ACBrMonitorPLUS
    • NFe/NFCe - Nota Fiscal Eletrônica
    • DFe - Documentos Fiscais Eletrônicos
    • SAT / MFE
    • TEF
    • Boleto
    • ACBrSPED
    • ACBrTXT
    • Paf-ECF
    • Requisitos Fiscais por UF
    • ACBrLIB
  • Outros Assuntos
    • ACBr's Pub
    • Legislação Fiscal e Tributária
    • Object Pascal - Delphi & Lazarus
    • Data Base
    • Classificados
    • Dúvidas não relacionadas ao ACBr

Categories

  • ACBrLib
  • Suporte Pago - SAC
    • ACBrMonitorPLUS - SAC
    • Utilitários - SAC
    • Dia do ACBr 1a edição
    • Dia do ACBr 2a edição
  • Free Download
    • ACBrMonitorPLUS
    • Demos / Testes / Utilitários
    • Apresentações - Palestras

Calendars

  • Eventos - Palestras - Webinars
  • Prazos SEFAZ
  • Community Calendar
  • Feriados Nacionais

Blogs

  • Daniel Simoes' Blog
  • André Ferreira de Moraes
  • Moderadores ACBr
  • Teste de Blog
  • Notícias do ACBr

Categories

  • Suporte Pago - SAC
    • Webinars
    • Video Aulas
    • Palestras - Dia do ACBr 2a Ediçao
  • Vídeos Abertos
    • Video Aulas
    • Comunicados
    • Dia do ACBr 2a Ediçao
    • Dia do ACBr 1a Ediçao
    • Homologação ACBr
  • Campanhas promocionais

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website URL


Skype


Localização


Interesses


CNPJ da Empresa


CPF

Found 155 results

  1. Bom dia, Fiz a implementação para exportar boleto em formato Jpg, estou disponibilizando caso possível seja adicionado no repositório SVN. Esta alteração se fez necessário para efetuar a impressão em uma impressora Bluetooth portátil. Segue unit alterada para analise. ACBrBoleto.pas ACBrBoletoFCFR.dfm ACBrBoletoFCFR.pas
  2. Bom dia, iniciei um processo de homologação do banco safra (cobBancoSafra) e me deparei com dois problemas que não estou conseguindo resolver... 1º o nosso numero gerado no arquivo de remessa esta divergente do impresso pois ele esta adicionando um digito verificador na 9ª posição do NN. IfThen(NossoNumero = '000000000', '000000000', PadLeft(RightStr(NossoNumero,8),8,'0') + CalcularDigitoVerificador(ACBrTitulo)) + não consegui realizar a impressão utilizando esse digito verificador. 2º o banco esta obrigando que não tenha uma logo e esteja escrito 'BANCO SAFRA S/A' em seu lugar, esse eu posso simplesmente alterar para que escreva o texto, mas na próxima vez que o ACBR for atualizado eu teria que alterar novamente.
  3. Bom dia pessoal A empresa que trabalho necessitou a geração de remessa para o banco Safra 240 posições. Como não tinha no ACBR eu criei seguindo o padrão e estou disponibilizando. Pasta destino do arquivo: ...\Fontes\ACBrBoleto\ Grato ACBrBancoSafra.pas
  4. Bom dia, recentemente (Maio/2019) o Sicredi alterou seu layoute de cobrança CNAB400 para atender já no registro de títulos a opção de Negativação. Desta forma torna-se possível enviar já na remessa de cadastro de título a informação da Negativação. A utilização desta funcionalidade de negativação ficou muito semelhante ao já existente procedimento de protesto. Sendo assim alterei os fontes do ACBr para atender tal alteração. Porém só fiz a alteração para o layoute CNAB400. O manual atualizado da cobrança Sicredi CNAB400 onde possui agora os campos para informação da negativação está no link https://www.sicredi.com.br/html/para-sua-empresa/recebimentos/cobranca/arquivos/manual-cnab-400.pdf (Pág. 36 do manual, posição 193-194 e 195-196 do registro detalhe do arquivo de remessa). Também envio em anexo os fontes do ACBr alterados para atender essa opção de negativação. Peço que analisem os fontes abaixo para uma possível submissão para o repositório de fontes no SVN. ACBrBoleto.pas ACBrBancoSicredi.pas
  5. Tenho olhando e continuo olhando o código da demo, por dificuldades na instalação do componente acabei tendo que não instalar o fortes report e uso o fastreport, o fast funciona para minhas aplicações que usam o componente mas não consigo alterar o arquivo ini de forma correta para a demo funcionar com o fast, Mas minha dúvida é a seguinte, estou gerando o pdf do boleto com valor total mas quero parcelar, alimentei o campo parcela mas creio que não seja o jeito correto também selecionei carne no layou mas aparentemente eu não estou alimentando a variável certa: Mesmo atribuindo '10' para parcela ele não alimenta o campo de setparcela, estou bem perdido mas pesquisando dentro do código do componente, alguém pode me dar uma luz de como parcelar para que o pdf gerado sai com por exemplo uma entrada de valor: 1000,00R$ e saia com 10 boletos de 100,00R$ no mesmo pdf?
  6. Boa tarde, Estou tendo dificuldades para gerar boleto, estou recebendo o erro "Not enough timers available", logo após a chamada de "ACBrBoleto1.Imprimir" Debuguei o ACBRBoleto.pas mas não identifiquei o momento da falha, o debug passa por duas funções após a chamada de "Imprimir" dentro delas não ocorre parada Logo que finaliza ele retorna esse erro: Segue a baixo o código de tentativa de impressão: procedure TFrmBoletos.IMPRIMIRClick(Sender: TObject); var Titulo : TACBrTitulo; begin Titulo := ACBrBoleto1.CriarTituloNaLista; with Titulo do begin Vencimento := Now; DataDocumento := Now; NumeroDocumento := '123'; EspecieDoc := '1234'; if 'SIM' = 'SIM' then Aceite := atSim else Aceite := atNao; DataProcessamento := Now; NossoNumero := '1245'; Carteira := '12456'; ValorDocumento := 1.40; Sacado.NomeSacado := '12456'; Sacado.CNPJCPF := '12456'; Sacado.Logradouro := '12456'; Sacado.Numero := '12456'; Sacado.Bairro := '12456'; Sacado.Cidade := '12456'; Sacado.UF := '12456'; Sacado.CEP := '12456'; ValorAbatimento := 0; LocalPagamento := '12456'; ValorMoraJuros := 0; ValorDesconto := 0; ValorAbatimento := 0; DataMoraJuros := 0; DataDesconto := 0; DataAbatimento := 0; DataProtesto := Now; PercentualMulta := 0; Mensagem.Text := '12456'; OcorrenciaOriginal.Tipo := toRemessaBaixar; Instrucao1 := '12456'; Instrucao2 := '12456'; Parcela := 1; end; // grava o nosso numero na conta // Atualiza a consulta ACBrBoleto1.ACBrBoletoFC.DirLogo := 'C:\Users\Trial\Desktop\B.Texte\LogoColorido'; ACBrBoleto1.ACBrBoletoFC.Filtro := fiNenhum; ACBrBoleto1.ACBrBoletoFC.LayOut := lPadrao; ACBrBoleto1.Banco.Digito := 123456; ACBrBoleto1.Banco.Numero := 12345; ACBrBoleto1.Cedente.Nome := 'Fulano'; ACBrBoleto1.Cedente.CodigoCedente := 'Fulanoteste'; ACBrBoleto1.Cedente.Agencia := 'Fulanoteste'; ACBrBoleto1.Cedente.AgenciaDigito := 'Fulanoteste'; ACBrBoleto1.Cedente.Conta := 'Fulanoteste'; ACBrBoleto1.Cedente.ContaDigito := 'Fulanoteste'; ACBrBoleto1.Cedente.UF := 'Fulanoteste'; ACBrBoleto1.NomeArqRemessa := 'TESTE'; ACBrBoleto1.Imprimir; end;
  7. Bom dia, gostaria de saber se existe alguma forma de listar as ocorrências de remessa de um banco específico? Vi que o a classe TACBrBoleto boleto tem a função GetOcorrenciasRemessa, porém a mesma retorna sempre as mesmas ocorrências de remessa independente do banco configurado. Pergunto isto pois estou migrando do CobreBem e no mesmo existe uma função para listar as remessas específicas para o banco configurado. Att. Deivis.
  8. O ACBrBancoBanese não estava de acordo com o Manual do banco, inclusive no cálculo do digito verificador do nosso número, então fiz algumas mudanças no mesmo. Fiz os testes e homologuei a remessa e os boletos junto ao banco. A homologação foi feita com sucesso. Seguem as alterações realizadas e o arquivo ACBrBancoBanese.pas com as alterações realizadas. Seria bom subir o pas não? function TACBrBancoBanese.CalcularDigitoVerificador( const ACBrTitulo: TACBrTitulo ): String; var ADigitoNossoNumero : string; begin Modulo.CalculoPadrao; Modulo.MultiplicadorFinal := 13; Modulo.Documento := ACBrTitulo.NossoNumero; Modulo.Calcular; AdigitoNossoNumero :=IntToStr(Modulo.DigitoFinal); Result:= AdigitoNossoNumero; end; // NÃO LEVAVA EM CONTA A AGÊNCIA NO DOCUMENTO (AAANNNNNNNN) E PARA QUE MultiplicadorFinal:= 13 ? // TROCADO POR function TACBrBancoBanese.CalcularDigitoVerificador( const ACBrTitulo: TACBrTitulo ): String; begin Modulo.CalculoPadrao; Modulo.Documento:= PadLeft(ACBrTitulo.ACBrBoleto.Cedente.Agencia, 3, '0') + RightStr(ACBrTitulo.NossoNumero, 8); Modulo.Calcular; Result:= IntToStr(Modulo.DigitoFinal); end function TACBrBancoBanese.MontarCampoNossoNumero ( const ACBrTitulo: TACBrTitulo ) : String; begin ACBrTitulo.NossoNumero := IntToStrZero( StrToIntDef((Trim(ACBrTitulo.NossoNumero)+Trim(CalcularDigitoVerificador(ACBrTitulo))),0) ,Self.TamanhoMaximoNossoNum); Result := ACBrTitulo.NossoNumero; end; // ACBrTitulo.NossoNumero:= ... MODIFICA O NOSSO NÚMERO, ACRESCENTANDO O DIGITO AO MESMO. // E SE VC PRECISAR CHAMAR A FUNÇÃO UMA SEGUNDA VEZ (PARA GRAVAR O NOSSO NRO MONTADO POR EXEMPLO) VAI BUGAR // PORQUE VC ESTARÁ CRIANDO UM NOVO NOSSONUMERO (AGORA COM O DIGITO) PARA CALCULAR UM NOVO DIGITO // TROCADO POR function TACBrBancoBanese.MontarCampoNossoNumero ( const ACBrTitulo: TACBrTitulo ) : String; begin result:= IntToStrZero( StrToIntDef((Trim(ACBrTitulo.NossoNumero)+Trim(CalcularDigitoVerificador(ACBrTitulo))),0) ,Self.TamanhoMaximoNossoNum); end; function TACBrBancoBanese.CalcularCampoASBACE(const ACBrTitulo: TACBrTitulo): string; ANossoNumero := Copy(Trim(ACBrTitulo.NossoNumero), 1, ACBrTitulo.ACBrBoleto.Banco.TamanhoMaximoNossoNum); // TROCADO POR ANossoNumero := MontarCampoNossoNumero(ACBrTitulo); ACBrBancoBanese.pas
  9. Bom dia Estou gerando boletos e as remessas c240, mas ao Enviar para Homologação ao Banco Sicoob o mesmo retorna o seguinte: 'Corrigir no segmento P, posições 38 a 47 e no boleto o nosso número, os boletos devem possuir numeração crescente e está sendo informado o mesmo número para todos os boletos.' Possuí 6 parcelas. Nosso Numero informado: 5500 O calculo para todos os códigos de barras está sendo feito corretamente, mas no Campo Nosso Numero no Boleto e no arquivo c240 fica sempre o mesmo. Estou anexando as 3 primeiras parcelas para análise, há algum meio de fazer essa ordem crescente?
  10. Boa tarde, estou tento problemas com o banco safra. a ultima remessa que foi enviada foi negada. so que ja tinha enviado 64 remessas e todas passaram. a ultima que foi aceita, foi dia 5 desse mes. nao foi mudado nada. e pelo que eu to vendo os dados estao de acordo com o layouts, tanto os que foram aceitos quantos os que foram negados. estou anexando o ultimo que funcionou e o primeiro que deu negacao. tambem notei uma coisa. no caso da conta usada a agencia é a 0029 e nao tem digito ai eu passo 0. mas quando eu alimento o sistema com agencia 0029 ele automaticamente muda pra 0002 entao tive que cadastrar a conta como 0290 pra no componente tratar a agencia como 0029 a remessa 64 foi a que passou. a 65 foi a rejeitada. REMESSA_SAFRA_64.txt REMESSA_SAFRA_65.txt
  11. Boa tarde pessoal, Então a alguns dias já, estou passando um dificuldade bem irritante. Ressalvo que não tenho muita experiência com a geração de boletos... Mas enfim, estou tentando gerar boletos para o banco Sicredi e já conseguir configurar quase tudo, mas devo estar errando em algo por sempre fica acusando que o DV - Nosso número, está errado. Para fazer esse teste utilizo uma planilha do excel, que baixei daqui mesmo dos foruns da acbr. Se alguém ai, poder me dar uma força na resolução do problema desde já agradeço.
  12. Ao tentar gerar o pdf de um boleto é gerada a seguinte exceção em TACBrBoletoFCFR.PreparaRelatorio: 'Could not convert variant of type (String) into type (Double)'. O boleto era gerado normalmente, porém após as atualizações do ACBr e Fast está ocorendo este erro. Já verifiquei se não existe nenhuma sctring com valor incorreto que possa estar causando este erro.
  13. Boa Tarde Pessoal, Estou homologando boleto do banrisul, nos testes de homologação da geração de remessa o banco me deu este retorno - posição 157-158 incluir a instrução de multa '18'; - posição 159-160 incluir a instrução de protesto '09'; Analisando o procedimento GerarRegistroTransacao400 da unit ACBrBancoBanrisul o campo Instrucao1 esta recebendo o código de protesto 09 e Instrucao2 esta recebendo 18 onde os mesmos estão invertidos. 08A27061918091000000000100 - Trecho do arquivo de remessa do banco 08A28061909181000000000100 - Trecho do arquivo de remessa da ACBrBancoBanrisul Ajustamos a ACBrBancoBanrisul ?
  14. 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
  15. 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
  16. Fazendo testes para impressão de boletos com juros de moral mensal, na impressão estava saindo: "Cobrar juros de R$ 10,00 por dia a partir de dd/mm/yyyy" Quando o correto seria 10,00% ao mês Fiz uma alteração simples no ACBRBoleto para correção. Anexo arquivo com alteração para análise. ACBrBoleto.pas
  17. Recentemente, os boletos que emito pelo Santander Rápida com Registro (ainda nao testei outros bancos), quando o cliente paga em atraso, ele não paga os juros que seguem na instrução, e mesmo quando paga em dia, o banco aceita qualquer valor. A atendente do Santander disse que na hora de gerar a cobrança, eu preciso informar em Tipo de Cobrança: Conforme Registro, e atualmente estou emitindo como Divergente. Mas eu não encontro esta propriedade. O que devo alterar?
  18. Boa tarde. Foi verificado que caso a propriedade ACBrTitulo.CarteiraEnvio fosse tceBanco e houvesse somente 1 mensagem no título, ocorreria o erro Out of Index, por este motivo foram feitas pequenas correções as quais já estão no svn. Porém existe a necessidade de uma revisão mais ampla quanto a este item, uma vez que o Banco do Brasil utiliza o Segmento S tanto para trabalhar com as mensagens adicionais, quanto para os dados do sacado quando será enviado boleto, peço que continuem acompanhando este tópico paras os avisos dos comits das alterações finais. Att.
  19. Estava tendo problemas ao homologar o banco do Brasil, ai coloquei esse tópico https://www.projetoacbr.com.br/forum/topic/47566-remessa-banco-do-brasil-total-de-linhas-do-lote-divergente-17/?tab=comments#comment-315085 mandei os arquivos e passou. ai mandei a primeira remessa, os mesmo arquivos so pra testar em produção e houve rejeição, na hora fiquei sem entender, pois tinha modificado a data e vencimentos do boleto pra nao dar erro e etc. entao fui no email de homologação novamente e pedi uma resposta do que houve ja que tinha passado. e o pessoal me mandou esses erros: > Estrutura do Arquivo Linha 0006, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00005'. Correto '00004' Linha 0007, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00006'. Correto '00005' Linha 0008, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00007'. Correto '00006' Linha 0009, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00009'. Correto '00007' Linha 0010, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00010'. Correto '00008' Linha 0011, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00011'. Correto '00009' Linha 0012, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00013'. Correto '00010' Linha 0013, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00014'. Correto '00011' Linha 0014, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00015'. Correto '00012' Linha 0015, Lote 0001, Segmento P: Erro no sequencial do segmento. informado '00017'. Correto '00013' Linha 0016, Lote 0001, Segmento Q: Erro no sequencial do segmento. informado '00018'. Correto '00014' Linha 0017, Lote 0001, Segmento R: Erro no sequencial do segmento. informado '00019'. Correto '00015' > Segmento R < Lote 0001 > -------------------------------------------------------------------- isso foi depois da atualização que conta os itens corretos que mencionei no topico https://www.projetoacbr.com.br/forum/topic/47566-remessa-banco-do-brasil-total-de-linhas-do-lote-divergente-17/?tab=comments#comment-315085. vou tentar fazer ajustes e enviar novamente. obs: so nao estou respondendo no mesmo topico pq como tinha dado certo o topico foi fechado. Enviando o arquivo original de remessa. REMESSA_CONTA DA EMPRESA_36.txt
  20. Bom dia prezados, Eu realizei alguns ajustes no arquivo acbr boleto do banco do nordeste que eu precisei para meu cenário. Estou deixando o arquivo anexado para que possa ser analisado e talvez adicionado ao repositório. * O código de instrução deve ser preenchido de acordo com a configuração retornada pelo sistema em questão da software house, de acordo com com o manual do BNB (Posições 157 à 160) * O código de aceite não pode ser fixo, ele deve ser preenchido de acordo com a configuração retornada pelo sistema em questão da software house, de acordo com com o manual do BNB (Posição 150) * Os dias para protesto deve ser preenchido de acordo com a configuração retornada pelo sistema em questão da software house, de acordo com com o manual do BNB (392 à 393) ACBrBancoNordeste.pas MANUAL DE ORIENTAÇÕES PARA COBRANÇA BANCÁRIA.pdf
  21. Bom dia, gostaria de saber como imprimir o aceite de um boleto pelo AcbrBoleto, usava o RLReport e por ele conseguia imprimir somente o aceite sem sair os dados para pagamento. Desde já obrigado.
  22. Boa tarde! Segundo o Layout de Arquivos de Retorno CNAB400 do BB (Jan/2014), verifiquei que as ocorrências no trecho abaixo estão desatualizadas. LINHA 1480 Atual: if(CodOcorrencia >= 2) and ((CodOcorrencia <= 10)) then Atualizado para: if CodOcorrencia in [2,3,5,6,7,8,9,10,15,20,46] then Segue em anexo a correção no ACBrBancoBrasil e Manual do Layout para Conferência. Obrigado. Doc2628CBR643Pos7.pdf ACBrBancoBrasil.pas
  23. Boa tarde, Tive de fazer alterações no componente para atender as necessidades do banco ( conforme o manual que me foi enviado por eles e esta em anexo ) eu estou enviando no anexo a unit modificada para analise e inclussão no projeto caso esteja certinho. As alterações estão relacionadas a leitura da remessa de retorno, a parte da geração esta funcionando certinho. Pode verificar pra mim @Juliomar Marchetti se elas podem ser inseridas no projeto. Desde ja agradeço pela atenção. ACBrBancoUnicredES.pas GR - COB136 - Layout CNAB 400 - Retorno (2).docx
  24. Modifiquei o AcbrBancoBrasil nos motivos do retorno para que não quando ache o motivo, retorne 00-Outros motivos. Fiz a modificação baseado no AcbrSantander que já possui a funcionalidade. 1) Primeira mudança - alinhamento do if que verifica CNAB 400 2) Alinhamento/padronização dos motivos do tipo da ocorrência: toRetornoComandoRecusado: //03 (Recusado) 3) Adicionado um retorno padrão (CNAB 400), semelhante ao que tem no fonte do AcbrSantander, para retornar outros motivos. 4) CNAB 240 - (toRetornoRegistroRecusado) - Alinhado case, e colocado no result os códigos junto com a descrição, seguindo o padrão existente: 5) CNAB 240 -(toRetornoLiquidado, toRetornoBaixaAutomatica, toRetornoLiquidadoSemRegistro: // 06, 09 e 17 (Liquidado)) Colocado no result os códigos junto com a descrição, seguindo o padrão existente: 6) Mesmo acima para toRetornoDebitoTarifas 7) Adicionado um retorno padrão (CNAB 240), semelhante ao que tem no fonte do AcbrSantander, para retornar outros motivos. Segue arquivo fonte para análise se pode ser alterado no Acbr. ACBrBancoBrasil.Acbr.2018.10.26-Correcao.pas Obrigado,
  25. A carteira do Banco do Nordeste deve ser informada com 1 caracter, dentro do ACBR o tipo da operação é setado de acordo com esse valor da carteira, porém recentemente foi feito uma alteração no tamanho do campo carteira e foi postado aqui no fórum e começou a causar problemas, Alteração, quando informo a carteira 4 por exemplo, o tipo de operação correspondente deve ser 21, porém com o tamanho da carteira 2 o valor da carteira é setado como '04' ao invés de '4'. Com isso dentro da classe ACBrBancoNordeste o valor da carteira retornado vai ser '04'. function TACBrBancoNordeste.CarteiraToTipoOperacao(const Carteira: string):String; begin if Carteira = '01' then {Alterei de '1' para '01'} Result:= '21' else if Carteira = '02' then {Alterei de '2' para '02'} Result:= '41' else if Carteira = '04' then {Alterei de '4' para '04'} Result:= '21' else if Carteira = '05' then {Alterei de '5' para '05'} Result:= '41' else if Carteira = '06' then {Alterei de '6' para '06'} Result:= '31' else if Carteira = 'I' then Result:= '51' else Result:= Carteira; end; Segue anexo alteração para avaliação. ACBrBancoNordeste.pas
×
×
  • Create New...