Jump to content

Grupo IN4

Membros Pro
  • Posts

    77
  • Joined

  • Last visited

About Grupo IN4

Contact Methods

  • Website URL
    http://www.grupoin4.com.br

Recent Profile Visitors

1,076 profile views

Grupo IN4's Achievements

Enthusiast

Enthusiast (6/14)

  • Dedicated Rare
  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done

Recent Badges

15

Reputation

  1. Só por curiosidade, tem alguma maneira que eu possa acompanhar o andamento do TK?
  2. Estamos processando retorno do Banco Bradesco com 400 posições; No método TACBrBancoClass.LerRetorno400 no momento de definir o código do motivo gera um laço de 5 repetições para ler blocos de 2 caracteres iniciando na posição 319. Na última volta do laço ele acaba pegando no nosso caso o valor '2 '; A instrução de definição da variável CodMotivo é: CodMotivo := StrToInt(IfThen(copy(Linha,MotivoLinha,2) = ' ','00',copy(Linha,MotivoLinha,2))); Isso acaba retornando uma exceção: ' 2' is not a valid integer value; estamos fazendo alguma leitura errada ou é algo realmente a ser resolvido? VER ARQUIVO.RET (Em anexo). Se não estivermos fazendo nada errado achamos que pode haver algum problema com o fonte: Fonte da Unit unit ACBrBoleto; procedure TACBrBancoClass.LerRetorno400(ARetorno: TStringList); ... MotivoLinha := 319; for i := 0 to 4 do begin CodMotivo := StrToInt(IfThen(copy(Linha,MotivoLinha,2) = ' ','00',copy(Linha,MotivoLinha,2))); ... MotivoLinha := MotivoLinha + 2; //Incrementa a coluna dos motivos end; ... end; Linha do Arquivo de retorno Bradesco 400 posiçoes 02RETORNO01COBRANCA 00000000000000051978PS.SECURITIZADORA DE CREDITOS 237BRADESCO 1704220160000000001 180422 000001 10240974616000188000000202960010434710071677PROFACW 0000000000000353853P000000000000000000000000020614042272261-07 00000353853P00000000140422000000004854310402261 00000000000000000000000000000000000000000000000000000000000000000000000000000000000000485430000000000000000000004854300000000000000000000000000 140422 26910511000134JOSE GENIVALDO OLIVEIRA 34000002 posição 319 a 329 da linha detalhe 140422 3 3 3 3 3 1 2 2 2 2 9 1 3 5 7 i = 0 MotivoLinha = 319 copy(Linha,MotivoLinha,2) = ' ' i = 1 MotivoLinha = 321 copy(Linha,MotivoLinha,2) = ' 1' 1 = 2 MotivoLinha = 323 copy(Linha,MotivoLinha,2) = '40' i = 3 MotivoLinha = 325 copy(Linha,MotivoLinha,2) = '42' i = 4 MotivoLinha = 327 copy(Linha,MotivoLinha,2) = '2 ' Não há método override para o método da classe primária na Unit ACBrBancoBradesco; VER DETALHEACBR.TXT (Em anexo). ARQUIVO.RET DetalheACBR.txt
  3. O fonte ACBrboleto na classe TACBrTitulo está inicializando a propriedade FRetornoWeb, do tipo TRetEnvio, e não está liberando o objeto ao destruir a classe, causando fuga de memória. Em anexo estão o print de tela e o arquivo Leak Report do MadExcept. Application MadExcept - 2022-02-22 - 17.08.09 - leak report.mbr
  4. Valeu, Panda! Já atualizamos.
  5. Boa tarde! Consegui reunir a documentação necessária e estou anexando a este post. RETORNO - PV386425_564.201 ACBrBancoSofisaSantander.pas boleto Sofisa.pdf Manual Banco Sofisa – Cobrança.pdf REMESSA - CNAB190101038.REM
  6. Olá pessoal. Desenvolvemos e homologamos o Layout do boleto do Banco Sofisa. Gostaríamos de saber como proceder para que esse layout seja incluído no projeto ACBr, o que evitaria o problema de termos que incluir esse layout na instalação do ACBr todas as vezes que precisamos atualizar. Além disso, gostaríamos de disponibilizar o mesmo para que todos os membros tenham acesso, caso precisem.
  7. Boa tarde! Alguém me responde, por favor, se essa alteração também resolve o mesmo problema para quem tem o FastReport 5
  8. Boa tarde.. Em um de nossos post aqui no fórum, abrimos um chamada como o título de "Erro com código "X203" e descrição "Não foi retornado nenhuma NFSe" o mesmo se encontra no link : este chamado já foi dada com finalizada não á novos comentários, porém, o @Victor H. Gonzales - Panda havia nos feito está solicitação "Confirma os endpoints da Abrasf 2.04 para essa cidade por favor com o provedor GISS." na qual solicitamos a prefeitura e até agora estamos no aguardo do retorno, assim que tivermos uma posição da prefeitura, gostaríamos de continuar.
  9. Haverá uma live hoje as 16h com o representante do provedor da prefeitura e das empresas desenvolvedora.
  10. Bom dia. Estamos com um problema já há algumas semanas para emitir NFSe na cidade de Maceió. Repetindo o histórico já antes mencionado, a prefeitura mudou o provedor GINFES para GISS. Porém, a GISS manteve todas as URL's antigas, com a promessa de que nada se alteraria. Porém, a promessa não se concretizou e nossa aplicação que utilizava o componente antigo de emissão NFSe parou de receber retorno nas consultas. Fizemos a migração para o novo componente. O problemas que temos neste momento é o seguinte: Fazemos o envio do RPS não recebemos nenhum retorno de erro, logo em seguida fazemos a consulta deste RPS e temos como retorno o erro com código "X203" e descrição "Não foi retornado nenhuma NFSe.". Estamos com o ACBr atualizado com a revisão 22737 de hoje no inicio da manhã. Seguem em anexo todos os XML's envolvidos nas operações citadas acima 51725-env-lot.xml 51725-rec.xml 1275433-con-lot.xml 1275433-con-sit.xml 1275433-lista-nfse-con-lot.xml 1275433-sit.xml 51725NFS-comp-nfse.xml 51725NFS-con-nfse-rps.xml
  11. Boa Tarde, Migramos na semana passada para o novo componente de emissão de NFSe. No componente antigo na hora da substituição, na geração do novo RPS, o que fazíamos era emitir o RPS informando os atributos TACBrNFSe.NotasFiscais[xx].NFSe.RpsSubstituido.Numero, TACBrNFSe.NotasFiscais[0].NFSe.RpsSubstituido.Serie e TACBrNFSe.NotasFiscais[0].NFSe.RpsSubstituido.Tipo. Após a emissão ao consultarmos a NFS substituída, tínhamos o retorno de status cancelada para a NFSe. Isso não está ocorrendo com o componente novo. Tentamos fazer o processo completo emitindo a nova, informando os atributos de substituição e cancelando a antiga. Não conseguimos cancelar. Temos o retorno E345 - "Para realizar o cancelamento entre em contato com a prefeitura" e x209 - "Retorno do Cancelamento não encontrada.". Tentamos seguir o projeto EXEMPLO e utilizamos o método TACBrNFSeX.SubstituirNFSe mas o retorno é de "Serviço não implementado para este provedor.". Estamos precisando de ajuda para completar a migração. Gostaria de saber em que erro estamos incorrendo.
  12. Ok, Italo, obrigado!!! Vou verificar as atualizações de sexta (13/08) para cá, quando fizemos o nosso ultimo update.
×
×
  • 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.