Examples of %RSEL

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.