PIC X VARYING データ型

注: OpenESQL のみ

構文

PIC X(n) VARYING

ここで、n はデータを保持するフィールドの長さを表す整数です。

01 ename  PIC X(15) VARYING.

この例では、次のように生成されます。

01  ename. 
     05  ename-len  PIC S9(4) COMP.
     05  ename-ARR  PIC X(15).