Consulta Objetos y Argumentos‏

[mterraz]

Estimado Antonio,
Trabajando con el objeto oFiscal me surge un error de argumentos durante la ejecución del programa.

Ejemplo Brindado de Visual Basic
HASAR1.Encabezado(11) = “11 - Texto al pie del comprobante.”

Como seria la misma instruccion en Fivewin?.
oFiscal := CreateObject( "HASAR.Fiscal.1" )
oFiscal:Encabezado(11,"Texto Encabezado") Aqui da error de argumentos

Segun el manual la propiedad Encabezado tiene dos parametros.

AYUDA MANUAL:
Propiedad: Encabezado( )
Comando: SetHeaderTrailer, GetHeaderTrailer
Disponible: OCX Fiscal HASAR, en todas las versiones.
Configuración: Long (de entrada), String (de entrada)
Retorno: Long (de entrada), String (de salida)
Característica: Multi-argumento

Te agradeceria mucho me si me puedes aclarar como se acceden a los metodos y propiedades del objeto, y como pasar los parámetros por argumento.

Saludos Cordiales Mariano

/////////////////////////////

Prueba asi:

oFiscal:Encabezado[ 11 ] := "Texto Encabezado"

Antonio
/////////////////////////////

Antonio realice la prueba de la forma que me indicaste pero sigue en problema con el error de argumentos.

oFiscal:Encabezado[ 11 ] := "Texto Encabezado"

ERROR:
Application
===========
Path and name: C:\HASAR\pfhasar.exe (32 bits)
Size: 1,687,040 bytes
Time from start: 0 hours 0 mins 11 secs
Error occurred at: 29/02/16, 10:49:44
Error description: (DOS Error -2147352562) WINOLE/1007 Argument error: ENCABEZADO

Stack Calls
===========
Called from: => TOLEAUTO:ENCABEZADO(0)
Called from: pfhasar.prg => SETHEDTRA(342)
Called from: pfhasar.prg => (b)CONFIGURACION(310)
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176)
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1427)
Called from: .\source\classes\WINDOW.PRG => _FWH(3353)
Called from: => SENDMESSAGE(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(407)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(944)
Called from: => DIALOGBOX(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273)
Called from: pfhasar.prg => CONFIGURACION(332)
Called from: pfhasar.prg => (b)MAIN(112)
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176)
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1427)
Called from: .\source\classes\WINDOW.PRG => _FWH(3353)
Called from: => SENDMESSAGE(0)
Called from: .\source\classes\WINDOW.PRG => TWINDOW:COMMAND(1025)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\WINDOW.PRG => _FWH(3353)
Called from: => WINRUN(0)
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE(966)
Called from: pfhasar.prg => MAIN(116)

System
======
CPU type: Intel(R) Core(TM) i3-3120M CPU @ 2.50GHz 2500 Mhz
Hardware memory: 2048 megs

Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %

Compiler version: Harbour 3.0.0 (Rev. 16951)
Windows version: 6.1, Build 7600

Windows total applications running: 50
1
2 Inicio
3 MSCTFIME UI
4 Default IME
5 CiceroUIWndFrame
6 MT
7 Menú Inicio
8 Conmutación de tareas
9 Jump List
10 Network Flyout
11 advertencia
12 TF_FloatingLangBar_WndTitle
13 DETALLES DEL CONTROLADOR
14 PFHASAR v1.01
15 Administrador: C:\Windows\system32\cmd.exe
16 Find
17 C:\HASAR\PFHASAR.PRG - Notepad++
18 FiveTech Software tech support forums • Publicar un nuevo tema - Google Chrome
19 OCX Fiscal HASAR v150423.pdf - Adobe Acrobat Reader DC
20 Font Capture
21 AcroMissingCompWClass
22 DDE Server Window
23 Acrobat Broker Msg Handling Window
24 Acrobat Instance Window
25 Dialog
26 68DCC1AE
27 TouchPad object helper window
28 MCI command handling window
29 qbittorrent
30 HiddenFaxWindow
31 MS_WebcheckMonitor
32 BluetoothNotificationAreaIconWindowClass
33 SanDiskSecureAccess_Manager
34 SystemEventsNotifier
35 Media Center SSO
36 Medidor de la batería
37 VIA HD Audio Deck
38 GDI+ Window
39 Touchpad driver tray icon window
40 PersistWndName
41 HkWndName
42 Touchpad driver backward compatibility window
43 Touchpad driver helper window
44 Monitor Intel(R) USB 3.0
45 igfxtrayWindow
46 Task Host Window
47 DWM Notification Window
48 qBittorrent v3.2.3
49 Untitled.fis - fisem
50 Program Manager

Variables in use
================
Procedure Type Value
==========================
TOLEAUTO:ENCABEZADO
Param 1: O Class: ERROR
SETHEDTRA
Local 1: U
Local 2: N 0
(b)CONFIGURACION
Param 1: C "A "
Param 2: C "A "
Param 3: C "A "
Param 4: C "A "
Param 5: C "A "
Param 6: C "A "
Local 1: U
Local 2: U
Local 3: U
Local 4: C "TEST MARIANO"
TBUTTON:CLICK
TBUTTON:HANDLEEVENT
_FWH
Param 1: N 2048
Param 2: N 0
Param 3: N 0
SENDMESSAGE
Param 1: N 0
Param 2: N 2048
Param 3: N 0
Param 4: N 0
Param 5: N 15
Local 1: O Class: TBUTTON
TDIALOG:COMMAND
Param 1: N 394842
Param 2: N 2048
Param 3: N 0
Param 4: N 0
TWINDOW:HANDLEEVENT
Param 1: N 4021
Param 2: N 394842
Local 1: O Class: TBUTTON
Local 2: N 0
Local 3: N 4021
Local 4: N 394842
TDIALOG:HANDLEEVENT
Param 1: N 273
Param 2: N 4021
Param 3: N 394842
DIALOGBOX
Param 1: N 273
Param 2: N 4021
Param 3: N 394842
TDIALOG:ACTIVATE
Param 1: N 28180480
Param 2: C "CONFIGURAIF"
Param 3: N 721846
Param 4: O Class: TDIALOG
CONFIGURACION
Param 1: U
Param 2: U
Param 3: U
Param 4: L .T.
Param 5: U
Param 6: L .T.
Param 7: U
Param 8: U
Param 9: U
Param 10: L .F.
Local 1: N 721846
Local 2: S
Local 3: O Class: TDIALOG
(b)MAIN
Local 1: O Class: TCOMBOBOX
Local 2: O Class: TCOMBOBOX
Local 3: O Class: TCOMBOBOX
Local 4: C "TICKET_C *84"
Local 5: C "A "
Local 6: C "A "
Local 7: C "A "
Local 8: C "A "
Local 9: C "A "
Local 10: C "A "
TBUTTON:CLICK
TBUTTON:HANDLEEVENT
_FWH
Param 1: N 2048
Param 2: N 0
Param 3: N 0
SENDMESSAGE
Param 1: N 0
Param 2: N 2048
Param 3: N 0
Param 4: N 0
Param 5: N 2
Local 1: O Class: TBUTTON
TWINDOW:COMMAND
Param 1: N 263620
Param 2: N 2048
Param 3: N 0
Param 4: N 0
TWINDOW:HANDLEEVENT
Param 1: N 102
Param 2: N 263620
Local 1: N 0
Local 2: N 102
Local 3: N 263620
_FWH
Param 1: N 273
Param 2: N 102
Param 3: N 263620
WINRUN
Param 1: N 263620
Param 2: N 273
Param 3: N 102
Param 4: N 263620
Param 5: N 1
Local 1: O Class: TWINDOW
TWINDOW:ACTIVATE
Param 1: N 721846
MAIN
Param 1: C "NORMAL"
Param 2: U
Param 3: U
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: B {|| ... }
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: U
Param 18: U
Param 19: U
Local 1: O Class: TWINDOW
Local 2: U
Local 3: U

Linked RDDs
===========
DBF
DBFFPT
DBFBLOB
DBFCDX
DBFNTX

DataBases in use
================

Classes in use:
===============
1 ERROR
2 HBCLASS
3 HBOBJECT
4 TFONT
5 TWINDOW
6 TCONTROL
7 TICON
8 TBRUSH
9 TBUTTON
10 TTRAYICON
11 TSTRUCT
12 WIN_OLEAUTO
13 TOLEAUTO
14 TTIMER
15 TDIALOG
16 TCOMBOBOX
17 TGET
18 GET
19 TCLIPGET
20 TSAY
21 TREG32

Memory Analysis
===============
190 Static variables

Dynamic memory consume:
Actual Value: 0 bytes
Highest Value: 0 bytes

Saludos Mariano

[mterraz]

Otro Ejemplo con error: Parece que reconoce los 2 parametros

I:=1
linea:="MIO"
ofiscal:encabezado(i,linea)

/////////
Application
===========
Path and name: C:\HASAR\pfhasar.exe (32 bits)
Size: 1,687,040 bytes
Time from start: 0 hours 0 mins 4 secs
Error occurred at: 29/02/16, 11:12:28
Error description: (DOS Error -2147352562) WINOLE/1007 Argument error: ENCABEZADO
Args:
[ 1] = N 1
[ 2] = C MIO

Stack Calls
===========
Called from: => TOLEAUTO:ENCABEZADO(0)
Called from: pfhasar.prg => SETHEDTRA(344)
Called from: pfhasar.prg => (b)CONFIGURACION(310)

[Carlos Mora]

Estimado Mariano,

Por el error parece que está llamando al metodo GET. Cuando se trata de métodos SET_GET, para hacer un SET se depe anteponer el underscore '_' antes del nombre, por lo que yo probaría:

oFiscal:_Encabezado(11,"Texto Encabezado")

No uso ese OCX pero no se pierde nada con probar, no?

Un saludo

[mterraz]

Estimado Carlos,
Realice la prueba que me enviaste y todo funcionando utilizando oFiscal:_Encabezado(linea, CHR(127) ) y todo OK!!!

Muchas gracias por tu colaboración!

Saludos Mariano

[Antonio Linares]

muy bien

[Tatoo]

Hola...me gustaria contactarme contigo para hacerte algunas consultas sobre el mismo tema...Hasar en Argentina...
Mi correo es siddhartha_38@hotmail.com
Me acaba de llegar el Fiscal150423.ocx y me gustaría saber por donde comenzar..
Muchas Gracias...