View previous topic :: View next topic |
Author |
Message |
cool.manoj Beginner
Joined: 26 May 2010 Posts: 13 Topics: 5
|
Posted: Wed Jul 28, 2010 7:06 am Post subject: ISPF Tables - Page Up/Page Down Logic using ISPF Tables/REXX |
|
|
Hi,
I have coded a REXX program which reads a file and adds records to ISPF Table. At the end of processing, i'm displaying the values using TBDISPL. I have more than 20 rows in the table and would like to add page up/page down logic. Could please help me how to code this logic in REXX?
1. If you have manuals on ISPF Panels and REXX, please update/provide the link
2. How can we find which key is pressed after the panel is displayed?
Thank you so much!
Regards,
Manoj. |
|
Back to top |
|
|
dbzTHEdinosauer Supermod
Joined: 20 Oct 2006 Posts: 1411 Topics: 26 Location: germany
|
Posted: Wed Jul 28, 2010 7:16 am Post subject: |
|
|
ISPF for z/OS Library _________________ Dick Brenholtz
American living in Varel, Germany |
|
Back to top |
|
|
superk Advanced
Joined: 19 Dec 2002 Posts: 684 Topics: 5
|
Posted: Wed Jul 28, 2010 7:25 am Post subject: |
|
|
ISPF handles scrolling logic internally. There's nothing you need to write code for. |
|
Back to top |
|
|
cool.manoj Beginner
Joined: 26 May 2010 Posts: 13 Topics: 5
|
Posted: Wed Jul 28, 2010 7:48 am Post subject: |
|
|
Hi Superk,
Thank you so much for your time.
I'm getting message 'Command is not active' when PF8/PF7 is pressed. Please advice
Regards,
Manoj |
|
Back to top |
|
|
superk Advanced
Joined: 19 Dec 2002 Posts: 684 Topics: 5
|
Posted: Wed Jul 28, 2010 9:59 am Post subject: |
|
|
Are you saying that the UP and DOWN commands are not working (I don't care about PF keys since no one here knows how you have them mapped). |
|
Back to top |
|
|
cool.manoj Beginner
Joined: 26 May 2010 Posts: 13 Topics: 5
|
Posted: Wed Jul 28, 2010 11:18 pm Post subject: |
|
|
Hi,
I'm following the steps below in the same REXX program:
#1. Create a ispf table using tbcreate
#2. REXX program reads a file and adds records to ISPF Table.
#3. At the end of file, i'm displaying the values using TBDISPL.
#4. No TBCLOSE is used. No function keys mapping is done here.
Problem i'm facing here is page up/page down isn't working. Could you please guide me?
a. Could please help me how to correct this? (page up/page down)
b. If you have manuals on ISPF Panels and REXX, please update/provide the link
c. How can we find which key is pressed after the panel is displayed?
Thank you so much! |
|
Back to top |
|
|
superk Advanced
Joined: 19 Dec 2002 Posts: 684 Topics: 5
|
Posted: Wed Jul 28, 2010 11:59 pm Post subject: |
|
|
How about posting your panel definition? Did you use the ISPF Edit Model for the table display as your template? |
|
Back to top |
|
|
Nic Clouston Advanced
Joined: 01 Feb 2007 Posts: 1075 Topics: 7 Location: At Home
|
Posted: Thu Jul 29, 2010 12:08 am Post subject: |
|
|
If the manuals are not accessible via the links above then either google or visit IBM's site - you could use a manual link above as the base point. I believe DBZ posted a couple of links a few months back showing how to find manuals. _________________ Utility and Program control cards are NOT, repeat NOT, JCL. |
|
Back to top |
|
|
cool.manoj Beginner
Joined: 26 May 2010 Posts: 13 Topics: 5
|
Posted: Thu Jul 29, 2010 12:09 am Post subject: |
|
|
here it is....
Code: |
)PANEL
/* PANEL CREATED */
)ATTR
@ Type(output) Intens(low) Just(asis) Caps(off) Skip(on)
)BODY
+ ********* Inquiry Screen *********+
+ %Scroll ==>_samt+
% Ser. Area Area ST
% No. Code ID Population CD Percentage Category
% ---- ---- ---- ---------- --- ----------- --------
)Model
% @slno @harcd @harid @hpopul @hstcd @hprcnt @hctgry+
)INIT
&samt = page
)PROC
)END |
|
|
Back to top |
|
|
CZerfas Intermediate
Joined: 31 Jan 2003 Posts: 211 Topics: 8
|
Posted: Thu Jul 29, 2010 3:29 am Post subject: |
|
|
In some ISPF-applications the PF key setting is incomplete. To fix that (i.e. directly after receiving the message "Command is not active") type in the command "keys". In the panel displayed after that, go to the lines for F7 and F8 and type in the "Definition" column "up" and "down".
That should help.
regards
Christian |
|
Back to top |
|
|
cool.manoj Beginner
Joined: 26 May 2010 Posts: 13 Topics: 5
|
Posted: Thu Jul 29, 2010 3:34 am Post subject: |
|
|
It's working fine after this setup.
Thanks very much! |
|
Back to top |
|
|
superk Advanced
Joined: 19 Dec 2002 Posts: 684 Topics: 5
|
Posted: Thu Jul 29, 2010 6:07 am Post subject: |
|
|
I give up.
Why did you omit a command line with the ZCMD field as a typical panel should contain? |
|
Back to top |
|
|
rlilley Beginner
Joined: 05 Apr 2010 Posts: 19 Topics: 3
|
Posted: Thu Jul 29, 2010 6:42 am Post subject: |
|
|
I would start with the ISPF MODEL command. The model is designed to give complete examples of many ISPF related items. For example if you open a new member in a panel library and enter MODEL on the command line you will be presented with a selection of multiple panel types. Selecting the type of panel you would like to work with gives you a great starting point.
if you are in a member of an ISPSLIB (File Tailoring Skeletons) and enter the MODEL command you will have an opportunity to select a model from all the available skeleton parts.
The MODEL is a great place to start. Have a look at it. |
|
Back to top |
|
|
cool.manoj Beginner
Joined: 26 May 2010 Posts: 13 Topics: 5
|
Posted: Fri Jul 30, 2010 4:16 am Post subject: |
|
|
This is a very useful option. Thank you so much! |
|
Back to top |
|
|
|
|