|
пишу в ItemBudgetManagement.ValidateLineDimCode:
tmpItem.DELETEALL;
IF LineDimOption=LineDimOption::Item THEN BEGIN
ItemBudgetEntry.SETFILTER("Budget Name",ItemBudgetName.Name);
IF ItemBudgetEntry.FIND('-') THEN REPEAT
Item.SETFILTER("No.",ItemBudgetEntry."Item No.");
IF Item.FIND('-') THEN BEGIN
tmpItem:=Item;
tmpItem.INSERT;
END;
UNTIL ItemBudgetEntry.NEXT=0;
END;
говорит, что Товар Номер такой уже существует!
|