Создание записи в таблице Object

[NeNavision_imported]

Почему не возможно? Все возможно. Только не нужно.
Таким заклинаниями это не сделать. Нужно вот такое волшебство.

Object.GET(Object.Type::Table,'',17);
NewObject.INIT;
NewObject.TRANSFERFIELDS(Object);
NewObject.ID := 50000;
NewObject.Name := 'new';
Object.CALCFIELDS("BLOB Reference");
Object."BLOB Reference".CREATEINSTREAM(InStream1);
NewObject."BLOB Reference".CREATEOUTSTREAM(OutStream1);
COPYSTREAM(OutStream1, InStream1);
NewObject.INSERT;