Chuck,
No matter what I try, it never goes to the submitted job message, nor
picks up the completion message from the submitted job. Is it something
to do with the call stack, and losing its "thread"??
Don
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of CRPence
Sent: Wednesday, May 14, 2008 1:53 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: CPYSPLF - but don't know the spooled file number
The RCVMSG immediately after SBMJOB should probably be coded to
receive message type *LAST, if the request did not fail, to best ensure
receiving the completion message. That is how I have always coded it,
and it has never failed me. Or all prior messages in that program
message queue need to be deleted, before the SBMJOB is issued. That is
because the order of messages coming off of the *PGMQ [program message
queue] for a *COMP [completion message type; in fact for non-exception
messages, per MSGTYPE(*EXCP) doc] is FIFO instead of LIFO. That would
explain why the RCVMSG would be getting a diagnostic "from up above in"
the CLP.
http://groups.google.com/group/comp.sys.ibm.as400.misc/browse_thread/thr
ead/a29b73945c9f6cbe/77b127d42d078244?hl=en&lnk=st&q=rcvmsg+msgtype+cpc1
221+group%3Acomp.sys.ibm.as400.misc#77b127d42d078244
Regards, Chuck
Don Cavaiani wrote:
No, if fact it is a message ID from up above in my CLP where a file
would be created, but it already exists (this happens BEFORE the RPGLE
print program is submitted). So, how do I get it to reflect the
"submitted job" parameters?
<<SNIP>>
"Crispin Bates" wrote:
Is the value of &MID = 'CPC1221' ?
<<SNIP>>
--
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.