IgnoreCase

(Available in 00 TS Tools(Base) - TS_Tools_Atomizer)

Source

ASSIGN IgnoreCase( lIgnoreCase AS LOGIC ) AS LOGIC PASCAL CLASS TS_Atomizer
   TSTrace Enter
   IF ALen( SELF:_ItemsAtivated )<2U
      SELF:_IgnoreCase:=lIgnoreCase
   ELSE
      TSTrace Warning "!ALen(SELF:_ItemsAtivated)<2U"
   END
   TSTrace Leave
RETURN SELF:_IgnoreCase