%REPLACE

目的

一意名を、指定された値の定数として指定します。

%REPLACE name BY constant;

%REPLACE 文は、一意名を、指定された値の定数として指定します。

%REPLACE 文が検出された時点以降、コンパイルが終了するまで、または同じ name を指定した別の %REPLACE 文が検出されるまで、マクロプリプロセッサの解釈に従い、%REPLACE 文に続くすべての name が constant で置き換えられます。

%REPLACE 文は通常、テーブルのサイズを指定する目的、またはそのままでは意味が明確でない定数に名前を付ける目的で使用されます。

%REPLACE MSG BY 'login'; 
PUT SKIP LIST(MSG);
...
%REPLACE MSG BY 'logout'; 
PUT SKIP LIST(MSG);