Wo läuft das CL

[Fuerchau]

DCL &SENDER *CHAR 10
SNDPGMMSG MSG('/**/') TOPGMQ(*SAME)
RCVMSG PGMQ(*SAME) MSGTYPE(*LAST) RMV(*YES) SENDER(&SENDER)