View previous topic :: View next topic |
Author |
Message |
misi01 Advanced
Joined: 02 Dec 2002 Posts: 616 Topics: 171 Location: Stockholm, Sweden
|
Posted: Mon Jul 11, 2011 5:00 am Post subject: ISRZ001 not displaying message |
|
|
I have the following code in a Rexx macro
Code: |
/***********************************************************************
A defined amount for a variable is larger than we allow (at the
moment)
***********************************************************************/
variable_too_long:
arg line, field_length
parse var line field '(' .
parse var field '[' .
field = strip(field)
zedsmsg = ""
zedlmsg = "Field "field" has a default definition with too many",
"characters - trim it by at least "field_length,
"character"
if field_length > 1 then
zedlmsg = zedlmsg!!"s"
zedlmsg = zedlmsg!!"- (check also that your DIAL file member",
"has numbers off)"
signal exit2
return 0
|
and
Code: |
/**************************************************/
exit2:
/* trace ?a */
Address Isredit "reset label"
Address Isredit "res"
address ispexec
'SETMSG MSG(ISRZ001)'
exit 1
|
What I don't understand is that if I run the code above, I get a nice "fat" message, but a colleague of mine doesn't see it at all. I know (?) there's a setting somewhere that enables/disables messages, but since I can't remember what it might be, I can't look it up to check if our values are different.
Can someone give an idea of what the profile (?) setting might be that is inhibiting his message being shown ? Thanx |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12360 Topics: 75 Location: San Jose
|
|
Back to top |
|
|
John_Deal Beginner
Joined: 04 Sep 2003 Posts: 15 Topics: 1
|
Posted: Tue Jul 12, 2011 12:00 pm Post subject: |
|
|
Try instead:
Code: | ADDRESS ISPEXEC "SETMSG MSG(ISRZ002)" |
8) _________________ Life is a journey; enjoy the trip! |
|
Back to top |
|
|
misi01 Advanced
Joined: 02 Dec 2002 Posts: 616 Topics: 171 Location: Stockholm, Sweden
|
Posted: Wed Jul 13, 2011 1:46 am Post subject: Thanks for suggestions |
|
|
Koluso - thanks for for the pointer, but I think we checked that before I posted and don't recall seeing any differences (let's face it, there aren't that options to compare)
John - to my knowledge, that shouldn't be needed. Having the "address ispexec" on its own line before simply says that any "unknown" Rexx commands should be sent to ISPEXEC after this. I can see the point if you're doing loads of ISREDIT calls with one ispexec call tucked in the moddle, but in this case, it was the last call I was going to make before exitting.
Be that as it may, needless to say, the next day I called my colleague again to check results and the code suddenly worked fine for him (logging off and on reverted settings to the standard ones ?) |
|
Back to top |
|
|
John_Deal Beginner
Joined: 04 Sep 2003 Posts: 15 Topics: 1
|
Posted: Wed Jul 13, 2011 7:34 am Post subject: |
|
|
You obviously didn't notice the MAIN difference between your code and mine.... ISRZ002
Glad you got it working...
8) _________________ Life is a journey; enjoy the trip! |
|
Back to top |
|
|
misi01 Advanced
Joined: 02 Dec 2002 Posts: 616 Topics: 171 Location: Stockholm, Sweden
|
Posted: Thu Jul 14, 2011 1:23 am Post subject: |
|
|
You're quite right John - I didn't. Thanx for the reply anway. _________________ Michael |
|
Back to top |
|
|
|
|