Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Display Message in the same Panel

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
HameedAli

Active User


Joined: 16 Apr 2009
Posts: 151
Location: India

PostPosted: Mon Jun 21, 2010 7:32 pm    Post subject: Display Message in the same Panel
Reply with quote

Hi,
This is a panel of mine.
Code:
)ATTR                                                     
 _ TYPE(NEF) CAPS(ON)                                     
 £ TYPE(TEXT)   COLOR(BLUE)   INTENS(HIGH)               
 ¢ TYPE(TEXT)   COLOR(YELLOW) INTENS(HIGH)               
 + TYPE(TEXT)   COLOR(GREEN)  INTENS(HIGH)               
 # TYPE(TEXT)   COLOR(YELLOW) INTENS(HIGH) HILITE(REVERSE)
 @ TYPE(OUTPUT) COLOR(YELLOW) INTENS(HIGH) HILITE(USCORE)
)body window(47,22)                                       
£                                                               
+                                            +           
+  Programmer Name: _Pnam    +                           
+  EMP     Number : _Snam +                               
+                                             
¢               Press Enter to Proceed       
£                                            £
)init                                         
)proc                                                                           
)end 

I want to validate the input fields from the Panel.
If the field is empty, I want throw a message in the Panel.
I don't want to throw the message as another panel using ZEDlMSG.

Somethin like this
Code:
if(&Pnam EQ '') | (&Snam EQ '')

Then what I have to use to display the message
Back to top
View user's profile Send private message

Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Mon Jun 21, 2010 7:58 pm    Post subject:
Reply with quote

Whatever program (COBOL, REXX, etc.) is doing the panel DISPLAY will need to validate fields on the return and fill another field with a message and re-DISPLAY the panel.

This would be instead of using the VER function within the panel.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon Jun 21, 2010 8:22 pm    Post subject:
Reply with quote

The VER statement will automatically return a meaningful error message if the verified field is blank and the VER statement says that it should not be.
Back to top
View user's profile Send private message
HameedAli

Active User


Joined: 16 Apr 2009
Posts: 151
Location: India

PostPosted: Thu Jun 24, 2010 1:09 pm    Post subject: Reply to: Display Message in the same Panel
Reply with quote

Thanks for the information. What if I have to throw custom messages on the panel?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Jun 24, 2010 1:14 pm    Post subject:
Reply with quote

There is a sticky topic in the CLIST / REXX forum for reference materials.

Click on the ISPF link and all of the manuals you need will be displayed.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2068
Location: Silicon Valley

PostPosted: Thu Jun 24, 2010 7:27 pm    Post subject: Reply to: Display Message in the same Panel
Reply with quote

Quote:
What if I have to throw custom messages on the panel?

Please read the ISPF Dialog Developer's Guide and Reference. Read the section for the VER statement.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1235
Location: Israel

PostPosted: Thu Jun 24, 2010 9:09 pm    Post subject:
Reply with quote

Just as you have an ISPPLIB for panels and an ISPSLIB for skeletons, you have an ISPMLIB for messages.

There is a chapter dedicated to "Defining messages" in the ISPF Dialog Developer's Guide and Reference.
Back to top
View user's profile Send private message
HameedAli

Active User


Joined: 16 Apr 2009
Posts: 151
Location: India

PostPosted: Tue Jun 29, 2010 11:17 am    Post subject: Reply to: Display Message in the same Panel
Reply with quote

Thanks Marso for mentioning the heading, which will be of ease to me.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Suppress value reported by BREAK in D... Learncoholic DFSORT/ICETOOL 3 Wed Aug 16, 2017 6:03 pm
No new posts Default Message in Rexx cvnlynn CLIST & REXX 9 Wed Aug 02, 2017 12:38 am
No new posts REXX WTO for console message bipinpeter CLIST & REXX 6 Tue Jun 27, 2017 3:56 pm
No new posts Trace in CLIST PANEL cvnlynn CLIST & REXX 1 Thu Jun 22, 2017 11:06 pm
No new posts Display upon console bipinpeter COBOL Programming 1 Thu Jun 22, 2017 12:35 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us