What is the function of ZSCROLLA and ZSCROLLN

[Praveen]

How do the scroll information is passed from the ISPF to the rexx?

[wec...@gmail.com]

Extract from a REXX of mine;

"display panel("_screenname")"
_rc=rc
_stop=rc>4
"vget (zverb zscrolln zscrolla tm1pcmd)"

To answer your subject, these variables are used with dynamic areas to
determine the type of scroll (DOWN / UP) and the number of lines. In
dynamic area you must handle scrolling yourself.

Cheers
Willy

[Praveen]

I was not able to write the proper code to scroll horizontally and
vertical.
My code looks some thing like this.
DO UNTIL DISPRC > 0
IF DISSCR = 'SCREEN1' THEN
DO
ZDATA = SUBSTR(DATA1,1+(CURLINE-1)*72)
ADDRESS ISPEXEC "DISPLAY PANEL(TBLSAMP)" /*
DISPRC = RC /*SAVE T
ADDRESS ISPEXEC "VGET (ZVERB,ZSCROLLA,ZSCROLLN)"
END
IF DISSCR = 'SCREEN2' THEN
DO
ZDATA = SUBSTR(DATA2,1+(CURLINE-1)*72)
ADDRESS ISPEXEC "DISPLAY PANEL(TBLSAMP)" /*
DISPRC = RC /*SAVE T
ADDRESS ISPEXEC "VGET (ZVERB,ZSCROLLA,ZSCROLLN)"
END
SELECT
WHEN(PFKEYS = 'PF03') THEN

WHEN(PFKEYS = 'PF10') THEN
IF DISSCR = 'SCREEN2' THEN
DO
DISSCR = 'SCREEN1'
ZMLCOLS1 = HEADER11
ZMLCOLS2 = HEADER12
END;
WHEN(PFKEYS = 'PF11') THEN
IF DISSCR = 'SCREEN1' THEN
DO
DISSCR = 'SCREEN2'
ZMLCOLS1 = HEADER13
ZMLCOLS2 = HEADER14
END;
I have pasted small part of the code. The Date1 and Date2 contains the
first set of coulmns ans Second set columns read from the file.

Here i am not gettting the proper display in the ISPF panel. I tried
with dislplaying the two recods to the ispf panel.
It is displaying the records in the single line . i could not found
out what was the errror.
And another question is can i use the ZVERB in the above code instead
of PFKESYS?

I tried but it is not wroking properly .The message display was "left
is not active"
Does any body know the answer?