0

条件の実行時にサブファイル内の特定のレコードに色を設定するにはどうすればよいですか? SFL と CTL が定義されている表示ファイルがあります。DSP ファイルのどこでインジケーターを参照したり、RPG でそれらを使用して適切な条件付けをトリガーしたりできますか?

例：

       Name      Age       Location
      Rosell     26        Amsterdam
      Smarkon    31        London
      Jack       40        Chicago
      Jim        22        Mauritius

年齢が 30 歳以上 (age>30) のレコードのみをサブファイルに表示したいと考えています。検索されたレコードを別の色で表示したいと考えています。

4

1 に答える 1

5

COLOR 属性を次のように制御するには、ディスプレイ ファイルで番号付きインジケータを使用します。

.....AAN01N02N03T.Name++++++RLen++TDpBLinPosFunctions+
                  S1AGE          3  0   5 12EDTCDE(Z)
    30                                  COLOR(BLU)

表示装置ファイル・レコード内のこれらの番号標識は、表示装置ファイルのレコード様式で RPG プログラムにやり取りされます。したがって、RPG では、人の年齢の値に応じて標識 30 をオンまたはオフに設定します。(注: 次の例は自由形式の RPG です。)

If S1AGE > 30;
  *IN30 = *On;
Else;
  *IN30 = *Off;
EndIf;

または、RPG で簡潔なコードが好きな場合:

*IN30 = (S1Age > 30);
于 2012-07-23T14:47:37.337 に答える