Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

impressao do protocolo no Danfe


Lorena Gonçalves
Go to solution Solved by Rafael Dias,
  • Este tópico foi criado há 696 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Moderadores
42 minutos atrás, Lorena Gonçalves disse:

Toda vez que mando imprimir um danfe no lugar do protocolo imprime apenas a palavra "True"

oque esqueci de configurar?

Está usando o DANFE em Fast ou Fortes Report?

Fez teste com o programa exemplo do componente?

Está atribuindo algo para a propriedade "Protocolo" do componente DANFE?

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Link to comment
Share on other sites

5 minutos atrás, BigWings disse:

Está usando o DANFE em Fast ou Fortes Report?

Fez teste com o programa exemplo do componente?

Está atribuindo algo para a propriedade "Protocolo" do componente DANFE?

estou usando o exemplo que baixei 

          nfeacbr := ACBrNFe():New()
          //                      Sessão       Chave    Valor
          // Configurações de log da Lib
          nfeacbr:ConfigGravarValor("Principal", "LogNivel", "4") //Nenhum // logParanoico     
          nfeacbr:ConfigGravarValor("Principal", "LogPath", mDiretori)
          nfeacbr:ConfigGravarValor("DANFE"    , "PathPDF", mDiretori)            
          nfeacbr:ConfigGravarValor("DANFE"    , "PathLogo", cLogoFile)            
          nfeacbr:ConfigGravarValor("DANFE"    , "CasasDecimais.qCom", "4")
          nfeacbr:ConfigGravarValor("DANFE"    , "CasasDecimais.vUnCom", "4")            

          nfeacbr:ConfigGravarValor("DANFE"    , "ExpandeLogoMarca", "0")

          
          // Salvando configurações
          nfeacbr:ConfigGravar("")
             nfeacbr:CarregarXML(MDiretori+"\"+ALLTRIM(CENF->nfe)+'-procNfe.xml')
             nfeacbr:Imprimirpdf()
             nfeacbr:Imprimir("", 1, "", "True", "", "", "")
          nfeacbr := nil

 chamo a dll via xhabour usando DllLoad(ACBrLIB) e depois uso o dllcall. 

 

 

2 minutos atrás, Lorena Gonçalves disse:

estou usando o exemplo que baixei 

          nfeacbr := ACBrNFe():New()
          //                      Sessão       Chave    Valor
          // Configurações de log da Lib
          nfeacbr:ConfigGravarValor("Principal", "LogNivel", "4") //Nenhum // logParanoico     
          nfeacbr:ConfigGravarValor("Principal", "LogPath", mDiretori)
          nfeacbr:ConfigGravarValor("DANFE"    , "PathPDF", mDiretori)            
          nfeacbr:ConfigGravarValor("DANFE"    , "PathLogo", cLogoFile)            
          nfeacbr:ConfigGravarValor("DANFE"    , "CasasDecimais.qCom", "4")
          nfeacbr:ConfigGravarValor("DANFE"    , "CasasDecimais.vUnCom", "4")            

          nfeacbr:ConfigGravarValor("DANFE"    , "ExpandeLogoMarca", "0")

          
          // Salvando configurações
          nfeacbr:ConfigGravar("")
             nfeacbr:CarregarXML(MDiretori+"\"+ALLTRIM(CENF->nfe)+'-procNfe.xml')
             nfeacbr:Imprimirpdf()
             nfeacbr:Imprimir("", 1, "", "True", "", "", "")
          nfeacbr := nil

 chamo a dll via xhabour usando DllLoad(ACBrLIB) e depois uso o dllcall. 

 

 

no imprimir sou obrigado a colocar o numero do protocolo? ele não busca no xml?

 

Link to comment
Share on other sites

  • Consultores

@Lorena Gonçalves esta imprimindo True pois você esta mandando fazer isso.

Você esta passando no 3 parametro a palavra true,  este parâmetro é para informar o numero do protocolo caso o xml que você carregou não tenha o mesmo se deseja pegar do xml basta informar como vazio.

https://acbr.sourceforge.io/ACBrLib/NFE_Imprimir.html

Consultor SAC ACBr Rafael Dias
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Desenvolvedor ACBrLib.

 

Link to comment
Share on other sites

3 horas atrás, Rafael Dias disse:

@Lorena Gonçalves esta imprimindo True pois você esta mandando fazer isso.

Você esta passando no 3 parametro a palavra true,  este parâmetro é para informar o numero do protocolo caso o xml que você carregou não tenha o mesmo se deseja pegar do xml basta informar como vazio.

https://acbr.sourceforge.io/ACBrLib/NFE_Imprimir.html

nfeacbr:Imprimir("", 1, "", "True", "", "", "") estou passando no 4 (quarto) parametro. somente pra visualizar antes de imprimir. 

 

Link to comment
Share on other sites

2 horas atrás, Lorena Gonçalves disse:

nfeacbr:Imprimir("", 1, "", "True", "", "", "") estou passando no 4 (quarto) parametro. somente pra visualizar antes de imprimir. 

 

desculpa encontrei o erro. baixei o exemplo do site e no site ta errado.

    hResult := DllCall(::hHandle, DLL_OSAPI, "NFE_Imprimir", hb_StrToUTF8(cImpressora), nNumCopias, hb_StrToUTF8(bMostrarPreview), hb_StrToUTF8(cMarcaDagua), b_StrToUTF8(bViaConsumidor), hb_StrToUTF8(bSimplificado))

o correto e

    hResult := DllCall(::hHandle, DLL_OSAPI, "NFE_Imprimir", hb_StrToUTF8(cImpressora), nNumCopias,, hb_StrToUTF8(bMostrarPreview), hb_StrToUTF8(cMarcaDagua), hb_StrToUTF8(bViaConsumidor), hb_StrToUTF8(bSimplificado))
 

depois do nnumcopias falta uma virgula. alguem pode concertar la por favor. 

 

 


 

Link to comment
Share on other sites

  • Este tópico foi criado há 696 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.