One of the many things that caught my eye in the latest round of Technology Refreshes for 7.4 and 7.3 is a way to send messages to the System Operator message queue, QSYSOPR, using a SQL procedure, SEND_MESSAGE.
Before I used the Send Message command, SNDMSG, to do this:
SNDMSG MSG('Message from SNDMSG command') TOUSR(*SYSOPR)
Additional Message Information
From . . . . . . : SIMON Severity . . . . . : 80
Message type . . : Information
Date sent . . . : DD/DD/DD Time sent . . . . : TT:TT:TT
Message . . . . : Message from SNDMSG command
|
This new SQL procedure, SEND_MESSAGE, must use a predefined message that must have one substitution parameter that is defined as *CHAR *VARY 2.
My first thought was to use the CPF9898 message, but that has a severity of 40, and it is fixed length of 512.
I decided to create my own message I could use. To avoid any confusion with any existing messages in any messages files I created my own message file, and added my message to it: