- Arreglo de evaluación de parametrización externa, que estaba siendo ignorada

This commit is contained in:
fdbozzo
2015-04-02 18:14:17 +02:00
parent cda6592852
commit aa6eb05125
2 changed files with 8 additions and 9 deletions

Binary file not shown.

View File

@@ -1657,15 +1657,14 @@ DEFINE CLASS c_foxbin2prg AS SESSION
toParentCFG = lo_CFG
.writeLog( '> ' + UPPER(loLang.C_USING_THIS_SETTINGS_LOC) + ': ' + tc_InputFile + ' => (' + lo_CFG.c_Foxbin2prg_ConfigFile + ')' )
.writeLog()
EXIT
ENDIF
ELSE
lo_CFG = CREATEOBJECT('CL_CFG')
lo_Configuration.Add( lo_CFG, lc_CFG_Path )
lo_CFG = CREATEOBJECT('CL_CFG')
lo_Configuration.Add( lo_CFG, lc_CFG_Path )
IF NOT ISNULL(toParentCFG)
lo_CFG.CopyFrom(toParentCFG)
toParentCFG = lo_CFG
IF NOT ISNULL(toParentCFG)
lo_CFG.CopyFrom(toParentCFG)
toParentCFG = lo_CFG
ENDIF
ENDIF
ELSE
@@ -1673,7 +1672,7 @@ DEFINE CLASS c_foxbin2prg AS SESSION
ENDIF
*-- NOTA: SOLO LOS QUE NO VENGAN DE PAR<41>METROS EXTERNOS DEBEN ASIGNARSE A lo_CFG AQU<51>.
IF llExiste_CFG_EnDisco
IF llExiste_CFG_EnDisco AND NOT .l_CFG_CachedAccess THEN
.writeLog( )
.writeLog( '> ' + loLang.C_READING_CFG_VALUES_FROM_DISK_LOC + ':' )
.writeLog( C_TAB + loLang.C_CONFIGFILE_LOC + ' ' + lcConfigFile )