A veces, necesitamos copiar parte de las propiedades de un objeto en otro diferente. La forma mas facil sería hacer lo siguiente:
Set obj1.FirstName = obj2.FirstName
Set obj1.SecondName = obj2.SecondName
¿Que sucede si el objeto contiene un gran número de propiedades? ¿Y si solo necesitamos extraer un importante grupo de datos, y complementar la información en otro objeto?
Tenemos las siguientes clases:
<span style="font-family:courier new,courier,monospace;">Class Kurro.PersonalInfo Extends %Library.SerialObject
{
/// Code of personal
Property Code As %String;
/// First name of personal
Property FirstName As %String;
/// Second name of personal
Property SecondName As %String;
/// Date of birthday of personal
Property DateOfBirthday As %DateTime;
/// Passport ID number
Property PassportId As %String;
}
Class Kurro.NameInfo Extends %Library.SerialObject
{
/// First name of personal
Property FirstName As %String;
/// Second name of personal
Property SecondName As %String;
/// Date of birthday of personal
Property DateOfBirthday As %DateTime;
/// Relationship
Property Relationship As %String;
}
</span>
Relleno el objeto PersonalInfo
ENSDEMO>zw personal
personal=