MVSFORUMS.com

JOHNCWL · Beginner Joined: 25 Feb 2004 Posts: 31 Topics: 16

Hi,
I would like to delete the lines which occur in the mid of file

CREATE DATABASE VVG1T01
BUFFERPOOL BP1
INDEXBP BP2
CCSID EBCDIC
STOGROUP VVG1T01 ;

This whole para needs to be deleted, I want to use macro for this ,

Any help

kolusu · Posted: Thu Apr 08, 2004 5:43 am Post subject:

Johncwl,

You can use TSO EDIT commands and delete the lines. Open the dataset in edit mode and issue the following commands.

kolusu · Posted: Thu Apr 08, 2004 8:55 am Post subject:

Ravi,

You can use the line command CC and use the tso command CREATE the member in a pds.

Dibakar · Posted: Mon Apr 12, 2004 4:02 am Post subject:

Ravi,

You should get the required output if you do "del x all" on the output shown by Kolusu and then doing a copy and create/replace.

But if you don't want to use delete command then 'Edit' is probably not the solution.

Diba.

RobertL · Posted: Mon Apr 12, 2004 11:40 am Post subject:

Instead of doing DEL ALL X, try this.

JOHNCWL · Beginner Joined: 25 Feb 2004 Posts: 31 Topics: 16

Hi Kolusu,

I can't use X ALL; F all
X ALL; F VVG1T01 ALL; DEL NX ALL;

Because VVG1T01 is the database name, and the whole file consists of the DDL sfor creatifn other objects in the database, Neither can I use X ALL;F Bufferpool, Because, I use this keyword for creating indexand tablespace also.

I want the follwoing to be included in the macro,

Once it finds 'CREATE DATABASE', then it has to delete the whole para till it encounters ";"

RobertL · Posted: Wed Apr 14, 2004 8:43 am Post subject:

I haven't tested it, but try the following. It should be pretty close to what you need.

kolusu · Posted: Wed Apr 14, 2004 12:15 pm Post subject:

Johncwl,

If your shop has FILE-AID then the following JCL will give you the desired results. We are using the parameteres STOP, SPACE & IN which are explained briefly here.

The STOP parameter stops processing of a function when a specified criteria is met. The next function, if any, then begins processing with the record at which the stop occurred.

The SPACE function moves the current record pointer forward or backward (SPACEBACK), skipping over sections of any dataset, and positioning the pointer at a specific record for a subsequent function. This position is maintained only if the subsequent function processes the file in the same direction. Reversing the processing direction causes File-AID to reset the pointer to either the beginning or end of the file.

The IN parameter controls the number of input records that File-AID processes before stopping.

JOHNCWL · Beginner Joined: 25 Feb 2004 Posts: 31 Topics: 16

Any idea on how to achieve the same without using FILEAID, as I don't have this pgm in my shop...

RobertL · Posted: Thu Apr 15, 2004 6:00 am Post subject:

Hello John,
Try the edit macro I posted yesterday. It should work. No additional software required.
Regards,
Robert