|
View previous topic :: View next topic
|
| Author |
Message |
srajendran2
New User
Joined: 13 May 2008
Posts: 56
Location: Chennai
|
|
|
|
Hi,
My requirement is to get a 4 digit fund number as input in a ISPF screen. I am validating and throwing error message on the screen. Please find below the screen.
| Code: |
)ATTR
~ TYPE(TEXT) INTENS(HIGH) COLOR(BLUE)
_ TYPE(INPUT) INTENS(LOW) COLOR(RED) CAPS(ON)
% TYPE(TEXT) INTENS(HIGH) COLOR(WHITE) SKIP(ON)
` TYPE(OUTPUT) INTENS(HIGH) COLOR(YELLOW) CAPS(ON)
)BODY
~
~
~ FUND NUMBER LOOK UP
~
%
% ENTER THE FUND NUMBER: _R1 +
%
% MSG: `MSG1 +
%
)INIT
&MSG1 = 'PLEASE ENTER A FUND NUMBER'
)PROC
VER(&R1,NB,MSG=MSG001)
VER(&R1,PICT,NNNN,MSG=MSG002)
)END
|
Is it possible to display the user defined message MSG001 / MSG002 in MSG field of the ISPF screen? |
|
| Back to top |
|
 |
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
|
|
|
|
| Read about the )BODY statement. |
|
| Back to top |
|
|
srajendran2
New User
Joined: 13 May 2008
Posts: 56
Location: Chennai
|
|
|
|
Hi,
I updated the BODY as below.
| Code: |
)BODY LMSG(MSG) SMSG(MSG)
~
~
~ FUND NUMBER LOOK UP
~
%
% ENTER THE FUND NUMBER: _R1 +
%
% MSG:` +
%
|
But still the messages are not getting displayed in MSG field. Am i doing something wrong? |
|
| Back to top |
|
|
srajendran2
New User
Joined: 13 May 2008
Posts: 56
Location: Chennai
|
|
|
|
i am sorry. the code looks like this. please ignore the previous one
| Code: |
)BODY LMSG(MSG1) SMSG(MSG1)
~
~
~ FUND NUMBER LOOK UP
~
%
% ENTER THE FUND NUMBER: _R1 +
%
% MSG:`MSG1 +
%
|
|
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL
|
|
|
|
| Is the message library LIBDEFed to ISPMLIB? Does it in fact contain a member for MSG001 and MSG002? |
|
| Back to top |
|
|
srajendran2
New User
Joined: 13 May 2008
Posts: 56
Location: Chennai
|
|
|
|
Hi,
It worked. Its just that the ISPPLIB and ISPMLIB concatenation was wrong and it was picking up the old version from the concatenation |
|
| Back to top |
|
|
|
|
