Ir para conteúdo
  • Cadastre-se

dev botao

impressao do protocolo no Danfe


Ver Solução Respondido por Rafael Dias,
  • Este tópico foi criado há 1538 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 para o comentário
Compartilhar em outros 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 para o comentário
Compartilhar em outros sites

@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

 

Link para o comentário
Compartilhar em outros 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 para o comentário
Compartilhar em outros 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 para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.