Desenv. AT Info Sistemas

Bom dia! estou com dificuldade de configurar a consulta após emitir uma NFSe no servidor Infisc para a cidade de farroupilha. Já consegui emitir a NFSe, porém não estou conseguindo consultar o XML dessa NFSe.

Vou verificar. Muito Obrigado!

Bom dia! Gostaria de saber se foi implantado no Acbr a consulta no SPC? Obrigado.

Sim segue print da tela do programa exemplo.

Estou com problema para realizar o cancelamento via webservice no provedor LIBRE, está me retornando o seguinte erro: --------- Código : E160 Mensagem: Arquivo em desacordo com o XML Schema. Correção: Consulte o Manual da NFS-e para saber quais são as versões de XML Schema suportadas pelo sistema. --------- em anexo o xml gerado para o envio do cancelamento. Cancelamento.xml

Boa tarde! Funcionou a leitura. Muito obrigado

Boa tarde! Fico no aguardo. Obrigado

Bom dia, Vou testar. Muito obrigado

Bom dia, Alguma posição sobre a alteração solicitada? O cliente está nos cobrando, pois não consegue ler os retornos pelo sistema. Obrigado

Boa tarde, Estou tentando ler o arquivo DDA do Banco do Brasil e está retornando o erro abaixo: Não Foi Possível ler os Registros do Arquivo Nao Foi Possível ler os registros no arquivo. '/' is not a valid integer value. Pude identificar que ocorre ao ler a data de gravação que está em branco no retorno. Nesta unit "ACBrPagForLerTxt" falta retirar ou testar se o campo esta com espaços. function TArquivoRClass.LerCampo(const Linha: string; Inicio, Tamanho: Integer; Tipo: TTipoCampo): Variant; var ConteudoCampo: string; iDecimais: Integer; begin ConteudoCampo := Copy(Trim(Linha), Inicio, Tamanho); case Tipo of tcStr: result := Trim(ConteudoCampo); tcDat: begin *** Aqui a variavel ConteudoCampo = ' ' **** ela está com espaços em branco dentro então o Length > 0 **** acredito que tem que alterar este teste if length(trim(ConteudoCampo)) > 0 then begin if ConteudoCampo <> '00000000' then begin ConteudoCampo := Copy(ConteudoCampo, 1, 2) + '/' + Copy(ConteudoCampo, 3, 2) + '/' + Copy(ConteudoCampo, 5, 4); result := EncodeDataHora(ConteudoCampo, 'DD/MM/YYYY'); end else Result := 0; end else result := 0; end; No Aguardo Obrigado Adriano Lucas

Sim, ela já está com a alteração.

Bom dia, Gostaria de saber se tem como fazer a alteração que preciso no retorno do Banrisul CNAB 240. No arquivo de Retorno vem os dados do campo SeuNumero, que utilizo no sistema, mas o Acbr não está importando. Segue a alteração que fiz. Como estava: SeuNumero := NumeroDocumento; E alteração que realizei: SeuNumero := Copy(FSegT,106, 25); Segue arquivos. Obrigado 0625134064056_20230131_0.ret ACBrBancoBanrisul.pas

Bom dia! A principio ficou ok. Muito obrigado!

Boa tarde! Desculpe não responder antes, estive doente e depois tirei férias. Estou voltando hoje e assim que der farei testes. Obrigado!

Bom dia! Continua com erro, olha na tarefa anterior como descrevi o problema. O meu cliente utiliza 5 dias, ou seja no 5 dia util e nesta situação ele gera como 7 dias corridos e não 5 dia util. No Boleto imprimi 5 dia útil e na remessa vai errado.

Bom dia! segue manual CNAB 400.pdf

Bom dia! Referente ao tópico abaixo que foi fechado, Protesto Banco Brasil Cnab 400 , estou com problema ainda, só consigo gerar com a correção que fiz no tópico relacionado. Você falou que BB não tem protesto dias úteis, mas tenho clientes que usam dessa forma, protesto com 5 dias úteis e esta rotina sem minha alteração gera errado. Seguimos o manual cfe a página 14

Segue a Unit ACBrBancoBrasil.pas

Bom dia! Fiz uma correção no Cnab 400 do Banco do Brasil para calcular os dias uteis de protesto, quando tem final de semana no meio o calculo estava errado, por exemplo um título com vencimento dia 15/12 e protesto 5 dias uteis ficará a data de protesto dia 22/12. Na rotina que está na imagem ele não calculava correto, não levava em conta dias úteis, dando diferença nos dias, em vez de 5 para 7.

Bom dia! Deu certo desta maneira, estou deixando o cedente zerado. Obrigado

Bom dia! Na verdade o que eles não usam é o convênio, vocês que usaram o Cedente neste campo que eles recusaram. Safra - Cnab 240.pdf

Bom dia! Segue imagem dos erros de validação do Safra.

Boa Tarde, Fomos homologar o Banco Safra Cnab 240 para um cliente e tivemos rejeição. Fiz as correções e validaram. O layout deles não aceita cedente no Header e Lote. Segue o Arquivo Alterado ACBrBancoSafra.pas

Tudo certo, em alguns celulares testados. Muito Obrigado!

Vou testar, Obrigado !