>COOOLL it works!!!
>here is the function I came up with:
>
>

>FUNCTION CopyProp
>LPARA o1, o2
>
>IF TYPE('o1.Name') <> "C" OR TYPE('o2.Name') <> "C"
>	RETURN .F.
>ENDIF
>
>AMEMBERS(aProps, o1)
>
>FOR i = 1 TO ALEN(aProps)
>	IF !ALLTRIM(UPPER(aProps(i)))$"CLASS:PARENTCLASS:BASECLASS:NAME"
>		uVal = GETPEM(o1,aProps(i))
>		IF PEMSTATUS(o2,aProps(i),5) AND;
>			!PEMSTATUS(o2,aProps(i),1) AND;
>			PEMSTATUS(o2,aProps(i),3) = TYPE('uVal') AND;
>			!PEMSTATUS(o2,aProps(i),2)
>			o2.&aProps(i) = uVal
>		ENDIF
>	ENDIF
>ENDFOR
>

>
>thanks for our help, Cetin and Jim. This is going to open a couple of doors in my framework.
Good. Got a copy of code. Beware there is at least one situation that this will fail -> getpem(object, "value") and unfortunately controlsource is a general field.
Cetin