Axit

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

Source

METHOD Axit( ) CLASS TS_AtomizerItem
   TSTrace Enter
   UnRegisterAxit( SELF )
   IF SELF:_PSZItem<>NULL_PTR
      IF SELF:_PSZItem<>@_TS_AtomizerTargetForNullPSZ
         TS_MemFree( SELF:_PSZItem, TRUE )
      END
      SELF:_PSZItem:=NULL_PTR
   END
   SELF:_Len:=0U
   SELF:_Owner:=NULL_OBJECT
   SELF:_TYPEOF:=0L
   SELF:_Match:=NULL_OBJECT
   SELF:Value:=NULL_STRING
   TSTrace Leave DESTROY
RETURN NIL