IBM Z and LinuxONE IBM Z

Expand all | Collapse all

ISPF - Panels

  • 1.  ISPF - Panels

    IBM Champion
    Posted Thu November 09, 2023 06:19 PM
    Hello Z people,
    I developed a REXX program that dynamically builds a Panel depending on some parameters defined in a dataset.
    If I change these parameters, the Panel should change.
     
    But the Panel does not change. I need to restart my TSO session or use the Test Panel to enable the new version of the panel.
     
    I didn't find in the manuals why this happens.
     
    How can I solve this problem?
     
    Thanks in advance


    ------------------------------
    Leonardo Zrycki
    ------------------------------


  • 2.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 03:41 AM

    You are correct. You need to take a "new copy" of the panel by using the Test Panel.

     

    This is, however, another way.,,

     

    I will dig out some ancient Rexx I wrote and post it...

     

    Regards,

    Marcus Davage CEng CITP MBCS

    Lead Product Developer
    Intelligent Z Optimization and Transformation
    BMC Software Ltd

    Email marcus_davage@bmc.com

    signature_1567851823A pair of brown wings  Description automatically generated

     






  • 3.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 06:11 AM

    Here is my example Rexx. See if it works for you.

     

    Rexx/libdefs.rexx at main · spufidoo/Rexx (github.com)

     

    Regards,

    Marcus Davage CEng CITP MBCS

    Lead Product Developer
    Intelligent Z Optimization and Transformation
    BMC Software Ltd
    Direct +44 118 921 8517
    Mobile +44 7840 023 560
    Email marcus_davage@bmc.com

    signature_1567851823A pair of brown wings  Description automatically generated

     






  • 4.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 06:41 AM

    Hi Marcus, thanks newly.

    My issue is not how to create an ISPF dynamic panel. My solution is very similar to your solution.
    When I say dynamic is because when the REXX process builds the panel it takes values from a dataset and this dataset with configuration data can changes n times a day.
    It's not so good to do Logoff or 7.2 Test Panel to access to the new copy.

    I finished solving this issue creating dynamics panel names "P"||hr.||min.||secs.
    and works fine.




    ------------------------------
    Leonardo Zrycki
    ------------------------------



  • 5.  RE: ISPF - Panels

    Posted Fri November 10, 2023 08:13 AM

    Hello Leonardo,
    Here are our official documented approachs: When do changes to my ISPF panel take effect? (ibm.com)



    ------------------------------
    Krasen Angelov
    ------------------------------



  • 6.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 08:24 AM

    Thanks Krasen, good for understand why panel definition remains.



    ------------------------------
    Leonardo Zrycki
    ------------------------------



  • 7.  RE: ISPF - Panels

    Posted Fri November 10, 2023 08:38 AM
    Typically, you need to get out of ISPF and back into it.  When you exit ISPF values in memory are saved that are cached.  You don't have to exit TSO.  Return to the READY prompt of TSO and then go back into ISPF.



    Art Zeigler
    Mainframe System Programmer

     






  • 8.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 09:14 AM

    Where are you placing your generated ISPF Panel?  If you are placing it in a library in your ISPPLIB allocation that would account for the reason you need ISPF TEST or exiting ISPF to get access to it.  

    A better approach is to allocate a temporary PDS(E) to host the newly created ISPF Panel and the LIBDEF to that PDS(E). That way each time you will get a new LIBDEF and thus access to your newly created ISPF Panel.

    hth



    ------------------------------
    Lionel B. Dyck <><
    IBM z Systems Champion
    ------------------------------



  • 9.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 10:08 AM

    Which is exactly what my solution does.

     

    Regards,

    Marcus Davage CEng CITP MBCS

    Lead Product Developer
    Intelligent Z Optimization and Transformation
    BMC Software Ltd

    Email marcus_davage@bmc.com

    signature_1567851823A pair of brown wings  Description automatically generated

     






  • 10.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 10:50 AM

    Do you LIBDEF release after use and LIBDEF new for the new panel?



    ------------------------------
    Lionel B. Dyck <><
    IBM z Systems Champion
    ------------------------------



  • 11.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 10:57 AM

    I LIBDEF at the beginning and release at the end.

     

    Regards,

    Marcus Davage CEng CITP MBCS

    Lead Product Developer
    Intelligent Z Optimization and Transformation
    BMC Software Ltd
    Direct +44 118 921 8517
    Mobile +44 7840 023 560
    Email marcus_davage@bmc.com

    signature_1567851823A pair of brown wings  Description automatically generated

     






  • 12.  RE: ISPF - Panels

    Posted Fri November 10, 2023 11:26 AM

    Hello Leonardo,

    For testing, I start my ispf session with test parameter and then reload ispf by the next display panel new.  You find more details: The dialog test environment - IBM Documentation 

    Maybe my hint will help you. 

    Kind regards

    Roger     



    ------------------------------
    Roger Meier
    ------------------------------



  • 13.  RE: ISPF - Panels

    IBM Champion
    Posted Fri November 10, 2023 02:56 PM


    I have a solution, functionaly nice because every time the execution of the Rexx application  builds dynamicaly  the panel, panel name changes; that allows to do nothing, always will work fine.
    No Test Panel, no ISPF getout-in or logoff-logon.
    This Rexx application is not a monouser application, it can be executed by any user with permissions in a ISPF session. 
    CDB2.PNG shows the screen menu.
    Until 248 DB2 data models to replicate from an environment to other ( Dev<-> Testing<->UAT<->Prod) can be defined in the screen menu.
    Each model has a library; each library has lists of db2 Tables, Keys, relations between tables, etc.
    If a user adds a new data model, all the application executions must put this new model in the menu in the next Menu operation.
    Same if a user deletes a data model or changes his name.
    When a user selects one of the 248 data models and press Enter, newly a data screen is built dinamycally from the data stored in the defined library ( cdb21.png ) allowing the operator to enter the keys of data tables to replicate.
    If someone changes the model data, for instance introducing a new table for this particular model, all user must see this table in the screen dynamicaly generated without any logoff, Test Panel, ISPF getout/getin.

    When I started this application  I didn't know the rule that maintains 6 screen in memory. Because of this I ask you and today I built a solution.
     
    Thanks z  people and REXX people
     

    
    

     




    ------------------------------
    Leonardo Zrycki
    ------------------------------



  • 14.  RE: ISPF - Panels

    Posted Mon November 13, 2023 06:21 AM
    Edited by Emir Garza Mon November 13, 2023 06:24 AM

    Hi Leonardo,

    It's been a while since I wrote ISPF applications in REXX, so I could be wrong. I just found these two lines in an EXEC I wrote in 2002:

    'ISPEXEC LMCLOSE DATAID('dataid')'            /* Close library      */
    'ISPEXEC LMFREE  DATAID('dataid')'            /* Free library       */

    I vaguely recall that I had to close and reopen the ISPF panels dataset so that changes were picked up. Not sure the LMFREE is needed, maybe LMCLOSE is enough.

    On other EXECs where I was using EXECIO, I had to close the file with FINIS (sorry, I don't remember the details).

    Hope this helps.

    Regards,

    Emir Garza



    ------------------------------
    Emir Garza
    ------------------------------



  • 15.  RE: ISPF - Panels

    IBM Champion
    Posted Mon November 13, 2023 02:37 PM

    Hello Emir, thanks for your help.
    I developed a solution for this issue and works.




    ------------------------------
    Leonardo Zrycki
    ------------------------------