JBASESubroutineExist

Check if a subroutine exists in current environment:

COMMAND SYNTAX

    CALLC JBASESubroutineExist(SubName, SubInfo)

where SubName is subroutine name; returns 1 or 0. SubInfo is reserved for future use.

EXAMPLE

       SubName = 'CDD'
       Result = CALLC JBASESubroutineExist(SubName, SubInfo)
       CRT Result                 ;* 1 in T24 TAFC environment, 0.0 under TAFJ 
       CRT SQUOTE(SubInfo)        ;* '' under TAFC, 'Subroutine' under TAFJ
       SubName = 'QWERTY'
       Result = CALLC JBASESubroutineExist(SubName, SubInfo)
       CRT Result            ;* 0
Last update: Tue, 30 Aug 2022 15:07