XmlNode não pode ser nulo na Maquina do Cliente

[Fabricio Rieg Viana]

Boa tarde, Poderiam me ajudar por Favor

Na minha máquina estou conseguindo emitir e cancelar normalmente as notas, com a geração correta do XML.

Vale destacar que não realizo o envio direto das notas, apenas monto o XML para gravação, pois utilizarei um parceiro para efetuar o controle do envio.

Segue abaixo um trecho da configuração e da geração do XML:

Trecho de configuração

            with ACBrNFCom.Configuracoes.Arquivos do
            begin
               Salvar           := False;//cbxSalvarArqs.Checked;
               SepararPorMes    := False;//cbxPastaMensal.Checked;
               AdicionarLiteral := False;//cbxAdicionaLiteral.Checked;
               EmissaoPathNFCom := False;//cbxEmissaoPathNFCom.Checked;
               SalvarEvento     := False;//cbxSalvaPathEvento.Checked;
               SepararPorCNPJ   := False;//cbxSepararPorCNPJ.Checked;
               SepararPorModelo := False;//cbxSepararPorModelo.Checked;
               PathSchemas      := ExtractFilePath(Application.ExeName) + 'Schemas\NFCom\';
               PathNFCom        := '';
               PathEvento       := '';
               PathSalvar       := PathNFCom;
            end;

Trecho de geração do XML (sem envio direto, apenas para gravação pois o envio é pelo parceiro)

            ACBrNFCom.NotasFiscais.Items[0].NFCom.infNFComSupl.qrCodNFCom := ACBrNFCom.GetURLQRCode(ACBrNFCom.NotasFiscais.Items[0].NFCom);
            LStream := TStringStream.Create('', TEncoding.UTF8); // Garante UTF8
            try
              ACBrNFCom.NotasFiscais.GerarNFCom;
              LIdNFCom := uFuncao.SomenteNumeros(ACBrNFCom.NotasFiscais.Items[0].NFCom.infNFCom.ID);
              ACBrNFCom.NotasFiscais.Items[0].GravarStream(LStream);
              LMensagem := ACBrNFCom.NotasFiscais.Items[0].NFCom.procNFCom.xMotivo;
              LXML := LStream.DataString;
              LBase64Str := RemoveSpacesAndLineBreaks(CompressAndEncodeGZIP(LXML));
              Result := NddNfComEnviarEmissao(FieldByName('NDF_Tid').AsInteger,
                                              FieldByName('NDF_Numero').AsString,
                                              LIdNFCom,
                                              LXML,
                                              StringReplace(LBase64Str,' ','',[rfReplaceAll]) );
            finally
               LStream.Free;
            end;

Erro:

---------------------------
Atenção
---------------------------
Falha ao montar os arquivos de Nota Fiscal. XmlNode não pode ser nulo.
---------------------------
OK   
---------------------------

 

[Juliomar Marchetti]

Tua aplicação é win64 ou win32?

pois ali está conflitando as dlls x64 e x86. 

creio que seja só win32

[Fabricio Rieg Viana]

Boa tarde com os ajustes da DLL o problema foi resovido

Incluí as Dlls e funcionou normalmente

Abs

 

 

 

 

 

[Juliomar Marchetti]

Obrigado por reportar.

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