IBM Mainframe Forum

by **magik5** » Tue Mar 11, 2008 7:54 pm

Hello again, more problems my way.

This time I need to scratch a member within a library.
I want to scratch the member 'FRESH' from the library 'MARLEY'.

Here's my code...

Select all

//*
//LIBPROGM EXEC PGM=IEHPROGM
//SYSPRINT DD SYSOUT=*
//ANYNAME DD UNIT=SYSDA,
// VOL=SER=STRG03,
// DISP=OLD
//SYSIN DD *
SCRATCH MEMBER=FRESH,DSNAME=MARLEY, *
VOL=SYSDA=STRG03
/*
//

and then again, I get more errors...

Select all

!! END OF JES SPOOL FILE !!
1SYSTEM SUPPORT UTILITIES ---- IEHPROGM PAGE 0001
-
SCRATCH MEMBER=FRESH,DSNAME=MARLEY, *
IEH202I INVALID KEYWORD OR CONTROL STATEMENT SYNTAX
-
VOL=SYSDA=STRG03
IEH201I INVALID REQUEST... STATEMENT IGNORED
-
UTILITY END
!! END OF JES SPOOL FILE !!

I'm on a differnet part of my assignment, but I could not finish because I screwed it up and now I need to remove FRESH, so I can try my other steps again.

All help is apperciated ! - Thanks Justin.

by **arunprasad.k** » Tue Mar 11, 2008 9:13 pm

I do not see any problem with your control statements.

Check whether the '*' in the control statement is in 72 position and the next line starts on position 16.

If you want to delete a member from PDS you can also use the below IDCAMS JCL.

Select all

//S01 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
DELETE 'MARLEY(FRESH)'

Post if you still have issues. Arun.

by **arunprasad.k** » Fri Mar 14, 2008 3:32 pm

Justin, Is your code working now :?:

Arun.

IBM Mainframe Forum

Stuck on SCRATCH'ing a member..

Stuck on SCRATCH'ing a member..

Re: Stuck on SCRATCH'ing a member..

Re: Stuck on SCRATCH'ing a member..