Ir para conteúdo
  • Cadastre-se

vinizioWOW

Membros
  • Total de ítens

    87
  • Registro em

  • Última visita

Tudo que vinizioWOW postou

  1. Bom dia, Na unit 'ACBrBoletoW_Bancoob.pas' rotina 'RequisicaoJson' a partir da linha 340 o componente está passando valores fixos para os campos identificacaoEmissaoBoleto, identificacaoDistribuicaoBoleto e numeroParcela ao invés de passar os valores definidos no componente. Isso pode acarretar em problemas como por exemplo na composição do código de barras e da linha digitável, impossibilitando o pagamento, visto que os valores enviados ao banco estão diferentes dos informados pelo cliente na geração do boleto. Código atual: Json.Add('identificacaoEmissaoBoleto').Value.AsInteger := 1; Json.Add('identificacaoDistribuicaoBoleto').Value.AsInteger := 1; Json.Add('valor').Value.asNumber := aTitulo.ValorDocumento; Json.Add('dataVencimento').Value.asString := DateTimeToDateBancoob(aTitulo.Vencimento); Json.Add('numeroParcela').Value.AsInteger := 1; Sugestão: if aTitulo.ACBrBoleto.Cedente.ResponEmissao <> tbCliEmite then Json.Add('identificacaoEmissaoBoleto').Value.AsInteger := 1 else Json.Add('identificacaoEmissaoBoleto').Value.AsInteger := 2; // documentação do banco permite: 1 Banco Emite - 2 Cliente Emite if aTitulo.ACBrBoleto.Cedente.IdentDistribuicao = tbBancoDistribui then Json.Add('identificacaoDistribuicaoBoleto').Value.AsInteger := 1 else Json.Add('identificacaoDistribuicaoBoleto').Value.AsInteger := 2; // documentação do banco permite: 1 Banco Distribui - 2 Cliente Distribui Json.Add('valor').Value.asNumber := aTitulo.ValorDocumento; Json.Add('dataVencimento').Value.asString := DateTimeToDateBancoob(aTitulo.Vencimento); Json.Add('numeroParcela').Value.AsInteger := ATitulo.Parcela; // documentação do banco permite até '99' Cordialmente, ACBrBoletoW_Bancoob.pas
  2. Boa tarde, No último teste, o XML de recibo do lote a tag veio com o valor de -99860 <tMed>-99860</tMed>
  3. Boa tarde Juliomar, Somente 1 pasta ACBr. Fontes atualizados semana passada. O problema também ocorre em produção no cliente com o projeto já compilado.
  4. Boa tarde senhores, Estou ajustando os parâmetros do componente conforme exemplo abaixo: ACBrCTe.Configuracoes.WebServices.AguardarConsultaRet := 15000; ACBrCTe.Configuracoes.WebServices.TimeOut := 15000; ACBrCTe.Configuracoes.WebServices.Tentativas := 5; ACBrCTe.Configuracoes.WebServices.IntervaloTentativas := 1500; ACBrCTe.Configuracoes.WebServices.AjustaAguardaConsultaRet := True; Entretanto ao debbugar em ambiente de PRODUÇÃO notei que o componente aparentemente está multiplicando as propriedades acima para valores muito altos, o que tem travado a aplicação. Os valores ficam com algo na casa de 65416000 milisegundos. Conforme imagem em anexo. Fiz o teste mudando a propriedade 'AjustaAguardaConsultaRet' para FALSE e o componente considerou os demais valores. O que pode estar acontecendo? Cordialmente,
  5. Boa tarde Alexandre, Cliente usa sistema operacional Windows Server 2012. Em teste de outros terminais a impressão está ok. Testes gerando o PDF imprimindo pelo PDF também foram ok. Ao que tudo indica é algum bug entre o FastReport e spooler de impressão do Windows Server 2012. Vou fechar o tópico. Grato pela atenção.
  6. Boa tarde Ao utilizar o ACBrBoleto com FastReport a impressão do Qr-Code do PIX está saindo desfocada impossibilitando a leitura do mesmo. Na visualização da impressão na tela, sai perfeito. Na impressão, sai desfocado. Versão do FastReport: 5.4.6 Componente ACBr e arquivo BoletoPIX.fr3 atualizados. Testei em uma impressora HP laser M1132 e também em uma Brother DCP-1610NW. Alguém sabe como resolver?
  7. Boa tarde - Veja se não existem dll's desatualizadas nas pastas Windows, System32 ou SysWOW64. - No caso como o seu cliente possui certificado tipo A1 é interessante talvez vc optar por usar o protocolo SSLLib: libOpenSSL no lugar do libWinCrypt.
  8. Bom dia, Veja se a propriedade Ide.tpEmis da sua NF-e está como teSVCAN, teSVCRS ou teSVCSP. Caso esteja, existe um if na unit ACBrNFeDANFEFRDM.pas linha 1635 que acho que poderia ser alterado pelo pessoal do ACBr: Código atual: if not (FNFe.Ide.tpEmis in [teContingencia, teFSDA, teSVCAN, teSVCRS, teSVCSP]) then Sugestão: if not (FNFe.Ide.tpEmis in [teContingencia, teFSDA]) then Visto que nos servidores SVC não há a necessidade de retransmissão da NF-e.
  9. Bom dia, Encaminhei novamente através de um e-mail Gmail com o assunto: "Arquivo retorno UnicredES cedente pessoa física conforme solicitado na TK-3432" Assunto:
  10. Boa tarde senhores, No arquivo de retorno cnab240 do banco UnicredES, o campo CPF/CNPJ do CEDENTE da conta vem com 14 dígitos preenchidos com zeros à esquerda. Porém quando cedente é pessoa física, a função ValidarDadosRetorno retorna a exceção "CNPJ\CPF: 99999999999999 do arquivo não corresponde aos dados do Cedente!" visto que o arquivo de retorno do banco vem com o CPF do cedente com 14 dígitos, com zeros à esquerda. Fiz uma alteração para verificar se a conta é PJ ou PF no método LerRetorno240 da unit ACBrBoleto.pas, visto que na unit ACBrBancoUnicredES.pas não foi implementado. Submeto aos pares para análise. ACBrBoleto.pas
  11. Boa tarde, Estou homologando um cliente para o banco Unicred e ao carregar o arquivo de retorno o componente não está lendo o campos "Nosso Número" e "Seu Numero" nas suas posições corretas, conforme layout retornado pelo banco: 1360001300003T 06 00000080046010000000000000000005661CB1-1 0608202200000000004839700100212000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 00 1360001300004U 06000000000000000000000000000000000000000000000000000000000000000000000048397000000000048397 0808202209082022000000000000 Analisando os fontes percebi que a unit ACBrBancoUnicredES.pas não tem implementado o método LerRetorno240 e por conta disso está usando a classe padrão da unit ACBrBoleto.pas. Fiz a implementação do método, e estou submetendo para análise dos pares. Cordialmente, ACBrBancoUnicredES.pas
  12. Bom dia, o ACBrIntegrador já estava configurado. Conseguiram solucionar o problema. Os contribuintes que desejarem emitir NFC-e no estado do CE sem a utilização do MFe devem entrar numa "lista branca" da SEFAZ do estado. Eles haviam garantido que já tinham cadastrado o contribuinte mas aparentemente não tinham feito o cadastro. Bastou somente regularizar essa pendência que o problema foi resolvido.
  13. Boa tarde, Estou tendo problemas ao configurar uma NFC-e num contribuinte do estado do CEARÁ. - O contribuinte fez seu credenciamento na SEFAZ e já obteve o id/CSC. - Vinculei o CNPJ do mesmo à Software House. - Baixei o configurei o integrador fiscal, ajustei as configurações de segurança das respecitivas pastas. - Configurei no ACBRNFe_Exemplo o ACBRNFe o ACBRIntegrador para testar e consultar o status do serviço. Porém só obtenho o retorno "Erro ao obter resposta do webservice. ERRO INTERNO". Alguém pode me indicar o que possivelmente se trata o erro? Grato a todos.
  14. Sim, está setado para uma pasta específica com todas as permissões de leitura e gravação liberadas. No estilo C:\aplicacao\nfe\xml\
  15. Bom dia Juliomar, Está configurado assim: Configuracoes.Geral.Salvar := True; Configuracoes.Arquivos.Salvar := True; Configuracoes.Arquivos.SalvarEvento := True;
  16. Bom dia senhores, Alguns clientes que usam certificado A3 têm reportado que sempre na primeira requisição, após digitar a senha, está retornando o erro a seguir. Estranho que é somente na primeira solicitação do certificado, seja uma consulta de status, ou qualquer outra chamada a webservice. A partir da segunda tentativa fica tudo ok. As configurações são: - SSLLib: libWinCrypt - SSLHTTPLib: cryWinCrypt - SSLXMLSignLib: xsLibXML2 - SSLType: LT_all (MG só aceita LT_all) - Windows 10 64 bits atualizado. - Opções de internet, somente os protocolos TLS marcados. SSL desmardado. - Dll's atualizadas. - Componente ACBr atualizado. Alguém passou por algo parecido, pode me ajudar? Grato.
  17. Bom dia Felipe, Foi a primeira coisa que olhei. Já está assim.
  18. Boa tade, Após atualizar o componente ACBr hoje pela manhã, a impressão do DANF-e retrato no Fortes está saindo cortada do lado direto. Já alterei as margens no componente para o mínimo mas não surtiu efeito Existe algum outro parâmetro de dimensão para ajustar? Cordialmente,
  19. Boa tarde Italo, E quanto a esses espaços entre o <![CDATA[]]> ? <![CDATA[ <cabecalho>...</cabecalho> ]]> Grato.
  20. Boa tarde Italo. Obrigado pela ajuda. Outro detalhe diz respeito a quebra de linha. O XML de exemplo repassado pelo WebISS tem uma quebra de linha: <cabec> <![CDATA[ <?xml version="1.0"?><cabecalho versao="1.00" xmlns="http://www.abrasf.org.br/nfse"><versaoDados>1.00</versaoDados></cabecalho> ]]> </cabec> <msg> <![CDATA[ <?xml version="1.0" encoding="UTF-8"?><ConsultarLoteRpsEnvio xmlns="http://www.abrasf.org.br/nfse"><Prestador><Cnpj>02421499000136</Cnpj><InscricaoMunicipal>9004029</InscricaoMunicipal></Prestador><Protocolo>366975</Protocolo></ConsultarLoteRpsEnvio> ]]> </msg> O XML gerado não tem essa quebra, mas um espaço. Existe parâmetro para isso também? <cabec> <![CDATA[ <cabecalho versao="1.00" xmlns="http://www.abrasf.org.br/nfse.xsd"><versaoDados>1.00</versaoDados></cabecalho> ]]> </cabec> <msg> <![CDATA[ <?xml version="1.0" encoding="UTF-8"?><ConsultarLoteRpsEnvio xmlns="http://www.abrasf.org.br/nfse"><Prestador><Cnpj>02421499000136</Cnpj><InscricaoMunicipal>9004029</InscricaoMunicipal></Prestador><Protocolo>366985</Protocolo></ConsultarLoteRpsEnvio> ]]> </msg> Grato.
  21. Bom dia Italo, Entrei em contato novamente com o suporte da WebISS e me orientaram a gerar o xml com seguinte formato <![CDATA[ <?xml version="1.0" encoding="UTF-8"?><cabecalho versao="1.00" xmlns="http://www.abrasf.org.br/nfse.xsd"><versaoDados>1.00</versaoDados></cabecalho> ]]> Fiz as alterações no ini, [ConsLote] IncluiEncodingCab=1 IncluiEncodingDados=1 Texto1=<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"> Texto2=<SOAP-ENV:Body> Texto3=<ConsultarLoteRps xmlns="http://tempuri.org/"> Texto4=<cabec><![CDATA[%CabMsg%]]></cabec> Texto5=<msg><![CDATA[%DadosMsg%]]></msg> Texto6=</ConsultarLoteRps> Texto7=</SOAP-ENV:Body> Texto8=</SOAP-ENV:Envelope> Entretanto o xml está sendo gerado nesse formato: <![CDATA[ &lt;?xml version="1.0" encoding="UTF-8"?&gt;&lt;cabecalho versao="1.00" xmlns="http://www.abrasf.org.br/nfse.xsd"&gt;&lt;versaoDados&gt;1.00&lt;/versaoDados&gt;&lt;/cabecalho&gt; ]]> Qual o parâmetro a se mudar para que se substitua as strings '&lt; para '<' e etc?
  22. Bom dia, Quando emite NFS-e para o provedor WebISS, o compoente gera o seguinte xml de consulta de retorno: <?xml version="1.0" encoding="UTF-8"?> -<S:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:S="http://schemas.xmlsoap.org/soap/envelope/"> -<S:Body> -<ConsultarSituacaoLoteRps xmlns="http://tempuri.org/"> <cabec><?xml version="1.0" encoding="UTF-8"?><cabecalho versao="1.00" xmlns="http://www.abrasf.org.br/nfse.xsd"><versaoDados>1.00</versaoDados></cabecalho></cabec> <msg><?xml version="1.0" encoding="UTF-8"?><ConsultarSituacaoLoteRpsEnvio xmlns="http://www.abrasf.org.br/nfse"><Prestador><Cnpj>02421499000136</Cnpj><InscricaoMunicipal>9004029</InscricaoMunicipal></Prestador><Protocolo>366963</Protocolo></ConsultarSituacaoLoteRpsEnvio></msg> </ConsultarSituacaoLoteRps> </S:Body> </S:Envelope> Mas sempre estava retornando erro de HTTP 500. Em contato com o suporte da WebISS eles me orientaram a utilizar o seguinte modelo de SOAP para as consultas dos lotes enviados: <?xml version="1.0"?> -<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"> -<SOAP-ENV:Body> -<ConsultarLoteRps xmlns="http://tempuri.org/"> <cabec><?xml version="1.0"?><cabecalho versao="1.00" xmlns="http://www.abrasf.org.br/nfse"><versaoDados>1.00</versaoDados></cabecalho></cabec> -<msg> <?xml version="1.0" encoding="UTF-8"?><ConsultarSituacaoLoteRpsEnvio xmlns="http://www.abrasf.org.br/nfse"><Prestador><Cnpj>02421499000136</Cnpj><InscricaoMunicipal>9004029</InscricaoMunicipal></Prestador><Protocolo>366963</Protocolo></ConsultarSituacaoLoteRpsEnvio> </msg> </ConsultarLoteRps> </SOAP-ENV:Body> </SOAP-ENV:Envelope> Sou um pouco leigo no código fonte do ACBr, alguém poderia me ajudar onde altera essas tags na montagem do xml?
  23. Bom dia, Estou tentando emitir uma NFS-e em homologação para o provedor WebISS, cidade de Formiga-MG, mas só obtenho retorno de erro interno, conforme imagem em anexo. O componente está setado com as seguintes configurações: with TabGlobal.ACBrNFSe1 do begin Configuracoes.Certificados.NumeroSerie := Sistema.NFSe_CertificadoSerie; Configuracoes.Certificados.ArquivoPFX := Sistema.NFSe_CertificadoDiretorio; Configuracoes.Certificados.Senha := Sistema.NFSe_CertificadoSenha; Configuracoes.Arquivos.AdicionarLiteral := True; Configuracoes.Arquivos.EmissaoPathNFSe := True; Configuracoes.Arquivos.SalvarApenasNFSeProcessadas := False; // Configuracoes.Arquivos.SepararPorMes := False; Configuracoes.Arquivos.PathCan := Sistema.NFSe_DiretorioXML; Configuracoes.Arquivos.PathNFSe := Sistema.NFSe_DiretorioXML; Configuracoes.Arquivos.PathSalvar := Sistema.NFSe_DiretorioXML; Configuracoes.Arquivos.PathSchemas := Sistema.NFSe_DiretorioSchemas; Configuracoes.Arquivos.IniServicos := Sistema.NFSe_DiretorioSchemas; Configuracoes.Geral.PathIniCidades := Sistema.NFSe_DiretorioSchemas; Configuracoes.Geral.PathIniProvedor := Sistema.NFSe_DiretorioSchemas; Configuracoes.Arquivos.Salvar := True; Configuracoes.Geral.CodigoMunicipio := StrToIntDef(Sistema.CodMunUsr, 0); Configuracoes.Geral.Emitente.CNPJ := Sistema.CNPJUsr; Configuracoes.Geral.Emitente.InscMun := Sistema.InscMunUsr; Configuracoes.Geral.Emitente.RazSocial := Sistema.EmpresaUsr; Configuracoes.Geral.UserWeb := Sistema.NFSe_Usuario; Configuracoes.Geral.SenhaWeb := Sistema.NFSe_Senha; Configuracoes.Geral.Salvar := True; Configuracoes.Geral.SetConfigMunicipio; Configuracoes.WebServices.Ambiente := tpHomologacao; Configuracoes.WebServices.Salvar := True; // Configuracoes.WebServices.Visualizar := False; Configuracoes.WebServices.AguardarConsultaRet := 20000; Configuracoes.WebServices.TimeOut := 20000; Configuracoes.WebServices.Tentativas := 5; Configuracoes.WebServices.IntervaloTentativas := 2000; Configuracoes.WebServices.AjustaAguardaConsultaRet := True; Configuracoes.Geral.SSLCryptLib := crOpenSSL; Configuracoes.Geral.SSLHttpLib := HttpOpenSSQL; Configuracoes.Geral.SSLLib := libCustom; Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; Configuracoes.WebServices.SSLType := Lt_all; SSL.DescarregarCertificado; Configuracoes.WebServices.ProxyHost := ''; Configuracoes.WebServices.ProxyUser := ''; Configuracoes.WebServices.ProxyPass := ''; Configuracoes.WebServices.ProxyPort := ''; TabGlobal.DANFSe := TabGlobal.DANFSe; TabGlobal.DANFSe.PathPDF := Sistema.NFSe_DiretorioPDF; TabGlobal.DANFSe.ExpandeLogoMarca := False; TabGlobal.DANFSe.Sistema := Sistema.Versao; TabGlobal.DANFSe.Site := Sistema.SiteUsr; TabGlobal.DANFSe.Logo := iif(FileExists(Sistema.NFSe_LogoPrefeitura),Sistema.NFSe_LogoPrefeitura,''); TabGlobal.DANFSe.PrestLogo := iif(FileExists(Sistema.LogoUsr),Sistema.LogoUsr,''); TabGlobal.DANFSe.Prefeitura := 'PREFEITURA MUNICIPAL DE ' + UpperCase(Sistema.CidadeUsr) + ' - ' + UpperCase(Sistema.UfUsr) + sLineBreak + 'Secretaria de Fazenda'; end; Alguém sabe se alguma configuração está setada errada ou o que pode ser? Grato.
  24. Bom dia, É possível fazer uma alteração na impressão do DACT-e em FortesReports para que fique parecido com a impressão em FastReport? No modelo em FastReport a impressão de carga aproveita melhor o espaço em situações com vários itens de carga. no FortesReport é dividido por unidades de medida e por descrição tipo 'PESO BRUTO' e alguns itens acabam não sendo exibidos. Cordialmente,
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.