Need Help on Rexx Queries

Ask/Clarify the questions on TSO, CLIST & REXX

Moderators: Veera, Moderator Group

Post Reply
biplabmondal2007
Member
Posts: 1
Joined: Mon Aug 04, 2014 4:39 pm

Need Help on Rexx Queries

Post by biplabmondal2007 » Mon Aug 04, 2014 4:49 pm

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.

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Thu Aug 07, 2014 3:30 pm

moved to rexx forum
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Thu Aug 07, 2014 3:45 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?
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

NicC
Active Member
Posts: 650
Joined: Sun Jul 24, 2011 5:27 pm
Location: Down on the pig farm

Post by NicC » Fri Aug 08, 2014 4:51 pm

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

Rameshchinnu777
Member
Posts: 3
Joined: Fri Aug 08, 2014 10:52 pm

Post by Rameshchinnu777 » Fri Aug 08, 2014 10:58 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.

Thanks
Ramesh

Rameshchinnu777
Member
Posts: 3
Joined: Fri Aug 08, 2014 10:52 pm

Post by Rameshchinnu777 » Fri Aug 08, 2014 11:06 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..

NicC
Active Member
Posts: 650
Joined: Sun Jul 24, 2011 5:27 pm
Location: Down on the pig farm

Post by NicC » Wed Aug 13, 2014 4:11 pm

Do not tack your topic onto the back of another topic. Start your own topic. Hopefrully someone will split this off the original topic.

To your request - you ask for the code - however that is not what a forum is for. So, what have you tried so far? Where is your sticking point?
Regards
Nic

academyindia4

Topic deleted by Admin

Post by academyindia4 » Thu Jan 21, 2016 12:09 pm

<< Content deleted By Admin >>

Post Reply

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



Other References
Mainframe Tools and others