Visual Basic - Nota de credito con controlador fiscal TM-u220afii

Hola a todos, alguien sabe como se hace una nota de credito con el controlador fiscal epson tm-u220afii?
para hacer los ticket o las facturas uso

respuesta = Me.PrinterFiscal1.OpenTicket("G")
If Not respuesta Then respuesta = Me.PrinterFiscal1.SendTicketItem("ARTICULO ", "1000", "100", "2100", "M", "0", "0", "0")
If Not respuesta Then respuesta = Me.PrinterFiscal1.GetTicketSubtotal("P", "LINDO SUB") ' Calificador
If Not respuesta Then respuesta = Me.PrinterFiscal1.SendTicketPayment("PAGO1", "200", "T")
If Not respuesta Then respuesta = Me.PrinterFiscal1.CloseTicket


Case 1
'Tique Factura A
' respuesta = Me.PrinterFiscal1.OpenInvoice("T", "C", "A", "1", "P", "12", "I", "I", "PEPE", "LE BOU", "CUIT", "2034534534545", "N", "LA", "PAMPA", "98", "REM 1", "REM 2", "G")
'Tique Factura B
respuesta = Me.PrinterFiscal1.OpenInvoice("T", "C", "B", "1", "P", "12", "I", "F", "PEPE", "LE BOU", "CUIT", "2034534534545", "N", "LA", "PAMPA", "98", "REM 1", "REM 2", "G")
If Not respuesta Then respuesta = Me.PrinterFiscal1.SendInvoiceItem("ARTICULO 1", "1000", "100", "2100", "M", "0", "0", "EXTRA", "EXTRA", "EXTRA", "1050", "0")
If Not respuesta Then respuesta = Me.PrinterFiscal1.GetInvoiceSubtotal("P", "LINDO SUB")
If Not respuesta Then respuesta = Me.PrinterFiscal1.SendInvoicePayment("PAGO1", "200", "T")
If Not respuesta Then respuesta = Me.PrinterFiscal1.CloseInvoice("T", "A", "HOLA")

La OCX que estas usando no soporta notas de credito. Tenes que usar el protocolo de bajo nivel.

Alguien podria poner un ejemplo con el protocolo de bajo nivel yo tambien estoy usando el openInvoice para Nota de credito y no funciona Gracias

Hola Juan, Pudiste solucionar el tema de la NOta de Credito? Yo lo envio asi y no me funciana.. Estoy con la IF ya inicializada, pero nada..



thisform.IFEpson.OpenInvoice("M","C","B",1,"P","10","I","F","CLIENTE NO IDENTIFICADO","ANULA TICKET B:1234-12345678","DNI","11111111",;
"N","DOMIC.DESC.","LOCALIDAD DESC.",""," ","","C")

**************************************************************************************

thisform.IFEpson.SendInvoiceItem( 'DURACELL PILA', '00001000', '000000355' , '2100',;
'M','00001' , '00000000', '', '' ,;
'', '00000000', '00000000')
***************************************************************************************
thisform.IFEpson.SendInvoicePayment('EFECTIVO', '000000355', 'T')
***************************************************************************************
thisform.IFEpson.CloseInvoice('M', 'B', 'FINAL')

Hola si se pueden realizar solamente que no estan tan claros los comandos... busca "Documento No Fiscal Homologado Tique-Nota de Crédito" en el archivo adjunto... espero que te pueda servir... saludos

• Manual_Protocolo_Compatible_RevC_Epson_Fiscal_TNU-220AF.rar(495,0 KB)

hola yo estoy utilizando el ifepson.ocx para la tmu220

para hacer notas de credito debes reemplazar la "T" en el "openinvoice" por la "M" luego todo igual que como en una factura
hay que recordar que en el "closeinvoice" tambien hay que cerrar con la "M" y no con la "T"
funciona perfecto para notas de credito tanto "A" como "B"

Hola Luciano, yo he cambiado la "T" por la "M" y no hay caso.. no me imprime la Nota Credito con el openvoice con la ocx.
Este es el ejemplo, y lo estoy probando directamente con la Impresora Fiscal ya inicializada. No se que estoy haciendo mal, me tira error de formato, con la NC A me pasa lo mismo.. Me podrías ayudar o comentar como envias vos el dato?
Muchas gracias!


thisform.IFEpson.OpenInvoice("M","C","B",1,"P","10","I","F","CLIENTE NO IDENTIFICADO","ANULA TICKET B:1234-12345678","DNI","11111111",;
"N","DOMIC.DESC.","LOCALIDAD DESC.",""," ","","C")

**************************************************************************************

thisform.IFEpson.SendInvoiceItem( 'DURACELL PILA', '00001000', '000000355' , '2100',;
'M','00001' , '00000000', '', '' ,;
'', '00000000', '00000000')
***************************************************************************************
thisform.IFEpson.SendInvoicePayment('EFECTIVO', '000000355', 'T')
***************************************************************************************
thisform.IFEpson.CloseInvoice('M', 'B', 'FINAL')

Si me pasas un correo te mando código en vb 6, ya resuelto. con el protocolo nuevo. Las OCX del protocolo viejo no soportan notas de credito.

Hola Carlos, ahi te envié un mail.
[email protected]
Muchisimas gracias!
Eric

Hola Carlos, he visto q tenes resuelto el envio de una nota de credito a un controldor fiscal TM-u220AFII con el ocx ifepson. Al igual q varios aqui yo le cambio la T por la M e igual me da error.
Podrias por favor tirarme un poco de luz?, con parte del codigo me sirve, tal vez q version de ocx estas usando?
Gracias!

Salu2

Alejandro ZB

Hola Carlos, quería saber si me podrías reenviar el mismo código con el OCX nuevo para hacer notas de crédito. Muchas gracias!

Hola Claudio, pudiste resolver el problema?
Yo le envio esto :



Y me tira error.. sabras en que le estoy fallando?!