IThis

(Available in 01 TS COM - TS_COM_IUnknown)

Purpose

Get the 'SELF'

Syntax

CreateInstanceStatic( #TS_XProviderLayer1TableFactory, SELF:IThis ; ...
...)

Description

Get the 'SELF' of the object

Source

ACCESS IThis CLASS TS_IUnknown
LOCAL oIThis AS TS_IUnknown
   TSTrace Enter
   IF SELF:IsValidObject
      oIThis:=SELF
      oIThis:AddRef( )
   ELSE
      oIThis:=NULL_OBJECT
   END
   TSTrace Leave
RETURN oIThis