I'm getting the following error message when I tried to set some message code. Any help on this is appreciated.
COMMAND SETMSG NOT FOUND
93 *-* "SETMSG MSG(ISRZ001)"
+++ RC(-3) +++
Q = LISTDSI("SDSN NORECALL") /* CHECK IF PRINT FILE IS IN CATALOG */
IF SYSBLKSIZE = 0 THEN
ZEDSMSG = 'INVALID BLOCK SIZE'
ZEDLMSG = 'BLOCK SIZE OF DATA SET MUST NOT BE ZERO.'
ADDRESS ISPEXEC 'SETMSG MSG(ISRZ001)'
Joined: 26 Apr 2004 Posts: 4650 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.