FiveTech Software tech support forums

www.FiveTechSoft.com

Skip to content

Dolphin error en DOL_GETERROTEXT

Post a reply

Dolphin error en DOL_GETERROTEXT

Postby carlos vargas » Mon Nov 11, 2013 1:14 am

Daniel, tengo este codigo
Code: Select all  Expand view

   TRY
      oServer:BeginTransaction()
      IF lNuevo
         oServer:Insert( "FERIADOS", { "NUM_CIUD", "FECHA", "MOTIVO", "NACIONAL" }, ;
                                     { nNumCiud  , dFecha , cMotivo,  lNacional  }  )
      ELSE
         cWhere := "FECHA=" + Var2Str( dFecha )
         oServer:Update( "FERIADOS", { "NUM_CIUD", "FECHA", "NOMBRE", "NACIONAL" }, ;
                                     { nNumCiud  , dFecha , cMotivo,  lNacional  }, cWhere  )
      ENDIF
      oServer:CommitTransaction()
      lGrabado := TRUE
   CATCH oError
      oServer:RollBack()
      ShowError( oError )
   END
 

hay un error, ya que NOMBRE no existe en la tabla FERIADOS, pero esto esta generando un gpf ya que la funcion DOL_GETERROTEXT lo esta generando, si quito la llamada a esta funcion el error aparece, pero sin descripcion, solo "Error interno"
Code: Select all  Expand view

PROCEDURE Dolphin_DefError( oServer, nError, lInternal, cExtra )
   LOCAL cText := ""
   LOCAL oError
   
   DEFAULT cExtra TO ""

   oError := ErrorNew()
   oError:SubSystem   = If( lInternal, "TDOLPHIN", "MYSQL" )
   oError:SubCode     = nError
   oError:Severity    = 2
   oError:Description = If( lInternal, "Internal Error:" + DOL_GETERROTEXT( nError ) , oServer:ErrorTxt() ) + " " + cExtra

   Eval( ErrorBlock(), oError )  

RETURN
 


este es el resultado de hb_log
Application Internal Error - D:\misapp\credicom2\credicom.Exe
Terminated at: 2013.11.10 19:13:21
Error irrecuperable 6005: Exception error:

Exception Code:C0000005
Exception Address:0040590E
EAX:00000000 EBX:0000000C ECX:00000080 EDX:0031EF66
ESI:0391FF54 EDI:00000000 EBP:0018C214
CS:EIP:0023:0040590E SS:ESP:002B:0018C208
DS:002B ES:002B FS:0053 GS:002B
Flags:00010206
CS:EIP: 3B 58 08 7D 44 85 FF 74 1A 57 8B 15 B8 AB 5A 00
SS:ESP: 005A9BAE 00000000 00793ACC 0018C224 00405969 00002334 00000000 0018C230 004059BC 00002334 0018C24C 00483484 0000010A 00000014 00000000 00000000

C stack:
EIP: EBP: Frame: OldEBP, RetAddr, Params...
0040590E 0018C214 0018C224 00405969 00002334 00000000
00405969 0018C224 0018C230 004059BC 00002334
004059BC 0018C230 0018C24C 00483484 0000010A 00000014 00000000 00000000 00000000
00483484 0018C24C 0018C360 0047D3FA 00000001 005A63DD 00000000 00793ACC 005A8F6F 0000000A 0000000A 002D0020
0047D3FA 0018C360 0018C370 00403680 005A9B2A 005A3250
00403680 0018C370 0018C38C 00483484 00000105 00000014 00000000 00000000 00000B52
00483484 0018C38C 0018C4A0 0047D377 00000004 005A8D8D 00000000 005A36B0 00000073 00020C3C 00020C38 00793E48
0047D377 0018C4A0 0018C4B0 00402F78 005A6303 005A3250
00402F78 0018C4B0 0018C4D0 00483641 00793ACC 000000F4 00000014 00000000 003D001A 00000346
00483641 0018C4D0 0018C5E4 0047D4B8 00000000 0058B64B 00000001 00589F94 00000001 00793ACC 00000002 00000001
0047D4B8 0018C5E4 0018C5F4 00403398 005A8C34 005A3250
00403398 0018C5F4 0018C614 00483641 00793ACC 000000EC 00000014 00000000 006A001A 000008F8
00483641 0018C614 0018C728 0047D4B8 00000004 0058B266 00000000 00793ACC 0018C770 7464482C 0018C6F8 0018C6E0
0047D4B8 0018C728 0018C750 00401E7C 0058B4BB 00589864 00483484 000000E9 00000014 00000000 00000000 00000157
00401E7C 0018C750 0018C864 0047D3FA 00000001 00793ACC FFFFFFFE 002FF6F4 51010E72 FFFFFFFF 51010E72 51010E72
0047D3FA 0018C864 0018C89C 004837FD 0058B261 00589864 0062277F 00000000 00621DC4 00483641 00793ACC 000000E7
004837FD 0018C89C 0018C9B0 0047D4B8 00000001 0062F66A 00000000 0062B634 00793ACC FFFFFFFF 00300854 0018C938
0047D4B8 0018C9B0 0018C9C0 0040BC51 006226E4 00621994
0040BC51 0018C9C0 0018C9E0 00483641 00793ACC 000000E1 00000014 00307664 01F30018 000000A3
00483641 0018C9E0 0018CAF4 0047D4B8 00000000 006D09D1 00000000 006C88A8 00793ACC FFFFFFFF 002FF794 0048368C


Modules:
0x00400000 0x00449000 D:\misapp\credicom2\credicom.Exe
0x76FE0000 0x00157000 C:\Windows\SYSTEM32\ntdll.dll
0x74B80000 0x00130000 C:\Windows\SYSTEM32\KERNEL32.DLL
0x752D0000 0x000A6000 C:\Windows\SYSTEM32\KERNELBASE.dll
0x67A20000 0x002CA000 D:\misapp\credicom2\LIBMYSQL.DLL
0x74870000 0x000AE000 C:\Windows\SYSTEM32\ADVAPI32.DLL
0x74300000 0x00008000 C:\Windows\SYSTEM32\VERSION.DLL
0x71650000 0x00060000 C:\Windows\SYSTEM32\WINSPOOL.DRV
0x71AE0000 0x001F8000 C:\Windows\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.9200.16579_none_8937eec6860750f5\COMCTL32.DLL
0x751F0000 0x00089000 C:\Windows\SYSTEM32\COMDLG32.DLL
0x74630000 0x000FD000 C:\Windows\SYSTEM32\GDI32.DLL
0x731C0000 0x00006000 C:\Windows\SYSTEM32\MSIMG32.DLL
0x75E50000 0x010C6000 C:\Windows\SYSTEM32\SHELL32.DLL
0x75000000 0x00116000 C:\Windows\SYSTEM32\USER32.DLL
0x75380000 0x00119000 C:\Windows\SYSTEM32\OLE32.DLL
0x754F0000 0x0008B000 C:\Windows\SYSTEM32\OLEAUT32.DLL
0x6BE80000 0x0001D000 C:\Windows\SYSTEM32\OLEDLG.DLL
0x754A0000 0x00050000 C:\Windows\SYSTEM32\WS2_32.dll
0x75AD0000 0x000B1000 C:\Windows\SYSTEM32\msvcrt.dll
0x74960000 0x00034000 C:\Windows\SYSTEM32\sechost.dll
0x75B90000 0x000AC000 C:\Windows\SYSTEM32\RPCRT4.dll
0x74B30000 0x00040000 C:\Windows\SYSTEM32\SHLWAPI.dll
0x75740000 0x00136000 C:\Windows\SYSTEM32\combase.dll
0x74B70000 0x00008000 C:\Windows\SYSTEM32\NSI.dll
0x74610000 0x0001C000 C:\Windows\SYSTEM32\SspiCli.dll
0x74600000 0x00009000 C:\Windows\SYSTEM32\CRYPTBASE.dll
0x71CE0000 0x00075000 C:\Windows\SYSTEM32\SHCORE.DLL
0x745A0000 0x00051000 C:\Windows\SYSTEM32\bcryptPrimitives.dll
0x74940000 0x00020000 C:\Windows\system32\IMM32.DLL
0x74730000 0x000DE000 C:\Windows\SYSTEM32\MSCTF.dll
0x72100000 0x00088000 C:\Windows\system32\uxtheme.dll
0x72F70000 0x00010000 C:\Windows\system32\napinsp.dll
0x72F50000 0x00014000 C:\Windows\system32\pnrpnsp.dll
0x72F40000 0x00010000 C:\Windows\system32\NLAapi.dll
0x72F80000 0x0004A000 C:\Windows\System32\mswsock.dll
0x72740000 0x00075000 C:\Windows\SYSTEM32\DNSAPI.dll
0x72730000 0x00009000 C:\Windows\System32\winrnr.dll
0x72720000 0x00010000 C:\Windows\system32\wshbth.dll
0x72710000 0x00007000 C:\Windows\System32\rasadhlp.dll
0x74040000 0x00020000 C:\Windows\SYSTEM32\IPHLPAPI.DLL
0x73FA0000 0x00008000 C:\Windows\SYSTEM32\WINNSI.DLL
0x726D0000 0x0003F000 C:\Windows\System32\fwpuclnt.dll
0x73590000 0x00019000 C:\Windows\SYSTEM32\dwmapi.dll

Called from DOL_GETERROTEXT(0)
Called from DOLPHIN_DEFERROR(2898) in .\source\prg\tdolpsrv.prg
Called from TDOLPHINSRV:CHECKERROR(838) in .\source\prg\tdolpsrv.prg
Called from TDOLPHINSRV:UPDATE(2296) in .\source\prg\tdolpsrv.prg
Called from FERIADOS_GRABAR(343) in source\cat_feriados.prg
Called from (b)FERIADOS_EDITAR(271) in source\cat_feriados.prg
Called from TBUTTON:CLICK(163) in .\source\classes\BUTTON.PRG
Called from TBUTTON:HANDLEEVENT(1687) in .\source\classes\CONTROL.PRG
Called from _FWH(3236) in .\source\classes\WINDOW.PRG
Called from SENDMESSAGE(0)
Called from TDIALOG:COMMAND(389) in .\source\classes\DIALOG.PRG
Called from TWINDOW:HANDLEEVENT(0)
Called from TDIALOG:HANDLEEVENT(892) in .\source\classes\DIALOG.PRG
Called from DIALOGBOX(0)
Called from TDIALOG:ACTIVATE(274) in .\source\classes\DIALOG.PRG
Called from FERIADOS_EDITAR(278) in source\cat_feriados.prg
Called from (b)FERIADOS(44) in source\cat_feriados.prg
Called from TWINDOW:LDBLCLICK(1967) in .\source\classes\WINDOW.PRG
Called from TCONTROL:LDBLCLICK(1746) in .\source\classes\CONTROL.PRG
Called from TXBROWSE:LDBLCLICK(3754) in source\xbrowse.prg
Called from TWINDOW:HANDLEEVENT(0)
Called from TCONTROL:HANDLEEVENT(1733) in .\source\classes\CONTROL.PRG
Called from TXBROWSE:HANDLEEVENT(12143) in source\xbrowse.prg
Called from _FWH(3236) in .\source\classes\WINDOW.PRG
Called from DIALOGBOX(0)
Called from TDIALOG:ACTIVATE(274) in .\source\classes\DIALOG.PRG
Called from FERIADOS(60) in source\cat_feriados.prg
Called from (b)MOSTRARMENU_TABLASSOPORTE(164) in source\mod_mostrarmenu.prg
Called from TMENU:ACTIVATE(496) in .\source\classes\MENU.PRG
Called from MOSTRARMENU_TABLASSOPORTE(175) in source\mod_mostrarmenu.prg
Called from (b)MOSTRARMENU(74) in source\mod_mostrarmenu.prg
Called from TBUTTON:CLICK(163) in .\source\classes\BUTTON.PRG
Called from TBUTTON:HANDLEEVENT(1687) in .\source\classes\CONTROL.PRG
Called from _FWH(3236) in .\source\classes\WINDOW.PRG
Called from SENDMESSAGE(0)
Called from TDIALOG:COMMAND(389) in .\source\classes\DIALOG.PRG
Called from TWINDOW:HANDLEEVENT(0)
Called from TDIALOG:HANDLEEVENT(892) in .\source\classes\DIALOG.PRG
Called from _FWH(3236) in .\source\classes\WINDOW.PRG
Called from WINRUN(0)
Called from TWINDOW:ACTIVATE(1003) in .\source\classes\WINDOW.PRG
Called from MAIN(62) in source\mod_credicom.prg
------------------------------------------------------------------------

Salu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
User avatar
carlos vargas
 
Posts: 1708
Joined: Tue Oct 11, 2005 5:01 pm
Location: Nicaragua
Top

Re: Dolphin error en DOL_GETERROTEXT

Postby Daniel Garcia-Gil » Mon Nov 11, 2013 3:06 am

Carlos

verifica cual es el numero del error interno, debe estar en la variable nError
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita
Top

Re: Dolphin error en DOL_GETERROTEXT

Postby carlos vargas » Mon Nov 11, 2013 4:16 am

9012
Salu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
User avatar
carlos vargas
 
Posts: 1708
Joined: Tue Oct 11, 2005 5:01 pm
Location: Nicaragua
Top

Re: Dolphin error en DOL_GETERROTEXT

Postby Daniel Garcia-Gil » Mon Nov 11, 2013 4:12 pm

Carlos

Estas usando algún codepage o seleccionado algún idioma a nivel de harbour?
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita
Top

Re: Dolphin error en DOL_GETERROTEXT

Postby carlos vargas » Mon Nov 11, 2013 4:30 pm

Daniel este es el procedimiento que uso para configurar

Code: Select all  Expand view

FUNCTION Main_Configurar()
   LOCAL cPath      := Upper( CurDrive() + ":\" + CurDir() )
   LOCAL lContinuar := FALSE

   HB_LangSelect(  "ESWIN" )
   HB_SetCodePage( "ESWIN" )

   SET DEFAULTCLPVALUE ON
   SET LOGICALVALUE    ON
   SET CASESENSITIVE   ON
   SET PADRIGHT        OFF

   Set_MyLang( "es_ES" )

   RddSetDefault( "DBFCDX" )

   SET DEFAULT      TO ".\DATOS\"
   SET DECIMAL      TO 4
   SET EPOCH        TO 1930
   SET DATE         BRIT
   SET PATH         TO ( cPath + ";" + cPath + "\DATOS" + ";" + cPath + "\REPORTS" )
   SET SOFTSEEK     OFF
   SET CENTURY      ON
   SET OPTIMIZE     ON
   SET CONFIRM      ON
   SET DELETED      ON
   SET FIXED        ON
   SET TRIMFILENAME ON
   SET DIRCASE      LOWER
   SET FILECASE     LOWER

   SetKinetic( FALSE )
   SetDialogEsc( FALSE )
   SetGetColorFocus( CLR_MENTA )
   SetPostErrorAction( {|| Main_Cerrar() } )

   OverrideAndExtend()

   WITH OBJECT tGet()
      :lSetSel     := TRUE
      :lDisColors  := FALSE
      :nClrTextDis := CLR_BLUE
      :nClrPaneDis := CLR_SOFTYELLOW
   END

   IF Conectar()
      lContinuar := TRUE
   ENDIF

RETURN lContinuar
Salu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
User avatar
carlos vargas
 
Posts: 1708
Joined: Tue Oct 11, 2005 5:01 pm
Location: Nicaragua
Top

Re: Dolphin error en DOL_GETERROTEXT

Postby carlos vargas » Wed Nov 13, 2013 2:24 am

uo
Salu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
User avatar
carlos vargas
 
Posts: 1708
Joined: Tue Oct 11, 2005 5:01 pm
Location: Nicaragua
Top

Re: Dolphin error en DOL_GETERROTEXT

Postby Daniel Garcia-Gil » Wed Nov 13, 2013 4:56 am

Carlos

no se si algo cambio en Harbour pero prueba colocar estas lineas en el fuente gerrapi.c

Code: Select all  Expand view
static G_LANG LangInstalled[] = {
  { "EN", &LoadMsgsEN, 0 },
  { "ES", &LoadMsgsES, 0 },
  { "es.ESWIN", &LoadMsgsES, 0 }  
};
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita
Top

Re: Dolphin error en DOL_GETERROTEXT

Postby carlos vargas » Wed Nov 13, 2013 7:33 pm

excelente daniel, ha funcionado bien,
puedes modificar esto en el modulo del server
method update
Code: Select all  Expand view
     
      IF nPos == 0
         ::nInternalError = ERR_INVALIDFIELDNAME
         ::CheckError(, cField )  //aca agregar cField como dato extra
         RETURN .F.
      ENDIF
 


salu2
carlos vargas
Salu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
User avatar
carlos vargas
 
Posts: 1708
Joined: Tue Oct 11, 2005 5:01 pm
Location: Nicaragua
Top
Post a reply

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Cgallegoa and 26 guests

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group