FOR i = 1 TO oChild.DataParameters.COUNT >>> cPar = oChild.DataParameters.GETKEY(i) >>> xVal = oChild.DataParameters.ITEM(i) >>>* addproperty(oChild, cpar, xval) >>> oChild.ADDPROPERTY(cPar, xVal) >>>ENDFOR>>>
oChild= CREATEOBJECT("Session") oChild.Addproperty([DataParameters],CREATEOBJECT("Collection")) FOR lnFor = 1 TO 15 WITH oChild.DataParameters AS Collection .Add(lnFor, SYS(2015)) ENDWITH NEXT FOR lnFor = 1 TO oChild.DataParameters.Count cPar = oChild.DataParameters.GETKEY(lnFor) xVal = oChild.DataParameters.ITEM(lnFor) addproperty(oChild, cpar, xval) * oChild.ADDPROPERTY(cPar, xVal) NEXT SET STEP ONMaybe Yousfi get you the answer?