4D 17r5 introduces a new data class function: .getinfo()
It returns an OBJECT with .name .primaryKey .tableNumber characteristics.
But GET TABLE PROPERTIES( ) returns a few more tidbits of information about a
dataclass that you may want to have collected too.
So the method below will return an object with all the .getinfo() attributes
and the additional ones from GET TABLE PROPERTIES( )
Call it as: DS_GetTablePropertyObj( {dataClass Name} ) // —> OBJ
Note: the method assumes you are giving it a valid dataClass name. If you
don’t, well, I don’t know what happens!
// DS_GetTablePropertyObj( dClass name) --> OBJ with all the properties in
one object
C_TEXT($1) // the dataClass name (i.e. TABLE name)
C_OBJECT($0) // the object containing all the dataClass's attributes from all
sources
C_BOOLEAN($invis;$trigNew;$trigSave;$trigDel) // these additional tidbits can
be discovered from GET TABLE PROPERTIES ( )
$0:=ds[$1].getInfo() // attributes: name, primaryKey, tableNumber
// at this point, we can include information retrieved from GET TABLE
PROPERTIES( )
GET TABLE PROPERTIES($0.tableNumber;$invis;$trigNew;$trigSave;$trigDel) // get
these settings. update them if need.
$0.isInvisible:=$invis
$0.istrigSaveNew:=$trigNew
$0.istrigSaveRec:=$trigSave
$0.istrigDelRec:=$trigDel
// now the $0 object has all the information we have have on the TABLE
—
I am using this because I am creating and ‘remembering’ TABLE —> STORAGE
ATTRIBUTES —> RELATION ATTRIBUTE information.
This just retrieves the TABLE stuff…
— Chris
**********************************************************************
4D Internet Users Group (4D iNUG)
Archive: http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
**********************************************************************
