PadraoNacional - Como pego o Retorno dos campos - CHAVE, NUMERO NFSE, XML

[adilsonpazzini]

Boa tarde, 

 

uma duvida, não estou conseguindo obter os dados de retorno como Chave, Numero da NFSe e o proprio XML da NFSe .

 

  if (FAcbrNFSe.Configuracoes.Geral.Provedor = proPadraoNacional) then
             begin
               if (FAcbrNFSe.NotasFiscais.Count>0) then
                 begin
                   AChave_NFSe   := FAcbrNFSe.NotasFiscais.Items[0].NFSe.ChaveAcesso;
                   aNumeroNFSe   := FAcbrNFSe.NotasFiscais.Items[0].NFSe.infNFSe.nNFSe;
                   AProtocolo    := inttostr(FAcbrNFSe.NotasFiscais.Items[0].NFSe.infNFSe.cStat);
                   aVerificacao  := FAcbrNFSe.NotasFiscais.Items[0].NFSe.infNFSe.ID;
                 end;
             end          

 

Hoje estou fazendo assim, porem não ta vindo .. 

 

Desde ja agradeço 

 

Adilson PAZZINI

 

[Italo Giurizzato Junior]

Boa tarde Adilson,

Esta ocorrendo algum erro ao enviar o DPS?

Em que momento você esta executando o fragmento de código que você postou acima?

[adilsonpazzini]

Bom dia Italo, eu to tentando pegar logo apos o comando de EMITIR

 if (FAcbrNFSe.Configuracoes.Geral.Provedor = proPadraoNacional) then
                begin
                   if FModoDebug then
                     LogDebug('NFSE_ENVIO','Antes de Enviar - PADRAO NACIONAL = Arq : '+FAcbrNFSe.NotasFiscais.Items[0].NomeArq);

                   FAcbrNFSe.Emitir(aNrLote, meUnitario, false);
                end  

 

Desde ja agradesço 

 

Adilson PAZZINI 

[Italo Giurizzato Junior]

Bom dia Adilson,

Esta estranho, pois deveria estar retornado sim essas informações, vai ser necessário colocar um ponto de parada na unit PadraoNacional.LerXml para verficar se esta lendo essas informações.

[adilsonpazzini]

o Duro é que eu não consigo debugar no Acbr .. E fora que ta dando problema toda hora .. se tem que enviar umas 5x pra ir .. na maioria retorna erro .. 

 

Deixa eu tentar mais um pouco aqui . e avisando 

 

Obrigado 

[Italo Giurizzato Junior]

Boa tarde Adilson,

Como assim você não tem como debugar no ACBr?

Você usa Delphi ou Lazarus?

Qual versão?

[adilsonpazzini]

Lazarus Italo .. mesmo marcando . não consigo entrar pelos fontes do Acbr .

vou ver consigo .. criar saida de dados .. pra ver se enxergo assim .. o duro tambem é que o servidor ta falhando pra caramba .. se tem enviar umas 6x pra ele aceitar .

 

Desde ja agradeço 

 

Adilson Pazzini