static void CopyFields(Common _from, Common _to)
{
DictTable t;
DictField f;
int i;
fieldId id;
FieldName fieldname;
;
t = new DictTable(_to.TableId);
if (t)
{
for (i=1; i<=t.fieldCnt(); i++)
{
id = t.fieldCnt2Id(i);
f = new DictField(_to.TableId,t.fieldCnt2Id(i));
// excluding system fields (or add other fields to exclude during
// the copy action
if (f && !f.isSystem())
{
_to.(id) = _from.(id);
}
}
}
}
{
DictTable t;
DictField f;
int i;
fieldId id;
FieldName fieldname;
;
t = new DictTable(_to.TableId);
if (t)
{
for (i=1; i<=t.fieldCnt(); i++)
{
id = t.fieldCnt2Id(i);
f = new DictField(_to.TableId,t.fieldCnt2Id(i));
// excluding system fields (or add other fields to exclude during
// the copy action
if (f && !f.isSystem())
{
_to.(id) = _from.(id);
}
}
}
}