Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

click.png

click.png

click.png

Search the Community

Showing results for tags 'sicredi'.

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Categories

There are no results to display.

Categories

  • ACBrMonitorPLUS - Notas de Lançamento de Versão

Categories

  • ACBrLibNFe - Notas de Lançamento de Versão

Forums

  • Fórum Aberto - ACBr
    • ACBr News
    • Equipamentos testados
    • Base de Conhecimento
    • Dúvidas Gerais sobre o ACBr
    • ACBrSerial
    • ACBrSAT
    • ACBrNFe
    • ACBrDFe
    • Dúvidas sobre TEF
    • ACBrMonitor PLUS
    • ACBrTXT
    • ACBrBoleto
    • ACBrDiversos
    • ACBrTCP
    • ACBrFramework
    • ACBrLIB
  • ACBr Pro
    • Dúvidas gerais
    • ACBrMonitorPLUS
    • NFe/NFCe - Nota Fiscal Eletrônica
    • DFe - Documentos Fiscais Eletrônicos
    • SAT / MFE
    • TEF
    • Boleto
    • ACBrSPED
    • ACBrTXT
    • Paf-ECF
    • Requisitos Fiscais por UF
    • ACBrLIB
  • Outros Assuntos
    • ACBr's Pub
    • Legislação Fiscal e Tributária
    • Object Pascal - Delphi & Lazarus
    • Data Base
    • Classificados
    • Dúvidas não relacionadas ao ACBr

Categories

  • ACBr Pro
    • ACBrLib - PRO
    • ACBrMonitorPLUS - PRO
    • Utilitários - PRO
    • Dia do ACBr 1a edição
    • Dia do ACBr 2a edição
  • Free Download
    • ACBrLib - DEMO
    • ACBrMonitorPLUS - DEMO
    • Demos / Testes / Utilitários
    • Apresentações - Palestras

Calendars

  • Eventos - Palestras - Webinars
  • Prazos SEFAZ
  • Community Calendar
  • ACBr Papo Pro
  • Feriados Nacionais

Blogs

  • Daniel Simoes' Blog
  • André Ferreira de Moraes
  • Moderadores ACBr
  • Teste de Blog
  • Notícias do ACBr

Categories

  • Suporte Pago - PRO
    • Webinars
    • Video Aulas
  • Vídeos Abertos
    • Video Aulas
    • Comunicados
    • Dia do ACBr 1a Ediçao
    • Dia do ACBr 2a Ediçao
    • Dia do ACBr 3a Ediçao
    • Equipamentos Homologados ACBr
    • TEF ACBr PayGo
  • Campanhas promocionais

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website URL

  1. Ao apropriar o retorno do sicredi está ocorrendo o seguinte erro: "A4 is not a valid integer value". Na imagem "linha onde o erro ocorre" está sendo exibido onde deveria estar o código de rejeição A4, no caso ele não encontra e cai no else abaixo onde é convertido para número e acaba ocorrendo esse erro. Manual do sicredi: https://www.sicredi.com.br/html/para-voce/recebimentos/cobranca/arquivos/manual-cnab-400---2019.pdf A4: Beneficiário não cadastrado ou possui CGC/CIC inválido
  2. Boa tarde Senhores, Passei a ter alguns problemas com a emissão de boletos do sicredi. Ao analisar as últimas alterações no SVN notei que no dia 09/03/2020 houve uma mudança em relação ao tamanho máximo do nosso numero. Antes da revisão do SVN era: fpTamanhoMaximoNossoNum := 8; Após a revisão passou a ser: fpTamanhoMaximoNossoNum := 5; Não sei se mais alguém passou a ter problemas com isso, também não consegui encontrar o tópico que motivou essa alteração. Segue os dados da revisão em questão: Revision: 19353 Author: juniorsantos Date: segunda-feira, 9 de março de 2020 14:42:10 Message: -- ACBrBancoSicred -- [-] Ajuste na Validação da função CalcularTamanhoMaxNossoNumero. ---- Modified : /trunk2/Fontes/ACBrBoleto/ACBrBancoSicredi.pas Modified : /trunk2/Fontes/ACBrBoleto/ACBrBoleto-change-log.txt Grato
  3. Boa tarde, Recentemente homologuei um cliente com o Banco Sicredi via CNAB240 que não gostaria que fosse cobrado valor de multa, porém, recebi uma rejeição ao tentar enviar código de multa como '0' (isento) e verifiquei que atualmente não é possível informar um valor de multa zerado. Esta situação ocorre pois o banco Sicredi somente aceita o envio do código de multa como '2' (percentual), conforme consta no manual no campo de código de multa "O Sicredi apenas aceita o campo multa preenchido com percentual.", porém, no trecho de código onde é preenchido a informação, não esta sendo possível informar código de multa '2' (percentual) e valor de 0% de multa, pois se eu informar percentual de multa como zero será automaticamente informado o código de multa como '0' (isento). IfThen((PercentualMulta > 0), IfThen(MultaValorFixo,'1','2'), '0') + // 66 Código da multa - 1 valor fixo / 2 valor percentual / 0 Sem Multa Como sugestão, gostaria de solicitar que este trecho fosse alterado para informar o valor '2' fixo, já que é a única opção disponível para o banco. '2' + // 66 Código da multa - 2 valor percentual Infelizmente não consigo anexar o manual neste tópico devido ao tamanho do mesmo, segue link disponibilizado pelo próprio Sicredi abaixo (informação referente ao código de multa encontra-se no início da página 55): https://www.sicredi.com.br/html/para-voce/recebimentos/cobranca/arquivos/manual-cnab-240-v1.3.pdf Código fonte com a alteração mencionada (aplicada na linha 1833) encontra-se em anexo. Atenciosamente, Datamicro Sistemas. ACBrBancoSicredi.pas
  4. Ola boa tarde, alterei a unit ACBrBancoSicredi.pas, inclui o código do retorno A4, para corrigir a rejeição, quando ocorre um retorno com esse código. segue unit alterada e imagem da alteração; favor adicionar ao repositório do SVN se possível. ACBrBancoSicredi.pas
  5. Bom dia! O arquivo de remessa CNAB 240 do SICREDI de um cliente nosso estava sendo rejeitado quando tentava usar o "tipo de Documento" como "DSI" o componente estava alterando para 99 "Outros" e no caso da conta ou carteira dele acontece a rejeição. Fiz alteração na Unit e enviei o arquivo para o banco e foi validado. Estou disponibilizando para conferência pelos administradores e posterior publicação se possível. Unit ACBrBancoSicredi.pas em GerarREgistroTranscacao240. Tenho o manual do banco caso precise, mas como é maior que 2mb não consigo postar aqui. De acordo com o Layout enviado pelo SICREDI, as opções de "Espécie do Título" são: '03' = DMI duplicata mercantil por indicação '05' = DSI duplicata de serviço por indicação '06' = DR duplicata rural '07' = LC letra de câmbio '12' = NP nota promissória '13' = NPR nota promissória rural '16' = NS nota de seguro '17' = RC recibo '19' = ND nota de débito ‘32’ = Boleto Proposta '99' = Outros //Código REMOVIDO {Espécie} {if (EspecieDoc = 'DM') then Especie := '03' else if (EspecieDoc = 'DMI') then Especie := '03' else Especie := '99';} //Código ADICIONADO case AnsiIndexStr(EspecieDoc, ['DMI', 'DSI', 'DR', 'LC', 'NP', 'NPR', 'NS', 'RC', 'ND', 'BP']) of 0 : Especie := '03'; //DMI duplicata mercantil por indicação 1 : Especie := '05'; //DSI duplicata de serviço por indicação 2 : Especie := '06'; //DR duplicata rural 3 : Especie := '07'; //LC letra de câmbio 4 : Especie := '12'; //NP nota promissóri 5 : Especie := '13'; //NPR nota promissória rural 6 : Especie := '16'; //NS nota de seguro 7 : Especie := '17'; //RC recibo 8 : Especie := '19'; //ND nota de débito 9 : Especie := '32'; //Boleto Proposta else Especie := '99'; //Outros end; ACBrBancoSicredi.pas
  6. Ola, estou gerando os títulos pelo Acbrnfemonitorplus 1.0.2.0.71, gerei 10 boletos e gerei a remessa para validação e obtive o seguinte retorno em anexo. Como posso ajustar para passar nesta validação no Sicredi? Alguém já homologou boletos neste banco para dar um caminho. Obrigado 0804-03-30002.PDF boleto.pdf ENT_INCLUIR_TITULOS.txt
  7. Bom dia, recentemente (Maio/2019) o Sicredi alterou seu layoute de cobrança CNAB400 para atender já no registro de títulos a opção de Negativação. Desta forma torna-se possível enviar já na remessa de cadastro de título a informação da Negativação. A utilização desta funcionalidade de negativação ficou muito semelhante ao já existente procedimento de protesto. Sendo assim alterei os fontes do ACBr para atender tal alteração. Porém só fiz a alteração para o layoute CNAB400. O manual atualizado da cobrança Sicredi CNAB400 onde possui agora os campos para informação da negativação está no link https://www.sicredi.com.br/html/para-sua-empresa/recebimentos/cobranca/arquivos/manual-cnab-400.pdf (Pág. 36 do manual, posição 193-194 e 195-196 do registro detalhe do arquivo de remessa). Também envio em anexo os fontes do ACBr alterados para atender essa opção de negativação. Peço que analisem os fontes abaixo para uma possível submissão para o repositório de fontes no SVN. ACBrBoleto.pas ACBrBancoSicredi.pas
  8. Boa tarde pessoal, Então a alguns dias já, estou passando um dificuldade bem irritante. Ressalvo que não tenho muita experiência com a geração de boletos... Mas enfim, estou tentando gerar boletos para o banco Sicredi e já conseguir configurar quase tudo, mas devo estar errando em algo por sempre fica acusando que o DV - Nosso número, está errado. Para fazer esse teste utilizo uma planilha do excel, que baixei daqui mesmo dos foruns da acbr. Se alguém ai, poder me dar uma força na resolução do problema desde já agradeço.
  9. Bom dia, segue abaixo sugestão de alteração no arquivo "ACBrBoleto.pas", para corrigir mensagem de Juros no boleto, quando portador for Sicredi: procedure TACBrBoleto.AdicionarMensagensPadroes(Titulo: TACBrTitulo; AStringList: TStrings); // if ValorMoraJuros <> 0 then // begin // if DataMoraJuros <> 0 then // AStringList.Add(ACBrStr('Cobrar juros de ' + // ifthen(CodigoMora = '2', FloatToStr(ValorMoraJuros) + '%', // FormatCurr('R$ #,##0.00',ValorMoraJuros)) + // ' por dia de atraso para pagamento a partir de ' + // FormatDateTime('dd/mm/yyyy',ifthen(Vencimento = DataMoraJuros, // IncDay(DataMoraJuros,1),DataMoraJuros)))) // else // AStringList.Add(ACBrStr('Cobrar juros de ' + // ifthen(CodigoMora = '2', FloatToStr(ValorMoraJuros) + '%', // FormatCurr('R$ #,##0.00',ValorMoraJuros)) + // ' por dia de atraso')); // end; if ValorMoraJuros <> 0 then begin if DataMoraJuros <> 0 then AStringList.Add(ACBrStr('Cobrar juros de ' + ifthen(((CodigoMora = '2') or (CodigoMora = 'B')), FloatToStr(ValorMoraJuros) + '%', FormatCurr('R$ #,##0.00',ValorMoraJuros)) + ' por dia de atraso para pagamento a partir de ' + FormatDateTime('dd/mm/yyyy',ifthen(Vencimento = DataMoraJuros, IncDay(DataMoraJuros,1),DataMoraJuros)))) else AStringList.Add(ACBrStr('Cobrar juros de ' + ifthen(((CodigoMora = '2') or (CodigoMora = 'B')), FloatToStr(ValorMoraJuros) + '%', FormatCurr('R$ #,##0.00',ValorMoraJuros)) + ' por dia de atraso')); end;
  10. Olá. Estou fazendo a homologação do boleto e remessa no Sicredi, leiaute CNAB240, e foi retornado a rejeição no segmento R, posição 18, que o código do desconto está inválido, foi informado 0 quando deveria ser informado 1, 2, 3 ou 7. No caso os boletos não tem desconto, porém no leiaute do Sicredi informa que em caso de não houver desconto, o código dever ser 1, 2, 3 ou 7 e o campo do valor de desconto zerado. Pelo que vi nos fontes, quando o valor e data do desconto não existe, o código do desconto é levado como 0, só que para o Sicredi (748 - código do Banco) dessa forma não fica correto. Como faço para sair o código do desconto como 1, 2, 3 ou 7, e continuar levando a data e valor do desconto zerados? Já existe alguma coisa pronta sobre isso, ou devo alterar os fontes e enviar para ser analisado? Obs.: alterei o valor da posição 18 do segmento R para 1 manualmente no arquivo e dessa forma o mesmo foi validado pelo Sicredi.
  11. Olá. Fazendo a validação do boleto e remessa do Sicredi 748, leiaute CNAB240, carteira A, encontrei as seguintes rejeições: 1 - Quando tiver informado o sacador/avalista no documento, levar na remessa no registro detalhe Q, na posição 155 à 169 o CPF ou CNPJ do sacador/avalista sem pontos, barras e traços, alinhando o número a direita e coloca zeros a esquerda para preencher o campo. Validação: Como o sistema está gerando: Como deveria ser: 2 - No registro detalhe R, nas posições 100 à 139 e 140 à 179 levar em branco. Validação: Como o sistema está gerando: Como deve ser: A minha pergunta é: Já existe alguma coisa pronta sobre isso, ou devo alterar os fontes e enviar para ser analisado? Obs.: fiz as alterações manuais no arquivo remessa e enviei para o Sicredi, o arquivo foi validado. Em anexo arquivo com erro e arquivo alterado manualmente. 57300D05 - corrigido.CRM 57300D05 - com erro.CRM
  12. Olá, já trabalho com emissão de boletos no nosso ERP para alguns bancos utilizando o ACBR, por exemplo: Itaú, Bradesco e Santander. Precisamos fazer a impressão de boleto para o banco SICREDI. Ao imprimirmos o boleto reparei que na informação AGENCIA/CODIGO DO BENEFICIARIO, o código do beneficiário é impresso somente com o numeral zero (0). Ficando desse formato: AGÊNCIA/BENEFICIÁRIO 2301.09.00000 porém o componente foi populado corretamente os seguintes campos do ACBR: Agencia := 2301; AgenciaDigito := 4; Conta := 12345; ContaDigito := 6; Segue imagem do boleto gerado em anexo! Desde já agradeço!
  13. Segundo o Manual CNAB240 Sicredi, página 46, no registro de transação do arquivo de remessa o caractere 118 deve conter um dos seguintes valores: '1' = Valor por dia ‘2’ = Taxa Mensal '3' = Isento Problema: O ACBr está informando '1' se tiver valor e '3' se não tiver valor, não sendo possível informar a opção '2' referente à Taxa Mensal. Sugiro lermos o campo "CodigoMoraJuros" do ACBr definir esta informação corretamente. Arquivo ACBrBancoSicredi.pas, linha 1691
  14. Oi pessoal, estava verificando e precisava passar a multa para o o banco Sicredi mas ao ver os fontes percebi que o mesmo não gerava o segmento "R" onde se localiza essa informação, como o segmento "R" é opcional para a remessa eu o adicionei ao GerarTransação240 do Sicredi, estou postando os fontes para testes. Imagens do Segmento adicionado: Sei que muitos dos campos não são utilizados pelo Sicredi por isso vão zerados ou em branco, mas acredito ser muito útil ter o Segmento "R" em caso de ter que configurar a Multa para o Boleto. Manual Utilizado : http://www.sicredi.com.br/websitesicredi/upload/files/28459_Manual_Beneficiario_Cobranca_CNAB_240___18062014.pdf Desde já agradeço a atenção de todos. Arquivo: Sicredi.rar
  15. Olá a todos, comecei a utilizar o AcbrBoleto na empresa em que trabalho e vi que na remessa do arquivo da Sicredi não há o segmento R implementado que mostra a multa do boleto. Então eu alterei no meu fonte, se possível incluir ou alterar a função. Obs: Não sei se está no padrão pois sou novo no fórum e com Acbr. A Função alterada foi a "function TACBrBancoSicredi.GerarRegistroTransacao240". Apenas adicionado este código abaixo do segmento Q. O Manual de onde tirei as informações esta no link: http://www.sicredi.com.br/websitesicredi/upload/files/28459_Manual_Beneficiario_Cobranca_CNAB_240___18062014.pdf {SEGMENTO R (OPCIONAL)} if (PercentualMulta > 0) then Result:= Result + #13#10 + '748' + // 001 a 003 - Código do banco na compensação '0001' + // 004 a 007 - Lote de serviço = "0001" '3' + // 008 a 008 - Tipo de registro = "3" DETALHE IntToStrZero( (2 * ACBrBoleto.ListadeBoletos.IndexOf(ACBrTitulo)) + 2 , 5) + // 009 a 013 - Nº sequencial do registro do lote 'R' + // 014 a 014 - Cód. segmento do registro detalhe Space(1) + // 015 a 015 - Uso exclusivo FEBRABAN/CNAB '01' + // 016 a 017 - Código de movimento de remessa '0' + // 018 a 018 - Código Desconto 2 '00000000' + // 019 a 026 - Data Desconto 2 '000000000000000' + // 027 a 041 - Valor/percentual a ser concedido '0' + // 042 a 042 - Código Desconto 3 '00000000' + // 043 a 050 - Data Desconto 3 '000000000000000' + // 051 a 065 - Valor/percentual a ser concedido '2' + // 066 a 066 - Código da multa FormatDateTime( 'ddmmyyyy', IncDay(Vencimento)) + // 067 a 074 - Data da multa IntToStrZero( round( PercentualMulta * 100 ), 15) + // 075 a 089 - Valor/percentual a ser aplicado Space(10) + // 090 a 099 - Informação ao sacado Space(40) + // 100 a 139 - Mensagem 3 Space(40) + // 140 a 179 - Mensagem 4 Space(20) + // 180 a 199 - Uso exclusivo FEBRABAN/CNAB '00000000' + // 200 a 207 - Cód. ocor. do sacado '748' + // 208 a 210 - Cód. do Banco na conta do débito PadLeft(OnlyNumber(Agencia), 5,'0') + // 211 a 215 - Código da agência do débito IfThen(AgenciaDigito = '', ' ', AgenciaDigito) + // 216 a 216 - Dígito verificador da agência PadLeft(OnlyNumber(Conta), 12, '0') + // 217 a 228 - Conta corrente para débito ContaDigito + // 229 a 229 - Dígito verificador da conta Space(1) + // 230 a 230 - Dígito verificador ag/conta '0' + // 231 a 231 - Aviso para débito automático Space(9); // 232 a 240 - Uso exclusivo FEBRABAN/CNAB
  16. Boa tarde. Estou modificando um sistema que faz geração de boletos do Sicredi e todo ano no mês de Maio são gerados os boletos para todos os clientes da empresa, o que da mais de 300.000 titulos. Com isso, gostaria de saber se algum dos colegas já atingiu o limite de registros por arquivo ou viram essa informação com alguém da Sicredi. Lendo o manual não encontrei nada. O modelo do boleto é o CNAB 240. Desde já obrigado a todos.
  17. Olá pessoal, fiz uma pesquisa no fórum e não encontrei nada relacionado então resolvi pedir ajuda aos senhores(as). Estamos implantando o layout do Banco Sicredi em um cliente, quais ocorrências devem ser consideradas como liquidação do título?
  18. Precisei tratar o motivo "G4" para títulos com Retorno de Instrução Rejeitada na leitura do arquivo de retorno do Sicredi CNAB400 para evitar erro de conversão para inteiro conforme imagem: Unit ACBrBancoSicredi.pas em anexo. Peço a gentileza de subirem a alteração para o SVN. Abraços! ACBrBancoSicredi.rar
  19. Pessoal estava verificando e implementando o retorno das descrições das ocorrencias no arquivo de retorno do Sicredi, quando verifiquei essa lógica. Dessa forma sempre que tiver qualquer Código entre as colunas das ocorrências vai ficar colocando o código "99" buscando sempre a descrição deste, ou seja mesmo que o código seja "01" vai buscar a descrição do "99", e somente se o tamanho do "Copy(SegT, IdxMotivo, 2)" for menor ou igual a zero é que vai buscar pelo código que esta no arquivo, mas ai não teria código algum. Bom acredito que essa logica esteja errada pois deveria sim buscar sempre pelo código do arquivo para retornar as descrições corretas, ou teria alguma outra explicação para isso ? Acredito que a solução para isso seria apenas remover a logica que esta circulada de vermelho e remover o "Else" também.
  20. Oi pessoal, estive verificando o arquivo de remessa gerado no Sicredi pelo acbrBoleto e verifiquei que no segmento "Q", ao invés de utilizar a UF do sacado estava utilizando uma property do TACBrBoleto chamada UF, então fiz uma alteração para que busque a UF do sacado do titulo, sei que pode ser pouca coisa mas acredito que ajude. Caso encontrem algo errado ou eu esteja fazendo confusão me avisem sou ainda iniciante no Delphi. Abaixo estarei postando as imagens da alteração e o arquivo alterado para testes. Pegando UF errado Alteração para buscar do sacado do titulo Arquivo para testes : Sicredi.rar Aguardando retorno... Desde já agradeço a sua atenção.
  21. Olá Companheiros. Estou implantando a emissão de boletos através de meu Software em grande parte de meus clientes, de diversos bancos inclusive vários já implantados com êxito, mas desde semana passada estou com uma dificuldade em configurar a emissão de boleto em um cliente que utiliza o Banco SICREDI, a remessa é gerada e aceita, mas sempre da o Retorno de que o Nosso Número é inválido. Já consultei o manual do SICREDI e segui o orientado, mas a planilha de Análise de arquivo do SICREDI também acusa sempre que o DV (dígito Verificador) está incorreto. Esse cliente emitia boleto apenas diretamente do site do SICREDI, ou seja não utilizava o Programa do SICREDI instalado no PC, já fiz a configuração em outro cliente que também usa SICREDI e tudo aconteceu normalmente não tive dificuldades, mas esse cliente específico esta me quebrando a cabeça, tem um detalhe que me chamou a atenção é que a Gerente deste cliente que não estamos conseguindo gerar o boleto informou a ele que o Código do CEDENTE é o mesmo número da conta sem o dígito, já no outro cliente que configuramos e deu certo a configuração, o código do Cedente era diferente do número da conta sem o dígito, mas ele emitia o Boleto através da Aplicação do SICREDI instalada no Desktop. Gostaria de saber se alguém ja passou por isso, se a questão de só emitir boleto pelo site e não pela Aplicação Desktop do SICREDI vai influenciar em algo. No código deixo que o ACBR trate as informações: if Boleto.Banco.TipoCobranca in [cobSicred] then FNossoNumero := SoNumeros(Boleto.Banco.MontarCampoNossoNumero(Titulo)) No manual do banco SICREDI (em anexo, página 7) diz que: Relacionar os códigos da cooperativa de crédito/agência beneficiária (aaaa), posto beneficiário (pp), do beneficiário (ccccc), ano atual (yy), indicador de geração do nosso número ( e o número sequencial do beneficiário (nnnnn): aaaappcccccyybnnnnn; Se alguém já passou por isso e puder nos dar uma ajuda, ficarei Grato.
  22. Olá, Ao importar um arquivo de retorno CNAB 400 do banco Sicredi ocorreram dois erros em arquivos diferentes O primeiro erro foi " ' ' is not a valid integer value": nossa analise sobre o que esta no txt: para alguns arquivos de retorno do banco, o sistema não esta gera os campos da posição 319 com os zeros preenchidos Exemplo quando o código do retorno foi "H5 " ao invés de "H500000000", então fiz a seguinte alteração em LerRetorno400 de: if CodMotivo <> '00' then //Após o 1º motivo os 00 significam que não existe mais motivo begin MotivoRejeicaoComando.Add(IfThen(Copy(Linha,MotivoLinha,2) = '00', '00', Copy(Linha,MotivoLinha,2))); DescricaoMotivoRejeicaoComando.Add(CodMotivoRejeicaoToDescricao(OcorrenciaOriginal.Tipo,CodMotivo)); end; para: if (CodMotivo <> '00') And (Trim(CodMotivo) <> '') then //Após o 1º motivo os 00 significam que não existe mais motivo begin MotivoRejeicaoComando.Add(IfThen(Copy(Linha,MotivoLinha,2) = '00', '00', Copy(Linha,MotivoLinha,2))); DescricaoMotivoRejeicaoComando.Add(CodMotivoRejeicaoToDescricao(OcorrenciaOriginal.Tipo,CodMotivo)); end; O segundo erro foi " 'C6' is not a valid integer value" quando o código do retorno foi "H5000000C6", verifiquei que faltou tratar o Código de motivo 'C6'. de: toRetornoLiquidadoAposBaixaouNaoRegistro: //17 case AnsiIndexStr(CodMotivo,['A8', 'H5', 'H6', 'H8']) of 0: Result:= 'A8-Recebimento da liquidação fora da rede Sicredi - via compensação eletrônica'; 1: Result:= 'H5-Recebimento de liquidação fora da rede Sicredi - VLB Inferior - via compensação'; 2: Result:= 'H6-Recebimento de liquidação fora da rede Sicredi - VLB Superior - via compensação'; 3: Result:= 'H8-Recebimento de liquidação fora da rede Sicredi - Contingência via compe'; else case StrToInt(CodMotivo) of 00: Result:= '00-Ocorrência aceita, liquidação após baixa'; else Result:= PadLeft(CodMotivo,2,'0') +' - Outros Motivos'; end; end; para: toRetornoLiquidadoAposBaixaouNaoRegistro: //17 case AnsiIndexStr(CodMotivo,['A8', 'C6', 'H5', 'H6', 'H8']) of 0: Result:= 'A8-Recebimento da liquidação fora da rede Sicredi - via compensação eletrônica'; 1: Result:= 'C6-Título já liquidado'; 2: Result:= 'H5-Recebimento de liquidação fora da rede Sicredi - VLB Inferior - via compensação'; 3: Result:= 'H6-Recebimento de liquidação fora da rede Sicredi - VLB Superior - via compensação'; 4: Result:= 'H8-Recebimento de liquidação fora da rede Sicredi - Contingência via compe'; else case StrToInt(CodMotivo) of 00: Result:= '00-Ocorrência aceita, liquidação após baixa'; else Result:= PadLeft(CodMotivo,2,'0') +' - Outros Motivos'; end; end; Segue em anexo os arquivos de retorno com erro e o ACBRBancoSicredi. Obrigada. ACBrBancoSicredi.pas retorno_erro_C6.CRT retorno_erro_cod_vazio.CRT
  23. Olá bom dia! Pessoal estou tentando utilizar o ACBRMonitor para emitir boletos de uma agência do SICREDI Porém não estou tendo muito sucesso, Acontece que o SICREDI utiliza o digito da agência como sendo a Unidade de Atendimento (informação passada pelo pessoal do banco) e penso que com isso o ACBR não está conseguindo calcular corretamente os dígitos verificadores. Por hora me concentro no dígito verificar do nosso número. Como não programamos em Delphi acabamos não conseguindo entender como o ACBR chega nos cálculos da linha digitável do boleto e por consequência onde estamos errando. Acontece que na planilha que o Sicredi me encaminhou quando coloco o código de barras ele dá divergências (ANEXO IV). Dessas divergências quando faço os cálculos numa planilha desenvolvida por mim (Anexo V) para calcular o dígito verificar do nosso número, baseado no manual do SICREDI (Anexo IV) eu chego ao mesmo resultado considerado como correto pelo banco no caso acima, cheguei ao dígito do nosso número = 5 que também é o considerado correto pelo SICREDI no anexo IV, porém no Monitor está imprimindo 7. Não me ative aos outros dígitos verificadores, pois penso que se resolver esse primeiro talvez já resolva os outros. Para facilitar as mudanças de configurações acabei criando um TXT com a sequencia de comandos prontas que eu colo no DOS após abrir a conexão via Telnet para independer do sistema (Anexo VII) ANEXO I: Dados da conta do meu cliente: http://tayos.com.br/acbr/dados cedente.txt ANEXO II: Segue o LOG do ACBRMonitor: http://tayos.com.br/acbr/logACBRmonitor.txt ANEXO 3: boleto Gerado: http://tayos.com.br/acbr/boleto.pdf Anexo IV: Planilha do Excel com as divergências apontadas http://tayos.com.br/acbr/analisa_boletos.xls Anexo V: Planilha desenvolvida por mim para checar o dígito do nosso número http://tayos.com.br/acbr/calculo boleto sicredi.xlsx Anexo VI: Manual SICREDI http://tayos.com.br/acbr/manual boleto sicredi.pdf Anexo VII: Sequencia comandos para usar via Telnet pelo DOS http://tayos.com.br/acbr/Sequencia comando usar pelo telnet.txt Galera, se puderem me ajudar agradeço porque já estou a dias tentando liberar isso para o cliente e não consigo. Att Alves
  24. Peço desculpas aos administradores, porém acabei publicando na área aberta pensando ter feito aqui no SAC. Se puderem mover para cá eu agradeço. Texto original do tópico no link abaixo. att Alves
  25. Bom dia! Estou tentando homologar um boleto do banco Sicredi, e preciso passar os dados de sacados/avalista. Na classe do boleto já passo seguindo o código: <code> Sacado.SacadoAvalista.NomeAvalista := EntAvalista.Ent_nome; if EntAvalista.ent_fisica_juridica = '0' then Sacado.SacadoAvalista.CNPJCPF := EntAvalista.cpf else Sacado.SacadoAvalista.CNPJCPF := EntAvalista.cnpj; Sacado.SacadoAvalista.Logradouro := Endereco.Logradouro; Sacado.SacadoAvalista.Numero := Endereco.numLogradouro; Sacado.SacadoAvalista.Bairro := Endereco.bairro; Sacado.SacadoAvalista.Cep := tiraponto(Endereco.cep); Sacado.SacadoAvalista.Cidade := Cidade.cidade; Sacado.SacadoAvalista.Uf := Cidade.uf; </code> No arquivo remessa é preciso que gere o registro 6, segundo o manual ( Registro Sacador Avalista (Tipo 6) - Cobrança com e sem registro (Opcional) , pg 40) para que as informações referentes ao protesto sejam passadas os banco. Link do manual: http://www.sicredi.com.br/websitesicredi/upload/files/28460_Manual_Beneficiario_Cobranca_CNAB_400___18062014.pdf Alguém já precisou passar essa informações? Dei uma olhada nos fontes do Sicredi e nao encontrei a implementação... alguem já desenvolveu ou está trabalhando nisso? att
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.