calldll32

HMG en Español

Moderator: Rathinagiri

Post Reply
User avatar
danielmaximiliano
Posts: 2625
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Contact:
Contact danielmaximiliano

calldll32

Post by danielmaximiliano »

hola a todos.

hoy quise utilizar una rutina para enviar ticket fiscales hacia una impresora fiscal y me da error.

Code: Select all

Function AbrirPuerto()
handler := CallDll32( "OpenComFiscal" , "WINFIS32.DLL" ,1,0 )
CallDll32( "InitFiscal" , "WINFIS32.DLL" ,handler, 0 )
alerror(handler)
If handler=0
  msgbox('puerto abierto','atenciòn')
endif
return
alguien trabajo com impresoras fiscales argentinas y la winfis.dll que acompaña a los controladores fiscales hasar.
el programa se compila pero al ejecutarse hace un hoyo lunar , jajaja
hb out.log

Application Internal Error - E:\LosTilos\LosTilos.exe
Terminated at: 2012.10.25 15:30:46
Error irrecuperable 6005: Exception error:

Exception Code:C0000005
Exception Address:00000000
EAX:FFFFFFFE EBX:0000000A ECX:012C0850 EDX:7EFF4F57
ESI:00000000 EDI:00000000 EBP:00000000
CS:EIP:001B:00000000 SS:ESP:0023:0022FAFC
DS:0023 ES:0023 FS:003B GS:0000
Flags:00010216
CS:EIP:
SS:ESP: 0040FABF 0054CA74 0054CA81 00000002 FFFFFFFB 00000000 00000000 00000000 00000000 00000000 00000000 00000000 0044636E 0000000F 005C6F7D 00000000

C stack:
EIP: EBP: Frame: OldEBP, RetAddr, Params...

Modules:
0x00400000 0x004CB000 E:\LosTilos\LosTilos.exe
0x7C910000 0x000B8000 D:\WINDOWXP\system32\ntdll.dll
0x7C800000 0x00103000 D:\WINDOWXP\system32\kernel32.dll
0x64D00000 0x0003C000 D:\Archivos de programa\AVAST Software\Avast\snxhk.dll
0x77DA0000 0x000AC000 D:\WINDOWXP\system32\ADVAPI32.DLL
0x77E50000 0x00093000 D:\WINDOWXP\system32\RPCRT4.dll
0x77FC0000 0x00011000 D:\WINDOWXP\system32\Secur32.dll
0x773A0000 0x00103000 D:\WINDOWXP\WinSxS\x86_Microsoft.Windows.Common-Controls_6595b64144ccf1df_6.0.2600.6028_x-ww_61e65202\COMCTL32.DLL
0x77BE0000 0x00058000 D:\WINDOWXP\system32\msvcrt.dll
0x77EF0000 0x00049000 D:\WINDOWXP\system32\GDI32.dll
0x7E390000 0x00091000 D:\WINDOWXP\system32\USER32.dll
0x77F40000 0x00076000 D:\WINDOWXP\system32\SHLWAPI.dll
0x76360000 0x0004A000 D:\WINDOWXP\system32\COMDLG32.DLL
0x7E6A0000 0x00822000 D:\WINDOWXP\system32\SHELL32.dll
0x75ED0000 0x00021000 D:\WINDOWXP\system32\MSVFW32.DLL
0x76B00000 0x0002E000 D:\WINDOWXP\system32\WINMM.dll
0x774B0000 0x0013E000 D:\WINDOWXP\system32\OLE32.dll
0x770F0000 0x0008B000 D:\WINDOWXP\system32\OLEAUT32.DLL
0x72F80000 0x00026000 D:\WINDOWXP\system32\WINSPOOL.DRV
0x76340000 0x0001D000 D:\WINDOWXP\system32\IMM32.DLL
0x62E30000 0x00009000 D:\WINDOWXP\system32\LPK.DLL
0x74D20000 0x0006B000 D:\WINDOWXP\system32\USP10.dll
0x746B0000 0x0004C000 D:\WINDOWXP\system32\MSCTF.dll
0x75160000 0x0002E000 D:\WINDOWXP\system32\msctfime.ime
0x5B150000 0x00038000 D:\WINDOWXP\system32\UxTheme.dll
0x70E20000 0x00013000 D:\WINDOWXP\system32\asycfilt.dll
0x10000000 0x00022000 D:\WINDOWXP\system32\WINFIS32.DLL
0x71A50000 0x0000A000 D:\WINDOWXP\system32\WSOCK32.dll
0x71A30000 0x00017000 D:\WINDOWXP\system32\WS2_32.dll
0x71A20000 0x00008000 D:\WINDOWXP\system32\WS2HELP.dll

Called from HB_DYNACALL1(0)
Called from CALLDLL32(7937) in source\h_controlmisc.prg
Called from ABRIRPUERTO(181) in e:\lostilos\fuentes\lostilos.prg
Called from MAIN(70) in e:\lostilos\fuentes\lostilos.prg
------------------------------------------------------------------------
Application Internal Error - E:\LosTilos\LosTilos.exe
Terminated at: 2012.10.25 15:32:24
Error irrecuperable 6005: Exception error:

Exception Code:C0000005
Exception Address:00000000
EAX:FFFFFFFE EBX:0000000A ECX:012C0850 EDX:7EFF4F57
ESI:00000000 EDI:00000000 EBP:00000000
CS:EIP:001B:00000000 SS:ESP:0023:0022FAFC
DS:0023 ES:0023 FS:003B GS:0000
Flags:00010216
CS:EIP:
SS:ESP: 0040FABF 0054CA74 0054CA81 00000002 FFFFFFFB 00000000 00000000 00000000 00000000 00000000 00000000 00000000 0044636E 0000000F 005C6F7D 00000000

C stack:
EIP: EBP: Frame: OldEBP, RetAddr, Params...

Modules:
0x00400000 0x004CB000 E:\LosTilos\LosTilos.exe
0x7C910000 0x000B8000 D:\WINDOWXP\system32\ntdll.dll
0x7C800000 0x00103000 D:\WINDOWXP\system32\kernel32.dll
0x64D00000 0x0003C000 D:\Archivos de programa\AVAST Software\Avast\snxhk.dll
0x77DA0000 0x000AC000 D:\WINDOWXP\system32\ADVAPI32.DLL
0x77E50000 0x00093000 D:\WINDOWXP\system32\RPCRT4.dll
0x77FC0000 0x00011000 D:\WINDOWXP\system32\Secur32.dll
0x773A0000 0x00103000 D:\WINDOWXP\WinSxS\x86_Microsoft.Windows.Common-Controls_6595b64144ccf1df_6.0.2600.6028_x-ww_61e65202\COMCTL32.DLL
0x77BE0000 0x00058000 D:\WINDOWXP\system32\msvcrt.dll
0x77EF0000 0x00049000 D:\WINDOWXP\system32\GDI32.dll
0x7E390000 0x00091000 D:\WINDOWXP\system32\USER32.dll
0x77F40000 0x00076000 D:\WINDOWXP\system32\SHLWAPI.dll
0x76360000 0x0004A000 D:\WINDOWXP\system32\COMDLG32.DLL
0x7E6A0000 0x00822000 D:\WINDOWXP\system32\SHELL32.dll
0x75ED0000 0x00021000 D:\WINDOWXP\system32\MSVFW32.DLL
0x76B00000 0x0002E000 D:\WINDOWXP\system32\WINMM.dll
0x774B0000 0x0013E000 D:\WINDOWXP\system32\OLE32.dll
0x770F0000 0x0008B000 D:\WINDOWXP\system32\OLEAUT32.DLL
0x72F80000 0x00026000 D:\WINDOWXP\system32\WINSPOOL.DRV
0x76340000 0x0001D000 D:\WINDOWXP\system32\IMM32.DLL
0x62E30000 0x00009000 D:\WINDOWXP\system32\LPK.DLL
0x74D20000 0x0006B000 D:\WINDOWXP\system32\USP10.dll
0x746B0000 0x0004C000 D:\WINDOWXP\system32\MSCTF.dll
0x75160000 0x0002E000 D:\WINDOWXP\system32\msctfime.ime
0x5B150000 0x00038000 D:\WINDOWXP\system32\UxTheme.dll
0x70E20000 0x00013000 D:\WINDOWXP\system32\asycfilt.dll
0x10000000 0x00022000 D:\WINDOWXP\system32\WINFIS32.DLL
0x71A50000 0x0000A000 D:\WINDOWXP\system32\WSOCK32.dll
0x71A30000 0x00017000 D:\WINDOWXP\system32\WS2_32.dll
0x71A20000 0x00008000 D:\WINDOWXP\system32\WS2HELP.dll

Called from HB_DYNACALL1(0)
Called from CALLDLL32(7937) in source\h_controlmisc.prg
Called from ABRIRPUERTO(181) in e:\lostilos\fuentes\lostilos.prg
Called from MAIN(70) in e:\lostilos\fuentes\lostilos.prg
------------------------------------------------------------------------
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
Top
Mario Mansilla
Posts: 270
Joined: Wed Aug 13, 2008 2:35 pm
Location: Córdoba - Argentina

Re: calldll32

Post by Mario Mansilla »

Hola Daniel :
Reemplaza en la linea :
CallDll32( "InitFiscal" , "WINFIS32.DLL" ,handler, 0 )
por :
CallDll32( "InitFiscal" , "WINFIS32.DLL" ,handler)

Ejemplo
handler := CallDll32( "OpenComFiscal" , "WINFIS32.DLL" ,1,0 )
If handler < 0
alerror(handler)
Endif
cod := CallDll32 ( "InitFiscal" , "WINFIS32.DLL" ,handler )
If cod < 0
alerror(cod)
Endif

Proba y avisame cualquier cosa
Saludos
Mario Mansilla
Top
User avatar
danielmaximiliano
Posts: 2625
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Contact:
Contact danielmaximiliano

Re: calldll32

Post by danielmaximiliano »

Mario Mansilla wrote:Hola Daniel :
cod := CallDll32 ( "InitFiscal" , "WINFIS32.DLL" ,handler )
If cod < 0
alerror(cod)
Endif

Proba y avisame cualquier cosa
Saludos
Mario Mansilla
Funciona perfecto.
hoy estoy probando la IF, sabes como son las "string" para enviar Items de venta a la IF ?
si es posible un ejemplo completo ya que Wpruf no es muy completo es lo respecto a la documentacion.

Gracias igual por la ayuda
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
Top
Post Reply

Return to “General”