Example

 $ SHOW TIME
   15-DEC-2001 14:25:42
 $ GOSUB SYMBOL
 $ EXIT
 $ SYMBOL:
 $     SHOW SYMBOL RED
       RED = "SET DEFAULT [LOWE.DCL]"
 $     RETURN 1

     The GOSUB command transfers control to the subroutine labeled
     SYMBOL. After the subroutine is executed, the RETURN command
     transfers control back to the command following the calling
     GOSUB statement, giving $STATUS and $SEVERITY a value of 1. The
     procedure then exits.