サブファイルを含む表示装置ファイルのカーソル制御について

Question

###前提・実現したいこと
サブファイルよりも前(画面の上)のレコードに入力可能項目があってもサブファイルの最初の入力可能項目にカーソルをセットしたい。ただし、入力内容にエラーがあればそちらを優先してセットしたい。

###発生している問題・エラーメッセージ
サブファイルの前の入力可能項目にカーソルがセットされる。
DSPATR(PC) を有効にしてサブファイルレコードを出力すればカーソルはそこに動くが、後からサブファイル内にエラーレコードが発生するなどしてカーソルを優先して配置したいときにじゃまになってしまう。

###試したこと
思考の段階でつまづいています。

###補足情報(言語/FW/ツール等のバージョンなど)
OSバージョンは V7R1M0 です。

Answer 1

画面の最初のページのサブファイルが全部保護項目だった場合にまだうまくいかなかったりしますが、これでおおむねできてきました。

1. 画面DDSに CSRLOC キーワードを設定し、RPG側でカーソルを任意の場所にロケートできるようにする。
2. サブファイル書き出し時に入力可能項目を持つレコードの出力があればそのレコード行番号からカーソルを置くべき位置を計算し、ワーク変数にセットする(初期値をゼロなどにしておき、一度セットしたら画面をEXFMTするまでキープする)。
3. サブファイルを出力し終えるまでにカーソル位置を優先させたいエラー項目がなければ(これは標識管理すれば容易に判断できる)、CSRLOC で定義したロケーション用の変数にワーク変数をセットする。

Comments

[k1000]

もっとスマートな解決方法があるかもしれませんので、解決済みにせずに少し置いておきます。

[k1000]

特に他に回答も出ませんので、クローズします。