BACKTRACE命令をプログラム中で使うと実行中のスロットと行番号を表示します。 その情報をプログラムの最初に読み取ればスロット番号を取得できますよ。 BACKTRACE SLOT=CHKCHR(CSRX,CSRY-1)-48