问题
I have a piece of Rexx that uses data from a PDS member to put together and display a table of fields along with default values. The values field is an input field, designed to allow the user to update the defaults with their own choices as appropriate. What I can't seem to work out how to do is retrieve the updated information from the panel and store it away for future use.
The table rows are created using TBADD, saved with TBSAVE then displayed using a TBTOP followed by a loop of "TBDISPL [name] PANEL(pname)".
If the next section of Rexx is a loop of TBSKIP and TBGET, the best I can achieve is getting back the original table data (the defaults), ignoring anything the user may have input. Plus this doesn't always seem to happen on the user hitting enter, but rather waits for PF3.
Be grateful for any pointers. I'm quite new to this so atm it's a bit like trying to learn French armed with nothing but a dictionary - syntax is one thing, practical examples would be better!
回答1:
Looks like you are trying to run an ISPF Dialog using REXX. While this is a fairly common thing to be doing, there is a lot of background needed to understand all of the components and how to make them work together.
The following links provide some tutorial and reference material to get you on the right path.
- OS/390 V2R5.0-V2R7.0 ISPF Examples
- OS/390 V2R10.0 ISPF Dialog Developer's Guide and Reference
- OS/390 V2R10.0 ISPF Edit and Edit Macros
- OS/390 V2R10.0 ISPF Services Guide
The ISPF Examples is a good place to start. The Table Services Dialog Application might be similar to what you trying to do.
The basic idea is that you have REXX program running under ISPF which is invoking Dialog Manager. REXX asks Dialog Manager to display a particular screen (called a panel). The panel definition is held in a PDS and contains the text to display, input/output variables and various other layout parameters. The panel variables are used to pass data to/from the REXX program through calls to Dialog Manager.
Sounds simple, but as with everything mainframe, there is a lot more to it than you might think.
回答2:
Look also for http://pic.dhe.ibm.com/infocenter/zos/v1r13/index.jsp?topic=%2Fcom.ibm.zos.r13.pdf%2Fpdf.html and type REXX in the left search field.
Here you can find a lot of interesting information about z/os and rexx.
来源：https://stackoverflow.com/questions/4386979/how-do-i-display-a-table-to-an-ispf-panel-with-rexx-then-retrieve-back-updated-u