The command's help restrictions (2.) mention message queue and nonprogram message queue. I guess they view a program's or job's message queue as not really being a message queue since a persistent objet doesn't for them.
Restrictions:
1. The SNDPGMMSG command allows a message of up to 512 characters
to be sent. However, if the message is sent to the *EXT
message queue of an interactive job, only 76 characters are
shown on the Display Program Messages display. If the message
is sent to a user's, work station's, or the system operator's
message queue, the Display Message (DSPMSG) command allows all
512 characters to be displayed.
2. This command can only send inquiry messages (specified by
MSGTYPE(*INQ)) to one message queue or to two nonprogram
message queues if one of the queues is *HSTLOG.
Gary
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Wednesday, December 21, 2011 1:56 PM
To: midrange-l@xxxxxxxxxxxx
Subject: SNDPGMMSG and CPD2409
SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGTYPE(*INQ) +
MSGDTA('Must select either *START or *STOP') +
TOPGMQ(*EXT) KEYVAR(&KEYVAR)
RCVMSG MSGTYPE(*RPY) MSGKEY(&KEYVAR) WAIT(*MAX) MSG(&MSGRPY)
When I compile this I am getting a CPD2409
Message . . . . : Specified message type not valid with specified
program
message queue.
Cause . . . . . : ESCAPE and CMD messages cannot be sent to the external
program message queue (*EXT). INQUIRY messages cannot be sent to program
message queues other than (*EXT).
Recovery . . . : Change the message type or change the program queue
name.
Rob Berendt
--
Group Dekko
Dept 1600
Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at
http://archive.midrange.com/midrange-l.
As an Amazon Associate we earn from qualifying purchases.