![]() |
#3 |
Участник
|
Не могу понять каким здесь можно образом сделать фильтр на таблицу Item:
FINDREC: Код: DimOption::Item: BEGIN Item."No." := DimCodeBuf.Code; IF ItemFilter <> '' THEN Item.SETFILTER("No.",ItemFilter); Found := Item.FIND(Which); IF Found THEN CopyItemToBuf(Item,DimCodeBuf); END; Код: DimOption::Item: BEGIN Item."No." := DimCodeBuf.Code; IF ItemFilter <> '' THEN Item.SETFILTER("No.",ItemFilter); ResultSteps := Item.NEXT(Steps); IF ResultSteps <> 0 THEN CopyItemToBuf(Item,DimCodeBuf); END; |
|