FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour Reason for closing DBF file
russimicro
Posts: 410
Joined: Sun Jan 31, 2010 03:30 PM
Re: Reason for closing DBF file
Posted: Tue Sep 19, 2023 04:01 PM

Buen dia---

Ocurre en equipos locales y tambien en redes ( terminal server o unidad compartida)

russimicro
Posts: 410
Joined: Sun Jan 31, 2010 03:30 PM
Re: Reason for closing DBF file
Posted: Tue Sep 19, 2023 04:05 PM

Stack Calls

===========

Called from: .\source\classes\PDMENU.PRG => FW_MENUDRAW( 941 )

Called from: .\source\classes\WINDOW.PRG => TMETROBTN:DRAWITEM( 1265 )

Called from: => TWINDOW:HANDLEEVENT( 0 )

Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1857 )

Called from: .\source\classes\BTNBMP.PRG => TMETROBTN:HANDLEEVENT( 2135 )

Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 )

Called from: => TRACKPOPUP( 0 )

Called from: .\source\classes\MENU.PRG => TMENU:ACTIVATE( 1805 )

Called from: C:\FWH23\source\classes\metropnl.prg => TMETROBTN:DESIGNMENU( 825 )

Called from: C:\FWH23\source\classes\metropnl.prg => (b)TMETROBTN:NEW( 609 )

Called from: .\source\classes\WINDOW.PRG => TMETROBTN:RBUTTONDOWN( 2188 )

Called from: => TWINDOW:HANDLEEVENT( 0 )

Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1857 )

Called from: .\source\classes\BTNBMP.PRG => TMETROBTN:HANDLEEVENT( 2135 )

Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 )

Called from: => WINRUN( 0 )

Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 1118 )

Called from: FUENTES\COMUNES\FW_FUNCSST3.PRG => PRINCIPAL_METRO( 7079 )

Called from: FUENTES\COMUNES\FW_FUNCSST1.PRG => PRINCIPAL( 1341 )

Called from: FUENTES\MAIN\ZerusMain.prg => ZERUSMAIN( 4225 )

Called from: zeruswin.prg => MAIN( 17 )

Time from start: 3 hours 18 mins 13 secs

Error occurred at: 09/18/2023, 18:47:05

Error description: Error BASE/1002 No existe el alias: CLI

Stack Calls

===========

// como comente anteriormente ... en este punto esporádicamente se da el error ( puede suceder después de miles de pasos exitosos por este proceso )...

// y asi puede suceder en cualquier parte del codigo.... se cierra la app...

Called from: FUENTES\GESTION\INVENTARIOS\FACTCAPT.PRG => A_FACTCAPT_CAPTURA_( 647 )

Called from: FUENTES\GESTION\INVENTARIOS\FACTCAPT.PRG => A_FACTCAPT_CAPTURA( 59 )

Called from: FUENTES\COMUNES\FW_FUNCSST3.PRG => (b)TOUCHMENU3( 7608 )

Called from: source\classes\metropnl.prg => (b)TMETROBTN:NEW( 607 )

Called from: Source\Classes\window.prg => TWINDOW:LBUTTONUP( 2121 )

Called from: Source\Classes\control.prg => TCONTROL:LBUTTONUP( 677 )

Called from: Source\Classes\btnbmp.prg => TMETROBTN:LBUTTONUP( 718 )

Called from: Source\Classes\control.prg => TCONTROL:HANDLEEVENT( 1723 )

Called from: Source\Classes\btnbmp.prg => TMETROBTN:HANDLEEVENT( 1557 )

Called from: Source\Classes\window.prg => _FWH( 3450 )

Called from: => WINRUN( 0 )

Called from: Source\Classes\window.prg => TWINDOW:ACTIVATE( 1152 )

Called from: FUENTES\COMUNES\FW_FUNCSST3.PRG => PRINCIPAL_METRO( 6411 )

Called from: FUENTES\COMUNES\FW_FUNCSST1.PRG => PRINCIPAL( 1323 )

Called from: FUENTES\MAIN\ZerusMain.prg => ZERUSMAIN( 4107 )

Called from: FUENTES\MAIN\ZerusWin.prg => MAIN( 17 )

russimicro
Posts: 410
Joined: Sun Jan 31, 2010 03:30 PM
Re: Reason for closing DBF file
Posted: Tue Sep 19, 2023 04:11 PM

Time from start: 0 hours 5 mins 3 secs

Error occurred at: 09/18/2023, 17:03:32

Error description: Error BASE/1002 No existe el alias: ART

Stack Calls

===========

Called from: FUENTES\GESTION\INVENTARIOS\INTERFW2.PRG => LLEEMVTOS( 656 )

Called from: FUENTES\GESTION\INVENTARIOS\FACTCAPT.PRG => A_FACTCAPT_CAPTURA_( 871 )

Called from: FUENTES\GESTION\INVENTARIOS\FACTCAPT.PRG => A_FACTCAPT_CAPTURA( 71 )

Called from: FUENTES\COMUNES\FW_FUNCSST3.PRG => (b)TOUCHMENU3( 8306 )

Called from: C:\FWH23\source\classes\metropnl.prg => (b)TMETROBTN:NEW( 618 )

Called from: .\source\classes\WINDOW.PRG => TWINDOW:LBUTTONUP( 2115 )

Called from: .\source\classes\CONTROL.PRG => TCONTROL:LBUTTONUP( 721 )

Called from: .\source\classes\BTNBMP.PRG => TMETROBTN:LBUTTONUP( 1036 )

Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1847 )

Called from: .\source\classes\BTNBMP.PRG => TMETROBTN:HANDLEEVENT( 2135 )

Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 )

Called from: => WINRUN( 0 )

Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 1118 )

Called from: FUENTES\COMUNES\FW_FUNCSST3.PRG => PRINCIPAL_METRO( 7079 )

Called from: FUENTES\COMUNES\FW_FUNCSST1.PRG => PRINCIPAL( 1341 )

Called from: FUENTES\MAIN\ZerusMain.prg => ZERUSMAIN( 4225 )

Called from: zeruswin.prg => MAIN( 17 )

karinha
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Reason for closing DBF file
Posted: Tue Sep 19, 2023 05:05 PM

????

Called from: FUENTES\COMUNES\FW_FUNCSST3.PRG => PRINCIPAL_METRO( 7079 )

Called from: FUENTES\COMUNES\FW_FUNCSST1.PRG => PRINCIPAL( 1341 )

algo no está bien en estas dos FUNCTIONS.

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
russimicro
Posts: 410
Joined: Sun Jan 31, 2010 03:30 PM
Re: Reason for closing DBF file
Posted: Wed Sep 20, 2023 02:45 PM

Time from start: 10 hours 50 mins 45 secs

Error occurred at: 09/19/2023, 18:31:36

Error description: Error BASE/1002 No existe el alias: CLI

Stack Calls

===========

Called from: => DBSETRELATION( 0 )

Called from: FUENTES\GESTION\INVENTARIOS\FACTELEC.PRG => ENVIAFEL( 593 )

Called from: FUENTES\COMUNES\FW_FUNCSST1.PRG => (b)BROWSEMY( 5171 )

Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 792 )

Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 1083 )

Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONDOWN( 1016 )

Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1844 )

Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 2135 )

Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 )

Called from: => DIALOGBOXINDIRECT( 0 )

Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 307 )

Called from: FUENTES\COMUNES\FW_FUNCSST1.PRG => BROWSEMY( 5351 )

Called from: FUENTES\GESTION\INVENTARIOS\FACTELEC.PRG => ESTADOFE( 329

russimicro
Posts: 410
Joined: Sun Jan 31, 2010 03:30 PM
Re: Reason for closing DBF file
Posted: Wed Sep 20, 2023 02:45 PM

Time from start: 0 hours 2 mins 27 secs

Error occurred at: 09/19/2023, 10:41:33

Error description: Error BASE/1002 No existe el alias: CAD

Stack Calls

===========

Called from: FUENTES\CEMENTERIO\FW_REGISTRO_CEMENTERIO.PRG => CONSULTARCADAVER( 9894 )

Called from: FUENTES\CEMENTERIO\FW_REGISTRO_CEMENTERIO.PRG => (b)LEEREGISTROSCEMENTERIO( 567 )

Called from: Source\Classes\btnbmp.prg => TBTNBMP:CLICK( 536 )

Called from: Source\Classes\btnbmp.prg => TBTNBMP:LBUTTONUP( 764 )

Called from: Source\Classes\control.prg => TCONTROL:HANDLEEVENT( 1723 )

Called from: Source\Classes\btnbmp.prg => TBTNBMP:HANDLEEVENT( 1557 )

Called from: Source\Classes\window.prg => _FWH( 3450 )

Called from: => DIALOGBOXINDIRECT( 0 )

Called from: Source\Classes\dialog.prg => TDIALOG:ACTIVATE( 286 )

Called from: FUENTES\CEMENTERIO\FW_REGISTRO_CEMENTERIO.PRG => REGISTROCEMENTERIO( 319 )

Called from: FUENTES\GESTION\INVENTARIOS\INTERFW2.PRG => SELECCIONAMESAS( 19454 )

Time from start: 6 hours 8 mins 5 secs

Error occurred at: 09/19/2023, 17:20:05

Error description: Error BASE/1002 No existe el alias: LEC

Stack Calls

===========

Called from: FUENTES\COMUNES\FUNCSLIB.PRG => SELECTAREA_INV( 27326 )

Called from: FUENTES\GESTION\INVENTARIOS\INTERFW2.PRG => LLEEMVTOS( 704 )

Called from: FUENTES\GESTION\INVENTARIOS\FACTCAPT.PRG => A_FACTCAPT_CAPTURA_( 818 )

Called from: FUENTES\GESTION\INVENTARIOS\FACTCAPT.PRG => A_FACTCAPT_CAPTURA( 57 )

Called from: FUENTES\COMUNES\FW_FUNCSST3.PRG => (b)TOUCHMENU3( 7931 )

Called from: source\classes\metropnl.prg => (b)TMETROBTN:NEW( 607 )

Called from: Source\Classes\window.prg => TWINDOW:LBUTTONUP( 2121 )

Called from: Source\Classes\control.prg => TCONTROL:LBUTTONUP( 677 )

russimicro
Posts: 410
Joined: Sun Jan 31, 2010 03:30 PM
Re: Reason for closing DBF file
Posted: Wed Sep 20, 2023 02:54 PM

IF !lUsaTab(cPatLoc+"\",FilePag,'TEM',{},.F.,NIL,"DBFCDX")

      MYMEN("Error grave. No fue posible abrir archivo  : "+FilePag )

      RETURN

   ENDIF





   SELECT TEM

TEM->( DBGOTOP() ) // hay casos como este... después de una apertura y del mismo select reporta tabla cerrada

   IF FILE( PathPag+cNomTab ) // SIEMPRE SERAN DBF'S
Jimmy
Posts: 1772
Joined: Thu Sep 05, 2019 05:32 AM
Re: Reason for closing DBF file
Posted: Wed Sep 20, 2023 03:18 PM
hi,
russimicro wrote:IF !lUsaTab(cPatLoc+"\",FilePag,'TEM',{},.F.,NIL,"DBFCDX")
MYMEN("Error grave. No fue posible abrir archivo : "+FilePag )
RETURN
ENDIF

SELECT TEM

TEM->( DBGOTOP() ) // hay casos como este... después de una apertura y del mismo select reporta tabla cerrada

IF FILE( PathPag+cNomTab ) // SIEMPRE SERAN DBF'S
can you please show CODE from Function lUsaTab()

where do you "open" *.CDX and use ORDSETFOCUS() :?:
greeting,

Jimmy
russimicro
Posts: 410
Joined: Sun Jan 31, 2010 03:30 PM
Re: Reason for closing DBF file
Posted: Sun Sep 24, 2023 10:39 AM

cDriVer := "DBFCDX" // PARAMETRO DE LA FUNCION

DBUSEAREA(.T.,cDriVer,cPatTab+cNomTab,cAliTab,lShared,lReaOnl)

IF ( cDriVer == "DBFCDX" .OR. cDriVer == "ADS" ) .AND. !EMPTY(cPatTab)
cNomArc := ALLTRIM(SUBS(cNomTab,1,8))+'.CDX'
IF FILE(cPatTab+cNomArc)
IF SELECT (cAliTab) <> 0
SELECT (cAliTab) // POR SI LA TABLA TIENE INDIXE Y NO SE ABRIO
(cAliTab)->( DBSETORDER(1) )
ENDIF
ENDIF
ENDIF

// YA EN LA LOGICA LO CAMBIO SEGUN NECESIDAD : (cAliTab)->( DBSETORDER(X) )

Continue the discussion

Static archive · New replies & topics via GitHub Discussions