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
 

 

How to create a panel and execute it.?

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

New User


Joined: 10 Aug 2007
Posts: 7
Location: india

PostPosted: Thu May 29, 2008 4:00 pm    Post subject: How to create a panel and execute it.?
Reply with quote

Hi ,

I have got a following code for creating a panel ,
%------------------------------- EMPLOYEE RECORDS ---------------------------
+
% SELECT OPTION ===>_ZCMD %
%
% 1 +MODIFY(REX)- ADD, UPDATE, OR DELETE EMPLOYEE RECORDS
% 2 +(FUTURE) - FUNCTION NOT YET AVAILABLE
% 3 +(FUTURE) - FUNCTION NOT YET AVAILABLE
% 4 +(FUTURE) - FUNCTION NOT YET AVAILABLE
% 5 +(FUTURE) - FUNCTION NOT YET AVAILABLE
+
+ENTER%END COMMAND+TO TERMINATE.
)PROC
&ZSEL = TRANS( TRUNC (&ZCMD,'.')
1,'CMD(EMPLFN)' )
)END

Say I want to name this PANEL. Now how to display it? Also what does option 7 (dialog test) in ISPF do?
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Thu May 29, 2008 4:12 pm    Post subject: Reply to: How to create a panel and execute it.?
Reply with quote

Place the panel definition for the member PANEL into your site's specified panel library (ISPPLIB). Then, you can display the panel by calling the ISPF SELECT Service:

ISPEXEC SELECT PANEL(PANEL)

in a language like COBOL, it would look more like

CALL 'ISPLINK' USING 'SELECT' PANEL-NAME.

If, for some reason, you wish to use libraries for your ISPF dialogs that are NOT already allocated to your TSO session, you can use the LIBDEF Service to dynamically allocate specific datasets for your ISPF libraries.

When writing ISPF dialog using REXX, I prefer to place the panel definition code within the REXX exec, thus savings the hassle of having to use a seperate library to store panel definitions.

Details about Dialog Test (Option 7).
Back to top
View user's profile Send private message
manojraja

New User


Joined: 10 Aug 2007
Posts: 7
Location: india

PostPosted: Thu May 29, 2008 4:38 pm    Post subject:
Reply with quote

Hi,

I gave my ISPPLIB definition as
LIBDEF ISPPLIB DATASET ID('ABC.DEF')
ADDPOP
ZWINTTL = "DISPLAY PANEL"
SELECT PANEL(SAMP)

But when i execute this for the above panel, it says,
Panel 'SAMP' error
No )END found before reaching end of file.
Now what to do..???
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 May 29, 2008 4:44 pm    Post subject:
Reply with quote

Did you use option 7 to test your panel before trying to use it ?
Back to top
View user's profile Send private message
manojraja

New User


Joined: 10 Aug 2007
Posts: 7
Location: india

PostPosted: Thu May 29, 2008 5:04 pm    Post subject:
Reply with quote

Hi,

I went through the manual for Dialog testing using option 7 in ispf panel.
But i couldnt understand how to test the panel.
I have my panel in my own PDS ABC.DEF.
can some one explain me how to test the panel using option 7?
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 May 29, 2008 5:15 pm    Post subject:
Reply with quote

Use ALTLIB to concatenate your library with ISPPLIB and then try it.
Back to top
View user's profile Send private message
manojraja

New User


Joined: 10 Aug 2007
Posts: 7
Location: india

PostPosted: Thu May 29, 2008 6:22 pm    Post subject:
Reply with quote

Hey,

Thanks all !!! It Worked..!!!
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 Unable to create multiple files using... mbattu COBOL Programming 3 Fri May 05, 2017 5:35 pm
No new posts copy SEQ to PDS and create stats steve-myers JCL & VSAM 5 Thu Apr 27, 2017 1:15 am
No new posts ISPF - How to come out of ISPF Panel parasmalik20 TSO/ISPF 5 Tue Feb 21, 2017 7:44 pm
No new posts Execute TSO ACF commands from COBOL-I... supreethi.srid TSO/ISPF 0 Tue Feb 21, 2017 5:19 pm
No new posts the use of 'B3'x character in a panel Pedro TSO/ISPF 1 Thu Feb 16, 2017 3:09 am


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