besteht die Möglichkeit ein aus einem Datensatz mittels
Code: Alles auswählen
USqlStatement():New():Select( {{ 1 }} ):From( {{cAlias, "cAlias"}} ):Build():Query( USQL_RESULT_OBJECTS, @aDaten )
werden Änderungen in der Kopie im Original vorgenommen. Ich behelfe mir mitThe values contained in the member variables may be different, however.
Code: Alles auswählen
FUNCTION DaoClone( oDaten )
LOCAL aMembers := oDaten:classDescribe( CLASS_DESCR_MEMBERS )
LOCAL oRetwert := DataObject():new()
AEval( aMembers, {| aX | oRetwert:setNoIVar( aX[ CLASS_MEMBER_NAME ], oDaten:getNoIVar( aX[ CLASS_MEMBER_NAME ]))})
RETURN( oRetwert )