!
! use the following three routines only if you must!
!
! Status values are to be found in Imp_Include:CLIMSG.Inc
!
%external %integer     %function %spec Cli Present %alias "IMP_CLI_PRESENT" -
                                                 ( %string(255) Label )

%external %integer     %function %spec Cli Value   %alias "IMP_CLI_VALUE" -
                                                 ( %string(255) Label,
                                                   %string(*) %name V )

%external %routine               %spec Cli End Parse %alias "CLI$END_PARSE"

!
! Normally, programs will use the following:
!
%external %predicate             %spec Qualifier Present -
                                 %alias "IMP_QUALIFIER_PRESENT" -
                               ( %string(255) Label )

%external %integer     %function %spec Qualifier I %alias "IMP_QUALIFIER_I" -
                                                 ( %string(255) Label )

%external %string(255) %function %spec Qualifier S %alias "IMP_QUALIFIER_S" -
                                                 ( %string(255) Label )

%external %long %real  %function %spec Qualifier R %alias "IMP_QUALIFIER_R" -
                                                 ( %string(255) Label )