rexx

How do I display a table to an ISPF panel with Rexx then retrieve back updated user input?

这一生的挚爱 提交于 2020-01-06 05:23:11
问题 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

Read the size of the member of the pds

橙三吉。 提交于 2019-12-25 07:01:11
问题 How to read the size of the member of a pds file. A pds file has many members. If we browse a pds we can see the member names, their creation date, time user, size, etc. So how to get these attributes separately in variables. 回答1: As Bruce mentioned LMMFIND will have the ISPF statistics for a PDS member. Make sure to use the STATS YES on the service. Also, you may need to check for extended stats (variable ZLEXT ). A site may chose to use extended stats if the member size exceeds 64K. Please

XML handling in REXX or JCL

泪湿孤枕 提交于 2019-12-20 07:43:45
问题 In a PS file I have XML data as below: For ex: (<?xml version="1.0" encoding="UTF-8"?> <web-app xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://java.sun.com/xml/ns/javaee" xmlns:web="http://java.sun.com/xml/ns/javaee/web-app_2_5.xsd" xsi:schemaLocation="http://java.sun.com/xml/ns/javaee http://java.sun.com/xml/ns/javaee/web-app_3_0.xsd" id="WebApp_ID" version="3.0"> <display-name>onlinerecharge</display-name> <filter> <filter-name>struts2</filter-name> <filter-class>org

Abend Causing Line

余生长醉 提交于 2019-12-12 10:01:37
问题 Is there any way that we can find the exact line number that causes an abend ( like SO4C) from the Offset(like offset +00007D0A at address 1515CD0A ) given in the spool with the error message.? 回答1: If your program is compiled with options OFFSET,NOLIST, you will have a list of verbs/line numbers in the output listing which contain the "offset" from the start of the program. The line number on the the listing which has the closest offset, but less than or equal to, the "offset" reported in

Is it possible to hide user typed input in REXX program

雨燕双飞 提交于 2019-12-11 21:24:04
问题 I need to PULL a password that a user will type, but don't want the characters to display on the screen. Could you help me to achieve this in REXX. 回答1: Since you are running in ISPF, you can define a panel to reside in the ISPPLIB concatenation with a password field that is non-display. 回答2: As @cshneid, use an ISPF Panel (and place it in the ISPPLIB). Here is an example panel containing a password field (see $ attribute) taken from ISPF Manual. )ATTR * TYPE(TEXT) INTENS(HIGH) COLOR(WHITE)

XML handling in REXX AND JCL [duplicate]

≯℡__Kan透↙ 提交于 2019-12-11 08:24:57
问题 This question already has answers here : XML handling in REXX or JCL (3 answers) Closed 5 years ago . I have XML data in my PS dataset as below , It is in the same format as below in my PS ,here is the example: (**<?xml version="1.0" encoding="UTF-8"?> <web-app xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://java.sun.com/xml/ns/javaee" xmlns:web="http://java.sun.com/xml/ns/javaee/web-app_2_5.xsd" xsi:schemaLocation="http://java.sun.com/xml/ns/javaee http://java.sun.com/xml

How can I run ISPF Edit Macros in Batch

时间秒杀一切 提交于 2019-12-06 16:25:47
问题 I frequently write and use ISPF edit macros. However, invoking them in foreground is time consuming. Can I use a Rexx program to run the edit macros against all, or a selection of, members of a PDS via batch? 回答1: You can use Library Management functions. You use LMINIT to get a DATA ID for the dataset to be edited and then use the LMOPEN function to open the dataset. You could then use LMMLIST if you want to perform the macro on a member or members of a PDS or PDSE. You can then use the EDIT

Abend Causing Line

这一生的挚爱 提交于 2019-12-06 13:08:19
Is there any way that we can find the exact line number that causes an abend ( like SO4C) from the Offset(like offset +00007D0A at address 1515CD0A ) given in the spool with the error message.? If your program is compiled with options OFFSET,NOLIST, you will have a list of verbs/line numbers in the output listing which contain the "offset" from the start of the program. The line number on the the listing which has the closest offset, but less than or equal to, the "offset" reported in the abend, is where you want to look. If you use NOOFFSET,LIST, you will get the "generated assembler" in your

How can I run ISPF Edit Macros in Batch

删除回忆录丶 提交于 2019-12-04 22:05:44
I frequently write and use ISPF edit macros. However, invoking them in foreground is time consuming. Can I use a Rexx program to run the edit macros against all, or a selection of, members of a PDS via batch? You can use Library Management functions. You use LMINIT to get a DATA ID for the dataset to be edited and then use the LMOPEN function to open the dataset. You could then use LMMLIST if you want to perform the macro on a member or members of a PDS or PDSE. You can then use the EDIT function specifying the macro to use/invoke, which should have an ISREDIT END or ISREDIT CANCEL . If