Carteira Caixa Sem Registro Emitida Pelo Cedente

[Mario Inacio]

Bom dia,

 

A linha 155 na unit "ACBrCaixaEconomica" inseria como "24" a carteira para emissão pelo cedente sem registro.

 

No manual da caixa não consta este código, então o alterei para "21 - título sem registro emissão caixa" como consta na página 47 do manual, já que não existe um específico.

 

Segue unit alterada.

 

att

Mario

[Juliomar Marchetti]

Bom dia

não veio o anexo

 

Bom dia,

 

A linha 155 na unit "ACBrCaixaEconomica" inseria como "24" a carteira para emissão pelo cedente sem registro.

 

No manual da caixa não consta este código, então o alterei para "21 - título sem registro emissão caixa" como consta na página 47 do manual, já que não existe um específico.

 

Segue unit alterada.

 

att

Mario

[Mario Inacio]

Agora vai

ACBrCaixaEconomica.pas

[Juliomar Marchetti]

Obrigado pela correção, favor atualizar os fontes do svn e testar!

[easysoft]

Boa Noite Caros amigos.

 

Eu Fiz a Homologação do Boleto pela Caixa Econômica sem Registro em 10/2011 e emito este boleto diariamente.

 

Acredito eu que não deva mudar este código pois o código 21 é emitido pela caixa e 24 é Emissão do Cliente.

 

na homologação não passou com o Código "21 - título sem registro emissão caixa"  Segue a baixo o texto enviado na época pelo homologador :

 

COBRANÇA SEM REGISTRO NO SIGCB

Código do Cedente tem 6 posições + Digito (Calculado conforme MO)

Nosso Número 17 posições + DV

De acordo com os serviços disponíveis aos Cedentes, o SIGCB dispõe das seguintes opções:

CARTEIRA NO BLOQUETO             NOSSO NÚMERO (2 POSIÇÕES INICIAIS)

SR (Sem Registro)                            21 = 2 (sem registro) e 1 (emissão CAIXA)

                                                          24 = 2 (sem registro) e 4 (emissão Cliente)

 

grato Neander.

[rluispaulo7]

Boa tarde, pessoal!

Tive o mesmo problema.

O próprio programa da Caixa (Cobrança Caixa) insere "24" antes do nosso número, assim como o componente fazia antes desta última atualização.

[toninhonunes]

O senhor Aldo mandou um belo problema, resolveu o seu e mandou pro mantenedor um problema, todos que atualizaram pela revisão 6655 e tem como base o SIGC Carteria Sem Registro enviado pelo Cliente vão ter os seus boletos todos rejeitados, já estou contando o prejuízo aqui, leu o manual e não leu certo, consta o 21 e 24 no manual, pior é o mantenedor ter aceito e comitado a alteração, agora lascou, reverti o código, o estrago já foi feito.

 

Toninho Nunes.

[toninhonunes]

A solução para este caso é criar propriedade no arquivo da caixa possibilitando as duas opções de envio do boleto, pelo Cedente ou pela Caixa, do jeito que está aí, quem atualizou pela revisão 6655 e começou a emitir boleto tendo como base o 24, vai ter todos os boletos devolvidos.

 

Toninho Nunes

[Juliomar Marchetti]

Boa tarde 

Então é só você implementar a solução e subir em anexo!

fico no aguardo da correção do erro ! pois conforme pode perceber é colaborativo o negocio o que um usa o outro pode não usar!

algo mais que precise ser reportado?

O senhor Aldo mandou um belo problema, resolveu o seu e mandou pro mantenedor um problema, todos que atualizaram pela revisão 6655 e tem como base o SIGC Carteria Sem Registro enviado pelo Cliente vão ter os seus boletos todos rejeitados, já estou contando o prejuízo aqui, leu o manual e não leu certo, consta o 21 e 24 no manual, pior é o mantenedor ter aceito e comitado a alteração, agora lascou, reverti o código, o estrago já foi feito.

 

Toninho Nunes.

 

A solução para este caso é criar propriedade no arquivo da caixa possibilitando as duas opções de envio do boleto, pelo Cedente ou pela Caixa, do jeito que está aí, quem atualizou pela revisão 6655 e começou a emitir boleto tendo como base o 24, vai ter todos os boletos devolvidos.

 

Toninho Nunes

[toninhonunes]

Sobre o modo coloborativo, sim, é colaborativo, mas o Aldus relatou que não viu no manual o 24 e viu só 21, reportando como se isso fosse um erro, desde a concepção do componente a carteira sem registro da caixa foi fixado como 24, na maioria 99% trabalhou assim, fiz um update da última vez e não percebi esta mudança, foi comentada a linha e mudou pra 21.

 

Antes de comitar é melhor analisar e saber se realmente as alterações conferem com o ocorrido, eu criei uma propriedade do AcbrBoleto.pas chamado CarteiraEnvio com os tipos tceCedente e tceBanco, como default deixei o tceCedente não necessitando por parte dos desenvolvedores que são maioria com a carteira 24 não precisarem setar nada na propriedade, somente se for envio pelo banco deve setar o valor na mesma.

 

Fiz uma pequena adição no arquivo AcbrCaixaEconomica.pas e no AcbrBoleto.pas, segue as adições, o meu cliente precisava saber em que canal de pagamento foi processado boleto, se foi em lotérica, caixa automático e outros, e tinha que mostrar isso no relatório, no arquivo retorno eu não tinha isso e fiz para gravar no banco de dados. Também uma pequena correção no nosso número, estava pegando na posição do padrão SICOB, no SIGCB é diferente na rotina lerRetorno240, bom, aqui está funcionando ok e dando resultados ao cliente, não sei se poderia mandar o arquivo via svn, vou colocar aqui os dois anexos, se for aprovado, fico agradecido por aceitar as adições.

 

Eu peguei um boleto gerado pelo sistema da caixa e informei os mesmos dados no meu sistema, sairam os mesmos números e também leu corretamente o código de barras e a representação bateu, usei o cigamboleto no meu smartphone, é bom que deem uma analisada, o recurso de canal de pagamento inclui com a revisão 6655 que baixei e adiconei.

 

Toninho Nunes

ACBrCaixaEconomica.pas

ACBrBoleto.pas

[toninhonunes]

Agora vai

Não sei como sua alteração vai ser homologada, você alterou lá aquela linha e deixou isso aqui desta forma, o dígito verificador não vai passar, num lugar você usa 21 e aqui nesta function está fixado o 4 de acordo com a escolha da carteira, agora vou ficar mais esperto com essas mudanças, falha minha em ter feito um update sem ter checado as modificações, acostumei em saber que quase nunca dá problemas.

 

function TACBrCaixaEconomica.CalcularDigitoVerificador(const ACBrTitulo: TACBrTitulo ): String;

var

  Num, ACarteira, ANossoNumero, Res :String;

begin

   Result := '0';

   if (ACBrTitulo.Carteira = 'RG') then

      ACarteira := '1'

   else if (ACBrTitulo.Carteira = 'SR')then

      ACarteira := '2'

   else

      raise Exception.Create( ACBrStr('Carteira Inválida.'+sLineBreak+'Utilize "RG" ou "SR"') ) ;

 

   ANossoNumero := OnlyNumber(ACBrTitulo.NossoNumero);

   

   Num := ACarteira + '4' + PadR(ANossoNumero, 15, '0');    <====== o 4 está fixado, envio pelo Cedente

   

   

   Modulo.CalculoPadrao;

   Modulo.MultiplicadorFinal   := 2;

   Modulo.MultiplicadorInicial := 9;

   Modulo.Documento := Num;

   Modulo.Calcular;

 

   Res:= IntToStr(Modulo.ModuloFinal);

 

   if Length(Res) > 1 then

      Result := '0'

   else

      Result := Res[1];

 

end;

[Juliomar Marchetti]

Boa tarde

Favor atualizar e testar!

foi necessário um ajuste com algumas coisas novas que já tinha implementada na unit da Caixa!

 

Na revisão: 6659

[toninhonunes]

Boa noite Juliomar,

 

Faltou no arquivo anterior estas linhas na procedure LerRetorno240

 

            CodigoLiquidacao     := Copy(Linha,214,02);

            CodigoLiquidacaoDescricao := CodigoLiquidacao_Descricao( StrToIntDef(CodigoLiquidacao,0) );

 

 

Esta linha captura o canal de pagamento, se foi na Lotérica, Internet Banking e outros, segue anexo o arquivo, fiz um teste num boleto no valor pequeno com a carteira 24, passou tranquilo, se o colega que usa carteira 21 quiser testar já está ok.

 

Toninho Nunes

[Juliomar Marchetti]

Faltou o arquivo

[toninhonunes]

Tinha selecionado o arquivo, mas não cliquei no botão anexar este arquivo, segue anexo.

 

Toninho Nunes

ACBrCaixaEconomica.pas

[Juliomar Marchetti]

Bom dia

considere feito 

 

atualize teste e retorne!

Obrigado!

[Alejandro Michelutti]

Prezados;

Na função function TACBrCaixaEconomica.CalcularDigitoVerificador(const ACBrTitulo: TACBrTitulo ): String;
e function TACBrCaixaEconomica.FormataNossoNumero(const ACBrTitulo :TACBrTitulo): String;

Alterei o codigo original:

      //else if (ACBrTitulo.Carteira = 'SR') then  // ACBr original   {carteira 2 sem registro}
 

POR

      else if ((ACBrTitulo.Carteira = 'SR') or (ACBrTitulo.Carteira = '24')) then     {carteira 2 sem registro}
 

Pois o retorno da Caixa esta trazendo o valor '24' para cobrança sem registro. Segue em anexo o fonte alterado.

Obrigado.
 

ACBrBancoCaixa.pas

[Juliana Tamizou]

Boa noite.

Favor informar também o manual do banco o qual indica a necessidade desta alteração.

Att.

[Alejandro Michelutti]

Boa tarde Juliana;

 

Segue resposta do suporte da CAIXA:

--------------------------------------

Alejandro,

 

O nº 24 é o que corresponde a carteira SR (sem registro) + emissão pelo cedente (2- sem registro / 4- emissão do boleto pelo cedente), no manual que te enviei aparece a especificação disso. Isso basta para comprovar que é correspondente a carteira SR. Anexei novamente o Manual que tinha te enviado e marquei em amarelo as partes correspondentes que dizem sobre isso.

 

Quanto ao que aparece no retorno (se é SR ou 24), não sei te dizer, pois o técnico é que sabe informar. Ligue para a Central 0800 726 0104, na opção de cobrança bancária, que eles poderão te orientar também.

 

 

 

Att,

 

BÁRBARA FERREIRA SPALA FALCÃO

Técnico Bancário Novo

CAIXA - Ag. Vila Velha/ES

(27) 3320-5700

--------------------------------------

CNAB 240 - homologação de boletos.pdf