				Wiki
	updated on 2004.06.23

RPGサイクルのフローチャート

[ HOME ] [ Upper ]

RPGサイクルの詳細フロー図

マニュアル「AS/400　RPG/400 解説書　2.2.1 詳細な RPG/400 オブジェクト・プログラム・サイクル」を参考にして下さい。

*INIT

プログラムが初期設定されます。RPG/400言語によって、
- データ構造とサブフィールドの初期設定、
- 外部標識(U1- U8)
- ユーザー日付フィールド(UDATE、UYEAR、UMONTH、UDAY)のセットアップ、
- ファイルのオープン、
- すべてのデータ域データ構造、配列、およびテーブルのロード、
- *ENTRY PLISTのPARMSステートメントの結果フィールドの演算項目1への転送、
- 初期設定サブルーチン *INZSRの実行、
- RESET命令のための構造と変数の記憶

が行われます。

RPG/400 プログラムの初期設定の順序

大域データ構造初期設定

サブフィールド値初期設定

コンパイル時配列初期設定

実行時前配列初期設定

*INZSR の実行

この時点でのフィールドの現在値が初期値となる。

*DETL
- 見出しおよび明細行（出力仕様書の 15 桁目の H または D によって識別される）を、最初のレコードが読み取られる前に書き出します。
- 見出し行および明細行は常に同時に処理されます。条件付け標識の指定がある場合には、標識の設定値が正しくなければなりません。
- ページ・オーバーフロー・ルーチンが指定してあってオーバーフロー標識がオンの場合には、該当のオーバーフロー行が書き出されます。
- ファイル変換が指定されている場合には、見出し行、明細行、およびオーバーフロー出力についてこれが実行されます。
- ENDSR 命令の演算項目２に入っているフィールド名またはリテラルの値が*DETLの場合には、このステップはプログラム内の戻り点になります
*DETC
- 明細演算が実行されます。
- ENDSR 命令の演算項目２に入っているフィールド名またはリテラルの値が *DETCの場合には、このステップはプログラム内の戻り点になります。
*TOTC
- RPG/400言語は、制御レベル項目 (演算仕様書の 7 - 8 桁目) で条件付けられたすべての合計演算を処理します。
- ENDSR 命令の演算項目２に入っているフィールド名またはリテラルの値が *TOTCの場合には、このステップはプログラム内の戻り点になります。
*TOTL
- すべての合計出力が処理されます。
- オーバーフロー取出し論理が指定してあり、ファイルに関連したオーバーフロー標識(OA ～ OG、OV)がオンの場合には、オーバーフロー行が書き出されます。
- ファイル変換の指定がある場合には、すべての合計出力およびオーバーフロー行について行われます。
- ENDSR命令の演算項目２に入っているフィールド名またはリテラルの値が *TOTLの場合には、このステップはプログラム中の戻り点になります。
*TERM
- RPG/400言語によって、ファィル仕様書(補足 E)(19～26 桁目)にファイル名が指定されているすべての配列またはテーブルが、およびすべてのロックされたデータ域データ構造が書き出されます。
- また外部標識(U1 ～ U8)がリセットされます。
- 出力配列およびテーブルは必要に応じて変換されます。
*CANCL
- オープンされているファイルはすべてクローズされます。
- ENDSR 命令の演算項目２に入っているフィールド名またはリテラルの値が *CANCLの場合には、プログラム内の戻り点にになります。
- またRPG/400言語は、ロックされていて(*NAMVAR DEFNステートメント)、プログラムによってアンロックされていないすべてのデータ域をアンロツクします。

1998/10/25

[ HOME ] [ Upper ]

You are at K's tips-n-kicks of AS/400

SEO		[PR] 爆速!無料ブログ無料ホームページ開設無料ライブ放送