Routine ：（%RSELを使用して）ルーチンの名前を要求します； <RETURN>は選択を終了します。

Output Device: <terminal>:

ディスティネーション・デバイスを要求します。デフォルトではプリンシパル・デバイスになります。

例：

GTM>DO ^%FL
First Line Lister 
Routine: %D
%D
Current total of 1 routine.
Routine: %GS* 
%GSE %GSEL
Current total of 3 routines.
Routine: - %D
%D
Current total of 2 routines.
Routine: ?D
%GSE %GSEL
Routine: <RETURN>
Output Device: <RETURN>
Routine First Line Lister Utility
GT.M 21-MAR-2002 16:44:09 
%GSE
%GSE;GT.M %GSE utility - global search
;
%GSEL;
%GSEL;GT.M %GSEL utility - global select into a local array
;
;invoke ^%GSEL to create %ZG - a local array of existing globals, interactively
;
Total 5 lines in of 2 routines.
GTM>

この例では、%Dを選択して%GSEと%GSELを選択し、%Dの選択を解除します。この例は、Output Device：<ターミナル>：プロンプトで<RETURN>を入力するため、出力はプリンシパル・デバイスに送られます。

ルーチン：変更するルーチンの名前を（%RSELを使用して）要求します。<RETURN>は選択を終了します。

Old string (古い文字列)：置換される文字列を要求します。

New string (新しい文字列)：置換文字列を要求します。

変更される行を表示しますか<YES> ？：

変更された行の前後のバージョンを出力デバイスに表示するかどうかを尋ねます。

Output Device: <terminal>:

ディスティネーション・デバイスを要求します。デフォルトではプリンシパル・デバイスになります。

CALL：%ZRが定義されていない場合を除いて、ユーザーの対話操作なしで動作します。

次の入力変数は、CALL^%RCE を呼び出すときにのみ適用されます。

%ZR：%RSELで提供または生成されたルーチンの配列を含みます。

%ZF：検索する文字列を含みます。

%ZN：置換文字列を含みます。

%ZD：変更の履歴を表示するデバイスを指定します。デフォルトはプリンシパル・デバイスです。デバイスがプリンシパル・デバイスでない場合は、デバイスを必ず開いてください。

%ZC：変更履歴を表示するかどうかを示す真理値。デフォルトは0（いいえ）です。

例：

GTM>DO ^%RCE 
Routine Change Every occurrence 
Routine: BES*
BEST BEST2 BEST3 BEST4
Current total of 4 routines
Routine: <RETURN>
Old string:^NAME 
New string:^STUDENT
Replace all occurrences of:
>^NAME<
With
>^STUDENT<
Show changed lines <Yes>?: <RETURN>
Output Device: <RETURN>
/usr/smith/work/BEST.m
Was: S ^NAME=SMITH 
Now: S ^STUDENT=SMITH
Was: S ^NAME(1)=JOHN
Now: S ^STUDENT(1)=JOHN
/usr/smith/work/BEST2.m
/usr/smith/work/BEST3.m
Was: S ^NAME=X
Now: S ^STUDENT=X
Was: W ^NAME
Now: W ^STUDENT
/usr/smith/work/BEST4.m
Total of 4 routines parsed.
4 occurrences changed in 2 routines.
GTM>

この例では、文字列 "^NAME" を文字列 "^STUDENT" に変更するルーチンのリストを選択し、変更の履歴を表示します。

例：

GTM>DO ^%RCE
Routine Change Every occurrence
Routine: BES*
BEST BEST2 BEST3 BEST4
Current total of 4 routines
Routine: <RETURN>
Old String:<TAB> 
The find string contains control characters
New string: <RETURN>
Replace all occurrences of:
><TAB><
With:
><
Show changed lines <Yes>?: N
BEST BEST2 BEST3 BEST4
Total 4 routines parsed.
4 occurrences changed in 2 routines.
GTM> 

この例では、指定されたルーチンからすべての<TAB>キーを削除し、変更の表示履歴を抑制します。

Routine ：リストするルーチンの名前を（%RSELを使用して）要求します。<RETURN>は選択を終了します。

OBJ：現在の $ZROUTINES を通してアクセス可能なオブジェクト・モジュールをリストします。

LIB：現在の $ZROUTINESを通してアクセス可能なパーセント（%）ルーチンをリストします。

SRC：現在の$ZROUTINESでアクセス可能なソースモジュールを一覧表示します（%RDと同じ）。

例：

GTM>DO ^%RD 
Routine directory
Routine: TAXES
TAXES
Total of 1 routine
Routine:*
EMP FICA PAYROLL TAXES YTD
Total of 5 Routines
Routine: <RETURN>
GTM>

この例では、ルーチンTAXES および ワイルドカード（*）の入力を求める%RDが呼び出されます。%RDは、現在の $ZROUTINES を通してアクセス可能な5つのルーチンをリストします。

例：

GTM>DO OBJ^%RD 
Routine directory
Routine:*
EMP FICA
Total of 2 routines
Routine: <RETURN>
GTM> 

この例では、現在の $ZROUTINES によってアクセス可能なオブジェクト・モジュールのみをリストするラベルOBJを%RDに呼び出します。

例：

GTM>DO LIB^%RD 
Routine directory
%D %DATE %DH %G %GD %GSEL 
GTM> 

この例では、現在の$ZROUTINESを通してアクセス可能なすべての%ルーチンをリストするLIBラベルとともに%RDを呼び出します。

例：

[参考]GTM>DO OBJ^%RD 
Routine directory
Routine:*
EMP FICA
Total of 2 routines
Routine: <RETURN>
GTM> 

この例では、現在の$ZROUTINESを通じてアクセス可能なソース・モジュールのみをリストするSRCというラベルを付けて%RDを呼び出します。

Formfeedで区切られた<いいえ>？

行を改行(CR)ではなく改行文字で区切るかどうかを要求します。

Input Device: <terminal>:

Mルーチンを含むROファイルの名前を要求します。

出力ディレクトリ：

Mルーチンを出力するディレクトリの名前を要求します。

例：

GTM>DO ^%RI
Routine Input utility - Converts RO file to *.m files
Formfeed delimited <No>?<RETURN>
Input device: <terminal>: file.ro
Files saved from FILEMAN directory
GT.M 07-MAY-2002 15:17:54
Output directory: /usr/smith/work/
DI DIA DIAO DIAI DIB DIBI
Restored 753 lines in 6 routines.
GTM>

Routine ：出力するルーチンの名前を（%RSELを使用して）要求します。<RETURN>は選択を終了します。

Output device: <terminal>:

ディスティネーション・デバイスを要求します。デフォルトではプリンシパル・デバイスになります。

Header label (ヘッダー・ラベル)：2つのヘッダー・レコードの最初に配置するテキストを要求します。

Strip comments <No>?: ストリップコメント<いいえ> ?:

2つの隣接するセミコロンを持つコメント行以外のすべてのコメント行を削除するかどうかを尋ねます。

CALL：%ZRが定義されていない場合を除いて、ユーザーの対話操作なしで動作します。

次の入力変数は、CALL^%RO を呼び出すときにのみ適用されます。

%ZR：%RSELで提供または生成されたルーチンの配列を含みます。

%ZD：出力を表示するデバイスを指定します。デフォルトはプリンシパル・デバイスです。

例：

GTM>DO ^%RO
Routine Output - Save selected routines into RO file.
Routine: %D
%D
Current total of 1 routines.
Routine: -%D
%D
Current total of 0 routines.
Routine: BEST* 
BEST BEST1 BEST2 
Current total of 3 routines.
Routine: ?D
BEST BEST1 BEST2
Routine: <RETURN>
Output Device: <terminal>: output.txt
Header Label: Source code for the BEST modules.
Strip comments <No>?:<RETURN>
BEST BEST1 BEST2 
Total of 53 lines in 3 routines
GTM>

この例では、%D を選択範囲内で加算および減算し、次に "BEST" で始まるすべてのルーチンを追加し、現在の選択を確認します。The example sends output to the designated output file output.txt この例では、指定された出力ファイルoutput.txt に出力を送信します。%ROは、出力ファイルの先頭にラベルを表示します。ヘッダー・ラベルの最初のレコードは、プロンプトで入力したテキストです。ヘッダー・ラベルの2番目のレコードは、単語 "GT.M" と現在の日付と時刻で構成されています。

Routine ：検索するルーチンの名前を（%RSELを使用して）要求します。<RETURN>は選択を終了します。

Find string ：検索する文字列を要求します。

Output device: <terminal>:

ディスティネーション・デバイスを要求します。デフォルトではプリンシパル・デバイスになります。

CALL：%ZRが定義されていない場合を除いて、ユーザーの対話操作なしで動作します。

次の入力変数は、CALL^%RSE を呼び出すときにのみ適用されます。

%ZR：%RSELで提供または生成されたルーチンの配列を含みます。

%ZF：検索する文字列を含みます。

%ZD：結果を表示するデバイスを指定します。デフォルトはプリンシパル・デバイスです。デバイスがプリンシパル・デバイスでない場合は、デバイスを必ず開いてください。

例：

GTM>DO ^%RSE
Routine Search for Every occurrence 
Routine: BES*
BEST BEST2 BEST3 BEST4
Current total of 4 routines
Routine: <RETURN>
Find string:^NAME
Find all occurrences of: 
>^NAME<
Output device: <terminal>:
/usr/smith/work/BEST.m
S ^NAME=SMITH
S ^NAME(1)=JOHN
/usr/smith/work/BEST2.m
/usr/smith/work/BEST3.m
S ^NAME=X
W ^NAME
/usr/smith/work/BEST4.m
Total of 4 routines parsed.
4 occurrences found in 2 routines.
GTM>

この例では、指定された文字列を検索して検出する%RSEを呼び出します。出力デバイスは、テキスト文字列が出現するすべての行のターミナル表示を指定します。

例：

GTM>DO ^%RSE
Routine Search for Every occurrence
Routine: BEST
BEST
Current total of 1 routine
Routine: <RETURN>
Find string:^NAME 
Find all occurrences of: 
>^NAME<
Output Device: out.lis
BEST
GTM> 

この例では、^%RSEに、テキスト文字列が出現するすべての行を出力ファイル out.lis に書き込むよう指示します。

Routine ：ルーチンの名前を要求します； <RETURN>は選択を終了します。

CALL：%ZRを再初期化せずに%RSELを実行します。

OBJ：オブジェクト・ファイルのみを検索します。

SRC：ソース・ファイルのみを検索します（%RSELと同じ）。

SILENT：%RSELの機能への非対話型（バッチ）アクセスを提供します。シンタックスは SILENT^%RSEL(pattern,label) で、pattern は、検索するルーチン名を指定する文字列です。label は "OBJ"、 "SRC"、"CALL"にすることができます。対話的に呼び出される場合、デフォルトで "SRC"の値は ^%RSEL に対応します。

次の入力変数は、CALL^%RSEL を呼び出すときにのみ有効です。

%ZE：ファイル拡張子を含みます。通常、ソースファイルは .m 、オブジェクトファイルは .o です。

%ZR：入力として、変更するルーチンの既存のリストが含まれています。

%ZRSET：設定時に、%RSELにグローバル変数 ^%RSET に出力を要求します。

%ZR：出力として、選択したルーチン名でインデックスされたディレクトリのリストが含まれます。

^%RSET($JOB) ：入力変数 %ZRSET が設定されている場合、ローカル変数 %RD の代わりに出力グローバル変数^%RSETが使用されます。これは、ジョブ番号 $JOB と選択されたルーチン名によってインデックスされます。

例：

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

この例では、最初の3文字として "TES" で始まる2つのソース・ルーチンを選択します。次に、OBJラベルで%RSELを呼び出してオブジェクト・モジュールのみを選択します。OBJ^%RSEL は、TESTルーチンのオブジェクト・モジュールが存在しないため、%ZR=0 を返します。

例：

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")="/usr/smith/work/"
%ZR("BEST4")="/usr/smith/test/"
GTM>

この例では、アスタリスク（*）ワイルドカードを使用してルーチンを選択し、選択リストをカスタマイズする方法を示しています。%ZR には、異なるディレクトリの2つのルーチンが含まれています。

デフォルトでは、%RSEL は、拡張子が .m のソース・ファイルに %ZR の内容をもとにしています。

例：

GTM>DO ^%RSEL
Routine:BEST*
BEST2 BEST3
Current total of 2 routines 
Routine: <RETURN>
GTM>ZWRITE
%ZR=2
%ZR("BEST2")="/usr/smith/test/"
%ZR("BEST3")="/usr/smith/test/"

この例では、BEST2 と BEST3 の%ZR 配列を作成します。

例：

GTM>DO ^%RSEL
Routine:LOCK
LOCK
Current total of 1 routine
Routine: <RETURN>
GTM>ZWRITE 
%ZR=1
%ZR("LOCK")="/usr/smith/work/"
GTM>DO CALL^%RSEL
Routine:BEST*
BEST2 BEST3
Current total of 2 routines
Routine: <RETURN>
GTM>ZWRITE
%ZR=3
%ZR("BEST2")="/usr/smith/work/"
%ZR("BEST3")="/usr/smith/work/"
%ZR("LOCK")="/usr/smith/work/"
GTM>

この例では、%ZR 配列をLOCKとともに作成し、CALL^%RSELを使用してその配列に追加します。

例：

GTM>do SILENT^%RSEL("myroutine","OBJ")

GTM>ZWRITE
%ZR=1
%ZR("myroutine")="/usr/smith/work"

この例では、%RSELを非対話形式で呼び出し、SILENT^%RSELを使用して、"myroutine" の%ZR配列を作成します。