Example:
GTM>DO ^%RSEL
Routine: TES*
TEST2 TEST3
Current total of 2 routines
Routine: <RETURN>
GTM>DO OBJ^%RSEL
Routine:Test%
Current total of 0 routines
Routine: <RETURN>
GTM>ZWRITE
%ZR=0
This example selects two source routines starting with "TES" as the first three characters. Then, the example invokes %RSEL at the OBJ label to select object modules only. OBJ^%RSEL returns a %ZR=0 because object modules for the TEST routines do not exist.
Example:
GTM>DO ^%RSEL Routine: BES* BEST BEST2 BEST3 BEST4 Current total of 4 routines Routine: - BEST BEST Current total of 3 routines Routine: ?D BEST2 BEST3 BEST4 Routine: 'BEST2 BEST2 Current total of 2 routines Routine: ?D BEST3 BEST4 Routine: <RETURN> GTM>ZWRITE %ZR=2 %ZR("BEST3")="USER:[SMITH.WORK]" %ZR("BEST4")="USER:[SMITH.TEST]" GTM>
This example selects the routines using the asterisk (*) wildcard and illustrates how to tailor your selection list. Note that %ZR contains two routines from different directories.
By default, %RSEL bases the contents of %ZR on source files that have a .M extension.
Example:
GTM>DO ^%RSEL Routine:BEST* BEST2 BEST3 Current total of 2 routines Routine: <RETURN> GTM>ZWRITE %ZR=2 %ZR("BEST2")="USER:[SMITH.WORK]" %ZR("BEST3")="USER:[SMITH.WORK]"
This example creates a %ZR array with BEST2 and BEST3.
Example:
GTM>DO ^%RSEL Routine:LOCK LOCK Current total of 1 routine Routine: <RETURN> GTM>ZWRITE %ZR=1 %ZR("LOCK")="USER:[SMITH.WORK]" GTM>DO CALL^%RSEL Routine:BEST* BEST2 BEST3 Current total of 2 routines Routine: <RETURN> GTM>ZWRITE %ZR=3 %ZR("BEST2")="USER:[SMITH.WORK]" %ZR("BEST3")="USER:[SMITH.WORK]" %ZR("LOCK")="USER:[SMITH.WORK]" GTM>
This example creates a %ZR array with LOCK and adds to it using CALL%RSEL.