IB Statements/exitto

From CometWiki

EXITTO statement

Syntax: EXITTO level-number [,EXCP=statement-label]

Discussion: The EXITTO statement returns control to the calling program at the specified level-number.

Level-number is a numeric constant or varaible (length/precision = 2.0) equal to the value of the ENTERLEVEL system variable to which you wish to exit.

For example, if a subprogram is running at level 5 (i.e., ENTERLEVEL = 5) and wants to return to level 2 (i.e., ENTERLEVEL = 2), the following statement would be used:

EXITTO 2

Also see:

Subprograms

ENTER

EXIT

EXITALL

Example 1:

 ! This is a subprogram
 .
 .
 .
 EXITTO 2

This example shows a subprogram that exits back to the subprogram running at level 2.

Example 2:

 ! This is a subprogram
 .
 .
 .
 LENGTH 2.0 & LOCAL LEVEL
 .
 .
 .
 EXITTO LEVEL

This example shows a subprogram that exists back to a subprogram level specified by the value of the numeric variable named LEVEL. Bold text