2 コマンドを使用した帳票出力
2.3 COBOL 言語プログラムから帳票を印刷するには
COBOL言語で作成したアプリケーションから,EURを起動して帳票を印刷できます。eurerコマンドと
連携した帳票出力もできます。また,COBOL言語でプログラムを開発することで,SEWB+/
REPOSITORYの最上位結合項目を入力して編集した帳票も印刷できます。
最上位結合項目を入力して編集した帳票を印刷するときに使用するCSV形式ファイルを生成するプログ ラムの作成には,SEWB+/CONSTRUCTIONの機能を利用できます。SEWB+/CONSTRUCTIONでは,
帳票を編集したときと同じ最上位結合項目を入力してプログラム開発に利用できるデータ定義ができます。
最上位結合項目を入力して編集した帳票を印刷するまでの流れを,次に示します。
図2-1 帳票出力の流れ(最上位結合項目を含む帳票の場合)
! !
! !
注意事項SEWB+/REPOSITORYは,英語ロケール,および中国語ロケールでは使用できません。
2.3.1 COBOL 言語で帳票を印刷するアプリケーションの開発手順
COBOL言語で作成したアプリケーションから帳票を印刷するには,CALL文でapgrptコマンドを引数と
して記述します。
なお,apgrptコマンドからEURを起動した場合,EURのウィンドウは必ず表示されるので,注意して ください。
apgrptコマンドには,帳票の定義情報を保存してある帳票ファイル名(レポートファイル名,または
フォームシートファイル名),印刷先プリンタ名などのオプションを直接指定できます。しかし,アプリ ケーションを配布した場合など,動作環境に応じてプリンタ名などを変更する必要があります。そのため,
帳票を印刷するときに使用するデータは,オプション記述ファイルに設定しておくと便利です。
コーディング例(日立COBOLの場合)
データファイル(Table.csv)を指定して,フォームシートファイル(Table.fms)を印刷する場合の コーディング例を次に示します。
IDENTIFICATION DIVISION.
PROGRAM-ID.EUR.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 EXEC-NAME PIC X(100)
VALUE 'EURインストール先フォルダ' &
'¥Designer¥Program¥apgrpt.exe table.fms /k c:¥tmp¥Table.txt'.
PROCEDURE DIVISION.
CALL EXEC-NAME.
STOP RUN.
オプション記述ファイル(c:¥tmp¥Table.txt)の記述例 [Hitachi EUR]
PrinterName=
MappingDataFile=Table.csv
COBOL言語によって記述方法が異なります。使用されているCOBOL言語のマニュアル,またはヘルプ
を参照してください。
2.3.2 オプション記述ファイルの指定
オプション記述ファイルで指定できるキーワードについては,「5.12 オプション記述ファイル」を参照し てください。
2.3.3 COBOL 言語のプログラムからの印刷実行
帳票の即時印刷を実行するには,apgrptコマンドの/pオプションに,印刷するプリンタ名を指定します。
また,EURのウィンドウを起動してから印刷を実行する場合は,/lオプションに表示するウィンドウを指 定します。EURのウィンドウには,次に示す三つがあります。
オプション記述ファイルは,/kオプションで指定します。
指定値 説 明
edit レポート編集ウィンドウが表示されます。
view レポート確認ウィンドウが表示されます。印刷指示やプリンタの選択をメニューから設定します。帳票の編集は できませんが,ほかの帳票を開いたり,印刷したりできます。
print レポート印刷ウィンドウが表示されます。印刷指示やプリンタの選択をメニューから設定します。帳票の編集を
したり,ほかの帳票を開いたりできません。