指定されたバイト値で、あるアドレスを n バイトだけ埋めます。
CALL PLIFILL(x, y, z);
x は、POINTER または OFFSET として宣言する必要がある式です。OFFSET の場合は、AREA 属性を使用して x を宣言する必要があります。
y は、CHARACTER(1) NONVARYING として宣言する必要があるバイトです。
z は、FIXED BINARY(31,0) に変換される式です。
foo: proc() options(main); DCL PLIFILL builtin; DCL mystring char(10) init('AAAAAAAAA'); CALL PLIFILL (addr(mystring), 'B', length(mystring)); PUT DATA(mystring);
なし。
説明
PLIFILL は、変換や、埋め込み、切り詰めなしに、指定されたバイト (y) のコピーを z の長さだけ場所 x に移動します。
PLIFILL、PLIMOVE、および PLIOVER 組み込みサブルーチンは、バッファーの管理にも役立ちます。