>　>　プログラム内で実行中の端末ID情報を知るには？
>　
>　RPG/ILEでは
>　DNAME+++++++++++ETDSFROM+++TO/L+++IDC.KEYWORDS++++
>　D　　　　　　　　　　　　　　　　SDS　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　
>　D　　PGMNAME　　　　　　　　　　*PROC
>　D　　WSID　　　　　　　　　　　　　　　　　244　　　　253
>　D　　USER　　　　　　　　　　　　　　　　　254　　　　263
>　D　　JOBNBR　　　　　　　　　　　　　　　264　　　　269
>　
>　CLでは
>　DCL　　　　　　　　VAR(&WSID)　　　TYPE(*CHAR)　LEN(10)
>　DCL　　　　　　　　VAR(&USER)　　　TYPE(*CHAR)　LEN(10)
>　DCL　　　　　　　　VAR(&JOBNBR)　TYPE(*CHAR)　LEN(6)　
>　RTVJOBA　　　　JOB(&WSID)　　　USER(&USER)　NBR(&JOBNBR)