Iron Spring PL/I

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.