NIPO ODIN Version 5.17
*RETURN
Purpose
Returns from subroutine.
Syntax
*RETURN
Description
Returns from a subroutine before the physical end of the subroutine is reached. This command is also allowed under condition, but is mandatory for every *SUBROUTINE.
Example
*TEXTVARS PAPER, OTHERPAPER
*SUBROUTINE "NEWSPAPER"
*QUESTION 101 *NUMBER L1 *MAX 6
How many of the last 6 issues of *?PAPER did you read?
*IF [Q101 = 0] *RETURN
*QUESTION 102 *CODES L1
Did you read *?PAPER yesterday?
1: Yes
2: No
*ENDSUB
*QUESTION 1 *CODES L8 *MULTI *SAVE PAPER
Which newspapers do you read?
1: La Repubblica *GOSUB NEWSPAPER
2: La Stanza *GOSUB NEWSPAPER
3: The Mirror *GOSUB NEWSPAPER
4: The New York Times *GOSUB NEWSPAPER
5: Le Figaro *GOSUB NEWSPAPER
6: La Libération *GOSUB NEWSPAPER
7: El Pais *GOSUB NEWSPAPER
8: Other *OPEN *GOSUB NEWSPAPER
|