MAINMENU: 表示装置ファイルの DDS

MAINMENU 表示装置ファイルの DDS は、ファイル・レベル項目を指定し、1 つの レコード様式 HDRSCN を記述します。ファイル・レベル項目は、画面サイズ (DSPSIZ)、デフォルトの入力値 (CHGINPDFT)、ページ印刷キー (PRINT)、および独立標識域 (INDARA) を定義します。

HDRSCN レコード様式には、画面を識別する固定情報 'CUSTOMER MAIN INQUIRY' が入っています。また、画面上に現在の時刻と日付を表示するキーワード TIME および DATE も 入っています。CA キーワードは、使用可能な機能キーを定義し、それらの機能キーを RPG プログラム中の標識と関連付けています。

図 191. 表示装置ファイル MAINMENU の DDS
     A*****************************************************************
     A*    ファイル名:  MAINMENU                                      *
     A*関連プログラム:  CUSMAIN                                       *
     A*          説明:  これは表示装置ファイル MAINMENU です。これ    *
     A*                 には 1 つのレコード様式 HDRSCN があります。   *
     A*****************************************************************
     A                                      DSPSIZ(24 80 *DS3)
     A                                      CHGINPDFT(CS)
     A                                      PRINT(QSYSPRT)
     A                                      INDARA
     A          R HDRSCN
     A                                      CA03(03 'END OF INQUIRY')
     A                                      CA05(05 'MAINTENANCE MODE')
     A                                      CA06(06 'SEARCH BY ZIP MODE')
     A                                      CA07(07 'SEARCH BY NAME MODE')
     A                                  2  4TIME
     A                                      DSPATR(HI)
     A                                  2 28'CUSTOMER MAIN INQUIRY'
     A                                      DSPATR(HI)
     A                                      DSPATR(RI)
     A                                  2 70DATE
     A                                      EDTCDE(Y)
     A                                      DSPATR(HI)
     A                                  6  5'Press one of the following'
     A                                  6 32'PF keys.'
     A                                  8 22'F3 End Job'
     A                                  9 22'F5 Maintain Customer File'
     A                                 10 22'F6 Search Customer by Zip Code'
     A                                 11 22'F7 Search Customer by Name'

レコード様式は、画面の固定情報、フィールド、行番号、および桁番号を記述 しているほかに、これらの項目の表示属性も定義しています。

注:
通常、フィールド属性はファイルの DDS ではなく、フィールド参照ファイルに 定義されます。属性が何であるか分るように、DDS 上に属性を示してあります。