[ |../../index.htm#lansa/print_e.htm]
現在地:

7.100.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  
[ |../../index.htm#lansa/print_e.htm]