|
Насколько я помню достаточно вынести все используемые методы в таблицу, тогда они будут выполнятся в контексте указанной в changecompany фирмы.
К примеру:
SalesHeader.changecompany(newCompany);
SalesHeader.init;
SalesHeader."No.':=NosMgt.InitSeries....
вернет номерок и серии номеров текущей фирмы.
В случае:
SalesHeader.init;
SalesHeader."No.'
SalesHeader.insert(true) - код в триггере OnInsert присвоит номер из серии номеров фирмы newCompany.
В вашем gega случае просто пишется функция по автоучету в 36 таблице.
Код может выглядет примерно так:
Function Autopost(var lSH record 36)
begin
if lSH.find('-') then repeat
if codeunit.run(codeunit::"Sales Post", lSH) then;
until lSH.next=0;
end;
Вызов примерно так:
lSH.changecompany(newCompany);
...устанавливаем фильтры
lSH.autopost(lSH);
|