Returns a reference to the A-Shell Application object.

Syntax

XCallBlock.Application

Return Value

An ASHW32Lib.IApplication interface reference to the A-Shell application calling the XCALL subroutine.

Remarks

The Application method allows use of all the IApplication interface methods and properties to control the A-Shell application calling the XCALL subroutine. For example the following Visual BASIC represents an XCALL routine to exit A-Shell:

Private Sub IXcall_Execute(Byval XcallBlock As IXcallBlock, _
                           Byval ArgCount as Integer)
    ’
    Dim oApplication as ASHW32Lib.Application
    ’
    Set oApplication = XcallBlock.Application
    oApplication.Quit True
    Set oApplication = Nothing
    ’
End Sub