GET CMD LINE PARM

This subroutine checks for the existence of a parameter on the command line used to invoke the current engine. Two arguments are expected to be passed to the subroutine:

• Parameter to be checked (alpha field, maximum length 132)
• Buffer for returned value (alpha field, maximum length 2048 or 2K)
• Must be PASS'ed shared.
• Returns specified parameter only if it existed on the command line.

The subroutine can be invoked via SUBR or GOSUB.

The following example generates a message or warning depending on whether or not the parameter -m existed on the command line when the APPX engine was invoked.

          SET      --- TEMP 132                   =      -m
          SET      --- TEMP 256                   =
          *
          PASS     --- TEMP 132                   FIELD            SHARE? N
          PASS     --- TEMP 256                   FIELD            SHARE? Y
          SUBR     --- GET CMD LINE PARM                DETACHED     END? N  FAIL 0
          *
          IF       --- TEMP 256                   EQ --- TEMP 132
    T     APPEND   --- TEMP 132                   1      found
    F     APPEND   --- TEMP 132                   1      not found
    -     APPEND   --- TEMP 132                   1      on command line
    T     MESSAGE  TEMP 132
    F     WARNING  TEMP 132