Scrolling in ISPF Panel

Ganapathy.venugopalan · New User Joined: 08 Feb 2006 Posts: 2

Friends,

This is regarding an issue with getting the SCROLL feature to work in an ISPF panel.

I am trying to display the data from an ISPF Table ( tablename = WHEREIS) and I am also expecting the displayed panel ( PANEL NAME=WHEREIS2) to be scrollable. I created a PANEL with a Scroll field set to 'cursor' . In the REXX program ( rexx pgm is ROWCNT) , from where I am displaying the table , I am actually populating the ISPF table by fetching data from a DB2 Table.

Now, my issue is that whenever I do F7 or F8 , the panel actually ends. I dont see the scroll working.

Here is the piece of rexx code where I am displaying the table .

'ISPEXEC TBTOP WHEREIS'
'ADDPOP COLUMN(1) ROW(1)'
'ISPEXEC TBDISPL WHEREIS PANEL(WHEREIS2) CURSOR(Q) CSRROW(1)'
If Stop = 'STOP' Then Exit
SAY 'DISPLAYED PANEL RC = ' RC
'ISPEXEC TBCLOSE WHEREIS'

I am fairly new to ISPF and this is one of my first few ISPF panels. Can one tell me what's missing in the way I have displayed the panel .. or could anything else be wrong ?

Thanks
Ganapathy

superk · Posted: Thu Feb 09, 2006 4:18 pm

An ISPF TBDISPL command will require a panel with a )MODEL definition. Could you please post your panel code also?

Ganapathy.venugopalan · New User Joined: 08 Feb 2006 Posts: 2

Hi,

I did use a )MODEL in the panel code. This is how I was invoking the panel.

'ISPEXEC TBDISPL ISPFTAB1 PANEL(ROWCNT02) CURSOR(Q) CSRROW(1)'

However, as I was trying a few things, I thought I shoudl try to set the cursor to a far behind row.. So changed the CSRROW to CSRROW(31) .

And this worked ! ! I was able to scroll.

If I take off this CSRROW completely, then also the scroll works. However, If I set it to CSRROW(1)' then I dont get to do the scrolling.

So my problem now boils to just understanding the role of CSRROW in affecting scrolling. The manual says that CSRROW is for Auto selction.

Any thoughts on how CSRROW could have impacted the scrolling.

Thanks
Ganapathy

[/quote]