Pesquisar na Comunidade

Olá, estava fazendo homologação do boleto sigcb usando ACBRBoleto, tive esse retorno do banco: Segue análise do Boleto Campo Instruções Instruções (Todas as informações deste bloqueto são de exclusiva responsabilidade do beneficiário. Qualquer dúvida sobre este boleto, contate o beneficiário) Conteúdo Esperado: INSTRUÇÕES (TEXTO DE RESPONSABILIDADE DO BENEFICIÁRIO) Vendo que nos fontes do componente, esse campo é fixo na impressão, resolvi alterar o componente para permitir que esse texto seja mudando. Foi uma pequena alteração mas se for útil a alguém, porque pretendo usar esses fontes para gerar boletos para outros bancos. Um dos pontos foi acrescentar um novo atributo, LabMensagem,. seguindo os mesmo passos do fMensagem no AcbrBoleto.pas na classe titulo: property LabMensagem : TStrings read fLabMensagem write fLabMensagem; e no ACBrBoletoFCFortesFr.pas Simplesmente acrescentei if (Trim(Titulo.LabMensagem.Text) <> '') then begin lblLabMensagem.Lines.Clear; // Antes se chamava RLLabel123 lblLabMensagem2.Lines.Clear; // Antes se chamava RLLabel80 lblLabMensagem3.Lines.Clear; // Antes se chamava RLLabel161 lblLabMensagem.Lines.Text := Titulo.LabMensagem.Text; lblLabMensagem2.Lines.Text := Titulo.LabMensagem.Text; lblLabMensagem3.Lines.Text := Titulo.LabMensagem.Text; end; Se tiver algo de errado peço que que informe. E espero que seja útil a alguém. Acbr Boleto modificado.rar

Prezados, Tive a necessidades de realizar um ajuste na geração de remessa para Caixa Econômica, Layout SIGCB CNAB240. O ajuste se refere ao campo Código p/ Baixa/Devolução (página 21 do layout, campo 38.3P, registro Tipo 3, Segmento P do layout, coluna 224). Segundo o manual, observação C028 (página 61 do layout), esse campo só pode conter o valor 2 quando o campo de "código para protesto" (página 21 do layout, campo 36.3P, registro Tipo 3, Segmento P do layout, coluna 221) estiver preenchido com o código 1(Protestar Título). A rotina não estava tratando essa situação. Alterei a linha 499 da unit ACBrBancoCaixa: Código anterior - IfThen((DataBaixa <> 0) and (DataBaixa > Vencimento), '1', '2') + Código Alterado - IfThen(((DataProtesto = 0) or (DataProtesto <= Vencimento)) or ((DataBaixa <> 0) and (DataBaixa > Vencimento)), '1', '2') + Segue em anexo a unit ACBRBancoCaixa.pas. O layout não consegui anexar por causa da restrição de tamanho do arquivo, mas segue o link para download do arquivo que tomei como base para essa alteração -> https://www.caixa.gov.br/Downloads/cobranca-caixa/Manual_Leiaute_CNAB240_SIGCB.pdf ACBrBancoCaixa.pas

Bom dia pessoal, estou tendo problemas com a homologação do Boleto impresso na Caixa Econômica Federal - SIGCB. A principal é o layout que estou modificando e assim que homologar posto o arquivo a quem interessar. Antes da modificação do Layout foram necessárias duas pequenas alterações nos fonte, que ao meu ver não vão interferir nos outros bancos, mas segue sugestão para análise, e se possível que seja adicionada ao projeto. O aceite tem que ser "A" e não "S". Também existe mais uma opção possível em outros Bancos que é a "B", Banco do Nordeste. No arquivo ACBrBoleto.pas, na linha: TACBrAceiteTitulo = (atSim, atNao); Modificar para: TACBrAceiteTitulo = (atSim, atNao, atAceite, atBNao); No arquivo \FC\Fortes\ACBrBoletoFCFortesFr.pas (aqui uso somente fortes) mudar a linha: txtAceite.Caption := IfThen((atSim = Titulo.Aceite), 'A', 'N'); para: case Titulo.Aceite of atSim : txtAceite.Caption := 'S'; atNao : txtAceite.Caption := 'N'; atAceite : txtAceite.Caption := 'A'; atBnao : txtAceite.Caption := 'B'; end; O mesmo para a linha com txtAceite2.Caption. Outro problema sempre me ocorreu (em qualquer banco),é a duplicação das instruções, principalmente quando se usa os campos abaixo Titulo.PercentualMulta e Titulo.ValorMoraJuros. No arquivo \FC\Fortes\ACBrBoletoFCFortesFr.pas removendo a linha (: ACBrBoletoFC.ACBrBoleto.AdicionarMensagensPadroes(Titulo,MensagemPadrao); Esta duplicação não ocorre (efetuei o teste pelo demo). Segue sugestões, caso não interfiram no componente seriam bem vindas. Obrigado a todos.

Olá, Fiz algumas alterações conforme manual emitido em Janeiro, 2017 Foram incluídos os seguintes retornos 23: Result := '23-Remessa a Cartório'; 24: Result := '24-Retirada de Cartório'; 25: Result := '25-Protestado e Baixado (Baixa por Ter Sido Protestado)'; 46: Result := '46-Liquidação On-line'; 47: Result := '47-Estorno de Liquidação On-line'; 51: Result := '51-Título DDA reconhecido pelo pagador'; 52: Result := '52-Título DDA não reconhecido pelo pagador'; 53: Result := '53-Título DDA recusado pela CIP'; 61: Result := '61-Confirmação de alteração do valor nominal do título'; 62: Result := '62-Confirmação de alteração do valor/percentual mínimo/máximo'; A caixa tem o retorno opcional do arquivo de pré-critica, que analisa o layout do arquivo antes de ser processado. para meus clientes estava aparecendo um erro, então tomei a liberdade de adicionar uma função que faz a verificação da pré critica. Não está completa, ela apenas verifica se na pré critica existem erros. se não existir continua a execução normal do sistema. Estou enviando os arquivos para serem adicionados ao svn. Outra sugestão é na verdade uma pergunta. Se o acbr já foi pensado em ser migrado para o github? Creio que lá é mais simples visualizar o fonte e as alterações sem ter que baixar, além de ter a hospedagem gratuita da documentação. tbm tem suporte ao svn. Obrigado, Boa semana a todos! ACBrBancoCaixa.pas ACBrBoleto.pas CNAB240_SIGCB Janeiro2017.pdf

Caros estou tendo um problema com a homologação do arquivo de remessa da caixa CNAB SIGCB O Gerente nos retornou o Nosso número deve iniciar com 15 e não com 14 é uma normativa nova do FEBRABAN que esta valendo para as contas novas eu verifiquei que no arquivo ACBrBancoCaixa.pas o nosso numero tem a composição do nosso numero if ACBrTitulo.CarteiraEnvio = tceCedente then //O Cedente é quem envia o boleto Num := ACarteira + '4' + PadLeft(ANossoNumero, 15, '0') else Num := ACarteira + '1' + PadLeft(ANossoNumero, 15, '0'); //o Banco é quem Envia porem vamos precisar que seja adicionado uma nova opção alem do '4' também a opção '5' abaixo e-mail completo do gerente do banco: ________________________________________ De: GIRETMT777403 - Mato Grosso/MT - Operacional e Convênios Enviada em: segunda-feira, 11 de abril de 2016 12:45 Para: A0016MT - AG Paiaguás/MT Cc: Rodrigo Sornas Cardoso de Carvalho; GIRETMT777403 - Mato Grosso/MT - Operacional e Convênios Assunto: AG 0016 - SIGCB - Homologação Boletos - Cedente 611267-6 COMERCIAL RIO CUIABA #CONFIDENCIAL 10 À AGÊNCIA PAIAGUÁS/MT Assunto : Análise de Conformidade de Convênios Referência.: Convênio SIGCB 611267-6 COMERCIAL RIO CUIABA Senhor Gerente 1 Efetuamos a análise de conformidade referente ao convênio acima mencionado, baseada no disposto no MN CO003 vigente, cujo resultado registramos a seguir: - Não Homologado - Aguardamos nova massa de testes; - Cobrança Registrada para Protesto, o Nosso Número deve iniciar com 15; - Cedente não está em produção; (Agência teve alterar o cadastro na opção Cedente Eletrônico no SIGCB) 2 Solicitamos providenciar regularização dos itens relacionados e o conseqüente encaminhamento dos documentos faltantes para finalização do processo. 3 Lembramos que conforme Comunicado FEBRABAN 015/2015, verificar junto ao Cedente/Beneficiário a escolha da modalidade Registrada (Com ou Sem Protesto) para emissão dos boletos. MNCO003 3.7.3.4 Conforme Comunicado FEBRABAN 015/2015: a partir de janeiro/2017 os boletos de Cobrança Sem Registro somente poderão ser recebidos pelo Banco Beneficiário (emissor), dessa forma, os clientes da Cobrança Sem Registro deverão ser migrados para a modalidade Registrada com a maior brevidade possível. 6.12 ANEXO XII – RESUMO DAS CARACTERÍSTICAS DAS MODALIDADES DE COBRANÇA NO SIGCB E NO SICOB Att. Sílvia Cristina Trentino Assistente Pleno GIRET Mato Grosso/MT Larissa Nascimento César Supervisora de Filial GIRET Mato Grosso/MT Atenciosamente,

Quais bancos utilizam o Cedente.Modalidade do Componente ACBRBoleto ? Observei que no Banco CAIXA no Fonte ACBRBancoCaixa.pas a Modalidade é fixada em string = '14'. Pra CAIXA por exemplo, só existirá a 14 mesmo ? Obrigado pelo retorno.

Bom dia, identifiquei um problema na leitura do layout da Caixa SIGCB 240. A leitura do campo "SeuNumero" está pegando a mesma informação do campo "NumeroDocumento" if Copy(Linha,14,1)= 'T' then begin SeuNumero := Trim(copy(Linha,59,11)); NumeroDocumento := copy(Linha,59,11); segundo o manual: Número Documento (Seu Nº) | Número do Documento de Cobrança | 59 | 69 | 11 Uso da Empresa | Identificação do Título na Empresa | 106 | 130 | 25 Trecho alterado: if Copy(Linha,14,1)= 'T' then begin SeuNumero := Trim(copy(Linha,106,25)); NumeroDocumento := copy(Linha,59,11);

Estou tendo um problema na validação dos boletos reimpressos pelo meu sistema no que se refere ao código de barras. Na função MontarCodigoBarras da unit AcbrBancoCaixa o campo referente ao Identificador da Emissão do Boleto está fixo o valor '4', quando na verdade, segundo consta no layout, esse valor se refere à 2ª posição do Nosso Número. Abaixo o código atual: {Montando Campo Livre} CampoLivre := padR(ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente,6,'0') + CalcularDVCedente(ACBrTitulo) + Copy(ANossoNumero,3,3) + Copy(ANossoNumero,1,1) + Copy(ANossoNumero,6,3) + '4' + Copy(ANossoNumero,9,9); A seguir o código com a correção: {Montando Campo Livre} CampoLivre := padR(ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente,6,'0') + CalcularDVCedente(ACBrTitulo) + Copy(ANossoNumero,3,3) + Copy(ANossoNumero,1,1) + Copy(ANossoNumero,6,3) + Copy(ANossoNumero,2,1) + Copy(ANossoNumero,9,9); Com esta correção é possível reimprimir boletos gerados pelo banco, onde o valor da constante é 1. Estou enviando em anexo o layout que consta esta informação. Está na pag. 20, tópico 5.3 - Anexo III - Campo livre do código de Barras, Constante 2. ESP_COD_BARRAS_SIGCB_COBRANCA_CAIXA.pdf

Prezados, Ao processar um arquivo de retorno da CEF, identificamos um erro na linha 685, onde ao tentar fazer uma conversão de uma string em branco para integer dava erro. Tratamos a correção e estamos compartilhando o arquivo. Não posso anexar o arquivo de retorno mas segue imagem do mesmo. Sds, Junior ACBrBancoCaixa.pas