! TITLE: return.mac (MANAGEMENT) ! ! OBJECTIVE: ! ! Break reading from an input file (*Return with /NOPR check option) ! ! COMMAND SYNTAX: ! (1) (2) ! return, value, prkey ! ! ARGUMENTS: ! ! value = 0 returns to the top level (default) ! = -n returns n levels returns to level n. ! prkey = 0 maintains the existing /NOPR or /GOPR condition (default) ! = 1 invokes the /GOPR condition. ! ! DESCRIPTION: ! ! Break reading from an input file using the undocumented *RETURN command ! with an additional option resume output printing (/GOPR) based upon ! argument. Useful when breaking *DO loops or *IF conditional statements. ! ! Many macros from which this may be called turn off printing during execution ! and turns it back on at end if it was initially on. This macro allows it to ! be turned back on without having to include the *IF conditional check before ! every *RETURN. ! ! WARNING: ! ! EXAMPLES: ! ! TO BE DONE: ! *return,ARG1 *IF,ARG2,EQ,1,THEN /GOPR *ENDIF /EOF