Junior Dias

Boa noite, Contribuindo com o tópico, conheço a ferramenta da SIEG e tenho uma integração com o meu sistema, a ferramenta da SIEG tem parâmetros para configurar o horario de busca dos XMLs, basta a contabilidade configurar na plataforma da SIEG a busca noturna. Resumindo, durante o dia somente o ERP da empresa busca os XMLs a noite a Plataforma da SIEG.

Olá, segue arquivo ACBrNFSeXServicos.ini com alterações para NFSe da cidade e Arvoredo - SC. Recentemente a mesma migrou para IPM versão 1.01. Tenho clientes emitindo com as alterações em anexo. [4201653] Nome=Arvoredo UF=SC Provedor=IPM Versao=1.01 ProRecepcionar=https://arvoredo.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao HomRecepcionar=https://arvoredo.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao ACBrNFSeXServicos.ini

Muito obrigado Renato, fiz conforme o link que me passou e deu certo, segue arquivo para uma futura atualização. [4208005] Nome=Ita UF=SC Provedor=IPM Versao=1.01 ProRecepcionar=https://ita.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao HomRecepcionar=https://ita.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao ACBrNFSeXServicos.ini

Boa tarde, preciso implementar a emissão da nota de serviço para um cliente de Itá, a pouco tempo atrás o provedor era Betha, atualmente IPM. Analisando o componente o mesmo ainda aponta para Betha, como faço para alterar isso? Tenho outra cidade que também mudou o provedor. Agradeço pela ajuda.

Agradeço as orientações José, meu ACBr já estava atualizado, foi somente passar as informações corretas em: ACBrBoleto.banco.LayoutVersaoArquivo e ACBrBoleto.banco.LayoutVersaoLote e gerou certo a remessa. Muito obrigado.

Correção Outro detalhe, estou passando o código do CEDENTE com 7 dígitos mas na remessa está adicionando somente 6.

Boa tarde, estou fazendo uma homologação e a pessoa responsável pela validação solicitou as seguintes alterações: 20.0 No da Versão do Layout do Arquivo 164 166 9(003) Conteudo Atual:050 Conteudo Esperado:107 07.1 Nº da Versão do Layout do Lote 14 16 9(003) Conteudo Atual:030 Conteudo Esperado:067 Conforme manual em anexo, página 77: Versão ‘107’ Aplica-se para clientes com códigos de beneficiário composto por até 7 dígitos. Nesta versão, o preenchimento do campo Código do Beneficiário no arquivo deverá ser feito com alinhamento à direita. (que é o caso do meu cliente.) Analisando o arquivo ACBrBancoCaixa na linha 86: constructor TACBrCaixaEconomica.create(AOwner: TACBrBanco); begin inherited create(AOwner); fpDigito := 0; fpNome := 'Caixa Economica Federal'; fpNumero := 104; fpTamanhoAgencia := 5; fpTamanhoMaximoNossoNum := 15; fpTamanhoCarteira := 2; fValorTotalDocs := 0; fQtRegLote := 0; fpLayoutVersaoArquivo := 50; fpLayoutVersaoLote := 30; Vejam que o LayoutVersãoArquivo e LayoutVersão Lote está fixo. Outro detalhe, estou passando o código do convenio com 7 dígitos mas na remessa está adicionando somente 6. Como devo proceder?

Bom dia @Juliomar Marchetti O problema está na leitura do arquivo de retorno CNAB240, por isso anexei aqui o arquivo que estou lendo, o manual e o ACBrBancoCaixaSICOB.pas com as alterações. É necessário a remessa e o PDF do boleto? Manual_de_Leiaute_de_Arquivo_Eletronico_CNAB_240.pdf RET202007070451470173.RET ACBrBancoCaixaSICOB.pas

Boa tarde. Sempre que atualizo o ACBr tenho que fazer alterações manuais no arquivo ACBrBancoCaixaSICOB.pas, peço ajuda aos colegas. Estou analisando o arquivo ACBrBancoCaixaSICOB.pas, e na procedure LerRetorno240 (linha1230), penso que a função CalcularTamMaximoNossoNumero (linha 1311) sempre vai retornar zero. CalcularTamMaximoNossoNumero(Carteira, ' ', ACBrBanco.ACBrBoleto.Cedente.Convenio); Na função CalcularTamMaximoNossoNumero a carteira está indo em branco, segundo o próprio arquivo do ACBr consta isso: // Carteira := Copy(Linha,40,2); // No SICOB não retorna o numero da carteira. Retorna o seguinte: // 1 = Cobrança Simples // 3 = Cobrança Caucionada // 4 = Cobrança Descontada O copy que pega os dados da carteira está comentado, mesmo que não estivesse o retorno seria 1, 3 ou 4. Na função CalcularTamMaximoNossoNumero o código é: if (wOperacao = 870) and (Carteira = 'SR') then Result := 15 else if (Carteira = 'CR') then Result := 10; Na função CalcularTamMaximoNossoNumero o nosso numero está passando em branco ( ' ' ). Segue código original: with Titulo do begin if Copy(Linha,14,1)= 'T' then //segmento T begin ACBrBanco.TamanhoMaximoNossoNum := CalcularTamMaximoNossoNumero(Carteira, ' ', ACBrBanco.ACBrBoleto.Cedente.Convenio); SeuNumero := copy(Linha,59,11); NumeroDocumento := copy(Linha,106,25); NossoNumero := Copy(Copy(Linha,47,10), // sem o DV Length(Copy(Linha,47,10))-TamanhoMaximoNossoNum , TamanhoMaximoNossoNum); Comentei a linha que calcula CalcularTamMaximoNossoNumero e deixei o tamanho 10. E assim leu certo o Nosso Número. Atenciosamente Junior Dias ACBrBancoCaixaSICOB.pas