I need a JCL to delete the last 6 lines of all the members i

In this Mainframe Forum - You can post your queries on JCL, OS/390 JCL, MVS JCL, z/OS JCL, JES2 & JES3

Moderators: Frank Yaeger, DikDude, Moderator Group

Post Reply
osurendhra
Member
Posts: 2
Joined: Wed Feb 08, 2006 8:42 pm
Location: Hyderabad

I need a JCL to delete the last 6 lines of all the members i

Post by osurendhra » Tue Feb 21, 2006 2:05 pm

I need a JCL to delete the last 6 lines of all the members in a PDS.

The PDS is having almost 900 members and we need to delete the last 6 lines from all the members.

Take example PDS Name: TXSB.CAD.JCLLIB
If you want to interact directly mail me osurendhra@gmail.com

hemanthg
Member
Posts: 1
Joined: Mon Mar 29, 2010 9:19 pm
Location: bangalore

IEBCOPY along with REXX suits your need

Post by hemanthg » Mon Mar 29, 2010 9:28 pm

Hi,

you can use IEBCOPY to place the contents of PDS into a flat file.

Once done, you can use any of the following.

a. Write a COBOL program to read the flat file and remove the unwanted lines.
b. Write a REXX routine to remove the unwanted lines.

After the above you can convert the flat file into PDS using IEBCOPY

Let me know if you need more details.

MrSpock
Active Member
Posts: 273
Joined: Wed Jun 27, 2007 5:37 pm

Post by MrSpock » Tue Mar 30, 2010 5:31 am

I'm at a loss for a solution that doesn't involve going through each member and editing it, one member at a time. A program that edits each member with an ISPF Edit Macro would seem to be the best fit here.

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Tue Mar 30, 2010 1:39 pm

This topic is just 4 years old...:)
Regards,
Anuj

academyindia4

Topic deleted by Admin

Post by academyindia4 » Mon Feb 01, 2016 10:13 pm

<< Content deleted By Admin >>

Post Reply