Need Help on Rexx Queries
Moderators: Veera, Moderator Group
-
- Member
- Posts: 1
- Joined: Mon Aug 04, 2014 4:39 pm
Need Help on Rexx Queries
Hi,
I need a help on a REXX code from you experts.
Req :- Suppose all member of a PDS have a record say on 20 column(in 1st row,5the row,10th row).
XYZ.PDS(Member1)
XX5001
XX5002
XX5003
.
.
.
XYZ.PDS(Member1)
XX5004
XX5005
XX5006
Desired output:-
Member1 XX5001
XX5002
XX5003
Member2 XX5004
XX5005
XX5006
I used LISTDS and OUTTRAP for listing the members,but unable to list these in a separate datasets according to my need.Plz Help.
I need a help on a REXX code from you experts.
Req :- Suppose all member of a PDS have a record say on 20 column(in 1st row,5the row,10th row).
XYZ.PDS(Member1)
XX5001
XX5002
XX5003
.
.
.
XYZ.PDS(Member1)
XX5004
XX5005
XX5006
Desired output:-
Member1 XX5001
XX5002
XX5003
Member2 XX5004
XX5005
XX5006
I used LISTDS and OUTTRAP for listing the members,but unable to list these in a separate datasets according to my need.Plz Help.
- dbzTHEdinosauer
- Moderator
- Posts: 981
- Joined: Mon Oct 02, 2006 8:31 pm
- dbzTHEdinosauer
- Moderator
- Posts: 981
- Joined: Mon Oct 02, 2006 8:31 pm
well, ignoring the fact that files have records and not rows - which db2 has.....
i am assuming that you want to edit each member of the pds
and add the member name to the first line. --- that is what you have shown.
what do you want to do?
i am assuming that you want to edit each member of the pds
and add the member name to the first line. --- that is what you have shown.
what do you want to do?
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.
If what you want to do is add the member name to the first line of the member then you can retrieve the member currently being edited, get the first line, add the member name to that line (remember to truncate the original line as ithe edited line will have to have the same record length), rewrite the line and exit the member - all by invoking edit on the member with an initial macro doing the preceding. Are yo sure that you can lose 8 or more bytes from the first line?
Regards
Nic
Nic
-
- Member
- Posts: 3
- Joined: Fri Aug 08, 2014 10:52 pm
-
- Member
- Posts: 3
- Joined: Fri Aug 08, 2014 10:52 pm
HI,
i Need a rexx code to list out all the PDS when we give input as i.e TSOMK01.* (HLQ.*)
that should be consoliated in one PS file.
could please help on it.
Because i have to list out through option 3.4 then suppose it may shows 500 PDS if so
create one new PS and mentioned all the pds one by one with HSM cmds like
HSEND BDELETE 'TSOMK01.ES26.RAMESH' ALL
likewise code one by one for all PDS and deleted them
I need REXX code to list out all PDS when we give the input as (HLQ.*) i.e it will list all the PDS then i have to pass this cmd to delete them by using array variable..
i Need a rexx code to list out all the PDS when we give input as i.e TSOMK01.* (HLQ.*)
that should be consoliated in one PS file.
could please help on it.
Because i have to list out through option 3.4 then suppose it may shows 500 PDS if so
create one new PS and mentioned all the pds one by one with HSM cmds like
HSEND BDELETE 'TSOMK01.ES26.RAMESH' ALL
likewise code one by one for all PDS and deleted them
I need REXX code to list out all PDS when we give the input as (HLQ.*) i.e it will list all the PDS then i have to pass this cmd to delete them by using array variable..
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page