Problemas al migrar desde FWH2012 a FWH2307 - cerrado

[CARLOS ATUNCAR]

Saludos tengo unos problemas con un mismo proyecto compilado con fwh2023/07 y fwh2020/12
trabajo con xMate y tengo un entorno para la version 2020/12 la cual he copiado para la nueva version 2023/07
solo cambia la ruta de las lib y includes pero al compilar con la version 2020/12 se logro establecer conexion a la base de datos con mariadb leendo los parametros de un archivo ini que se encuentra en la misma carpeta pero cuando cambio el entorno a la version 2023/07 no logro conectar al servidor y he encontrado la razon que es que no ubica el archivo INI que se encuentra en la misma carpeta, vuelvo a cambiar en entorno a 2020/12 y si conecta al servidor. Que puede estar mal ?
esta es la funcion de conexion

Function ConectMySql( cDbName )
LOCAL hIni
LOCAL oServer
LOCAL oErr,nFlags,cUser,cPassword,nPort,cServer

hIni := 0
oServer := NIL
nFlags := 0

If File(".\connect.ini")
cServer := GetPvProfString("mysql","host" ," " ,".\connect.ini")
cUser := GetPvProfString("mysql","user" ," " ,".\connect.ini")
cPassword := GetPvProfString("mysql","psw" ," " ,".\connect.ini")
nPort := GetPvProfString("mysql","port" ," " ,".\connect.ini")
*cDBName := GetPvProfString("mysql","dbname" ," " ,".\connect.ini")

TRY
FWCONNECT oServer HOST cServer ;
USER cUser ;
PASSWORD cPassword ;
DATABASE cDBName

CATCH oErr
oServer:ShowError()
END
Else
?"NO FILE" // mensaje con la version 2023/07
EndIf

RETURN oServer






mi archivo de entorno de proyecto con version 2023/07

[Version]
Type=xMate
Number=1.15

[Info]
Type=Executable
Architecture=fwh2307MariaDb
Include=%C_INSTALL%\include;E:\Tools\fwh2307\include;%HB_INSTALL%\include
Define=

[xMate]
Create Map/List File=No

[Project]
Run=%HOME%\bin\Wc-Sire.Exe
Params=
Final Path=%HOME%\bin
Maintain LNK=Yes
Default Type=1
Error log=

[Data Path]
Dbf=

[Editor]
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\menu.prg=1,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\Sire.prg=2,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\ventas.prg=3,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\FUNCIONS.PRG=4,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\connect.prg=5,N,Y

[Files]
%HOME%\Source\menu.prg=1,.F.,6,83,
%HOME%\Source\connect.prg=2,.F.,25,96,
%HOME%\Source\ventas.prg=3,.F.,11,1,
%HOME%\Source\FUNCIONS.PRG=4,.F.,40,20,
E:\Tools\Clases\TPublic.prg=5,.F.,0,0,
%HOME%\Resource\SireResource.res=6,.F.,0,0,
%HOME%\Source\Sire.prg=7,.F.,7,1,
%C_LIB_INSTALL%\C0W32.OBJ=8,.T.,0,0,
E:\Tools\fwh2307\lib\FiveHX.lib=9,.T.,0,0,
E:\Tools\fwh2307\lib\FiveHC.lib=10,.T.,0,0,
E:\Tools\fwh2307\lib\pgsql.lib=11,.T.,0,0,
E:\Tools\fwh2307\lib\libpq.lib=12,.T.,0,0,
%HB_LIB_INSTALL%\hbhpdf.lib=13,.T.,0,0,
%HB_LIB_INSTALL%\libharu.lib=14,.T.,0,0,
%HB_LIB_INSTALL%\png.lib=15,.T.,0,0,
%HB_LIB_INSTALL%\rtl.lib=16,.T.,0,0,
%HB_LIB_INSTALL%\vm.lib=17,.T.,0,0,
%HB_LIB_INSTALL%\gtgui.lib=18,.T.,0,0,
%HB_LIB_INSTALL%\lang.lib=19,.T.,0,0,
%HB_LIB_INSTALL%\macro.lib=20,.T.,0,0,
%HB_LIB_INSTALL%\rdd.lib=21,.T.,0,0,
%HB_LIB_INSTALL%\dbfntx.lib=22,.T.,0,0,
%HB_LIB_INSTALL%\dbfcdx.lib=23,.T.,0,0,
%HB_LIB_INSTALL%\dbffpt.lib=24,.T.,0,0,
%HB_LIB_INSTALL%\hbsix.lib=25,.T.,0,0,
%HB_LIB_INSTALL%\debug.lib=26,.T.,0,0,
%HB_LIB_INSTALL%\common.lib=27,.T.,0,0,
%HB_LIB_INSTALL%\codepage.lib=28,.T.,0,0,
%HB_LIB_INSTALL%\pp.lib=29,.T.,0,0,
%HB_LIB_INSTALL%\pcrepos.lib=30,.T.,0,0,
%HB_LIB_INSTALL%\ct.lib=31,.T.,0,0,
%HB_LIB_INSTALL%\zlib.lib=32,.T.,0,0,
%HB_LIB_INSTALL%\hbzip.lib=33,.T.,0,0,
%HB_LIB_INSTALL%\hbmzip.lib=34,.T.,0,0,
%HB_LIB_INSTALL%\libmisc.lib=35,.T.,0,0,
%HB_LIB_INSTALL%\tip.lib=36,.T.,0,0,
%HB_LIB_INSTALL%\hbzebra.lib=37,.T.,0,0,
%HB_LIB_INSTALL%\hbmxml.lib=38,.T.,0,0,
%C_LIB_INSTALL%\CW32.LIB=39,.T.,0,0,
%C_LIB_INSTALL%\IMPORT32.LIB=40,.T.,0,0,
%C_LIB_INSTALL%\uuid.lib=41,.T.,0,0,
%C_LIB_INSTALL%\win32\ws2_32.lib=42,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\ws2_32.lib=43,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\odbc32.lib=44,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\rasapi32.lib=45,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\nddeapi.lib=46,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\msimg32.lib=47,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\psapi.lib=48,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\GdiPlus.lib=49,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\iphlpapi.lib=50,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\shell32.lib=51,.T.,0,0,
E:\Tools\fwh2307\lib\libmariadb.lib=52,.T.,0,0,

mi archivo de entorno del xMate 2023/07

[Environment]
Description 1=xHarbour 1.2.3+ FWH 23.07+Bcc74+xMate 1.15
Description 2=
Description 3=
PRG Compiler ver=xHarbour 123 20200311
C compiler ver=Bcc74
Subsystem=
Author=Ing. Carlos Atuncar
Last update=09/12/2023

[Advanced]
Command types=1,1,1,1,1,1,1,1,1

[Harbour]
HB_INSTALL=E:\Tools\xharbour_bcc74
HB_COMMAND=%HB_BIN_INSTALL%\Harbour.Exe %PRG% /m /n /gc0 /es2 /i%HB_INC_INSTALL% /dHB_API_MACROS /dHB_FM_STATISTICS_OFF /dHB_STACK_MACROS /i%HB_INSTALL%\Contrib\What32\Include
Option prefix=/

[C]
C_INSTALL=E:\Tools\bcc74
C_COMP_COMMAND=%C_BIN_INSTALL%\Bcc32.Exe -M -c -I%HB_INC_INSTALL%;%C_INC_INSTALL% -n%HOME%\Obj %C%
C_LIB_COMMAND=%C_BIN_INSTALL%\TLib.Exe %LIB% /P512 @%RSP% , %LST%
C_LINK_COMMAND=%C_BIN_INSTALL%\iLink32.Exe -Gn -aa -Tpe -s -v @%LNK%
C_RC_COMMAND=%C_BIN_INSTALL%\Brc32.Exe -r -I%C_BIN_INSTALL%\include -I%C_BIN_INSTALL%\include\windows\sdk -fo%RES% %RC%
C_DLL_COMMAND=%C_BIN_INSTALL%\iLink32.Exe -Tpd -aa -s -L%LIB%\lib\PSDK @%LNK%
Option prefix=-

[User]
POSTEXE_COMMAND=
POSTLIB_COMMAND=
POSTDLL_COMMAND=

[Files]
%C_LIB_INSTALL%\C0W32.OBJ=1
E:\Tools\fwh2307\lib\FiveHX.lib=2
E:\Tools\fwh2307\lib\FiveHC.lib=3
E:\Tools\fwh2307\lib\pgsql.lib=4
E:\Tools\fwh2307\lib\libpq.lib=5
%HB_LIB_INSTALL%\hbhpdf.lib=6
%HB_LIB_INSTALL%\libharu.lib=7
%HB_LIB_INSTALL%\png.lib=8
%HB_LIB_INSTALL%\rtl.lib=9
%HB_LIB_INSTALL%\vm.lib=10
%HB_LIB_INSTALL%\gtgui.lib=11
%HB_LIB_INSTALL%\lang.lib=12
%HB_LIB_INSTALL%\macro.lib=13
%HB_LIB_INSTALL%\rdd.lib=14
%HB_LIB_INSTALL%\dbfntx.lib=15
%HB_LIB_INSTALL%\dbfcdx.lib=16
%HB_LIB_INSTALL%\dbffpt.lib=17
%HB_LIB_INSTALL%\hbsix.lib=18
%HB_LIB_INSTALL%\debug.lib=19
%HB_LIB_INSTALL%\common.lib=20
%HB_LIB_INSTALL%\codepage.lib=21
%HB_LIB_INSTALL%\pp.lib=22
%HB_LIB_INSTALL%\pcrepos.lib=23
%HB_LIB_INSTALL%\ct.lib=24
%HB_LIB_INSTALL%\zlib.lib=25
%HB_LIB_INSTALL%\hbzip.lib=26
%HB_LIB_INSTALL%\hbmzip.lib=27
%HB_LIB_INSTALL%\libmisc.lib=28
%HB_LIB_INSTALL%\tip.lib=29
%HB_LIB_INSTALL%\hbzebra.lib=30
%HB_LIB_INSTALL%\hbmxml.lib=31
%C_LIB_INSTALL%\CW32.LIB=32
%C_LIB_INSTALL%\IMPORT32.LIB=33
%C_LIB_INSTALL%\uuid.lib=34
%C_LIB_INSTALL%\win32\ws2_32.lib=35
%C_LIB_INSTALL%\win32\psdk\ws2_32.lib=36
%C_LIB_INSTALL%\win32\psdk\odbc32.lib=37
%C_LIB_INSTALL%\win32\psdk\rasapi32.lib=38
%C_LIB_INSTALL%\win32\psdk\nddeapi.lib=39
%C_LIB_INSTALL%\win32\psdk\msimg32.lib=40
%C_LIB_INSTALL%\win32\psdk\psapi.lib=41
%C_LIB_INSTALL%\win32\psdk\GdiPlus.lib=42
%C_LIB_INSTALL%\win32\psdk\iphlpapi.lib=43
%C_LIB_INSTALL%\win32\psdk\shell32.lib=44
E:\Tools\fwh2307\lib\libmariadb.lib=45
E:\Tools\Libs\SButtonX.LIB=46

[DLL Files]
E:\Tools\fwh2307\lib\FiveHX.lib=1
E:\Tools\fwh2307\lib\FiveHC.lib=2
%C_LIB_INSTALL%\C0W32.OBJ=3
%HB_LIB_INSTALL%\rtl.lib=4
%HB_LIB_INSTALL%\vm.lib=5
%HB_LIB_INSTALL%\gtgui.lib=6
%HB_LIB_INSTALL%\lang.lib=7
%HB_LIB_INSTALL%\macro.lib=8
%HB_LIB_INSTALL%\rdd.lib=9
%HB_LIB_INSTALL%\dbfntx.lib=10
%HB_LIB_INSTALL%\dbfcdx.lib=11
%HB_LIB_INSTALL%\dbffpt.lib=12
%HB_LIB_INSTALL%\hbsix.lib=13
%HB_LIB_INSTALL%\debug.lib=14
%HB_LIB_INSTALL%\common.lib=15
%HB_LIB_INSTALL%\pp.lib=16
%HB_LIB_INSTALL%\pcrepos.lib=17
%HB_LIB_INSTALL%\ct.lib=18
%HB_LIB_INSTALL%\zlib.lib=19
%HB_LIB_INSTALL%\hbzip.lib=20
%C_LIB_INSTALL%\CW32.LIB=21
%C_LIB_INSTALL%\IMPORT32.LIB=22
%C_LIB_INSTALL%\uuid.lib=23
%HB_LIB_INSTALL%\codepage.lib=24
%C_LIB_INSTALL%\win32\psdk\odbc32.lib=25
%C_LIB_INSTALL%\win32\psdk\rasapi32.lib=26
%C_LIB_INSTALL%\win32\psdk\nddeapi.lib=27
%C_LIB_INSTALL%\win32\psdk\msimg32.lib=28
%C_LIB_INSTALL%\win32\psdk\psapi.lib=29
%C_LIB_INSTALL%\win32\psdk\iphlpapi.lib=30

Mi archivo de entorno de proyecto 2020/12


[Version]
Type=xMate
Number=1.15

[Info]
Type=Executable
Architecture=fwh2012MySql2023
Include=%C_INSTALL%\include;E:\Tools\fwh2012\include;%HB_INSTALL%\include
Define=

[xMate]
Create Map/List File=No

[Project]
Run=%HOME%\bin\Wc-Sire.Exe
Params=
Final Path=%HOME%\bin
Maintain LNK=Yes
Default Type=1
Error log=

[Data Path]
Dbf=

[Editor]
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\menu.prg=1,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\Sire.prg=2,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\ventas.prg=3,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\FUNCIONS.PRG=4,N,N
D:\MySql\WinContaPro\Sire\Wc-Sire\Source\connect.prg=5,N,Y

[Files]
%HOME%\Source\menu.prg=1,.F.,6,83,
%HOME%\Source\connect.prg=2,.F.,25,96,
%HOME%\Source\ventas.prg=3,.F.,11,1,
%HOME%\Source\FUNCIONS.PRG=4,.F.,40,20,
E:\Tools\Clases\TPublic.prg=5,.F.,0,0,
%HOME%\Resource\SireResource.res=6,.F.,0,0,
%HOME%\Source\Sire.prg=7,.F.,7,1,
%C_LIB_INSTALL%\C0W32.OBJ=8,.T.,0,0,
E:\Tools\fwh2012\lib\FiveHX.lib=9,.T.,0,0,
E:\Tools\fwh2012\lib\FiveHC.lib=10,.T.,0,0,
E:\Tools\fwh2012\lib\pgsql.lib=11,.T.,0,0,
E:\Tools\fwh2012\lib\libpq.lib=12,.T.,0,0,
%HB_LIB_INSTALL%\hbhpdf.lib=13,.T.,0,0,
%HB_LIB_INSTALL%\libharu.lib=14,.T.,0,0,
%HB_LIB_INSTALL%\png.lib=15,.T.,0,0,
%HB_LIB_INSTALL%\rtl.lib=16,.T.,0,0,
%HB_LIB_INSTALL%\vm.lib=17,.T.,0,0,
%HB_LIB_INSTALL%\gtgui.lib=18,.T.,0,0,
%HB_LIB_INSTALL%\lang.lib=19,.T.,0,0,
%HB_LIB_INSTALL%\macro.lib=20,.T.,0,0,
%HB_LIB_INSTALL%\rdd.lib=21,.T.,0,0,
%HB_LIB_INSTALL%\dbfntx.lib=22,.T.,0,0,
%HB_LIB_INSTALL%\dbfcdx.lib=23,.T.,0,0,
%HB_LIB_INSTALL%\dbffpt.lib=24,.T.,0,0,
%HB_LIB_INSTALL%\hbsix.lib=25,.T.,0,0,
%HB_LIB_INSTALL%\debug.lib=26,.T.,0,0,
%HB_LIB_INSTALL%\common.lib=27,.T.,0,0,
%HB_LIB_INSTALL%\codepage.lib=28,.T.,0,0,
%HB_LIB_INSTALL%\pp.lib=29,.T.,0,0,
%HB_LIB_INSTALL%\pcrepos.lib=30,.T.,0,0,
%HB_LIB_INSTALL%\ct.lib=31,.T.,0,0,
%HB_LIB_INSTALL%\zlib.lib=32,.T.,0,0,
%HB_LIB_INSTALL%\hbzip.lib=33,.T.,0,0,
%HB_LIB_INSTALL%\hbmzip.lib=34,.T.,0,0,
%HB_LIB_INSTALL%\libmisc.lib=35,.T.,0,0,
%HB_LIB_INSTALL%\tip.lib=36,.T.,0,0,
%HB_LIB_INSTALL%\hbzebra.lib=37,.T.,0,0,
%HB_LIB_INSTALL%\hbmxml.lib=38,.T.,0,0,
%C_LIB_INSTALL%\CW32.LIB=39,.T.,0,0,
%C_LIB_INSTALL%\IMPORT32.LIB=40,.T.,0,0,
%C_LIB_INSTALL%\uuid.lib=41,.T.,0,0,
%C_LIB_INSTALL%\win32\ws2_32.lib=42,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\ws2_32.lib=43,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\odbc32.lib=44,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\rasapi32.lib=45,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\nddeapi.lib=46,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\msimg32.lib=47,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\psapi.lib=48,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\GdiPlus.lib=49,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\iphlpapi.lib=50,.T.,0,0,
%C_LIB_INSTALL%\win32\psdk\shell32.lib=51,.T.,0,0,
E:\Tools\fwh2012\lib\libmariadb.lib=52,.T.,0,0,
E:\Tools\libs\SButtonX.lib=53,.T.,0,0,

Mi archivo de entorno xMate 2020/12


[Environment]
Description 1=xHarbour 1.2.3+ FWH 20.12+Bcc74+xMate 1.15
Description 2=
Description 3=
PRG Compiler ver=xHarbour 123 20200311
C compiler ver=Bcc74
Subsystem=
Author=Ing. Carlos Atuncar
Last update=07/28/2023

[Advanced]
Command types=1,1,1,1,1,1,1,1,1

[Harbour]
HB_INSTALL=E:\Tools\xharbour_bcc74
HB_COMMAND=%HB_BIN_INSTALL%\Harbour.Exe %PRG% /m /n /gc0 /es2 /i%HB_INC_INSTALL% /dHB_API_MACROS /dHB_FM_STATISTICS_OFF /dHB_STACK_MACROS /i%HB_INSTALL%\Contrib\What32\Include
Option prefix=/

[C]
C_INSTALL=E:\Tools\bcc74
C_COMP_COMMAND=%C_BIN_INSTALL%\Bcc32.Exe -M -c -I%HB_INC_INSTALL%;%C_INC_INSTALL% -n%HOME%\Obj %C%
C_LIB_COMMAND=%C_BIN_INSTALL%\TLib.Exe %LIB% /P512 @%RSP% , %LST%
C_LINK_COMMAND=%C_BIN_INSTALL%\iLink32.Exe -Gn -aa -Tpe -s -v @%LNK%
C_RC_COMMAND=%C_BIN_INSTALL%\Brc32.Exe -r -I%C_BIN_INSTALL%\include -I%C_BIN_INSTALL%\include\windows\sdk -fo%RES% %RC%
C_DLL_COMMAND=%C_BIN_INSTALL%\iLink32.Exe -Tpd -aa -s -L%LIB%\lib\PSDK @%LNK%
Option prefix=-

[User]
POSTEXE_COMMAND=
POSTLIB_COMMAND=
POSTDLL_COMMAND=

[Files]
%C_LIB_INSTALL%\C0W32.OBJ=1
E:\Tools\fwh2012\lib\FiveHX.lib=2
E:\Tools\fwh2012\lib\FiveHC.lib=3
E:\Tools\fwh2012\lib\pgsql.lib=4
E:\Tools\fwh2012\lib\libpq.lib=5
%HB_LIB_INSTALL%\hbhpdf.lib=6
%HB_LIB_INSTALL%\libharu.lib=7
%HB_LIB_INSTALL%\png.lib=8
%HB_LIB_INSTALL%\rtl.lib=9
%HB_LIB_INSTALL%\vm.lib=10
%HB_LIB_INSTALL%\gtgui.lib=11
%HB_LIB_INSTALL%\lang.lib=12
%HB_LIB_INSTALL%\macro.lib=13
%HB_LIB_INSTALL%\rdd.lib=14
%HB_LIB_INSTALL%\dbfntx.lib=15
%HB_LIB_INSTALL%\dbfcdx.lib=16
%HB_LIB_INSTALL%\dbffpt.lib=17
%HB_LIB_INSTALL%\hbsix.lib=18
%HB_LIB_INSTALL%\debug.lib=19
%HB_LIB_INSTALL%\common.lib=20
%HB_LIB_INSTALL%\codepage.lib=21
%HB_LIB_INSTALL%\pp.lib=22
%HB_LIB_INSTALL%\pcrepos.lib=23
%HB_LIB_INSTALL%\ct.lib=24
%HB_LIB_INSTALL%\zlib.lib=25
%HB_LIB_INSTALL%\hbzip.lib=26
%HB_LIB_INSTALL%\hbmzip.lib=27
%HB_LIB_INSTALL%\libmisc.lib=28
%HB_LIB_INSTALL%\tip.lib=29
%HB_LIB_INSTALL%\hbzebra.lib=30
%HB_LIB_INSTALL%\hbmxml.lib=31
%C_LIB_INSTALL%\CW32.LIB=32
%C_LIB_INSTALL%\IMPORT32.LIB=33
%C_LIB_INSTALL%\uuid.lib=34
%C_LIB_INSTALL%\win32\ws2_32.lib=35
%C_LIB_INSTALL%\win32\psdk\ws2_32.lib=36
%C_LIB_INSTALL%\win32\psdk\odbc32.lib=37
%C_LIB_INSTALL%\win32\psdk\rasapi32.lib=38
%C_LIB_INSTALL%\win32\psdk\nddeapi.lib=39
%C_LIB_INSTALL%\win32\psdk\msimg32.lib=40
%C_LIB_INSTALL%\win32\psdk\psapi.lib=41
%C_LIB_INSTALL%\win32\psdk\GdiPlus.lib=42
%C_LIB_INSTALL%\win32\psdk\iphlpapi.lib=43
%C_LIB_INSTALL%\win32\psdk\shell32.lib=44
E:\Tools\fwh2012\lib\libmariadb.lib=45
E:\Tools\libs\SButtonX.lib=46

[DLL Files]
E:\Tools\fwh2012\lib\FiveHX.lib=1
E:\Tools\fwh2012\lib\FiveHC.lib=2
%C_LIB_INSTALL%\C0W32.OBJ=3
%HB_LIB_INSTALL%\rtl.lib=4
%HB_LIB_INSTALL%\vm.lib=5
%HB_LIB_INSTALL%\gtgui.lib=6
%HB_LIB_INSTALL%\lang.lib=7
%HB_LIB_INSTALL%\macro.lib=8
%HB_LIB_INSTALL%\rdd.lib=9
%HB_LIB_INSTALL%\dbfntx.lib=10
%HB_LIB_INSTALL%\dbfcdx.lib=11
%HB_LIB_INSTALL%\dbffpt.lib=12
%HB_LIB_INSTALL%\hbsix.lib=13
%HB_LIB_INSTALL%\debug.lib=14
%HB_LIB_INSTALL%\common.lib=15
%HB_LIB_INSTALL%\pp.lib=16
%HB_LIB_INSTALL%\pcrepos.lib=17
%HB_LIB_INSTALL%\ct.lib=18
%HB_LIB_INSTALL%\zlib.lib=19
%HB_LIB_INSTALL%\hbzip.lib=20
%C_LIB_INSTALL%\CW32.LIB=21
%C_LIB_INSTALL%\IMPORT32.LIB=22
%C_LIB_INSTALL%\uuid.lib=23
%HB_LIB_INSTALL%\codepage.lib=24
%C_LIB_INSTALL%\win32\psdk\odbc32.lib=25
%C_LIB_INSTALL%\win32\psdk\rasapi32.lib=26
%C_LIB_INSTALL%\win32\psdk\nddeapi.lib=27
%C_LIB_INSTALL%\win32\psdk\msimg32.lib=28
%C_LIB_INSTALL%\win32\psdk\psapi.lib=29
%C_LIB_INSTALL%\win32\psdk\iphlpapi.lib=30

[Willi Quintana]

Mi estimado,prueba con la ruta completa del .INI


cRutaIni := CurDrive() + ":\" + Curdir() + "\connect.ini"
If File(cRutaINi)
..
..
..
endif

[Jimmy]

hi,

try this

Code: Select all | Expand

LOCAL cHome := hb_Dirbase()   // Folder where EXE start

   IF FILE( cHome + "Config.ini" )

[karinha]

Code: Select all | Expand

// C:\FWH..\SAMPLES\RUTA.PRG

#include "FiveWin.ch"

STATIC oWnd

FUNCTION Main()

   // HARBOUR Only?
   // LOCAL cHome := HB_Dirbase()   // Folder where EXE start

   MEMVAR cPRGPATH, cFILEPATH, cRutaIni, cDirExe

   cRutaIni := CurDrive() + ":\" + Curdir() + "\Config.ini"

   cDirExe := GETCURDIR()

   IF SUBS( cDirExe, LEN( ALLTRIM(cDirExe ) ) , 1 ) = "\"
      cDirExe := SUBS( cDirExe, 1 , LEN( ALLTRIM(cDirExe ) ) - 1 )
   ENDIF

   LCHDIR( cDirExe )

   cPRGPATH := cFILEPATH(GETMODULEFILENAME(GETINSTANCE()))
   cPRGPATH := cShortName(cPRGPATH)

   lCHDIR(cPRGPATH)

   IF FILE( cRutaINi )

      ? "Yes, estoy aqui! 1"

   ENDIF

   IF FILE( cPRGPATH + "Config.ini" )

      ? "Yes, estoy aqui! 2"

   ENDIF

RETURN NIL

/*
 *  SPN.PRG
 *
 *  cShortName() - FilePath Long to Short (GetShortPathNameA())
 *
 *  Soporte a Funciones del Api de Windows
 *
 *  Andrade A. Daniel - 2002
 *  Rosario, Argentina
 *
 *  Libre Distribución
 */

/*
 *  cShortName()
 */

FUNCTION cShortName( cLong )

    Local   cShort  := Space(164) + Chr(0)
    Local   nBuffer := 164
    Local   nLen

    nLen    := GetSPName( cLong, @cShort, nBuffer )

    cShort  := Left( cShort, nLen )

RETURN( cShort )

// Windows Api
DLL32 STATIC FUNCTION GetSPName( lpszLongPath AS STRING, lpszShortPath AS STRING, lBuffer AS LONG ) ;
      AS LONG PASCAL FROM "GetShortPathNameA" LIB "kernel32"

Regards, saludos.

[CARLOS ATUNCAR]

hola gracias por responder, seria una solución pero tambien afecta al prg por ejemplo de fastreport y no encuentro que puede faltar enlazar en comparacion que la version 2020-12

[karinha]

fastreport ? Como?

Prueba esto e comente, pls.

Code: Select all | Expand

   IF FWVERSION = "FWHX 23.07"

      CDIREXE := GETCURDIR()

   ELSE

      CDIREXE := CURDRIVE() + ":\" + GETCURDIR()

   ENDIF

   // windows server
   IF SUBS( CDIREXE, LEN( ALLTRIM(CDIREXE ) ) , 1 ) = "\"  
      CDIREXE := SUBS( CDIREXE, 1 , LEN( ALLTRIM(CDIREXE ) ) - 1 )
   ENDIF

   LCHDIR( cDirExe )

   ? cDirExe

Regards, saludos.

Regards, saludos.

[carlos vargas]

Please add ".\" to file name, or the complete path AND file name, only the name file fail read file ini, note found.

[CARLOS ATUNCAR]

https://casoftsystemweb.com/servicios/fwh2307.webp

realice las pruebas como pueden ver solo al cambiar al entorno de la nueva version dejan de funcionar las funciones de ubicacion y lectura de archivos se que se soluciona agregando la ruta completa, pero eso demandaria revisar todos los proyectos q se desea usar la nueva version, y revisar las clases que son de terceros que tengan en uso esas funciones. Por ejemplo uso FastReport para los informes y cuando la cargo aborta el programa por que no ubica el archivo dll.

Cual es el verdadero problema ? alguien a realizado alguna prueba con la version y no le provoca estos problemas ?

[CARLOS ATUNCAR]

He probado con Bcc7.60 y xHarbour 1.2.3 Intl. (SimpLex) (Build 20221118) la version FW 12.2020 y todo pasa con normalidad tambien he probado la version FW 07.2023 y el problema persiste no he podido probar con xHarbour 1.3.0 Intl. (SimpLex) (Build 20230826)
por que con ambas versiones genera este error
Error: Unresolved external 'utime(const char *, utimbuf *)' referenced from E:\TOOLS\XHARBOUR_BCC74A\LIB\HBZIP.LIB|zipplatform

[CARLOS ATUNCAR]

La Solucion final seguir con la version FWH 12.2020+Bcc7.6 + xHarbour 1.2.3 Intl. (SimpLex) (Build 20221118) hasta que se pueda probar con otras soluciones.

[Enrico Maria Giordano]

He probado con Bcc7.60 y xHarbour 1.2.3 Intl. (SimpLex) (Build 20221118) la version FW 12.2020 y todo pasa con normalidad tambien he probado la version FW 07.2023 y el problema persiste no he podido probar con xHarbour 1.3.0 Intl. (SimpLex) (Build 20230826)
por que con ambas versiones genera este error
Error: Unresolved external 'utime(const char *, utimbuf *)' referenced from E:\TOOLS\XHARBOUR_BCC74A\LIB\HBZIP.LIB|zipplatform

Estimado Carlos, puede mostrar un pequeno PRG de ejemplo? Desculpa mi Espanol.

[CARLOS ATUNCAR]

Este ejemplo simple si lo puedes probar con la version FWh 07-2023. Muy agradecido por el tiempo


#include "fivewin.ch"


Function ConectMySql
LOCAL hIni
LOCAL oServer
LOCAL oErr,nFlags,cUser,cPassword,nPort,cServer

hIni := 0
oServer := NIL
nFlags := 0

? File(".\connect.ini")
If File(".\connect.ini")
cServer := GetPvProfString("mysql","host" ," " ,".\connect.ini")
cUser := GetPvProfString("mysql","user" ," " ,".\connect.ini")
cPassword := GetPvProfString("mysql","psw" ," " ,".\connect.ini")
nPort := GetPvProfString("mysql","port" ," " ,".\connect.ini")
cDBName := GetPvProfString("mysql","dbname" ," " ,".\connect.ini")

TRY
FWCONNECT oServer HOST cServer ;
USER cUser ;
PASSWORD cPassword ;
DATABASE cDBName

CATCH oErr
oServer:ShowError()
END
EndIf

RETURN oServer

Contenido del archivo connect.ini
mysql]
host=localhost
user=root
psw=160770
port=3306
dbname=demo

[Enrico Maria Giordano]

Un ejemplo mas simple es esto:

Code: Select all | Expand

#include "Fivewin.ch"


FUNCTION MAIN()

    RETURN NIL

Estoy trabacando para resolver el problema...

[CARLOS ATUNCAR]

he probado ese archivo PRG con el Buildx.bat FWH2307 y si funciona he comparado el BAT con el entorno del xMate y todo esta igual, pero cuando compilo todo el proyecto salta la falla. Bueno esperar tener un poco mas de tiempo para seguir buscando una solución

B32.BC que genera Buildx.bat
e:\tools\bcc760\lib\c0w32.obj +
connect.obj, +
connect.exe, +
connect.map, +
E:\Tools\fwh2307\lib\Fivehx.lib E:\Tools\fwh2307\lib\FiveHC.lib E:\Tools\fwh2307\lib\libmysql.lib +
E:\Tools\fwh2307\lib\pgsql.lib E:\Tools\fwh2307\lib\libpq.lib +
E:\tools\xharbour_bcc74x\lib\hbhpdf.lib +
E:\tools\xharbour_bcc74x\lib\libharu.lib +
E:\tools\xharbour_bcc74x\lib\png.lib +
E:\tools\xharbour_bcc74x\lib\rtl.lib +
E:\tools\xharbour_bcc74x\lib\vm.lib +
E:\tools\xharbour_bcc74x\lib\gtgui.lib +
E:\tools\xharbour_bcc74x\lib\lang.lib +
E:\tools\xharbour_bcc74x\lib\macro.lib +
E:\tools\xharbour_bcc74x\lib\rdd.lib +
E:\tools\xharbour_bcc74x\lib\dbfntx.lib +
E:\tools\xharbour_bcc74x\lib\dbfcdx.lib +
E:\tools\xharbour_bcc74x\lib\dbffpt.lib +
E:\tools\xharbour_bcc74x\lib\hbsix.lib +
E:\tools\xharbour_bcc74x\lib\debug.lib +
E:\tools\xharbour_bcc74x\lib\common.lib +
E:\tools\xharbour_bcc74x\lib\codepage.lib +
E:\tools\xharbour_bcc74x\lib\pp.lib +
E:\tools\xharbour_bcc74x\lib\pcrepos.lib +
E:\tools\xharbour_bcc74x\lib\ct.lib +
E:\tools\xharbour_bcc74x\lib\zlib.lib +
E:\tools\xharbour_bcc74x\lib\hbzip.lib +
E:\tools\xharbour_bcc74x\lib\libmisc.lib +
E:\tools\xharbour_bcc74x\lib\tip.lib +
E:\tools\xharbour_bcc74x\lib\hbzebra.lib +
E:\tools\xharbour_bcc74x\lib\png.lib +
e:\tools\bcc760\lib\cw32.lib +
e:\tools\bcc760\lib\import32.lib +
e:\tools\bcc760\lib\uuid.lib +
e:\tools\bcc760\lib\ws2_32.lib +
e:\tools\bcc760\lib\psdk\odbc32.lib +
e:\tools\bcc760\lib\psdk\rasapi32.lib +
e:\tools\bcc760\lib\psdk\nddeapi.lib +
e:\tools\bcc760\lib\psdk\msimg32.lib +
e:\tools\bcc760\lib\psdk\psapi.lib +
e:\tools\bcc760\lib\psdk\gdiplus.lib +
e:\tools\bcc760\lib\psdk\iphlpapi.lib +
e:\tools\bcc760\lib\psdk\shell32.lib,

del xMate
D:\MySql\WinContaPro\Sire\Wc-Sire\Obj\menu.Obj +
D:\MySql\WinContaPro\Sire\Wc-Sire\Obj\connect.Obj +
D:\MySql\WinContaPro\Sire\Wc-Sire\Obj\ventas.Obj +
D:\MySql\WinContaPro\Sire\Wc-Sire\Obj\Sire.Obj +
D:\MySql\WinContaPro\Sire\Wc-Sire\Obj\FUNCIONS.Obj +
D:\MySql\WinContaPro\Sire\Wc-Sire\Obj\TPublic.Obj +
E:\Tools\bcc760\Lib\c0w32.obj, +
D:\MySql\WinContaPro\Sire\Wc-Sire\bin\Wc-Sire.Exe, +
, +
E:\Tools\fwh2307\lib\FiveHX.lib +
E:\Tools\fwh2307\lib\FiveHC.lib +
E:\Tools\fwh2307\lib\libmysql.lib +
E:\Tools\fwh2307\lib\pgsql.lib +
E:\Tools\fwh2307\lib\libpq.lib +
E:\Tools\fwh2307\lib\libmariadb.lib +
E:\Tools\xharbour_bcc74x\Lib\hbhpdf.lib +
E:\Tools\xharbour_bcc74x\Lib\libharu.lib +
E:\Tools\xharbour_bcc74x\Lib\rtl.lib +
E:\Tools\xharbour_bcc74x\Lib\vm.lib +
E:\Tools\xharbour_bcc74x\Lib\gtgui.lib +
E:\Tools\xharbour_bcc74x\Lib\lang.lib +
E:\Tools\xharbour_bcc74x\Lib\macro.lib +
E:\Tools\xharbour_bcc74x\Lib\rdd.lib +
E:\Tools\xharbour_bcc74x\Lib\dbfntx.lib +
E:\Tools\xharbour_bcc74x\Lib\dbfcdx.lib +
E:\Tools\xharbour_bcc74x\Lib\dbffpt.lib +
E:\Tools\xharbour_bcc74x\Lib\hbsix.lib +
E:\Tools\xharbour_bcc74x\Lib\debug.lib +
E:\Tools\xharbour_bcc74x\Lib\common.lib +
E:\Tools\xharbour_bcc74x\Lib\codepage.lib +
E:\Tools\xharbour_bcc74x\Lib\pp.lib +
E:\Tools\xharbour_bcc74x\Lib\pcrepos.lib +
E:\Tools\xharbour_bcc74x\Lib\ct.lib +
E:\Tools\xharbour_bcc74x\Lib\zlib.lib +
E:\Tools\xharbour_bcc74x\Lib\hbzip.lib +
E:\Tools\xharbour_bcc74x\Lib\libmisc.lib +
E:\Tools\xharbour_bcc74x\Lib\tip.lib +
E:\Tools\xharbour_bcc74x\Lib\hbzebra.lib +
E:\Tools\xharbour_bcc74x\Lib\png.lib +
E:\Tools\bcc760\Lib\CW32.LIB +
E:\Tools\bcc760\Lib\IMPORT32.LIB +
E:\Tools\bcc760\Lib\uuid.lib +
E:\Tools\bcc760\Lib\ws2_32.lib +
E:\Tools\bcc760\Lib\psdk\odbc32.lib +
E:\Tools\bcc760\Lib\psdk\rasapi32.lib +
E:\Tools\bcc760\Lib\psdk\nddeapi.lib +
E:\Tools\bcc760\Lib\psdk\msimg32.lib +
E:\Tools\bcc760\Lib\psdk\psapi.lib +
E:\Tools\bcc760\Lib\psdk\GdiPlus.lib +
E:\Tools\bcc760\Lib\psdk\iphlpapi.lib +
E:\Tools\bcc760\Lib\psdk\shell32.lib,, +
D:\MySql\WinContaPro\Sire\Wc-Sire\Resource\SireResource.res

[Enrico Maria Giordano]

Un ejemplo mas simple es esto:

Code: Select all | Expand

#include "Fivewin.ch"


FUNCTION MAIN()

    RETURN NIL

Estoy trabacando para resolver el problema...

Resolvido! I forgot to advise here. Descarga de nuevo el paqueto de xHarbour:

http://xharbour.org/index.asp?page=down ... naries_win