Mach den MONMSG(CPF1907) am Anfang, korrigiere den SND/RCVPGMMSG auf PGMQ(*SAME).
Prüfe während des RPG-Aufrufes den Callstack ob die Aufrufebene eine Nummer bekommen hat.
Bei mir läuft das schon so seit V2R1.