Записи в журнале статей Записи таблицы удаляются сами собой

Question

Я написал эту процедуру, которая возьмет строки и добавит их в таблицу "Строка журнала изделий" нажатием кнопки "Материал для выпуска". Вот процедура;

procedure IssueMaterial(IncomingLine: Record "Purchase Requisition Line")
var
ItemCont: Record "Item Journal Line";
begin
IF ItemCont.FindLast then begin
ItemCont."Line No." := ItemCont."Line No." + 10000;
end;
with ItemCont do begin
ItemCont.Init();
ItemCont."Journal Template Name" := 'Item';
Validate("Item No.", IncomingLine."No.");
ItemCont."Posting Date" := WorkDate();
Validate("Location Code", IncomingLine.Location);
ItemCont."Entry Type" := ItemCont."Entry Type"::"Negative Adjmt.";
ItemCont."Journal Batch Name" := 'Default';
ItemCont."Line No." := IncomingLine."Line No.";
Validate(Quantity, IncomingLine.Quantity);
Validate(Amount, IncomingLine.Amount);
Validate("Unit Cost", IncomingLine."Unit Cost");
ItemCont.Insert();
end;
Message('%1 has been successfully created', IncomingLine."No.");
end;

Вот код в действии (кнопка), который я написал;

trigger OnAction()
var
codeunitcont: Codeunit "Purchase Req. Mgmt.";
PurchReqLine: Record "Purchase Requisition Line";
begin
CurrPage.SetSelectionFilter(PurchReqLine);
IF PurchReqLine.FindSet then
repeat
PurchReqLine.TestField(PurchReqLine.Location);
codeunitcont.IssueMaterial(PurchReqLine);
until PurchReqLine.Next = 0;
end;

Работает нормально. Однако мои строки перемещаются в таблицу журнала предметов, но после перезапуска арендатора или перестроения и повторной публикации расширения моя таблица журнала предметов теряет свои записи! Спасибо за ваш совет, в чем может быть проблема

Answer 1

Если бы на OnOpenPage был код, который удалял все записи в журнале статей! Ops.