Am besten per SNDPGMMSG:

SNDPGMMSG MSG(&VAR1 *CAT &VAR2 ...)
TOPGMQ(*SAME)
MSGTYPE(*INFO)