This routine retrieves data referenced by a Variant handle. Typically, this is data passed to an ACUCOBOL-GT program from another language such as Visual Basic. Note that there is also a C$SETVARIANT routine that sets data items referenced by Variant handles
C$GETVARIANT converts Variant type data to COBOL type data. Programs that call ACUCOBOL-GT using the ACUCOBOL-GT Automation Server or runtime DLL pass their parameters (by reference) as Variant types. The COBOL program receives handles to the Variant data. C$GETVARIANT gets the data associated with a particular handle and moves it to a COBOL data item. The data is automatically converted to the proper COBOL format.
CALL "C$GETVARIANT" USING H-VARIANT, DEST-ITEM GIVING RESULT-CODE
|H-VARIANT USAGE HANDLE||Handle to Variant type data. Data passed in from a program calling ACUCOBOL-GT using the ACUCOBOL-GT Automation Server or runtime DLL is in the form of handles to Variant type data.|
|DEST-ITEM Any COBOL data type||The destination data item.|
|RESULT-CODE Signed numeric value|| Receives the result code for the operation. This will be 0 or a positive value to indicate success or a negative value to
Under Microsoft Windows this is a code of type HRESULT that can be looked up in Microsoft documentation to determine the reason for the failure or additional information about the success.
The Variant data associated with H-VARIANT is moved to DEST-ITEM using standard MOVE rules. Data items must be defined in the LINKAGE section.
C$GETVARIANT is not supported by the ACUCOBOL-GT Thin Client technology, and will only run with a standalone Windows runtime.