ItemSetOptions
(Available in 00 TS Tools(Base) - TS_Tools_Atomizer)
Source
METHOD ItemSetOptions( cItem AS STRING, ulNeedsLeadingWhite AS USUAL, ulNeedsTrailingWhite ; ...
...AS USUAL, ulNeedsLeadingGray AS USUAL, ulNeedsTrailingGray AS USUAL, ulIsAtractorLeft ; ...
...AS USUAL, ulIsAtractorRight AS USUAL, ulIsGray AS USUAL, ulIsReserved AS USUAL ; ...
..., ulIsEOL AS USUAL, ulIsEntity AS USUAL, uliID AS USUAL ) AS LOGIC PASCAL CLASS ; ...
...TS_Atomizer
LOCAL oAtomizerItem AS TS_AtomizerItem
LOCAL lRetVal AS LOGIC
LOCAL iItem AS DWORD
TSTrace Enter
iItem:=SELF:_LocateItem( cItem )
IF LOGIC( _CAST, iItem )