%FIELDS (更新するフィールド)

%FIELDS(name{:name...})

フィールドのリストは、自由形式グループでコーディングされる入出力操作 UPDATE に対する最後の引数として指定することができます。指定されたフィールドのみが更新され、入出力バッファーに入れられます。

注:
  1. それぞれの名前は、そのレコードの入力バッファー内のフィールド名になっている必要があります。フィールドの名前が変更された場合、 内部名が使用されます。

%FIELDS は更新するフィールドのリストを指定します。 たとえば、次のようになります。

図 197. フィールドの更新

/free
   chain empno record;
   salary = salary + 2000;
   status = STATEXEMPT;
   update record %fields(salary:status);
 /end-free