View previous topic :: View next topic
|
Author |
Message |
neeharika
New User
Joined: 23 May 2008 Posts: 14 Location: Hyderabad
|
|
|
|
I'm getting the following error message when I tried to set some message code. Any help on this is appreciated.
Code: |
COMMAND SETMSG NOT FOUND
93 *-* "SETMSG MSG(ISRZ001)"
+++ RC(-3) +++
*** |
Code: |
Q = LISTDSI("SDSN NORECALL") /* CHECK IF PRINT FILE IS IN CATALOG */
IF SYSBLKSIZE = 0 THEN
DO
ZEDSMSG = 'INVALID BLOCK SIZE'
ZEDLMSG = 'BLOCK SIZE OF DATA SET MUST NOT BE ZERO.'
ADDRESS ISPEXEC 'SETMSG MSG(ISRZ001)'
END |
Thanks,
Neeharika. |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
Hmm, I don't know.
Your code worked just fine for me. What's odd is that the error "RC(-3)" almost makes me think that you're not running this exec from within ISPF. But, without ISPF, there'd be no panel to display the messages on. |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
As SuperK said, make sure you are in ISPF.
If you still have problems, turn on the trace and show us the trace response. |
|
Back to top |
|
|
|