Ir para conteúdo
  • Cadastre-se

dev botao

Melhoria no ACBrBancoCaixa


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

Recommended Posts

Bom dia ...

To disponibilizando umas alteração que fiz no ACBrBancoCaixa conforme necessidade que tive em cliente

1) Geração de nosso numero para remessa quando banco emite e entrega, neste casso o nosso numero tem que ir zerado: 

"G069
Identificação do Título no Banco
Número adotado pelo Banco Cedente para identificar o Título.
Para Código de Movimento (posições 16-17 do Segmento P) igual a '01' (Entrada de Títulos):
1) Se a CAIXA for responsável pela emissão do bloqueto, o campo Carteira/Nosso Número (posições 41-
42/43-57) pode ser preenchido com zeros (‘0’), nesse caso, a numeração será feita pelo Banco."

fiz uma alteração na linha 172:

onde era:

else
          ANossoNumero := '11'+PadLeft(ANossoNumero, 15, '0')

passou a :

        else if (StrToIntDef(ANossoNumero,0)) <> 0  then
          ANossoNumero := '11'+PadLeft(ANossoNumero, 15, '0')
        else
          ANossoNumero := '00'+PadLeft(ANossoNumero, 15, '0')

2) Adicionei os código de retorno na cobrança 240

‘23’ Remessa a Cartório
‘24’ Retirada de Cartório

 

ACBrBancoCaixa.pas

Link para o comentário
Compartilhar em outros sites

Boa tarde!

 

Eu encontrei um problema ao gerar cnab 240, no seguinte processo, emitir o boleto e em outro momento gerar a remessa.

Na geração da transação do 240, linhas 578 e 579

               PadRight(Copy(ANossoNumero,1,2), 2, '0')                                                        + //41 a 42 - Modalidade da Carteira
               PadLeft(Copy(ANossoNumero,3,17), 15, '0')                     + //43 a 57 - Nosso número - identificação do título no banco
 

Acontece que o NossoNumero não tem a modalidade da carteira quando é salvo no registro do banco de dados, fiz uma alteração interna no sistema para guardar a geração do nosso numero que é usado na impressão do boleto, mas no momento de gerar a remessa se eu passo o número integral de 17 dígitos é gerado mensagem de erro que aceita no máximo 15.

E se tenho salvo somente o "NossoNumero" se a modalidade na hora de gerar onde vai ler da propriedade não tem os 17 dígitos para ler a modalidade...

Ao meu ver não deveria fazer a leitura da modalidade pelo "nossoNumero" e sim passar a modalidade como parâmetro ao gerar a linha da remessa no segmento P.

Marcos

Link para o comentário
Compartilhar em outros sites

No meu caso não guardo a modalidade.. apenas nosso numero ..

porque a modalidade vai depender tipo de emissão:

 

CC = 11 (título Registrado emissão pela CAIXA)
CC = 14 (título Registrado emissão pelo Cedente)
CC = 21 (título Sem Registro emissão pela caixa CAIXA)
CC = 00 (título Registrado emissão pela CAIXA mas com nosso numero do cliente)

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia.

Em 2017-5-17 at 10:53, Rodrigo de Carvalho Ribeir disse:


          ANossoNumero := '11'+PadLeft(ANossoNumero, 15, '0')

passou a :

        else if (StrToIntDef(ANossoNumero,0)) <> 0  then
          ANossoNumero := '11'+PadLeft(ANossoNumero, 15, '0')
        else
          ANossoNumero := '00'+PadLeft(ANossoNumero, 15, '0')

Em seu comentário vc diz que o preeenchimento do nosso número depende do tipo de emissão do boleto, logo o correto seria utilizar a propriedade  CarteiraEnvio.

Em 2017-5-19 at 13:28, Marcos Mentz_5837 disse:

Eu encontrei um problema ao gerar cnab 240, no seguinte processo, emitir o boleto e em outro momento gerar a remessa.

Na geração da transação do 240, linhas 578 e 579

               PadRight(Copy(ANossoNumero,1,2), 2, '0')                                                        + //41 a 42 - Modalidade da Carteira
               PadLeft(Copy(ANossoNumero,3,17), 15, '0')                     + //43 a 57 - Nosso número - identificação do título no banco

A formatação do nosso número inclusive os dois primeiros digitos ocorre na função FormataNossoNumero(), a qual faz o tratamento da modalidade.

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!

Fazendo o seguinte procedimento:

- emitir o boleto: o nosso número sai certo no boleto, salvo o campo "nossonumero" no registro da duplicata, ao salvar não é salvo a modalidade, a modalidade é gerada na montagem durante a emissão do boleto.

- em outro momento vou gerar a remessa das duplicatas, no final do dia por exemplo, como tenho o "nossonumero" salvo na duplicata (não está salvo a modalidade junto) e vou gerar o arquivo o "nossonumero" na remessa fica incompleto para gerar a informação na linha PadRight(Copy(ANossoNumero,1,2), 2, '0') .

Fiz a depuração e rastreamento do código e não fica a remessa de acordo com o layout do banco.

 

Marcos

Link para o comentário
Compartilhar em outros sites

  • 5 semanas depois ...
  • Este tópico foi criado há 2467 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.