*!* ObjectSCXFile = sys(1271,oObject) *!* ObjectHierarchy = sys(1272, oObjectName) *!* lPEMExists = pemstatus(oObject, cProperty, 5) *!* lPEMProtected = pemstatus(oObject, cProperty, 2) *!* cPEMType = pemstatus(oObject, cProperty, 3) *!* lPEMUDF = pemstatus(oObject, cProperty, 4) *!* * Properties only *!* lPropertyChanged = pemstatus(oObject, cProperty, 0) *!* lPropertyRW = !pemstatus(oObject, cProperty, 1) *!* * IsReadonlyProperty = sys(1269,oObject,cProperty,1) *!* * IsPropertyChanged = sys(1269,oObject,cProperty,0) *!* * Properties only *!* uPropertyValue = getpem(oObject,cProperty)Cetin