Statements:
%ACTIVATE
%assignment
%DEACTIVATE
%DECLARE
ENTRY
BUILTIN
CHARACTER
FIXED
One dimension only.
%DO
Type-1 and -2 DO statements supported with restrictions.
%END
Multiple closure allowed.
%GOTO
%IF %THEN %ELSE
%INCLUDE
%ITERATE
The %ITERATE statement transfers control to the %END statement that delimits its
containing iterative DO-group. The current iteration completes and the next
iteration, if needed, is started.
%LEAVE
%NOTE
The %NOTE statement generates a preprocessor diagnostic message of specified
text and severity.
%null
%PROCEDURE
%REPLACE
RETURN
Builtins:
COMPILEDATE
Returns a CHARACTER string of length 17 containing the date and the time of the compilation
as YYYYMMDDHHMMSSTTT.
COMPILETIME
Returns a CHARACTER string of length 18 containing the date and the time of compilation.
as DD.MMM.YYbHH.MM.SS (b represents a blank, MMM is month abbrev as JEN, FEB, etc.)
COUNTER
Returns a CHARACTER string of length 5 containing a decimal number. The returned number is 00001 for the first invocation, and is incremented by one on each successive invocation.
INDEX(x,y[,n])
Returns a FIXED value indicating the starting position within x of a substring identical to y. You can also specify the location n within x where processing begins.
LENGTH
Returns a FIXED value specifying the current length of a given character expression.
PARMSET(n)
Returns a BIT value indicating if a specified parameter n was set on invocation of the procedure.
QUOTE(x)
Returns a CHARACTER string that represents x as a valid quoted string.
If x contains single quotation marks, each is replaced by two consecutive single quotation marks.
REPEAT(x,y)
Returns a CHARACTER string consisting of (y + 1) concatenated copies of the string x.
SUBSTR(x,y[,z])
Returns a substring, specified by y and z, of x.