Versuchs mal mit
CHGDEVPRT DEVD(MYPRT)
PRTERRMSG(*INQ)
MSGQ(*SYSOPR)