Impressão de Cancelamento ACBrSat

[RFE Sistemas]

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

[Daniel Simoes]

Você está usando a ACBrLibSAT ?

[RFE Sistemas]

Sim Estou sim, emite o sat normal, impressão sai normal,  o cancelamento normal só não esta imprimindo o cancelamento mesmo.

[Rafael Dias]

poderia postar o log para analisarmos o mesmo.
Outra coisa vi que chama a impressão do cupom e do cancelamento não precisa imprimir o cupom quando vai cancelar apenas o cancelamento.

[RFE Sistemas]

Segue em anexo o Log.

ACBrLibSAT-20200724.log

[Rafael Dias]

Neste log não tem nenhuma chamada ao metodo de impressão de cancelamento.

[RFE Sistemas]

acabei de apagar os logs fiz o processo para impressão novamente e gerou este log.

ACBrLibSAT-20200724.log

[Rafael Dias]

Este log tbm não tem nada, você consegue reproduzir este erro no demo ?

[RFE Sistemas]

ele não dá erro simplismente não imprime e fecha o demo

[Rafael Dias]

Eu adicionei os metodos de cancelamento e impressão na classe e no demo em VB6 tente com eles por favor.

[RFE Sistemas]

Testei aqui e deu tudo certinho, muito obrigado!  

[Daniel Simoes]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.