Não consigo gerar um danf da NFSe padarão nacional usando a DLL URGENTE

5 views
Skip to first unread message

ca...@bol.com.br

unread,
Jan 13, 2026, 8:07:37 AM (21 hours ago) Jan 13
to wan...@unimake.com.br, uni...@googlegroups.com, eduardo...@unimake.com.br
Bom dia !
Estou dois dias tentando gerar um DANF de uma NFSe padrao nacional e não consigo.
A nota eu já estou emitindo numa boa.

Fiz uma rotina para gerar o DANF da nota a qualquer momento, mais não da certo de jeito nenhum

Estou tentando consultar uma nota para depois tentar gerar pela DLL do Unidanf, ou seja estou com as duas DLL's carregadas.
Já me da erro apenas em tentar fazer uma consulta da nfse, vou colocar o codigo e anexar os xml e o erro retornado.
 
   LOCAL oConfiguracao
   LOCAL oConsultarNfse
   LOCAL oExceptionInterop
   LOCAL cXML
   LOCAL oErro
    
 * Criar objeto para pegar exceção do lado do C#
    
   TRY

      oExceptionInterop = CreateObject( "Unimake.Exceptions.ThrowHelper" )

      oConfiguracao = CreateObject( "Unimake.Business.DFe.Servicos.Configuracao" )
      oConfiguracao.TipoDFe            = 5          && 5 = NFSe
      oConfiguracao.CertificadoArquivo = ALLTRIM(Pupathcertificado)   && Caminho do meu certificao
      oConfiguracao.CertificadoSenha   = ALLTRIM(Pusenhacertificado)  && Senha do meu certificado
      oConfiguracao.CodigoMunicipio    = 1001058    && Padrão Nacional
      oConfiguracao.TipoAmbiente       = 2          && Homologacao
      oConfiguracao.Servico            = 32         && NFSeConsultarNfse
      oConfiguracao.SchemaVersao       = "1.01"
        
    *  cXML ='<?xml version="1.0" encoding="utf-8"?>'
      cXML =  ALLTRIM([<?xml version="1.0" encoding="utf-8"?>]) + CHR(13)     
      cXML = cXML + ALLTRIM([<NFSe versao="1.01" xmlns="http://www.sped.fazenda.gov.br/nfse">]) + CHR(13)
      cXML = cXML + [   <infNFSe Id=] + ALLTRIM(NFse.chavenfse) + ALLTRIM([/>]) + CHR(13)
      cXML = cXML + '</NFSe>'
      
      STRTOFILE(cXML,"Notamontada.xml")
      
      oConsultarNfse = CreateObject("Unimake.Business.DFe.Servicos.NFSe.ConsultarNfse")
      oConsultarNfse.Executar(cXML, oConfiguracao) && AQUI JÁ ESTA DANDO ERRO

     Esta é a primeira etapa para eu recuperar o xml  e tenta gerar o DANF pelo DLL da unidanf


 
 
Errodanf
Notamontada.xml
Reply all
Reply to author
Forward
0 new messages