Yo lo tengo asÍ:
loHasar = Newobject( 'HASAR.Fiscal.1' )
loHasar.Puerto = i
loHasar.AutodetectarControlador()
loHasar.AutodetectarModelo()
loHasar.Enviar( Chr( 127 ) ) && GetPrinterVersion()
lcModelo = loHasar.Respuesta( 3 )
loHasar.ObtenerDatosDeInicializacion()
lnPuntoDeVenta = Val( loHasar.Respuesta( 7 ))
ricardo aidelman
( socio nº 1545 )
De: [email protected] [mailto:[email protected]] En nombre de Sergio Lescano
Enviado el: lunes, 10 de noviembre de 2014 07:10 p.m.
Para: GUFA List Member
CC: [email protected]
Asunto: [GUFA] Nro de Sucursal en impresores fiscales
Hola Ricardo, estuve leyendo tu respuesta de cómo obtener un punto de venta de
una impresora Fiscal Hasar, te hago una consulta
El comando Hasar.ObtenerDatosDeInicializacion luego de que comando hay que
enviarlo para obtener el punto de venta?
Yo lo inicializo así con mi OCX
.Hasar.Puerto = lnPuerto
.Hasar.Comenzar
.Hasar.Modelo = 8
.Hasar.TratarDeCancelarTodo
...
envio los datos de clientes
ThisForm.Hasar.DatosCliente(xxxxxxxx )
ThisForm.Hasar.AbrirComprobanteFiscal (lnTipo) && Factura A o B
....
detalle de items y cierro
Thisform.Hasar.CerrarComprobanteFiscal
Saludos y gracias
El Lunes, 25 de octubre, 2010 12:59:27, Ricardo Aidelman
<[email protected]> escribió:
Yo lo estoy usando con la nueva (Fiscal051122.Ocx)
Lo único que me pasó es que, en algunos controladores, tuve que utilizar el
método Enviar( Chr( 115 )) en lugar de ObtenerDatosDeInicializacion()
loHasar.Enviar( Chr( 115 ) ) && ObtenerDatosDeInicializacion()
Del manual:
3.2.5. GetInitData - Consulta de datos de inicialización
Responde, a través de la línea serie, con los datos almacenados en memoria
EPROM fiscal durante la inicialización
del controlador fiscal. No altera la memoria de trabajo.
C O M A N D O: Formato del string
Longitud Descripción Tipo
1 73H (s – ASCII 115)
R E S P U E S T A: Formato del string
Longitud Descripción
Tipo
1 73H (s – ASCII 115)
1 FS
4 Status de la impresora: datos en ASCII
H Respuesta( 1 )
1 FS
4 Status fiscal: datos en ASCII
H Respuesta( 2 )
1 FS
11 Número de CUIT del emisor
N Respuesta( 3 )
1 FS
50 Razón social del emisor
A Respuesta( 4 )
50 caracteres en el modelo SMH/P-441F.
40 caracteres en el resto de los modelos.
1 FS
10 Número de registro de la impresora fiscal (3 letras + 7
números) A Respuesta( 5 )
1 FS
6 Fecha de inicialización (AAMMDD)
D Respuesta( 6 )
1 FS
4 Número de punto de venta asignado a la impresora fiscal
(nnnn) N Respuesta( 7 )
1 FS
30 Número de inscripción en Ingresos Brutos
30 caracteres en el modelo SMH/P-441F
20 caracteres en el resto de los modelos
1 FS
6 Fecha de inicio de actividades (AAMMDD)
D Respuesta( 8 )
1 FS
1 Responsabilidad frente al IVA
A Respuesta( 9 )
I: Responsable inscripto
N: Responsable no inscripto
No existente en los modelos SMH/P- 715F, SMH/P-PR5F y SMH/P-441F
E: Exento
A: No responsable
M: Responsable monotributo
No disponible en el modelo SMH/P-PR4F
S: Monotributista Social
No existente en los modelos SMH/P- 715F, SMH/P-PR5F y SMH/P-441F
Ejemplo:
s∟C080∟0600∟99999999995∟El Emisor
Inscripto∟HHP0000000∟070827∟9998∟IIBB-0000000000∟070827∟I
ricardo aidelman
From: [email protected] [mailto:[email protected]] On Behalf Of César Luque
Sent: Lunes, 25 de Octubre de 2010 12:03 p.m.
To: GUFA List Member
Subject: [GUFA] Nro de Sucursal en impresores fiscales
Ricardo :
Vos sabés que con la ocx nueva de Hasar no lo puedo hacer andar...
Saludos.-
Cèsar Luque
Ingeniero en Computaciòn
Mat 1.1746.3
03492-15586735
www.proinf.com.ar <http://www.proinf.com.ar/>
----- Original Message -----
From: Ricardo Aidelman <mailto:[email protected]>
To: GUFA List Member <mailto:[email protected]>
Sent: Monday, October 25, 2010 10:45 AM
Subject: [GUFA] Nro de Sucursal en impresores fiscales
En Hasar:
loHasar = Newobject( 'HASAR.Fiscal.1' )
loHasar.ObtenerDatosDeInicializacion()
lnPuntoDeVenta = Val( loHasar.Respuesta( 7 ))
ricardo aidelman
From: [email protected] [mailto:[email protected]] On Behalf Of Santos Victor
Sent: Lunes, 25 de Octubre de 2010 09:46 a.m.
To: GUFA List Member
Subject: [GUFA] Nro de Sucursal en impresores fiscales
En epson suponiendo q el obj ocx se llama oCf seria: oCF.AnswerField_4 eso t da
el pto de venta definido en el controlador
From: César Luque <mailto:[email protected]>
Sent: Monday, October 25, 2010 9:21 AM
To: GUFA List Member <mailto:[email protected]>
Subject: [GUFA] Nro de Sucursal en impresores fiscales
Estimados
Usando los correspondientes ocx, necesito obtener los números de sucursal
de los comprobantes emitidos via impresores fiscales ( epson y hasar ).
Me pueden pasar de que manera obtenerlo si es que se puede?
0003-00124584
Me refiero al 0003, como obtenerlo del impresor fiscal?
Saludos.-
Cèsar Luque
Se certificó que el correo no contiene virus.
Comprobada por AVG - www.avg.es
Versión: 2015.0.5315 / Base de datos de virus: 4189/8550 - Fecha de la versión:
10/11/2014