IBM Mainframe Forum

by **Steve Coalbran** » Tue May 24, 2011 6:07 pm

I am trying to build a TUTORIAL panel so that it can display contiguous attribute byte changes
(this is because it describes its owner application which uses this feature).
To do this I clearly need to use SHADOW variables.
So I first tried to have a SCROLLable AREA within which there were non-scrollable DYNAMIC AREAs.
ISPF did not seem to allow this (or I did something wrong that several permutations and cobminations failed to identify).
Next I tried assigning the values for a dynamic area and its shadow variable.
This looked messy so I wrote a REXX exit to load this from the panel member itself below the )END marker.
Like this...
(Note: the excluded lines are either repetitions of the previous couples ,in the case of the panels, or in the REXX, hidden coding to trap the active displayed panel dsn {not that it's that difficult, just lengthy} !)
ISPPLIB Member: SPLUG

Select all

)ATTRÂ DEFAULT(%+_)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
)BODYÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
%----------------------Â ANYÂ OLDÂ ENTRYÂ PANELÂ Â ---------------------------
%COMMANDÂ ===>_ZCMDÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
%Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
+PANELÂ STUFF...Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
+Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
+PressÂ PF1Â forÂ HELPÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
)INITÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â .HELPÂ =Â SPLUGHÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â &PANELÂ =Â SPLUGÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â *REXX(*,UDATA,USHAD,PANEL,(DYNHELP))Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â VPUT(UDATA,USHAD)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
)ENDÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
)DATAÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
000001Â TESTÂ FORÂ SCROLLABLEÂ TUTORIALÂ PANELÂ TEXT.Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
000002Â CONTIGUOUSÂ COLORÂ TESTÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
- - - - - - - - - - - - - - - - 48 Line(s) not Displayed
)SHADÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
GGGGGGÂ BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBWÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
GGGGGGÂ RYGTBPWRYGÂ TBPWRÂ YGTBÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
- - - - - - - - - - - - - - - - 50 Line(s) not Displayed
)EXITÂ

Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â

This loads the DATA and SHADow variables using the )DATA and )SHADow panel sections.

SYSEXEC Member: DYNHELP

Select all

panddÂ =Â "PAN"RIGHT(TIME("S"),5,0)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
ADDRESSÂ TSOÂ "ALLOCÂ DD("pandd")Â DS('"INDSM("ISPPLIB",panel)"')",Â Â Â Â Â Â Â Â
Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â "SHRÂ REUSE"Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
ADDRESSÂ TSOÂ "EXECIOÂ *Â DISKRÂ "pandd"Â (STEMÂ PAN.Â FINIS"Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
PARSEÂ VALUEÂ ""Â WITHÂ udataÂ ushadÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
DOÂ iÂ =Â 1Â TOÂ pan.0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â PARSEÂ UPPERÂ VARÂ pan.iÂ 1Â qsdÂ 2Â qsnÂ 'Â 'Â .Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â IF(Â qsd=")"Â )THENÂ
PARSEÂ VALUEÂ 0Â WITHÂ 1Â indataÂ 1Â inshadÂ Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â IF(Â qsd=")"Â &Â qsn="EXIT"Â )THENÂ LEAVEÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â IF(Â indataÂ )THENÂ udataÂ =Â udata!!LEFT(pan.i,80)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â IF(Â inshadÂ )THENÂ ushadÂ =Â ushad!!LEFT(pan.i,80)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â IF(Â qsd=")"Â &Â qsn="DATA"Â )THENÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â Â Â Â PARSEÂ VALUEÂ 1Â 0Â WITHÂ indataÂ inshadÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â IF(Â qsd=")"Â &Â ABBREV("SHADOW",qsn,4)Â )THENÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â Â Â Â Â PARSEÂ VALUEÂ 0Â 1Â WITHÂ indataÂ inshadÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
ENDÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
ADDRESSÂ TSOÂ "FREEÂ DD("pandd")"Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
SIGNALÂ ENDREXXÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
/*Â getÂ theÂ currentÂ panelÂ locationÂ inÂ theÂ concatenationÂ --------------*/
INDSM: Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
ARGÂ qdd,qmnÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
- - - - - - - - - - - - - - - - 19 Line(s) not Displayed
Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â IF(Â mn=qmnÂ )THENÂ RETURNÂ ds"("mn")"Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
- - - - - - - - - - - - - - - - 7 Line(s) not Displayed
ENDREXX:

Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â

ISPPLIB Member: SPLUGH

Select all

)ATTRÂ DEFAULT(%+_)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â Â½Â TYPE(TEXT)Â COLOR(GREEN)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â |Â Â AREA(DYNAMIC)Â SCROLL(ON)Â EXTEND(OFF)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â RÂ Â TYPE(CHAR)Â COLOR(RED)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â GÂ Â TYPE(CHAR)Â COLOR(GREEN)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â BÂ Â TYPE(CHAR)Â COLOR(BLUE)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â WÂ Â TYPE(CHAR)Â COLOR(WHITE)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â PÂ Â TYPE(CHAR)Â COLOR(PINK)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â YÂ Â TYPE(CHAR)Â COLOR(YELLOW)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â TÂ Â TYPE(CHAR)Â COLOR(TURQ)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
)BODYÂ Â EXPAND(//)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
%----------------------Â ANYÂ OLDÂ ENTRYÂ PANELÂ TUTORIALÂ -------------------
+CommandÂ ===>_ZCMDÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
|UDATA,USHAD/Â /Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
|/Â /Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
- - - - - - - - - - - - - - - - 14 Line(s) not Displayed
|/Â /Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â½Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â (continuedÂ onÂ nextÂ page)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
)INITÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
Â VGET(UDATA,USHAD)Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
)END

Any serious suggestions welcomed. Especially any from Perth! :lol:

by **Steve Coalbran** » Tue May 24, 2011 6:46 pm

Steve Coalbran wrote:this should have been posted in "TSO & ISPF"

by **Steve Coalbran** » Thu May 26, 2011 1:19 pm

OK - fixed it !

The base panel still defines the dynamic area from the )DATA and )SHAD sections...
(I will extend this functionality to add a name: )DATA AREA1,)SHAD AREA1 allowing for multiple dynamic areas ?)

Select all

)ATTR DEFAULT(%+_)
)BODY
%---------------------- ANY OLD ENTRY PANEL ---------------------------
%COMMAND ===>_ZCMD
%
+PANEL STUFF...
+
+Press PF1 for HELP
)INIT
.HELP = SPLUG2H
&PANEL = SPLUG2
*REXX(*,UDYNA,USHAD,PANEL,(DYNHELP))
VPUT(UDYNA,USHAD)
)END
)DYNA
000001 TEST FOR SCROLLABLE TUTORIAL PANEL TEXT.
000002 CONTIGUOUS COLOR TEST
000003 TEST FOR SCROLLABLE TUTORIAL PANEL TEXT.
000004 CONTIGUOUS COLOR TEST
000005 TEST FOR SCROLLABLE TUTORIAL PANEL TEXT.
000006 CONTIGUOUS COLOR TEST
)SHAD
GGGGGG BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBW
GGGGGG RYGTBPWRYG TBPWR YGTB
GGGGGG BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBW
GGGGGG RYGTBPWRYG TBPWR YGTB
GGGGGG BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBW
GGGGGG RYGTBPWRYG TBPWR YGTB
)EXIT

...using the *REXX DYNHELP routine...

Select all

TRACE "N"
pandd = "PAN"RIGHT(TIME("S"),5,0)
ADDRESS TSO "ALLOC DD("pandd") DS('"INDSM("ISPPLIB",panel)"')",
"SHR REUSE"
ADDRESS TSO "EXECIO * DISKR "pandd" (STEM PAN. FINIS"
PARSE VALUE "" WITH udyna ushad
DO i = 1 TO pan.0
PARSE UPPER VAR pan.i 1 qsd 2 qsn ' ' .
IF( qsd=")" )THEN PARSE VALUE 0 WITH 1 indyna 1 inshad
IF( qsd=")" & qsn="EXIT" )THEN LEAVE
IF( indyna )THEN udyna = udyna!!LEFT(pan.i,80)
IF( inshad )THEN ushad = ushad!!LEFT(pan.i,80)
IF( qsd=")" & ABBREV("DYNAMIC",qsn,4) )THEN
PARSE VALUE 1 0 WITH indyna inshad
IF( qsd=")" & ABBREV("SHADOW",qsn,4) )THEN
PARSE VALUE 0 1 WITH indyna inshad
END
ADDRESS TSO "FREE DD("pandd")" /*MOVE*/
SIGNAL ENDREXX
/*===================================================================*/
/* get the current panel location in the concatenation */
/* (only works if in ISPPLIB not with LIBDEF (yet!) */
/*===================================================================*/
INDSM:
ARG qdd,qmn
------------------------------------------------------- HIDDEN LINES --
IF( mn=qmn )THEN RETURN ds"("mn")"
------------------------------------------------------- HIDDEN LINES --
ENDREXX:

The HELP panel is defined like this ...

Select all

)ATTR DEFAULT(%+_)
Â½ TYPE(TEXT) COLOR(GREEN)
01 AREA(SCRL) EXTEND(ON)
| AREA(DYNAMIC) SCROLL(OFF) EXTEND(OFF)
R TYPE(CHAR) COLOR(RED)
G TYPE(CHAR) COLOR(GREEN)
B TYPE(CHAR) COLOR(BLUE)
W TYPE(CHAR) COLOR(WHITE)
P TYPE(CHAR) COLOR(PINK)
Y TYPE(CHAR) COLOR(YELLOW)
T TYPE(CHAR) COLOR(TURQ)
)BODY EXPAND(//)
%---------------------- ANY OLD ENTRY PANEL TUTORIAL -------------------
+Command ===>_ZCMD
HELPER
)AREA HELPER DEPTH(20)
+Help text 1
|UDYNA,USHAD/ /
|/ /
|/ /
|/ /
|/ /
|/ /
+Help text 2
...
+Help text 30
Â½ (continued on next page)
)INIT
VGET(UDYNA,USHAD)
)END

When SPLUG is executed it displays as...

When HELP is pressed from here the TUTORIAL panel is displayed like this...

by **Steve Coalbran** » Thu May 26, 2011 1:34 pm

Ooops! - changed it halfway there - any refs to )DATA should now be )DYNA !!!

by **breyre** » Wed Dec 07, 2011 7:33 pm

Hello,
First of all thank you Steve for this very usefull example.
I am trying to create panels with continuous attribute color change.
So, to get a little more familiar with this feature, i create panels , just
the same as shown above, but i get an error on the help panel.
Could someone help me to find the error in the help panel please,
get message :

An )AREA section is defined without a section defined in the panel )BODY section.
Panel line where error was detected:
)AREA HELPER DEPTH(20)

I could not get i work, perhaps something is missing in this example??
Thank you

Didier

IBM Mainframe Forum

SHADOW areas in ISPF TUTORIAL panels

SHADOW areas in ISPF TUTORIAL panels

Re: SHADOW areas in ISPF TUTORIAL panels

Re: SHADOW areas in ISPF TUTORIAL panels

Re: SHADOW areas in ISPF TUTORIAL panels

Re: SHADOW areas in ISPF TUTORIAL panels