Rexx Program To Display a ISPF PANEL

hi folks,


This a sample piece of Code how to display a ISPF Panel Using Rexx.


/******************* REXX AT REXXPROGRAMMING.BLOGSPOT.COM*************************/

 ADDRESS ISPEXEC                                                     

 "LIBDEF ISPPLIB DATASET ID('YOUR.PANELPDS.NAME')"  

ADDRESS ISPEXEC                

 "DISPLAY PANEL(PANELNAME)"

EXIT

Where PANELNAME is the member inside YOUR.PANELPDS.NAME.

How To Call ISPF Panels From REXX PROGRAM

Hi folks,


      Create a panel and keep it in a separate PDS which is called 'ISPF PANEL LIBRARY'

In the Rexx program add the library using this piece of code

/*************** Rexx At REXXPROGRAMMING.BLOGSPOT.COM***************/

"ispexec libdef ispplib library id (PANEL.PDS.NAME)"

After this you can call using

"ispexec display panel(PANEL.MEMBER.NAME)"


Exit


Where


PANEL.PDS.NAME              - Is the PDS name where the panel actually exist
PANEL.MEMBER.NAME    - The member name  inside PANEL.PDS.NAME