7.77.2 PRINTの使用例
例1：地域売り上げファイルを読み取り、読み取った各レコードの明細を印刷するRDMLプログラムを作成します。
DEF_LINE NAME(#DETAIL) FIELDS(#REGION #PRODES #VALUE)
SELECT FIELDS(#DETAIL) FROM_FILE(SALEHIST)
PRINT LINE(#DETAIL)
ENDSELECT
ENDPRINT
例2：地域売り上げファイルを読み取り、読み取った各レコードの明細を印刷し、地域小計を生成するRDMLプログラムを作成します。
DEF_LINE NAME(#DETAIL) FIELDS(#REGION #PRODES #VALUE)
DEF_BREAK NAME(#REGTOT) FIELDS(#REGVAL) TRIGGER_BY(#REGION)
SELECT FIELDS(#DETAIL) FROM_FILE(SALEHIST)
KEEP_TOTAL OF_FIELD(#VALUE) IN_FIELD(#REGVAL) BY_FIELD(#REGION)
PRINT LINE(#DETAIL)
ENDSELECT
ENDPRINT
例3：地域売り上げファイルを読み取り、地域小計のみ(すなわち、要約レポート)を印刷するRDMLプログラムを作成します。
DEF_BREAK NAME(#REGTOT) FIELDS(#REGION #REGVAL) TRIGGER_BY(#REGION)
SELECT FIELDS(#REGION #VALUE) FROM_FILE(SALEHIST)
KEEP_TOTAL OF_FIELD(#VALUE) IN_FIELD(#REGVAL) BY_FIELD(#REGION)
PRINT LINE(*BREAKS)
ENDSELECT
ENDPRINT