PRESENT(x) returns a BIT(1) value that is '1'B if the parameter x was
present in the invocation of its containing procedure.
>>-PRESENT(x)--------------------------------------------------><
- x
- Level-1 unsubscripted BYADDR parameter.
Note: This argument must be declared as OPTIONAL in the
corresponding ENTRY declaration in the calling code.