OnPreDataItem:
LedgerEntryDimension.SETRANGE("Table ID",32);
LedgerEntryDimension.SETRANGE("Dimension Code",'РЕГИОН');
LedgerEntryDimension.SETRANGE("Dimension Value Code",'МОСКВА');
IF LedgerEntryDimension.FINDSET THEN
REPEAT
ItemLedgerEntry.GET(LedgerEntryDimension."Entry No.");
ItemLedgerEntry.MARK(TRUE);
UNTIL LedgerEntryDimension.NEXT = 0;
ItemLedgerEntry.MARKEDONLY(TRUE);
__________________
Должен остаться только один.
|