impressao do protocolo no Danfe

[Lorena Gonçalves]

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

oque esqueci de configurar?
 

 

 

[BigWings]

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?

[Lorena Gonçalves]

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?

 

[Lorena Gonçalves]

sou obrigado a colocar o numero do protocolo na chamada de impressao usando a dll? ele não pega automatico do xml?

 

[BigWings]

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

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

Movendo teu tópico para o fórum da ACBrLib.

[Rafael Dias]

@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

[Lorena Gonçalves]

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. 

 

[Lorena Gonçalves]

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. 

 

 

 

[Rafael Dias]

Na verdade fico faltando passar o parâmetro mesmo.

Correção já disponível no SVN.