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: 2025
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: 1224
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
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts Display ZEDLMSG without Pressing F1 &... anandgbe CLIST & REXX 8 Thu Dec 15, 2016 4:20 pm
No new posts Is the 'prompt' data for the DSLIST p... Willy Jensen TSO/ISPF 2 Tue Dec 06, 2016 4:38 am
No new posts How to display value of an exit param... lind sh CICS 2 Sun Oct 09, 2016 12:28 pm
This topic is locked: you cannot edit posts or make replies. DSList (3.4) cannot display Chinese c... jacobdng TSO/ISPF 4 Wed Oct 05, 2016 2:51 pm


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