メンバー内の一定条件に基づいてメンバーをコピーまたは印刷する

この例では、メンバー内の一定条件に基づいて、メンバーをコピーするか印刷するかを選択する方法を示します。

文字ストリング Hello Mom を含むすべてのメンバーをコピーします (大文字または小文字のすべての文字を使用します)。

FASTREXX:
/* Requires option MEMPROC=DROP */
If FLD_CO( 1, 0, "U", "HELLO MOM" ) Then RETURN PROCESS MEMBER

REXX:

(FASTREXX と同じ)

DFSORT:

適用外