目的
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 は、実行されているアプリケーションをトレースし、トレース ファイルをテキスト (デフォルト) またはバイナリのいずれかの形式で作成する診断ツールです。このサブルーチンを使用して、文字列をトレース ファイルに書き込みます。