Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

Postado (editado)

boa tarde,

Ajusta o código do acbr - boleto da caixa. erro da remessa cnab 400 paar layout antigos

No novo layout da caixa cnab 400 dá tudo certo, o codigo do cedente é 7 tudo ok

o problema no layout antigo do cnab 400 que o codigo do cedente deveria ser 6 7 caractere em branco e ta saindo em branco

olhando o acbrbancocaixa.pas

tem a função  tudo ok (LINHA 285 ) , ........so adicionar um espaço 

if ((fpLayoutVersaoArquivo = 107) and (fpLayoutVersaoLote = 67))
     or (fpLayoutVersaoArquivo = 007) then
    Result := PadLeft(  ACBrCedente.CodigoCedente, 7, '0')
  else
    Result := PadLeft(  ACBrCedente.CodigoCedente, 6, '0')+ ' ';    <----------------adicionar um espaço

PORÉM 

NO HEADER DO 400 quando vai colocar o cendete ele preenche com zero (ERRADO) LINHA 486

DEVERIA FICAR   ACodCedente                             + // 31 ate 37   - Código Identificador da Empresa na CAIXA (CEDENTE)

AO INVEZ  que ele volta a preencher com 0 7 caracteres  PadRight(ACodCedente, 7, '0')           + // 31 ate 37   - Código Identificador da Empresa na CAIXA (CEDENTE)

Editado por jairomonassa
faltou a alteração da definir DefineCodigoCedente
  • Administradores
Postado

Boa tarde.

Por favor anexe seu pas alterado, assim fica mais facil analisar.

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 !!

Postado

o novo layout ficou tudo ok,

mas estragou o layout antigo (na linha 1034) codigo da agencia é 3 espaços ele colocou 4 numeros deve ficar igual ao layout

estava assim 

             ifthen(Length(ACodCedente) > 6, '000',
                         RightStr(OnlyNumber(ACBrBoleto.Cedente.Agencia), 4 ))     + // 18 até 21  - Código da Agência

 

ficará

    '000'                                                           + // 18 até 21  - Código da Agência

 

fiz teste e passou pelo validador da caixa

 

 

ACBrBancoCaixa.pas

o problema é que estragou o layout antigo da caixa, com os ajustes do novo layout da caixa

temos clientes dos dois layous e testei aqui no validador da caixa agora deu certo

ACBrBancoCaixa.pas

39 minutos atrás, Juliana Tamizou disse:

Boa tarde.

Por favor anexe seu pas alterado, assim fica mais facil analisar.

Att.

coloquei em anexo anterior

 

  • Curtir 1
Postado

só complementando a confusão da remessa da caixa

codigo cedente/beneficiario CNAB 400 LAYOUT ANTIGO, remessa

header remessa  posição 31-37 branco no 37 (no último caractere)

registro 1 posição 21-27 branco no 21 (ou seja no primeiro caractere)

registro 2  posição 22-28 branco no 22 (no último caractere)

  • 4 semanas depois ...
  • Moderadores
Postado

Boa tarde Jairo, 

Analisando os fontes anteriores, verificamos que essas alterações não tem haver com a atualização do layout... Note que em versões anteriores o codCedente já era preenchido com zeros.

E na linha 1034 já erá preenchido com o numero da Agencia, antes da alteração... Foi apenas adicionado o IF para manter a compatibilidade e continuar gerando da mesma forma quando o codCedente for 6...

Verifique se a versão do layout que o banco está exigindo é a mesma atualizada no ACBr. Pois mesmo na versão anterior sempre estava sendo atualizada pela comunidade...

Consultor SAC ACBr

José Junior
Ajude o Projeto ACBr crescer - Assine o SAC

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

  • Administradores
Postado

Bom dia.

Neste caso anexe também o manual do banco que justifica a negativa do mesmo.

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 !!

Postado

leiaute de arquivo cnab 400 caixa, preencher com brancos ao invés de zeros , pág 34 do documento

 

image.png.2ba0bb2f99b2e698929d692ecfde7a80.png

 

layout 007 (james bond ) veja que também pede em branco

image.png.cab1a99906da6d0010ee9c3746bdbba6.png

agora apartir de 7 casas do codigo beneficiario não precisa colocar zero porque já tem 7 digitos

image.png.76aaad06a50a15818c963b31d714345e.png

 

  • Administradores
Postado

Boa tarde.

Por favor anexe os arquivos ao tópico e não somente os prints.

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 !!

  • Moderadores
Postado

@jairomonassa, as modificações feitas para o layout 007 aplicam-se exclusivamente quando é informado esse código de layout em: "fpLayoutVersaoArquivo", se não utilizar esse novo layout as configurações devem permanecer exatamente iguais, para não quebrar compatibilidade com versões anteriores...

Se voce comparar com fontes antigos note que estes campos continuam gerando da mesma forma para os layouts anteriores, por isso foi criado a função: DefineCodigoCedente para definir o código do layout...

Se você utiliza o layout 007 ou 107 mas com código de cedente de 6 digitos, isso faz parte do layout novo... Então pode ser esse o problema, mas não podemos modificar a forma que funcionava antes. Neste caso anexe o seu arquivo de remessa para que possamos verificar. 

 

  • Curtir 1
Consultor SAC ACBr

José Junior
Ajude o Projeto ACBr crescer - Assine o SAC

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

  • Administradores
Postado

Tópico fechado por falta de retorno do usuário

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 !!

  • Este tópico foi criado há 1534 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.