activate screen lnMembers = amembers(aDEMembers,thisform.dataenvironment,1) for ix = 1 to lnMembers if aDEMembers[ix,2] = "Object" with eval("thisform.dataenvironment."+aDEMembers[ix,1]) if .baseclass = "Cursor" ? cursorgetprop("SourceName",.alias), ; cursorgetprop("SourceType",.alias) endif endwith endif endforCetin