Ir para conteúdo
  • Cadastre-se

dev botao

Impressão de Cancelamento ACBrSat


Ver Solução Respondido por Rafael Dias,
  • Este tópico foi criado há 1342 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa tarde, fiz o cancelamento do SAT perfeito foi certinho, no entando quando vou imprimir não imprime e fecha o sistema. Alguém poderia me ajudar? Segue abaixo os Códigos usados. 

 

/* --------------------------- Botão de impressão ------------------*/

Dim XmlVenda, XmlCancelamento As String

XmlVenda = "C:\Program Files (x86)\Microsoft Visual Studio\VB98\Vendas\11111111111111\202007\24\AD35200711111111111111591234567890002074158897.xml"
XmlCancelamento = "C:\Program Files (x86)\Microsoft Visual Studio\VB98\Cancelamentos\11111111111111\202007\24\ADC35200711111111111111591234567890002082256479.xml"
    retorno = sat.CancelarCFe(XmlVenda)
    'SetResposta retorno


sat.ImprimirExtratoCancelamento XmlVenda, XmlCancelamento, vbNullString

 

/* --------------------------- Função Criada ------------------*/

Public Function ImprimirExtratoCancelamento(ByVal eArquivoXml As String, ByVal eArquivoXmlCancelamento, Optional ByVal eNomeImpressora As String = "")

    Dim retorno   As Long
    
    'retorno = SAT_ImprimirExtratoVenda(eArquivoXml, eNomeImpressora)
    'CheckResult (retorno)
    
   retorno = SAT_ImprimirExtratoCancelamento(eArquivoXml, eArquivoXmlCancelamento, eNomeImpressora)
   CheckResult (retorno)

End Function

 

/* --------------------------- Declaração ------------------*/

Private Declare Function SAT_ImprimirExtratoCancelamento _
                Lib "ACBrSAT32.dll" (ByVal eArquivoXml As String, _
                                     ByVal eArquivoXmlCanelamento, _
                                      ByVal eNomeImpressora As String) As Long

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1342 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.