Немного не понимаю я код Коррекции

[RedFox]

Доброго дня, Эксперты разработки..

Я вот немного не понимаю код, написанный в триггере InvtToAdjustExist, а именно после фильтрации есть такой код:

  CopyItemToItem(Item,ToItem);
  IF ItemLedgEntry.AppliedEntryToAdjustExists('') THEN
	InsertDeletedItem(ToItem);

- в коде по CopyItemToItem(Item,ToItem):

WITH ToItem DO BEGIN
  RESET;
  DELETEALL;
  IF FromItem.FINDSET THEN
	REPEAT
	  ToItem := FromItem;
	  INSERT;
	UNTIL FromItem.NEXT = 0;
END;

- в коде по AppliedEntryToAdjustExists:

RESET;
SETCURRENTKEY("Item No.","Applied Entry to Adjust");
SETRANGE("Item No.",ItemNo);
SETRANGE("Applied Entry to Adjust",TRUE);
EXIT(FIND('-'));

- в коде по InsertDeletedItem(VAR Item : Record Item):

CLEAR(Item);
Item.INIT;
Item."Cost is Adjusted" := FALSE;
Item."Costing Method" := Item."Costing Method"::FIFO;
Item.INSERT;

Вопрос - ЗАЧЕМ пересоздавать всё, да ещё с признаком "Costing Method"::FIFO, если хотя бы одну операцию нужно корректировать!
Может тогда фильтрацию какую-нибудь поставить??