Ir para conteúdo
  • Cadastre-se

dev botao

Alterações ACBrBancoBanestes - LerRetorno400


  • Este tópico foi criado há 2807 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Prezados,

 

Realizei algumas alterações bem como correções na unit “ACBrBancoBanestes”, sendo elas:

procedure LerRetorno400

 

No manual na pagina 14 item 6.1.2 fala a respeito do tamanho do nosso numero no arquivo retorno

ac01.png

Notem que o nosso numero é composto de 10 números, mas eles estava copiando apenas 8. Corrigido isso.ac02.png

Antes:

NossoNumero          := Copy(Linha,63,8);

Depois:

 

NossoNumero          := Copy(Linha,63,10);

Também a propriedade "Carteira" está sendo atribuída com sendo aviso de movimentação. Mas logo abaixo no código a mesma "Carteira" está sendo atribuída com a informação correta.

1 Vez:

 

Carteira               := copy(Linha,83,3);

2 Vez

 

 Carteira             := Copy(Linha,108,1);

Removido a primeira citação da carteira "Carteira := copy(Linha,83,3);" pois o correto é Carteira := Copy(Linha,108,1);

Removido o bloco:

   ACBrBanco.ACBrBoleto.DataCreditoLanc := StringToDateTimeDef(Copy(ARetorno[1],111,2)+'/'+

                                                               Copy(ARetorno[1],113,2)+'/'+

                                                               Copy(ARetorno[1],115,2),0, 'DD/MM/YY' );

Pois as posições que estão sendo copiadas são referente ao filler – brancos, não tem valor algum.

Criado variável “CodAvisoMov” referente ao “Código do Lançamento (Aviso Movimentação)”

No manual na pagina 14 menciona essa informação que vem no retorno. No anexo XII contém uma lista de códigos que segundo o banco são meios para identificar se deve ou não realizar a baixa.

ac03.png

Por exemplo, o banco informou que se nesta posição vier os códigos abaixo a baixa poderá ser processada.

ac04.png

Obs.: Apesar desta informação ser parecida com o código de ocorrência, não é a mesma coisa, por exemplo no arquivo de retorno mencionado acima, temos duas informações em cada uma de suas posições.

ac05.png

Segue unit em anexo.

 

ACBrBancoBanestes.pas

Editado por denerbuzato
  • Curtir 1
Link para o comentário
Compartilhar em outros sites

Boa tarde pessoal,

Estou com o mesmo problema na leitura do arquivo de retorno referente ao nosso número. Não localiza o documento visto o componente está dando um copy de 8 caracteres sendo que o correto seria 10 como citado pelo colega.

Estou no aguardo da disponibilização da atualização.

Grato

Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa noite.

As 2 últimas posições retornadas são os DVs do Nosso Número, por este motivo o NossoNumero só tem 8 posições.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

Bom dia,

Isso significa que terei que calcular o dígito? Vocês não acatarão a sugestão?

Como fica os demais itens sugeridos?

Em 17/05/2016 at 12:23, denerbuzato disse:

Removido a primeira citação da carteira "Carteira := copy(Linha,83,3);" pois o correto é Carteira := Copy(Linha,108,1);

Em 17/05/2016 at 12:23, denerbuzato disse:

Removido o bloco:

   ACBrBanco.ACBrBoleto.DataCreditoLanc := StringToDateTimeDef(Copy(ARetorno[1],111,2)+'/'+

                                                               Copy(ARetorno[1],113,2)+'/'+

                                                               Copy(ARetorno[1],115,2),0, 'DD/MM/YY' );

Pois as posições que estão sendo copiadas são referente ao filler – brancos, não tem valor algum.

Em 17/05/2016 at 12:23, denerbuzato disse:

Criado variável “CodAvisoMov” referente ao “Código do Lançamento (Aviso Movimentação)”


Também não foram aprovados?

Link para o comentário
Compartilhar em outros sites

Ainda sobre o nosso número com 8 posições, comparando o código atual com uma cópia que tenho salvo, percebi que anteriormente era copiado as 10 posições, ou seja, depois que atualizei que passou a copiar 8. Também não achei um tópico que falasse sobre essa modificação. Um tópico que achei de modificação no banestes foi de um usuário sac onde não é possível eu ter acesso a informação que ele postou.

O que foi feito neste tópico? Como saber?

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia.

1 hora atrás, rrommullo disse:
  Em 17/05/2016 at 12:23, denerbuzato disse:

Removido a primeira citação da carteira "Carteira := copy(Linha,83,3);" pois o correto é Carteira := Copy(Linha,108,1);

Será implementado.

 

1 hora atrás, rrommullo disse:

Removido o bloco:

   ACBrBanco.ACBrBoleto.DataCreditoLanc := StringToDateTimeDef(Copy(ARetorno[1],111,2)+'/'+

                                                               Copy(ARetorno[1],113,2)+'/'+

                                                               Copy(ARetorno[1],115,2),0, 'DD/MM/YY' );

Pois as posições que estão sendo copiadas são referente ao filler – brancos, não tem valor algum.

Será implementado.

1 hora atrás, rrommullo disse:

Criado variável “CodAvisoMov” referente ao “Código do Lançamento (Aviso Movimentação)”

Não entendi a finalidade desta variável,  uma vez que é local e não é passada a nenhum propriedade do componente.

 

@Rrommullo

42 minutos atrás, rrommullo disse:

 

Ainda sobre o nosso número com 8 posições, comparando o código atual com uma cópia que tenho salvo, percebi que anteriormente era copiado as 10 posições, ou seja, depois que atualizei que passou a copiar 8. Também não achei um tópico que falasse sobre essa modificação. Um tópico que achei de modificação no banestes foi de um usuário sac onde não é possível eu ter acesso a informação que ele postou.

 

O código anterior estava incorreto, pois conforme citei em meu post anterior os 2 últimos dígitos são o DV, se deseja o nosso número com o DV basta utilizar a função MontarNossoNumero() em seu código.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

Bom dia Juliana,

Primeiramente obrigado pelo retorno. Analisando o manual do Banestes, seria interessante o componente tratar o "Código do Lançamento (Aviso Movimentação)", visto que no arquivo retorno ele é importante para identificar as parcelas liquidadas. Poderia implementar isso? Você que conhece bem o componente talvez saberia melhor qual propriedade poderia ser usada para essa finalidade.

22 horas atrás, Juliana Tamizou disse:
23 horas atrás, rrommullo disse:

Criado variável “CodAvisoMov” referente ao “Código do Lançamento (Aviso Movimentação)”

Não entendi a finalidade desta variável,  uma vez que é local e não é passada a nenhum propriedade do componente.

Estarei no aguardo da disponibilização da atualização dos itens que você disse que será implementado.

Grato pela atenção.

Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa tarde.

Se desejar você pode implementar a questão do Código de Lançamento e anexar as alterações para serem analisadas, conforme fez com as demais.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

Entendo,

Você me sugere usar alguma propriedade do ACBrBoleto ou criar uma nova para essa finalidade? Visto que terei que passar do ACBrBancoBanestes para o ACBrBoleto.

Quanto aos demais itens que você disse que seria implementado, você irá me aguardar, ou já irá disponibilizar uma atualização por se tratar de coisas mais simples?

Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa tarde.

11 minutos atrás, rrommullo disse:

Você me sugere usar alguma propriedade do ACBrBoleto ou criar uma nova para essa finalidade? Visto que terei que passar do ACBrBancoBanestes para o ACBrBoleto.

Acho interessante  observar se realmente será necessário uma nova propriedade.

 

12 minutos atrás, rrommullo disse:

Quanto aos demais itens que você disse que seria implementado, você irá me aguardar, ou já irá disponibilizar uma atualização por se tratar de coisas mais simples?

São alterações que não dependem do que você pretende fazer, logo poderão ser disponibilizadas antes.

Att.

 

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

Boa tarde,

Em 25/05/2016 at 17:45, Juliana Tamizou disse:

Boa tarde.

Em 25/05/2016 at 17:32, rrommullo disse:

Você me sugere usar alguma propriedade do ACBrBoleto ou criar uma nova para essa finalidade? Visto que terei que passar do ACBrBancoBanestes para o ACBrBoleto.

Acho interessante  observar se realmente será necessário uma nova propriedade.

Não há necessidade de criar uma nova propriedade para tratar o "Código do Lançamento (Aviso Movimentação)". Podemos usar a propriedade "CodigoLiquidacao".

Para isso basta acrescentar na procedure LerRetorno400 o código

CodigoLiquidacao := Copy(Linha,83,2); //Código Lançamento (Aviso de Movimentação)

Juliana, você prefere que eu inclua esse código, ou quando você for disponibilizar os demais itens solicitados pelo colega você faz essa inclusão?

Att

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia @denerbuzato

Fique a vontade para incluir, desta forma você aproveita e realiza os testes também.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

Bom dia,

Segue as alterações na unit “ACBrBancoBanestes” na procedure LerRetorno400

Removido a primeira citação da carteira "Carteira := copy(Linha,83,3);" pois o correto é Carteira := Copy(Linha,108,1); 
Removido o bloco:

   ACBrBanco.ACBrBoleto.DataCreditoLanc := StringToDateTimeDef(Copy(ARetorno[1],111,2)+'/'+

                                                               Copy(ARetorno[1],113,2)+'/'+

                                                               Copy(ARetorno[1],115,2),0, 'DD/MM/YY' );

Pois as posições que estão sendo copiadas são referente ao filler – brancos, não tem valor algum.
Incluso CodigoLiquidacao := Copy(Linha,83,2); //Código Lançamento (Aviso de Movimentação)

Obs.: O nosso número não foi alterado visto que foi orientado recalcular o digito para compor o mesmo.

Segue unit em anexo.

ACBrBancoBanestes.pas

Link para o comentário
Compartilhar em outros sites

Bom dia a todos,

Juliana, pelo visto foi feito o que você pediu:

Em 30/05/2016 at 08:08, Juliana Tamizou disse:

Bom dia @denerbuzato

Fique a vontade para incluir, desta forma você aproveita e realiza os testes também.

Att.

 

Em 30/05/2016 at 11:20, denerbuzato disse:

Bom dia,

Segue as alterações na unit “ACBrBancoBanestes” na procedure LerRetorno400

...... está detalhado ...

Alguma previsão para disponibilizar no svn?

Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa tarde.

Você deve aguardar até que seja disponibilizado.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
  • Este tópico foi criado há 2807 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.

The popup will be closed in 10 segundos...