----- Original Message -----

From: gb_guvoa@...

To: guvoaII@...

Sent: Monday, February 04, 2008 12:49 PM

Subject: Re: [guvoaII] impresion con OCX en impresor fiscal

Fijate en mi mensaje, al final:

"Ojo que cuando se agrega un control OLE de esta manera, VO genera un archivo MDF el cual debe distribuirse junto con la aplicacion."

GB

 

----- Mensaje original -----

De: Adesistemas <adesistemas@ciudad.com.ar>

Fecha: Lunes, Febrero 4, 2008 9:55 am

Asunto: Re: [guvoaII] impresion con OCX en impresor fiscal

__________ Información de NOD32, revisión 2847 (20080204) __________

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com

---

Colegas:

 

Tengo un problema,genero el ejecutable de la aplicacion y la instalo en la pc del cliente, me da un error, que lo adjunto en un archivo que es en la linea que esta en rojo

 

 

oDCOCX_EPSON_Impresora_Fiscal1 := OLEControl{SELF,ResourceID{VENTANAFISCAL_OCX_EPSON_IMPRESORA_FISCAL1,_GetInst()}}
oDCOCX_EPSON_Impresora_Fiscal1:HyperLabel := HyperLabel{#OCX_EPSON_Impresora_Fiscal1,NULL_STRING,NULL_STRING,NULL_STRING}
oDCOCX_EPSON_Impresora_Fiscal1:CreateFromAppDocStorage(OLEAppDocStorage{__MDFFILENAME__, "VentanaFiscal", "OCX_EPSON_Impresora_Fiscal1"})

 

 

Que puede ser?

 

Muchas gracias.

 

 

Luengo Sergio
General Pico
La Pampa
Analista de Sistemas

----- Original Message -----

From: gb_guvoa@...

To: guvoaII@...

Sent: Friday, January 25, 2008 12:32 AM

Subject: Re: [guvoaII] imprecion con OCX en impresor fiscal

Si agregaste el control desde el editor de ventanas eso significa que el mismo va a ser instanciado junto con la ventana. El codigo en este caso seria:

 

CLASS VentanaFiscal INHERIT DATAWINDOW

 PROTECT oCCBoton AS PUSHBUTTON

PROTECT oDCOCX_EPSON_Impresora_Fiscal1 AS OLECONTROL

 

  //{{%UC%}} USER CODE STARTS HERE (do NOT remove this line)

 

  //  INSTANCE oobj AS OBJE  // Esto no es necesario

 

 

 

METHOD boton CLASS VentanaFiscal           // para que me imprime un documento no fiscal
 

    

      oDCOCX_EPSON_Impresora_Fiscal1 :PortNumer := 1
      oDCOCX_EPSON_Impresora_Fiscal1 :BaudRate := "9600"   
      oDCOCX_EPSON_Impresora_Fiscal1 :oPenNofiscal()
      oDCOCX_EPSON_Impresora_Fiscal1 :sendNoFiscaltext("aaaaaaaaaaaaaaaaaa")
      oDCOCX_EPSON_Impresora_Fiscal1 :CloseNOfiscal()

 

 
 RETURN

Ojo que cuando se agrega un control OLE de esta manera, VO genera un archivo MDF el cual debe distribuirse junto con la aplicacion.

GB

 

 

----- Mensaje original -----

De: Adesistemas <adesistemas@ciudad.com.ar>

Fecha: Jueves, Enero 24, 2008 5:01 pm

Asunto: Re: [guvoaII] imprecion con OCX en impresor fiscal

> Correcto lo que me explican pero no tendre algo mal definido, por
> que me sigue tirando el mismo error.
>
> Les muestro los pasos que realice.
> Creo la ventanaFiscal le agrego un icono para hacer la impresion y
> lo pego el icono de la impresora fiscal.
>
>
> aca defino el objeto
>
> CLASS VentanaFiscal INHERIT DATAWINDOW
>
> PROTECT oCCBoton AS PUSHBUTTON
> PROTECT oDCOCX_EPSON_Impresora_Fiscal1 AS OLECONTROL
>
>  //{{%UC%}} USER CODE STARTS HERE (do NOT remove this line)
>
>    INSTANCE oobj AS OBJE
>
>
> Creo que esta definicion esta bien. y luego hago
>
>
>
> METHOD boton CLASS VentanaFiscal           // para que me imprime
> un documento no fiscal
>
>     oObj := EPSON_Impresora_FiscalPrinterFiscal{SELF}
>
>      oObj:PortNumer := 1
>      oObj:BaudRate := "9600"  
>      oObj:oPenNofiscal()
>      oObj:sendNoFiscaltext("aaaaaaaaaaaaaaaaaa")
>      oObj:CloseNOfiscal()
>
>
>
> RETURN
>
>
> Mi pregunta es,
> No tengo que tocar nada en las propiedades del ocx de la impresora
> fiscal, me aparace como baudrate 9600 y puerto numero 1  y
> messageson en true. el esto vacio.
>
> Muchas gracias por su colaboracion.
>
>
> Luengo Sergio
> General Pico
> La Pampa
> Analista de Sistemas
>  ----- Original Message -----
>  From: Gerardo J. Biagiotti
>  To: guvoaII@gruposyahoo.com.ar
>  Sent: Wednesday, January 23, 2008 8:29 PM
>  Subject: RE: [guvoaII] imprecion con OCX en impresor fiscal
>
>
>
>  Si oObj no es una variable protegida de la clase, tenés que
> sacarle el SELF
>
>
>        oObj:PortNumer := mPuerto
>        oObj:BaudRate := mBaudios
>        oObj:oPenNofiscal()
>        oObj:sendNoFiscaltext("aaaaaaaaaaaaaaaaaa")
>        oObj:CloseNOfiscal()
>
>
>
>  Gerardo J. Biagiotti
>
>  Analista de Sistemas
>
>
>  Mail:
>
>  gjbiagiotti@sicomnet.com.ar
>
>  gjbiagiotti@coyspu.com.ar
>
>  Messenger
>
>  gerardo_biagiotti@hotmail.com
>
>
>
>
>
>  «La mediocridad o grandeza de un país reside en nosotros, sus
> ciudadanos.»
>  P Antes de imprimir este e-mail piense si realmente es necesario
> hacerlo, el medio ambiente se lo agradecerá.
>
>
>  De: guvoaII@gruposyahoo.com.ar [guvoaII@gruposyahoo.com.ar] En
> nombre de Adesistemas
>  Enviado el: Miércoles, 23 de Enero de 2008 03:48 p.m.
>  Para: guvoaII@gruposyahoo.com.ar
>  Asunto: [guvoaII] imprecion con OCX en impresor fiscal
>
>
>  Al enviar a imprimir en un impresor fiscal tm2000af+ me larga el
> error adjunto en un archivo
>
>
>
>  En esta linea.del metodo baudrate
>
>
>   pParamDesc := pFirstParamDesc := oAuto:__AllocArgDescs(1)
>
>
>
>  Que puede ser?
>
>
>  Este es el metodo  que utilizo.
>
>
>  METHOD boton CLASS VentanaFiscal
>  
>     LOCAL mPuerto AS INT
>     LOCAL mBaudios AS USUAL
>
>
>     mPuerto := 1
>     mBaudios := "9600"
>  
>  
>        oObj := EPSON_Impresora_FiscalPrinterFiscal{SELF}
>
>
>        SELF:oObj:PortNumer := mPuerto
>        SELF:oObj:BaudRate := mBaudios
>        SELF:oObj:oPenNofiscal()
>        SELF:oObj:sendNoFiscaltext("aaaaaaaaaaaaaaaaaa")
>        SELF:oObj:CloseNOfiscal()
>
>
>
>  
>   RETURN
>
>
>
>
>  Luengo Sergio
>  General Pico
>  La Pampa
>  Analista de Sistemas
>
>
>
>
>  __________ Information from ESET Smart Security, version of
> virus signature database 2802 (20080117) __________
>
>  The message was checked by ESET Smart Security.
>
>  http://www.eset.com
>
>
>
>  __________ Information from ESET Smart Security, version of
> virus signature database 2802 (20080117) __________
>
>  The message was checked by ESET Smart Security.
>
>  http://www.eset.com
>
>
>  
>
>  __________ Información de NOD32, revisión 2818 (20080123) __________
>
>  Este mensaje ha sido analizado con NOD32 antivirus system
>  http://www.nod32.com
>

__________ Información de NOD32, revisión 2823 (20080125) __________

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com

__________ Información de NOD32, revisión 2847 (20080204) __________

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com