Visual FoxPro.NET - HASAR SMH P 1120F Impresoras - Fiscales

   
Vista:

HASAR SMH P 1120F Impresoras - Fiscales

Publicado por Daniel Sebastian sebas_07_14@hotmail.com (1 intervención) el 30/06/2013 02:00:34
Hola soy nuevo en vfp9 y tengo que hacer un sistema que imprima facturas A/B y cierres Z en una impresora HASAR SMH P 1120F baje la OCX y mire algo de la documentación de Hasar aunque tiene algunos Links caidos. La verdad todavía nose como empezar si alguien tiene algun ejemplo que pueda ver se lo agradecería!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

HASAR SMH P 1120F Impresoras - Fiscales

Publicado por Rodrigo Lamas (1 intervención) el 19/10/2013 15:04:40
Es muy sencillo, te aconsejo utilizar el ocx que ellos proveen (OCX v051122).
Ahi mismo te proveen de documentación de dicho ocx.

El siguiente es un breve ejemplo que demuestra en pocas líneas cómo imprimir un ticket:

Hasar1.Puerto = 1
Hasar1.Comenzar
Hasar1.TratarDeCancelarTodo
Hasar1.AbrirComprobanteFiscal TICKET_C
Hasar1.ImprimirItem "Item 1", 10, 1, 21, 0
Hasar1.Subtotal True
Hasar1.ImprimirPago "Efectivo", 100
Hasar1.CerrarComprobanteFiscal
Hasar1.Finalizar

yo utilizo el siguiente formato

TICKET_FACTURA_A=65
TICKET_FACTURA_B=66
FACTURA_A=48
FACTURA_B=49
RECIBO_A=97
RECIBO_B=98
NOTA_DEBITO_A=68
NOTA_DEBITO_B=69

THISFORM.Olecontrol1.Puerto = 1
THISFORM.Olecontrol1.Comenzar
THISFORM.OleControl1.TratarDeCancelarTodo
THISFORM.Olecontrol1.AbrirComprobanteFiscal (TICKET_FACTURA_B)
THISFORM.Olecontrol1.ImprimirItem ("Item 1", 10, 1, 21, 0)
THISFORM.Olecontrol1.Subtotal (.T.)
THISFORM.Olecontrol1.ImprimirPago ("Efectivo", 100)
THISFORM.Olecontrol1.CerrarComprobanteFiscal
THISFORM.Olecontrol1.Finalizar

Quedaria reemplazar en item , pago, ect por campos de tu tabla.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar