Показать сообщение отдельно
Старый 15.04.2006, 11:24   #3  
NeNavision_imported is offline
NeNavision_imported
Участник
Аватар для NeNavision_imported
 
241 / 10 (1) +
Регистрация: 12.08.2005
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);
__________________
Должен остаться только один.