*-- the new object's .init lparameters toParent n=amembers(aPr, toParent, "UC") for i=1 to n lcProp=aPr[i] do case case inlist(lcProp, "name" ... and any other property we want to skip) *-- do nothing case {any other exception} *-- do nothing case pemstatus(this, lcProp, 5) this.addproperty(lcprop, getpem(toParent, lcProp)) endcase endforNot eactly sure of the aPr array, may need to look at what exactly does aMembers do for various parameters - this is just to get you started, but shouldn't need much work.