Ir para conteúdo
  • Cadastre-se

gutembergscosta

Membros
  • Total de ítens

    149
  • Registro em

  • Última visita

Posts postados por gutembergscosta

  1. 2 horas atrás, Italo Giurizzato Junior disse:

    Gutemberg,

    Descobri o que esta ocorrendo.

    1. o XML que você anexou esta no formato UTF-8-BOM;

    2. a tag inicial é <RetornoConsulta>

    O que eu fiz:

    1. através do Notepad++ abri o XML e no menu Formatar escolhi a opção: Converter para UTF-8;

    2. removi as linhas <RetornoConsulta ....> e </RetornoConsulta>

    3. salvei o XML

    4. através do programa exemplo do componente, configurei ele para a cidade de São Paulo/SP, salvei a configuração e por fim cliquei no botão [Imprimir DANFSe] selecionei o XML "alterado" e o mesmo foi carregado sem nenhum erro e os dados da nota foram apresentados no DANFSE. 

    O mais estranho é que XML é validado em qualquer ferramenta online, e ele é o XML protocolado e enviado pelo próprio prestador de serviço, poderia até antes de submeter ao componente remover essa tag  <RetornoConsulta ....> e </RetornoConsulta>, mas não seria muito usual... pelo que entendi então o componente entende/lê apenas apartir da tag <NFe ... seria isso teria quer normatizar essa string do XML antes ?

  2. 4 minutos atrás, Italo Giurizzato Junior disse:

    Gutemberg,

    Vai ser necessário debugar para descobrir onde o componente esta incluído o "?"

    Você consegue fazer esse debugue?

    exatamente aqui -> XMLStr := DecodeToString(XMLUTF8, True); 

    tirando esse caractere ? o arquivo é importado sem problema, contudo, os valores não carregados nas propriedades do componente ... mas nenhum erro/exceção é disparado pelo componente.

  3. 7 minutos atrás, Italo Giurizzato Junior disse:

    Boa tarde Gutemberg,

    Primeiramente não coloque o conteudo do XML como parte da postagem, procure sempre anexar o mesmo.

    Noto que o XML anexado esta identado.

    Você que identou ele?

    Eu preciso do XML de retorno (soap) para saber como o WebService esta retornando o XML.

    Você é o primeiro a relatar esse problema do componente estar incluindo um caractere de forma indevida.

    Tranquilo, na próxima não posto mais no corpo da mensagem - esse XML (anexado) é o fornecedor do serviço que nos envia, já vem dessa forma, mas está ok e validado/protocolado, o problema ocorre quando é importado no componente. 

  4. Boa noite, Estou tentando carregar um XML da prefeitura de São Paulo para capturar algumas informações - O componente está devidamente configurado os schemas, provedor São Paulo e etc. ...

    O XML até é carregado (arquivo anexo a mensagem), contudo após passar pelo fluxo abaixo na unit (ACBrNFSeXNotasFiscais.pas)

      // Converte de UTF8 para a String nativa da IDE //
      XMLStr := DecodeToString(XMLUTF8, True);

    O XMLStr decodificado é inserido uma uma interrogação no inicio (xml decodado abaixo), '?<?xml version="1.0" encoding="UTF-8"?> e no processo de validação gera exceção :  'Start tag expected, '<' not found'

    '?<?xml version="1.0" encoding="UTF-8"?>'#$D#$A'<RetornoConsulta xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.prefeitura.sp.gov.br/nfe">'#$D#$A'  <NFe xmlns="">'#$D#$A'    <Assinatura>PdyL2CEm6DZVcy95MCP3gTFSVkW7OcWu7pyp+lgbyiBdxLVP1m5TdXjshnIdB4ATcCTjddiabuw/mw7odacIom5quGUHbaU7jH3J0vvL9qVrVzPQ78BD8PYpf/ghad1izwA9Jnrd4paqNW1ta4lshExrgEtqebTGvyXrxo+jV0koq78JKKiCsETisjMoVLkN7PqD38512+ohsuq4SInfLpvZeEjJ3D+cLaH8xL1Dub7kyK90wj6TjBy6ClWnQC/GPgr489kKWVk9pNeTuzsw130Pmz1ga3sYjsRbCt2z2hEI75CiFGEAO+ARkeOLuQNVf4lxm0i8mtsQ3ljdzUACGw==</Assinatura>'#$D#$A'    <ChaveNFe>'#$D#$A'      <InscricaoPrestador>36414891</InscricaoPrestador>'#$D#$A'      <NumeroNFe>12669158</NumeroNFe>'#$D#$A'      <CodigoVerificacao>9QLBDMKA</CodigoVerificacao>'#$D#$A'    </ChaveNFe>'#$D#$A'    <DataEmissaoNFe>2022-07-31T19:43:50</DataEmissaoNFe>'#$D#$A'    <NumeroLote>903294346</NumeroLote>'#$D#$A'    <ChaveRPS>'#$D#$A'      <InscricaoPrestador>36414891</InscricaoPrestador>'#$D#$A'      <SerieRPS>RP2</SerieRPS>'#$D#$A'      <NumeroRPS>12663654</NumeroRPS>'#$D#$A'    </ChaveRPS>'#$D#$A'    <TipoRPS>RPS</TipoRPS>'#$D#$A'    <DataEmissaoRPS>2022-07-31</DataEmissaoRPS>'#$D#$A'    <DataFatoGeradorNFe>2022-07-31T00:00:00</DataFatoGeradorNFe>'#$D#$A'    <CPFCNPJPrestador>'#$D#$A'      <CNPJ>01554285000175</CNPJ>'#$D#$A'    </CPFCNPJPrestador>'#$D#$A'    <RazaoSocialPrestador>CERTISIGN CERTIFICADORA DIGITAL S.A</RazaoSocialPrestador>'#$D#$A'    <EnderecoPrestador>'#$D#$A'      <TipoLogradouro>R</TipoLogradouro>'#$D#$A'      <Logradouro>BELA CINTRA</Logradouro>'#$D#$A'      <NumeroEndereco>00904</NumeroEndereco>'#$D#$A'      <ComplementoEndereco>ANDARES 1-4-7 E 9 AO </ComplementoEndereco>'#$D#$A'      <Bairro>CERQUEIRA CESAR</Bairro>'#$D#$A'      <Cidade>3550308</Cidade>'#$D#$A'      <UF>SP</UF>'#$D#$A'      <CEP>1415000</CEP>'#$D#$A'    </EnderecoPrestador>'#$D#$A'    <EmailPrestador>[email protected]</EmailPrestador>'#$D#$A'    <StatusNFe>N</StatusNFe>'#$D#$A'    <TributacaoNFe>T</TributacaoNFe>'#$D#$A'    <OpcaoSimples>0</OpcaoSimples>'#$D#$A'    <NumeroGuia>42427097</NumeroGuia>'#$D#$A'    <ValorServicos>214.9</ValorServicos>'#$D#$A'    <CodigoServico>2800</CodigoServico>'#$D#$A'    <AliquotaServicos>0.029</AliquotaServicos>'#$D#$A'    <ValorISS>6.23</ValorISS>'#$D#$A'    <ValorCredito>0</ValorCredito>'#$D#$A'    <ISSRetido>false</ISSRetido>'#$D#$A'    <CPFCNPJTomador>'#$D#$A'      <CNPJ>56026990000191</CNPJ>'#$D#$A'    </CPFCNPJTomador>'#$D#$A'    <InscricaoEstadualTomador>336670870119</InscricaoEstadualTomador>'#$D#$A'    <RazaoSocialTomador>PRO PAINEL EQUIPAMENTOS ELETR LT</RazaoSocialTomador>'#$D#$A'    <EnderecoTomador>'#$D#$A'      <TipoLogradouro>Rua</TipoLogradouro>'#$D#$A'      <Logradouro>CAMINHO 16</Logradouro>'#$D#$A'      <NumeroEndereco>391</NumeroEndereco>'#$D#$A'      <Bairro>VILA DINAMARCA</Bairro>'#$D#$A'      <Cidade>3518800</Cidade>'#$D#$A'      <UF>SP</UF>'#$D#$A'      <CEP>7251190</CEP>'#$D#$A'    </EnderecoTomador>'#$D#$A'    <EmailTomador>[email protected]</EmailTomador>'#$D#$A'    <Discriminacao>E-CNPJ TIPO A1; Qtde: 1,00; Preco Unitario: 214,90; Valor Total: 214,90;'#$A' NF Liquidada - Pedido Bpag: 20803460  '#$A#$A'ESTA E UMA NOTA FISCAL DE SERVICO, CASO A SUA COMPRA SE COMPONHA DE MAIS ITENS, ENVIAREMOS A NOTA FISCAL DE PRODUTO POSTERIORMENTE EM FORMATO ELETRONICO.'#$A'*** NOTA FISCAL NAO SUJEITA A RETENCAO NA FONTE DO ISS ***'#$A'Valor Aproximado dos Tributos: R$ 14.06 (5.63%).</Discriminacao>'#$D#$A'    <ValorCargaTributaria>14.06</ValorCargaTributaria>'#$D#$A'    <PercentualCargaTributaria>0.0563</PercentualCargaTributaria>'#$D#$A'    <FonteCargaTributaria />'#$D#$A'  </NFe>'#$D#$A'</RetornoConsulta>' 

    REC-20220731-12669158-36414891-3550308-9QLBDMKA.xml

  5. Olá, gostaria de relatar uma situação na impressão da chave, não ocorre no geral, por acaso algumas estações ... a impressão fica inconsistente, ao que parece o campo se torna menor que a impressão fonte..

    Vide imagem, o que fiz foi diminuir a fonte do arquivo do fast de 9 para 8. O curioso que não acontece aleatoriamente.

    image.png.aef8cc377e0155ad91d234ceb1db0340.png

  6. 13 horas atrás, gutembergscosta disse:

    Ajustes para contemplar codigos que em alguns estados são diferentes, antes só tratava o tipo 22, contudo tem estados que o atributo tipo pode ser 10, 24

     

    Unit = \Fontes\ACBrDFe\ACBrGNRE\PCNGNRE\pgnreRetConsResLoteGNRE.pas

          if Leitor.rExtrai(4, 'itensGNRE') <> '' then
          begin
            j := 0;
            while Leitor.rExtrai(5, 'item', '', j + 1) <> '' do
            begin
              resGuia.Items[i].CodReceita     := Leitor.rCampo(tcInt, 'receita');
              resGuia.Items[i].DataVencimento := Leitor.rCampo(tcStr, 'dataVencimento');

              l := 0;
              while Leitor.rExtrai(6, 'documentoOrigem', '', l + 1) <> '' do
              begin
                  //if Leitor.rAtributo('tipo=', 'documentoOrigem') = '22' then
                  if Leitor.rAtributo('tipo=', 'documentoOrigem') in ['10','22','24'] then

                  resGuia.Items[i].NumDocOrigem := Leitor.rCampo(tcStr, 'documentoOrigem');

                 inc(l);
              end;
     

    Anexado.

    Linha alterada = 507

    pgnreRetConsResLoteGNRE.pas

  7. Ajustes para contemplar codigos que em alguns estados são diferentes, antes só tratava o tipo 22, contudo tem estados que o atributo tipo pode ser 10, 24

     

    Unit = \Fontes\ACBrDFe\ACBrGNRE\PCNGNRE\pgnreRetConsResLoteGNRE.pas

          if Leitor.rExtrai(4, 'itensGNRE') <> '' then
          begin
            j := 0;
            while Leitor.rExtrai(5, 'item', '', j + 1) <> '' do
            begin
              resGuia.Items[i].CodReceita     := Leitor.rCampo(tcInt, 'receita');
              resGuia.Items[i].DataVencimento := Leitor.rCampo(tcStr, 'dataVencimento');

              l := 0;
              while Leitor.rExtrai(6, 'documentoOrigem', '', l + 1) <> '' do
              begin
                  //if Leitor.rAtributo('tipo=', 'documentoOrigem') = '22' then
                  if Leitor.rAtributo('tipo=', 'documentoOrigem') in ['10','22','24'] then

                  resGuia.Items[i].NumDocOrigem := Leitor.rCampo(tcStr, 'documentoOrigem');

                 inc(l);
              end;
     

  8. 6 minutos atrás, Juliana Tamizou disse:

    Bom dia.

    Obrigado por informar, oque o Rafael quis lhe explicar é que o componente não foi projetado para atender a esta situação, devido a isto não seria interessante de nossa parte alterar, mas caso vc tenha alguma ideia que mantenha tudo funcionando em ambos os casos, ficaremos felizes em analisar sua possível contribuição ao projeto,

    Att.

    Tranquilo. 

    A ideia era se possível ter uma função por exemplo GerarLoteXML que contemplasse essas tags, assim poderia atender esse critério também.

    Obrigado pela atenção.

    • Curtir 1
  9. Em 14/08/2021 at 12:59, Rafael Dias disse:

    Não pois ficaria errado a geração da guia, esta função é para gerar Guia e não lote de guias, isso não será feito.

    A intenção é apresentar essa ocorrência, quando se trata de gerar lote para upload manual, muitas vezes o webserve está fora do ar, e só nos resta gerar um arquivo de lote e submetar ao portal, e ao gravar o XML sem enviar, essas tags estão ausentes. Alguém pode passar por esse problema.

    Obrigado

  10. 20 horas atrás, Rafael Dias disse:

    Então você precisa montar na mão isso, o componente so gera o lote na hora do envio.

    Já estou inserindo as tags manualmente , mas na função ACBrGNRE1.Guias.Items[0].GerarXML, 

    Nesse caso seria apenas acrescentar as TAGS na função que faz a geração do XML : function TGNREW.GerarXml2: boolean;

    <?xml version="1.0" encoding="UTF-8"?>
    <TLote_GNRE versao="2.00" xmlns="http://www.gnre.pe.gov.br">
      <guias>

    ...

    antes de  Gerador.wGrupo('TDadosGNRE versao="2.00"');

     

    function TGNREW.GerarXml2: boolean;
    var
      i  : Integer;
      Doc: string;
      LValorGNRE : Currency;
    begin
      LValorGNRE := 0;
      
      Gerador.ListaDeAlertas.Clear;
      Gerador.ArquivoFormatoXML := '';

      Gerador.wGrupo('TDadosGNRE versao="2.00"');
    //  Gerador.wGrupo('TDadosGNRE');

  11. 19 horas atrás, Rafael Dias disse:

    Estas tags ai não são da guia e sim do lote que vai no envelope SOAP, isso so é gerado quando ocorre o envio.

    Então o componente esta gerando corretamente os dados do xml da GUIA, o problema que tu quer os dados do lote o que so ocorre no envio.

    Está certo sua colocação utilizando o WebService, contudo, porém pra fazer upload do XML de forma manual no portal para processamento esse XML também precisa ter essas TAGS , caso contrário gera erro e não processa o lote.

  12. Olá,

    Face a obrigatoriedade da versão 2.0, aconteceu um caso onde precisei gerar o arquivo XML - ACBrGNRE1.Guias.Items[0].GravarXML('arquivo.xml') - e submeter a importação/processamento no portal, ocorre que a função que gera o XML do componente  não está inserindo as tags de cabeçalho exigidas na composição do arquivo. O componente gera tag a partir de <TDadosGNRE versao="2.00">, contudo, se faz necessário  as tags negritadas abaixo, sem elas o a importação/processamento do arquivo gerar erro.

    <?xml version="1.0" encoding="UTF-8"?>
    <TLote_GNRE versao="2.00" xmlns="http://www.gnre.pe.gov.br">
      <guias>

        <TDadosGNRE versao="2.00">

        </TDadosGNRE>

      </guias>
    </TLote_GNRE>

     

    2021-08-10_18-04-10.png.0d0ce8ec78972a5befc3ae72d95c6da8.png
        

  13. Boa tarde, 

    Coincidentemente após atualizar os schemas e componentes que agora exige nova tag indIntermed...

    Todo envio retorna falha nos schemas tanto em homologação quanto em produção, tem alguma coisa que tenhamos que fazer nessa nova atualização  

     

    <retConsReciNFe versao="4.00" xmlns="http://www.portalfiscal.inf.br/nfe">

    <tpAmb>2</tpAmb>

    <verAplic>SP_NFE_PL009_V4</verAplic>

    <nRec>351000150924739</nRec>

    <cStat>225</cStat>

    <xMotivo>Rejeição: Falha no Schema XML do lote de NFe</xMotivo>

    <cUF>35</cUF>

    <dhRecbto>2021-02-08T11:51:59-03:00</dhRecbto>

    </retConsReciNFe>

  14. 20 minutos atrás, Juliomar Marchetti disse:

    Fast Report 5.2 superior

    seu instalador fez certo colocando os arquivos e abrindo o recompiler pra tu instalar no fast report?

    O instalador do próprio ACBr, as Danfes do Fast se instala normalmente, só no boleto apresenta essa ocorrência.

  15. Fazendo uma nova instalação do ACBR no delphi 7 com ultima atualização, apenas o boletoFR apresenta erro , a DanfeFR sem problema.

    Sempre usei a mesma instalação do FastReport que tenho, apenas agora apresentou esse problema, essa nova unit não consta na instalação do FastReport 5

    \NFe_ACBR_Novo\Fontes\ACBrBoleto\FC\Fast\ACBrBoletoFCFR.pas(42) Fatal: File not found: 'frxExportBaseDialog.dcu'
    Compilation failure
    Erro ao compilar o pacote "ACBr_BoletoFR.dpk".

    Não terá mais compatibilidade com Fast 5 no Delphi 7 ?

  16. 9 minutos atrás, Juliomar Marchetti disse:

    Neste caso tá ocorrendo isso contigo?

    Irei iniciar, mas tentando entender o funcionamento para  mitigar os possíveis  problemas.

    3 minutos atrás, José M. S. Junior disse:

    Ainda precisa ser homologado... A autenticação utiliza protocolo OAuth2 nos moldes do Banco do Brasil mas não conseguimos homologar com a chave e CNPJ disponibilizada no Manual do Itaú. Será necessário solicitar o serviço junto ao Banco.

    Entendi.

    Com relação ao Banco do Brasil ou outro, que acredito fugir muito do cenário do Itaú... Alguém já usando em produção em algum banco para contar a experiência ?

  17. Olá pessoa, vi que no componente já tem alguns bancos implementados e hoje atualizando, vi o Itaú ... Abrir o demo e vi o processo de envio e retorno no mesmo fluxo ...

    Mas caso aconteça algum problema durante a leitura do retorno, como funciona para buscar novamente para reprocessar internamente essas entradas.. no demo logo após o envio é feito o processamento de leitura do retorno, mas o sistema pode travar, reinicializar durante esse processo e precisar se refeito a leitura do retorno ...

    Obrigado.

  18. 2 minutos atrás, Daniel Simoes disse:

    Tente usando "cryOpenSSL".. pois nesse caso, você não irá depender da implementação da WinCrypt do Wine

    Seria então essa configuração usando OperSSL 

            ACBrNFe1.Configuracoes.Geral.SSLCryptLib   := cryOpenSSL;
            ACBrNFe1.Configuracoes.Geral.SSLHttpLib    := httpOpenSSL;
            ACBrNFe1.Configuracoes.Geral.SSLLib        := libOpenSSL;
            ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2;

  19. 1 minuto atrás, Daniel Simoes disse:

    Se a senha estiver correta, então o Stream com o certificado, deve estar chegando incompleto...

    Porque não usar um programa de compilação nativa no Linux ?

    Está correto o Stream , é o mesmo,  tanto carregado do banco, do próprio arquivo, alimentando o componente funciona perfeito  Windows ... no Linux/Wine o problema está via emulação ... Infelizmente o produto é delphi 7 ...  

×
×
  • 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.