x を y の長さだけ CTF トレース ファイルに書き込みます。
CALL PLICTF(999, 1, -1, x, [ y]);
x は文字式です。
y は CTF トレース ファイルに書き込む長さです。
y パラメーターが指定されていない場合、y は (x) の大きさと等しくなります。
DCL MSG CHAR(100) INIT('My name is Daniels, Jack Daniels!'); CALL PLICTF(999, 1, -1, MSG); CALL PLICTF(999, 1, -1, MSG, 18); CALL PLICTF(999, 1, -1, "You ain't nothing but a hound dog");
foo: proc() options(main); /* Generate a 999 event, Info Level tracing (1), with a message of "A trace for Bob", that is 15 bytes long Requires: where xxx is replaced with “level” Of debug/info/warning/error mftrace.level.mf.rts.pli = xxxx The “flags” parameter (#3) is not one the customer Can change with the current releases – must always be -1 */ call PLICTF(999, 1, -1, "A trace for Bob", 15); end;
なし。
説明
CTF は、実行されているアプリケーションをトレースし、トレース ファイルをテキスト (デフォルト) またはバイナリのいずれかの形式で作成する診断ツールです。このサブルーチンを使用して、文字列をトレース ファイルに書き込みます。