![]() |
#3 |
Участник
|
Всем спасибо! Вот каким было решение.
Создаем codeunit с такой функцией: Код: CopyFromVendor(VAR vend : Record Vendor;process : 'Insert,Delete,Update,Rename';VAR rec : Code[10]) expvend.TRANSFERFIELDS(vend); expvend."Last Date Modified":= TODAY; expvend."Last Time Modified":= TIME; expvend."No. Old":=rec; CASE process OF process::Rename: expvend.Process:=expvend.Process::Rename; process::Insert: expvend.Process:=expvend.Process::Insert; process::Delete: expvend.Process:=expvend.Process::Delete; process::Update: expvend.Process:=expvend.Process::Update; END; expvend.INSERT(TRUE); Очевидно, что среди переменных таблицы Поставщик создается переменная типа Option, которой присваиваются возможные значения: 'Insert,Delete,Update,Rename'. В нужном триггере таблицы Поставщик передается нужное значение этой переменной в функцию нашего кодюнита. Код: OnInsert() reportExp.copyFromVendor(Rec,process::Insert,xRec."No."; OnModify( NavisionExchange.CopyFromVendor(Rec,process::Update,xRec."No."; OnDelete() NavisionExchange.CopyFromVendor(Rec,process::Delete,xRec."No."; OnRename() NavisionExchange.CopyFromVendor(Rec,process::Rename,xRec."No."; |
|