PROC-LEVEL( ) Request nesting level

Domain: Procedure information

The PROC-LEVEL( ) function supplies the current nesting level of the S procedure.

Format

PROC-LEVEL( )

Result type

INTEGER

Input parameters

None

Result

Number of type INTEGER

Error message

SDP0435  DESIRED INFORMATION NOT AVAILABLE

Example

In interactive mode:

/A = PROC-LEVEL( )
/SHOW-VARIABLE A
A = 0

In nested, called procedures:

The three procedures C.PROC1, C.PROC2 and C.PROC3 are nested when called. The nesting level is requested in each procedure.

C.PROC1

/A = PROC-LEVEL( )
/SHOW-VARIABLE A
/CALL-PROCEDURE C.PROC2

C.PROC2

/B = PROC-LEVEL( )
/SHOW-VARIABLE B
/CALL-PROCEDURE C.PROC3

C.PROC3

/C = PROC-LEVEL( )

/SHOW-VARIABLE C

The following lines are output during execution:

A = 1
B = 2
C = 3