Victor H. Gonzales - Panda

Bom dia, Faça a verificação se existe algum antivirus nessa maquina, e se ela está tentando escanear o processo para saber se é malicioso ou trabalhando em sandbox. se houver, tenta colocar em exceção a sua aplicação ou parar ele para testar se funciona, no passado, tive problemas com Kaspersky no modulo dele que identificava minha aplicação como ransomware, foi um pouco mais catastrófico, e cada versão gera um sha1 (assinatura) diferente para os antivírus ele pode estar fazendo verificação a cada comando de I/O.

Ai é questão contratual, isso é normal! tem que ver como é o contrato dele com a instituição, CEF já vi ocorrer isso também. Mas, provavelmente, verificar se não tem como contratar outra carteira, só que as vezes as taxas mudam

Boa tarde, Consegue anexar o projeto do programa exemplo aqui, com a simulação deste erro ? Se tiver informação sensível, por favor, coloque alguma fictícia, mas que não fere as regras de validação para geração do mesmo.

Boa tarde, Isso é uma parte dificil para as SW. eu não tenho Itau, mas pelo o que me recordo, é só o cliente ter a carteira contratada, se não me engano 109 e solicitar ao GCash as credenciais Client_id, Client_Secret, Itau_Chave) Mas se o gerente de cobranças do seu cliente não tem as informações ou não pode te ajudar, solicite se tem algum suporte direto do banco.

Boa tarde, nessa maquina em questão onde está o problema, existe Warsaw instalado? se sim, consegue remover e fazer um teste ?

SSLXmlSignLib use a LIBXML2

Bom dia, use SSLLib libWinCrypt (A1/A3) ou libOpenSSL (A1) (os demais campos é inserido automaticamente, cryptlib, httplib, xmlsignlib) e SSLType LT_TLS_1.2 LT_ALL quase nenhum servidor de documento fiscal aceita hoje em dia. a XMLSignLib recomendo usar a libXML2. esse é o padrão adotado a pelo menos 5 anos.

Bom dia, Isso pode ser erro de escala, já vi isso acontecer a muito tempo, quando usado impressora PDF, tipo CUTEPDF, e a escala da folha altera. Mas conte mais detalhes como o Rubinho informou, qual o gerador de relatório tu usa, se FR qual o relatório e de que forma você gera esses PDF.

Bom dia, Isso é bloqueio autônomo, se houver internet no módulo após um tempo de conexão o mesmo volta a funcionar. Só não irá funcionar se não comunicar por erro de certificado, ws, porta queimada, ou erro de configuração, se o módulo está comunicando com a internet, e o bloqueio não está desativando, recomendo entrar em contato com o fabricante do módulo para suporte, em casos extremos, será necessário adquirir um novo módulo, pois teve troca de cadeias da sefaz, ou seu módulo pode estar com defeito. Detalhe importante, é que você tem 10 dias para transmitir os cupons em contingência, se o módulo chegou a bloquear, os cupons não foram transmitidos e vocês deveriam ter transmitidos eles em contingência pelo COMSAT, é necessário verificar com o contador essa regularização.

Por favor atualize seus fontes, pelo SVN do ACBr... Já subimos para o nosso repositório de fontes, modificações que podem corrigir algum dos itens referentes a esse tópico... Por favor atualize seus fontes, faça testes, e se possível comente em uma nova resposta, se o problema foi resolvido... Dúvidas, sobre o uso do SVN ? Clique aqui e veja um vídeo

tem como anexar o INI que está sendo enviado?

A Sessão Transportador espera a propriedade modFrete=1 no seu caso e você está passando FretePorConta=1

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado Bom dia Qual a versão do FastReports que você está utilizando e a Edição dele ?

Prazos de vigência: Homologação Produção 14/03/2022 01/04/2022 Resumo: Resolução Gecex nº 272, de 19 de novembro de 2021, publicada no Diário Oficial da União em 29 de novembro de 2021, divulgou a nova tabela de NCM com efeitos a partir de 01/04/2022. Tabela de códigos de NCM A nova tabela de códigos de NCM com efeitos a partir de 01/04/2022 está disponível para download no Portal Nacional da NF-e <www.nfe.fazenda.gov.br>, aba “Documentos”, opção “Diversos”. Os 537 (quinhentos e trinta e sete) códigos incluídos na tabela de NCM publicada no Portal Nacional da NF-e estão realçados em verde com a informação de início de vigência em 01/04/2022. Os 441 (quatrocentos e quarenta e um) códigos excluídos na tabela de NCM publicada no Portal Nacional da NF-e estão realçados em vermelho com a informação de fim de vigência em 31/03/2022. Fonte: https://www.nfe.fazenda.gov.br/portal/exibirArquivo.aspx?conteudo=lbpa538TYoA=

Boa tarde, Obrigado pela contribuição, já encontra-se no SVN!

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

faça como o @BigWingste indicou, na tua IDE, Component / Install Packages veja se o pacote está marcado, se não o adicione.

Boa tarde, No seu projeto se você tem ele inserido e carrega nessa IDE ou da algum erro ao ler o dfm ?

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia, não existe webservices para este serviço solicitado.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia, o Projeto é VCL ou FMX ?

Bom dia, Segue a programação atual do programa exemplo, o botão de registro, no final dele tem a captura do retorno do registro e a persistência em arquivo texto para simples conferencia; veja como ele faz a leitura da lista de rejeições { --Utiliza WebService dos Bancos para realizar o Registro dos Boletos-- Até o momento disponível para Caixa Economica, Banco do Brasil e Itau É necessario realizar a configuração previa para acesso ao WebService No Object Inspector verifique as propriedades: CedenteWS e Configuracoes/WebService Verifique no arquivo "configWebService.txt" quais as configurações necessárias para cada Banco } procedure TfrmDemo.btnRegistroClick(Sender: TObject); var SLRemessa: TStringList; i, j: Integer; begin with dm.ACBrBoleto do begin //Função de Envio Configuracoes.WebService.Operacao := tpInclui; EnviarBoleto; // <<< retorna como false se o httpresult code for diferente de 200,201,202 //Verifica Lista com os retornos if ListaRetornoWeb.Count > 0 then begin SLRemessa := TStringList.Create; try for i:= 0 to Pred(ListaRetornoWeb.Count) do begin //Ler todos os campos da classe Retorno SLRemessa.Add('Cod_Retorno='+ ListaRetornoWeb[i].CodRetorno + sLineBreak + 'Msg_Retorno='+ ListaRetornoWeb[i].MsgRetorno + sLineBreak + 'Ori_Retorno='+ ListaRetornoWeb[i].OriRetorno + sLineBreak + 'HTTP_Result='+ IntToStr(ListaRetornoWeb[i].HTTPResultCode) + sLineBreak + 'JSON='+ ListaRetornoWeb[i].JSON); for j:= 0 to Pred(ListaRetornoWeb[i].ListaRejeicao.Count) do begin SLRemessa.Add('[Rejeicao'+IntToStr(j)+']' + sLineBreak + 'Campo=' + ListaRetornoWeb[i].ListaRejeicao[j].Campo + sLineBreak + 'Codigo=' + ListaRetornoWeb[i].ListaRejeicao[j].Codigo + sLineBreak + 'Versao=' + ListaRetornoWeb[i].ListaRejeicao[j].Versao + sLineBreak + 'Mensagem=' + ListaRetornoWeb[i].ListaRejeicao[j].Mensagem + sLineBreak + 'Ocorrencia=' + ListaRetornoWeb[i].ListaRejeicao[j].Ocorrencia + sLineBreak + 'Valor='+ ListaRetornoWeb[i].ListaRejeicao[j].Valor + sLineBreak ); end; SLRemessa.Add('HEADER' + sLineBreak + 'Versao='+ ListaRetornoWeb[i].Header.Versao + sLineBreak + 'Autenticacao=' + ListaRetornoWeb[i].Header.Autenticacao + sLineBreak + 'Usuario_Servico=' + ListaRetornoWeb[i].Header.Usuario_Servico + sLineBreak + 'Usuario=' + ListaRetornoWeb[i].Header.Usuario + sLineBreak + 'Operacao=' + TipoOperacaoToStr(ListaRetornoWeb[i].Header.Operacao) + sLineBreak + 'Indice=' + IntToStr(ListaRetornoWeb[i].Header.Indice) + sLineBreak + 'Sistema_Origem=' + ListaRetornoWeb[i].Header.Sistema_Origem + sLineBreak + 'Agencia=' + IntToStr(ListaRetornoWeb[i].Header.Agencia) + sLineBreak + 'ID_Origem=' + ListaRetornoWeb[i].Header.Id_Origem + sLineBreak + 'Data_Hora=' +FormatDateTime('dd/mm/yyyy hh:nn:ss',ListaRetornoWeb[i].Header.Data_Hora) + sLineBreak + 'ID_Processo=' + ListaRetornoWeb[i].Header.Id_Processo + sLineBreak + 'DADOS' + sLineBreak + 'Excessao=' +ListaRetornoWeb[i].DadosRet.Excecao + sLineBreak + 'CONTROLE_NEGOCIAL' + sLineBreak + 'Origem_Retorno=' + ListaRetornoWeb[i].DadosRet.ControleNegocial.OriRetorno + sLineBreak + 'NSU=' + ListaRetornoWeb[i].DadosRet.ControleNegocial.NSU + sLineBreak + 'Cod_Retorno=' + ListaRetornoWeb[i].DadosRet.ControleNegocial.CodRetorno + sLineBreak + 'Msg_Retorno=' + ListaRetornoWeb[i].DadosRet.ControleNegocial.Retorno + sLineBreak + 'COMPROVANTE' + sLineBreak + 'Data=' + FormatDateTime('dd/mm/yyyy', ListaRetornoWeb[i].DadosRet.Comprovante.Data) + sLineBreak + 'Hora=' + ListaRetornoWeb[i].DadosRet.Comprovante.Hora + sLineBreak + 'ID_BOLETO' + sLineBreak + 'Codigo_Barras=' + ListaRetornoWeb[i].DadosRet.IDBoleto.CodBarras + sLineBreak + 'Linha_Digitavel=' + ListaRetornoWeb[i].DadosRet.IDBoleto.LinhaDig + sLineBreak + 'Nosso_Numero=' + ListaRetornoWeb[i].DadosRet.IDBoleto.NossoNum + sLineBreak + 'URL=' + ListaRetornoWeb[i].DadosRet.IDBoleto.URL + sLineBreak + 'CONSULTA_BOLETO' + sLineBreak + 'Numero_Documento=' + ListaRetornoWeb[i].DadosRet.TituloRet.NumeroDocumento + sLineBreak + 'Data_Vencimento=' + FormatDateTime('dd/mm/yyyy',ListaRetornoWeb[i].DadosRet.TituloRet.Vencimento) + sLineBreak + 'Valor=' + CurrToStr(ListaRetornoWeb[i].DadosRet.TituloRet.ValorDocumento) + sLineBreak ); if NaoEstaVazio(ListaRetornoWeb[i].DadosRet.TituloRet.CodBarras) then begin SLRemessa.Add('TITULO_RETORNO' + sLineBreak + 'vencimento_titulo='+FormatDateTime('dd/mm/yyyy',ListaRetornoWeb[i].DadosRet.TituloRet.Vencimento)+ sLineBreak + 'tipo_carteira_titulo='+ListaRetornoWeb[i].DadosRet.TituloRet.Carteira+ sLineBreak + 'nosso_numero='+ListaRetornoWeb[i].DadosRet.TituloRet.NossoNumero+ sLineBreak + 'seu_numero='+ListaRetornoWeb[i].DadosRet.TituloRet.SeuNumero+ sLineBreak + 'especie='+ListaRetornoWeb[i].DadosRet.TituloRet.EspecieDoc+ sLineBreak + 'codigo_barras='+ListaRetornoWeb[i].DadosRet.TituloRet.CodBarras+ sLineBreak + 'numero_linha_digitavel='+ListaRetornoWeb[i].DadosRet.TituloRet.LinhaDig+ sLineBreak + 'local_pagamento='+ListaRetornoWeb[i].DadosRet.TituloRet.Mensagem.Text+ sLineBreak + 'data_processamento='+FormatDateTime('dd/mm/yyyy',ListaRetornoWeb[i].DadosRet.TituloRet.DataProcessamento)+ sLineBreak + 'data_emissao='+FormatDateTime('dd/mm/yyyy',ListaRetornoWeb[i].DadosRet.TituloRet.DataDocumento)+ sLineBreak + 'uso_banco='+ListaRetornoWeb[i].DadosRet.TituloRet.UsoBanco+ sLineBreak + 'valor_titulo='+CurrToStr(ListaRetornoWeb[i].DadosRet.TituloRet.ValorDocumento)+ sLineBreak + 'valor_desconto='+CurrToStr(ListaRetornoWeb[i].DadosRet.TituloRet.ValorDesconto)+ sLineBreak + 'valor_outra_deducao='+CurrToStr(ListaRetornoWeb[i].DadosRet.TituloRet.ValorDespesaCobranca)+ sLineBreak + 'valor_juro_multa='+CurrToStr(ListaRetornoWeb[i].DadosRet.TituloRet.ValorMoraJuros)+ sLineBreak + 'valor_outro_acrescimo='+CurrToStr(ListaRetornoWeb[i].DadosRet.TituloRet.ValorOutrosCreditos)+ sLineBreak + 'valor_total_cobrado='+CurrToStr(ListaRetornoWeb[i].DadosRet.TituloRet.ValorPago) + sLineBreak + 'texto_informacao_cliente_beneficiario=' +ListaRetornoWeb[i].DadosRet.TituloRet.Informativo.Text ); end; end; SLRemessa.SaveToFile( PathWithDelim(ExtractFilePath(Application.ExeName))+'RetornoRegistro.txt' ); finally SLRemessa.Free; end; ShowMessage('Retorno Envio gerado em: '+ PathWithDelim(ExtractFilePath(Application.ExeName))+'RetornoRegistro.txt' ); end; end; end;