- Arreglo del Path para las tablas de las vistas locales Offline

This commit is contained in:
fdbozzo
2015-03-22 01:03:23 +01:00
parent 18e4adc0c5
commit ed7d5eba4f

View File

@@ -19250,6 +19250,7 @@ DEFINE CLASS CL_DBC_VIEW AS CL_DBC_BASE
lcBinData = lcBinData + .getBinPropertyDataRecord( ._UseMemoSize, .getDBCPropertyIDByName('UseMemoSize', .T.) ) lcBinData = lcBinData + .getBinPropertyDataRecord( ._UseMemoSize, .getDBCPropertyIDByName('UseMemoSize', .T.) )
lcBinData = lcBinData + .getBinPropertyDataRecord( ._Offline, .getDBCPropertyIDByName('Offline', .T.) ) && Undocumented lcBinData = lcBinData + .getBinPropertyDataRecord( ._Offline, .getDBCPropertyIDByName('Offline', .T.) ) && Undocumented
lcBinData = lcBinData + .getBinPropertyDataRecord( ._RecordCount, .getDBCPropertyIDByName('RecordCount', .T.) ) && Undocumented lcBinData = lcBinData + .getBinPropertyDataRecord( ._RecordCount, .getDBCPropertyIDByName('RecordCount', .T.) ) && Undocumented
lcBinData = lcBinData + .getBinPropertyDataRecord( ._Path, .getDBCPropertyIDByName('Path', .T.) ) && Undocumented
lcBinData = lcBinData + .getBinPropertyDataRecord( 0, .getDBCPropertyIDByName('undocumented_view_prop_85', .T.) ) && Undocumented lcBinData = lcBinData + .getBinPropertyDataRecord( 0, .getDBCPropertyIDByName('undocumented_view_prop_85', .T.) ) && Undocumented
ENDWITH && THIS ENDWITH && THIS
@@ -19290,8 +19291,8 @@ DEFINE CLASS CL_DBC_VIEW AS CL_DBC_BASE
._UseMemoSize = DBGETPROP(tcView,"VIEW","UseMemoSize") ._UseMemoSize = DBGETPROP(tcView,"VIEW","UseMemoSize")
._WhereType = DBGETPROP(tcView,"VIEW","WhereType") ._WhereType = DBGETPROP(tcView,"VIEW","WhereType")
*-- *--
._Path = .DBGETPROP(tcView,"VIEW","Path") ._Path = .DBGETPROP(tcView,"VIEW","Path") && Para las Vistas el DBGETPROP oficial no funciona con Path
._RecordCount = .DBGETPROP(tcView,"VIEW","RecordCount") ._RecordCount = .DBGETPROP(tcView,"VIEW","RecordCount") && Para las Vistas el DBGETPROP oficial no funciona con RecordCount
*-- *--
._Saved = .T. ._Saved = .T.
ENDIF ENDIF