Page 1 of 1

Stuck on SCRATCH'ing a member..

PostPosted: Tue Mar 11, 2008 7:54 pm
by magik5
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...
//*
//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...
!! 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.

Re: Stuck on SCRATCH'ing a member..

PostPosted: Tue Mar 11, 2008 9:13 pm
by arunprasad.k
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.

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


Post if you still have issues. Arun.

Re: Stuck on SCRATCH'ing a member..

PostPosted: Fri Mar 14, 2008 3:32 pm
by arunprasad.k
Justin, Is your code working now :?:

Arun.