INIT

 (Available in 01 TS COM - TS_COM_NULL)

Purpose

Use to pass a typed NULL-value over the COM interface

Syntax

oVariant:=TS_Usual2Variant( TS_NULL{ [unVT] } )

Arguments

unVT
NIL, SHORT

Description

Use to pass a typed NULL-value over the COM interface

Example

METHOD CMCreateAutoSelect( ) CLASS TS_WIASCRIWia
LOCAL uRetVal AS USUAL
   uRetVal:=SELF:SendCreateInstance( NULL_SYMBOL, #Create, TS_NULL ; ...
  ... { } )
RETURN uRetVal

Source

METHOD INIT( unVT ) CLASS TS_NULL
   TSTrace Enter CREATE
   IF IsNumeric( unVT )
      SELF:VT:=SHORT( unVT )
   END
   TSTrace Leave
RETURN SELF