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
 

 

Need help in developing a panel

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

New User


Joined: 22 Mar 2010
Posts: 17
Location: Hartford

PostPosted: Fri Apr 09, 2010 1:17 am    Post subject: Need help in developing a panel
Reply with quote

I need a sample code for creating a panel which can take user input run a routine at the back end and shows the output on the screen.

I have not created panel screens before can any one help me providing right doc for learning this.
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: Fri Apr 09, 2010 4:52 am    Post subject: Reply to: Need help in developing a panel
Reply with quote

From an empty member in an ISPPLIB PDS, start with one of the simple ISPF Edit Models for panels.

From the MODEL command, try the option:

Panel Formats:
F0 PANFORM

and then from the Panel Formats, a good choice is:

F1 ENTRY - Data entry
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: Fri Apr 09, 2010 11:57 am    Post subject:
Reply with quote

Or go to the CLIST & REXX forum and click on the sticky which has reference materials / manuals or the like in the title and go read some manuals.
Back to top
View user's profile Send private message
Kranthi_Merigala

New User


Joined: 22 Mar 2010
Posts: 17
Location: Hartford

PostPosted: Tue Apr 13, 2010 8:24 pm    Post subject: Requirement
Reply with quote

My requirement is like i need to capture program name and table name from panel screen and execute the below routine and show the out put dataset on the screen.

The output is constant 12 lines.

Can any one help me in giving a sample code..Such that if i enter the program name and table name on the panel the rexx routine should run in the back end and the out put dataset generated should be shown on the panel.

Iam not including the entire EXEC D1 and D2 are the variables user needs to enter.

OUT is the output dataset which i need to show on the panel which has 12 lines always.

/********************REXX**************/
SAY 'ENTER THE PROGRAM NAME TO BE SEARCHED OR THE INITIAL LETTERS OF'
SAY 'THE PROGRAMS TO BE SEARCHED'
PULL D1
SAY 'ENTER THE CREATOR NAME'
PULL D2
NUM = WORDLENGTH(D1,1)
PDS = GIO.END.GPROD.COBOL
A = OUTTRAP(MEM.)
"LISTDS '"PDS"' MEMBERS"
A = OUTTRAP('OFF')

XXXXX
XXXXXX

"ALLOC DA('"OUT"') F(OUTDD) SHR REUSE"
"EXECIO * DISKW OUTDD (STEM VAR3. FINIS"
"FREE F(OUTDD)"
RETURN
*************end***********
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: Tue Apr 13, 2010 9:45 pm    Post subject: Reply to: Need help in developing a panel
Reply with quote

Just to be clear, do you need help with the panel code or with the calling program code, or is it both? Were you at least able to create a basic functional panel definition from the ISPF Edit Models?
Back to top
View user's profile Send private message
Kranthi_Merigala

New User


Joined: 22 Mar 2010
Posts: 17
Location: Hartford

PostPosted: Tue Apr 13, 2010 10:33 pm    Post subject:
Reply with quote

I Need help for both...I have not created a panel so far
Back to top
View user's profile Send private message
agkshirsagar

Active Member


Joined: 27 Feb 2007
Posts: 685
Location: Earth

PostPosted: Wed Apr 14, 2010 12:11 am    Post subject:
Reply with quote

Of course you need help for both! But this is not 'do it for me' forum.

Please follow the instructions in Kevin's first reply to get a model panel.
If you need more examples, look in to your standard ISPPLIB libraries allocated at your site. Talk to your peers to find if you can add your elements to these libraries or you can add your personal panel library to the stack.

If you at least show you are trying, you can hope for some further help.
Good luck.
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: Wed Apr 14, 2010 5:36 am    Post subject: Reply to: Need help in developing a panel
Reply with quote

Start with the F1 ENTRY - Data entry ISPF Edit Model that I mentioned earlier. It would be a good idea before designing your panel to know how many fields you'll need, and what kind they are (input or output), what sort of values they should contain, and whether or not you want to allow an input field to be blank. You need to assign a unique variable name to each field so you can associate them to your program variables.

Here's a good previous topic that you might want to use as a starting point.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1218
Location: Israel

PostPosted: Wed Apr 14, 2010 7:29 pm    Post subject:
Reply with quote

Read the Primer and do all the exercises, then try to write your panel and program.
Then come back here when you have a specific problem.
Back to top
View user's profile Send private message
Kranthi_Merigala

New User


Joined: 22 Mar 2010
Posts: 17
Location: Hartford

PostPosted: Wed Apr 14, 2010 7:33 pm    Post subject: Thank you
Reply with quote

Thank you i will go through the docs and the link..

Will get back if i face any problem
Back to top
View user's profile Send private message
Kranthi_Merigala

New User


Joined: 22 Mar 2010
Posts: 17
Location: Hartford

PostPosted: Thu Apr 15, 2010 1:48 am    Post subject:
Reply with quote

Iam able to create the panel

Code:
--------------------  panel1                 ----------------------------------
COMMAND ===>                                                                   
ENTER THE PROGRAM NAME: _______________________________________________________
ENTER THE TABLE NAME  : _______________________________________________________
                                                                               

Used the below declaration while defining the panel

%ENTER THE PROGRAM NAME:$XXXXXX
%ENTER THE TABLE NAME :$YYY


I have tried using Pull for capturing the values i entered.
Its not working where exactly the values we are entering are stored.
or how to capture them.
Back to top
View user's profile Send private message
valyk

Active User


Joined: 16 Apr 2008
Posts: 104
Location: South Carolina

PostPosted: Thu Apr 15, 2010 2:01 am    Post subject:
Reply with quote

When developing ISPF panels, you will become very dependant on the Dialog Test facility in ISPF. I believe by default it is option 7 on the primary option menu.

Whenever you invoke the facility you will want to select option '2. Panels', and enter your panel name. This will allow you to test your panel. If you have any issues, the facility will notify you and display a message.

Try something like this:
Code:
)ATTR FORMAT(MIX)
  % TYPE(DT) SKIP(ON)
  + TYPE(SI)
  _ TYPE(INPUT)  COLOR(BLUE)   
  # TYPE(OUTPUT) COLOR(RED)
)BODY
%ENTER THE PROGRAM NAME:_PROGRAM
%ENTER THE TABLE NAME :_TABLE
)END
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Thu Apr 15, 2010 8:38 am    Post subject: Reply to: Need help in developing a panel
Reply with quote

Quote:
I have tried using Pull for capturing the values i entered.
Its not working where exactly the values we are entering are stored.
or how to capture them.

Just use the same variable name in both places: panel and rexx program. They work well together.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1218
Location: Israel

PostPosted: Thu Apr 15, 2010 5:29 pm    Post subject: Reply to: Need help in developing a panel
Reply with quote

Quote:
I have tried using Pull for capturing the values i entered.
Oh, dear! icon_cry.gif You still have much to learn...

You have to limit the input fields (PROGRAM should be no more than 8 characters for example).
In the )PROC section of the panel definition, you can add basic data validation (mandatory field, valid program name, etc).

And, in your case, don't use PULL.
Panel variables are directly available to the rexx program (just as rexx variables are available to the panel).
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 645
Location: Pennsylvania

PostPosted: Fri Apr 16, 2010 1:30 am    Post subject:
Reply with quote

Quote:

When developing ISPF panels, you will become very dependant on the Dialog Test facility in ISPF. I believe by default it is option 7 on the primary option menu.


Valyk, You may be better to say 'you may want to use' the facility.
I hardly think they would be 'dependant' on it.

I say this because, I have written hundreds of panels, and never once used this. In fact, I do not know what PDS this facility is attached to at our shop.

Additionally, this would not have helped in her case. The panel was fine, the REXX was in error.
Back to top
View user's profile Send private message
Ronald Burr

Active User


Joined: 22 Oct 2009
Posts: 293
Location: U.S.A.

PostPosted: Fri Apr 16, 2010 2:57 am    Post subject:
Reply with quote

The facility is not called the PANEL test facility, it is called the DIALOG test facility - because it is not designed to ONLY test PANELs. Sure, a part of the facility CAN be used to display and test a panel in isolation from the rest of a dialog, but the TRACE facilities available for dialog testing can be set to report/trace commands, dialog functions, dialog variable usage, profile pools, table commands, PFKeys, etc.
Not saying that everyone/anyone WILL become dependent on it, but it CAN be handy when attempting to debug a dialog.
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 Rexx Panel Validation ajithajt CLIST & REXX 6 Sun Jul 17, 2016 10:50 pm
This topic is locked: you cannot edit posts or make replies. Providing inputs to a panel of anothe... Raghur CLIST & REXX 2 Tue Apr 05, 2016 12:01 pm
No new posts Rexx Panel Navigation Akshay Yadav TSO/ISPF 5 Wed Feb 17, 2016 11:50 am
No new posts how to pass data from a rexx program ... Akshay Yadav TSO/ISPF 8 Mon Feb 15, 2016 12:05 pm
No new posts Call COBOL from ISPF Panel REXX Willy Jensen CLIST & REXX 9 Wed Feb 10, 2016 12:52 pm


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