データ入力画面でカーソル移動の挙動を変更したい

Question

弊社では、DDSで入力画面を作成しています。

8行2列の各入力項目があり、1行目の項目を入力後カーソル位置が右(2列1行目)にシフト移動するのですが、オペレーターから入力順序的にはカーソルが下（1列2行目）に移動したほうが、利用しやすいとの要望がありました。

カーソル移動の挙動を変えることは可能でしょうか。

Answer

DDSキーワード FLDCSRPRG を使用することで実現できます。

構文：FLDCSRPRG（カーソル移動先フィールド）

■サンプルDDS

 ****************** データの始め *******************************
     A                                      DSPSIZ(24 80 *DS3)
     A                                      CA03(03)
     A          R FMT01
     A*
     A            FLD001         3A  B  6 20FLDCSRPRG(FLD002)
     A            FLD010         3A  B  6 30FLDCSRPRG(FLD020)
     A*
     A            FLD002         3A  B  8 20FLDCSRPRG(FLD003)
     A            FLD020         3A  B  8 30FLDCSRPRG(FLD030)
     A*
     A            FLD003         3A  B 10 20FLDCSRPRG(FLD004)
     A            FLD030         3A  B 10 30FLDCSRPRG(FLD040)
     A*
     A            FLD004         3A  B 12 20FLDCSRPRG(FLD005)
     A            FLD040         3A  B 12 30FLDCSRPRG(FLD050)
     A*
     A            FLD005         3A  B 14 20FLDCSRPRG(FLD010)
     A            FLD050         3A  B 14 30FLDCSRPRG(FLD001)
     A*
***************** データの終わり ******************************

■サンプルRPG

****************** データの始め *******************************
     FDSPT2   CF  E                    WORKSTN
     C*
     C           *INKC     DOWEQ*OFF
     C                     EXFMTFMT01
     C                     END
     C*
     C                     SETON                     LR
     C                     RETRN
***************** データの終わり ****************************** 

順番は決め打ちになってしまいますが、上記サンプルによって今回のご要望である、カーソルの移動順序を変更することが可能です。

by 大熊猫橋

あわせて読みたい記事

ライブラリーサイズが肥大化していませんか？

サポートチーム便り2024.11.27

ACSの「SQLスクリプトの実行」でライブラリー・リストを変更したい

サポートチーム便り2024.11.27

あれっ？データ転送で間違って指定したファイル名が一覧に候補で表示されてる？

サポートチーム便り2024.11.13

業務が止まってしまう可能性も...！？「システム・ジョブ・テーブルが容量に近づいている」

サポートチーム便り2024.11.13