Fabiano Sehn

Bom dia. Estava verificando isso agora. Também estou com a mesma situação. O problema é que no Cnab 240 usa para o campo do número da conta 12 posições e no Cnab 400 são 8 posições. E no SET do campo da conta, replica para 12 posições, já que foi definido como padrão para esse campo o tamanho 12 , e ai que esta o problema.

Bom dia. Segue anexo, AcbrBoletosCaixa.pas, com dois ajustes solicitados em homologações. 1º Remessa Cnab240, Segmento "P", posição 63 - 73, estava com alinhamento a direita e deve ser esquerda 2º Remessa Cnab240, Segmento "P", posição 196 - 220, estava com alinhamento a direita e deve ser esquerda Att Fabiano Sehn ACBrBancoCaixa.pas

Boa tarde pessoal. Então, Tive que fazer uma ajuste na unit pnfsLerListaNFSe.pas, para adicionar os erros quando fazia a consulta do Lote (ConsultarLoteRps). Não estava populando a classe dos erros. Feito ajustes e segue em anexo, ajuste feito na linha 704. Att Fabiano Sehn pnfsLerListaNFSe.pas

Bom dia. Tive quer fazer um ajuste na importação do retorno da Caixa quando é SICOOB. Não estava conseguindo ler do arquivo o nosso número. Comentei uma parte da LerRetorno240, onde ele calcula o tamanho do nosso número, e funcionou certinho. Segue em anexo a Unit para apreciar. Att Fabiano Sehn ACBrBancoCaixaSICOB.pas

Boa tarde pessoal. Então, tive que implementar a Emissão da NFSe de São Luis (Maranhão). Para isso eu precisei fazer alguns ajustes no ACBr. Eu vi em outros Tópicos que já estaria funcionado isso. Meu questionamento é se alguém esta usando o ACBr para emissão da NFSe em São Luis, pois eu não consegui sem fazer esse ajustes? Lembro que meu ACBr estão atualizado. Att Fabiano

Bom dia Pessoal. Com relação ao ISSDsf de São Luis, testei aqui e não esta funcionando. "Esta retornando esse erro Cannot find dispatch method for {http://dsfnet.com.br}enviar". Se ainda não estiver Ok, posso ajudar. Fico no aguardo. Att Fabiano

Boa tarde. Precisei fazer dois ajustes no Arquivo ACBrBoletoFCFR.pas. Ajuste 1: Conforme manual da Quality Systems do banco Unicred denominado "Manual de validação de boletos para as singulares" sendo do Cnab 400 posições de junho / 2014 (v5), o mesmo cita na página 6 literalmente o texto: "Sacador / Avalista: Preencher o campo com as informações: Nome + Inscrição + Endereço completo (endereço, bairro, cidade, UF e CEP) do cooperado (Registro detalhe – Pos. 335 a 394)". Esta é uma exigência que caso não seja impressa também no bloqueto, impede a homologação dos boletos da Unicred.

Boa tarde pessoal. Então, estava olhando o arquivo ACBrBancoCaixaSICOB.pas, e para ser exato na função LerRetorno240. Penso que tem um problema ao ler o nosso número do arquivo. O problema esta no código abaixo: with Titulo do begin if Copy(Linha,14,1)= 'T' then //segmento T begin wCarteira := Copy(Linha, 58, 1); ACBrBanco.TamanhoMaximoNossoNum := CalcularTamMaximoNossoNumero(Carteira, '', ACBrBanco.ACBrBoleto.Cedente.Convenio); SeuNumero := copy(Linha,59,11);

Bom dia Senhores e Senhoritas. Então, fiz um ajuste na unit ACBrBancoCaixaSICOB, a mesma tinha uma divergência com relação ao manual nas posições: 224 - Código para baixa/devolução: Não baixar/não devolver: Esta fixo "2" fiz ajuste conforme a unit ACBrBancoCaixa; 225 a 227 - Prazo para baixa/devolução (em dias corridos) fiz ajuste conforme a unit ACBrBancoCaixa; Fiz esse ajuste baseado nos manuais e os dois tanto o SIGCB e o SICOOB tratam esses dois campos da mesma forma. Segue em anexo o arquivo. Muito Obrigado Fabiano Sehn ACBrBancoCaixaSICOB.pas

Boa tarde senhores e senhoritas... Na função CalcularDigitoVerificador temos o código abaixo, Modulo.Documento := ACBrTitulo.ACBrBoleto.Cedente.Agencia + PadLeft(ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito,2,'0')+ PadLeft(ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente,5,'0')+ FormatDateTime('yy',ACBrTitulo.DataDocumento) + '2' + ACBrTitulo.CodigoGeracao + RightStr(ACBrTitulo.NossoNumero,5); O Byte de geração "2" esta fixo, sendo que o mesmo pode ir de 2 a 9

Boa tarde senhores e senhoritas... Na função CalcularDigitoVerificador temos o código abaixo, Modulo.Documento := ACBrTitulo.ACBrBoleto.Cedente.Agencia + PadLeft(ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito,2,'0')+ PadLeft(ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente,5,'0')+ FormatDateTime('yy',ACBrTitulo.DataDocumento) + '2' + ACBrTitulo.CodigoGeracao + RightStr(ACBrTitulo.NossoNumero,5); O Byte de geração "2" esta fixo, sendo que o mesmo pode ir de 2 a 9

Bom dia Senhores. Estou migrando para Trunck2 o AcbrNFse da minha aplicação. Estou com uma dúvida no Envio do RPS. Após enviar o RPS e Ler o XML na Função TratarRetorno, no finally ele esta dando um Free no objeto RetEnvioLote. Dessa forma se der algum erro no Envio ele limpa esse objeto e não consigo pegar os código de erros retornados pelo provedor. Tenho duas possíveis soluções. 1 - Não limpar mais esse objeto na função TNFSeEnviarLoteRPS.TratarResposta, ai é feito o ajuste no próprio ACbr 2 - Na minha aplicação chamar o método EnviarLoteRPS.RetEnvLote.LerXm