Estimados,
Tengo la siguiente consulta, cual es la forma correcta de crear el objeto OCX?
Las dos formas parecen funcionar, en ninguna de las dos formas consigo obtener las respuestas generadas por los comandos.
1 - oFiscal:= CreateObject("HasarArgentina.ImpresoraFiscalRG3561")
oFiscal:DO("Conectar","127.0.0.1")
oFiscal:DO("AbrirDocumento",82)
2 - oFiscal:= TActiveX():New( oWnd, "HasarArgentina.ImpresoraFiscalRG3561" )
oFiscal:Conectar("127.0.0.1")
oFiscal:AbrirDocumento(82)
Como obtener el numero de comprobante abierto?
Ambas formas conectan, cual es la forma correcta de crear el objeto OCX ActiveX ?.
Como hacer esto mismo en FIVEWIN? ejemplo en VIsual Basic:
Dim hasar As HasarArgentina.ImpresoraFiscalRG3561 = New HasarArgentina.ImpresoraFiscalRG3561
Dim respabrir As HasarArgentina.RespuestaAbrirDocumento
respabrir = hasar.AbrirDocumento(HasarArgentina.TiposComprobante.Tique)
Debug.Print("Tique Nº =["& respabrir.NumeroComprobante &"]")
*********************************************************************
INFORMACION SOPORTE EMPRESA HASAR - Proveedor del OCX
**********************************************************************
Buenos días. Luego de analizar tu código, y buscar información sobre el lenguaje, confirmamos nuestra sospecha.
La respuesta vuelve en un tipo de estructura que se genera con la OCX. Harbour, no logra mapear esa estructura, y por lo tanto, la misma viene vacia.
La herramienta de comunicación OCX de Hasar, es un objeto ActiveX desarrollado bajo tecnología COM, respetando los estándares de Windows.
Se puede registrar y usar sin inconvenientes en Windows 32 / 64 bits. La única limitación la puede imponer el entorno de desarrollo visual -de existir alguna- que se emplee.
En este caso, aparentemente, el lenguaje no es compatible con la herramienta. Te recomiendo que lo consultes con la mesa de ayuda de tu entorno.
**********************************************************************
Desde ya muchas gracias,
Saludos Mariano
↧