OK, cool. I'll try it. Thanks -----Original Message----- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of McKown, John Sent: Friday, December 04, 2009 12:05 PM To: IBM-MAIN@bama.ua.edu Subject: Re: IDCAMS Delete via DD
Using DISP=(MOD,DELETE) will work if the dataset exists or not. It it exists, the existing copy is deleted. If it does not exist, then it is created at step start and then deleted at step end. The IKJEFT01 or IKJEFT1B will work regardless. And, as a plus, will not do an HSM recall if it is migrated. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM > -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:ibm-m...@bama.ua.edu] On Behalf Of George.William > Sent: Friday, December 04, 2009 1:51 PM > To: IBM-MAIN@bama.ua.edu > Subject: Re: IDCAMS Delete via DD > > Because I won't know if the dataset will be cataloged or not, > hence the > use of IDCAMS to avoid a JCL error. > > > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On > Behalf Of McKown, John > Sent: Friday, December 04, 2009 11:39 AM > To: IBM-MAIN@bama.ua.edu > Subject: Re: IDCAMS Delete via DD > > Why do you even want to do that??? Use IEFBR14 instead, with > DISP=(MOD,DELETE). Or, as I do: > > //STEP1 EXEC PGM=IKJEFT01, > // PARM='DEL &DSN' > //SYSTSIN DD DUMMY > //SYSTSPRT DD SYSOUT=* > > If your reason is to pass the DSN via a PROC parm or a JCL SET symbol. > Use IKJEFT1B if you want a return code from the DEL. > > -- > John McKown > Systems Engineer IV > IT > > Administrative Services Group > > HealthMarkets(r) > > 9151 Boulevard 26 * N. Richland Hills * TX 76010 > (817) 255-3225 phone * (817)-961-6183 cell > john.mck...@healthmarkets.com * www.HealthMarkets.com > > Confidentiality Notice: This e-mail message may contain > confidential or > proprietary information. If you are not the intended recipient, please > contact the sender by reply e-mail and destroy all copies of the > original message. HealthMarkets(r) is the brand name for products > underwritten and issued by the insurance subsidiaries of > HealthMarkets, > Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life > Insurance Company of TennesseeSM and The MEGA Life and Health > Insurance > Company.SM > > > -----Original Message----- > > From: IBM Mainframe Discussion List > > [mailto:ibm-m...@bama.ua.edu] On Behalf Of George.William > > Sent: Friday, December 04, 2009 1:34 PM > > To: IBM-MAIN@bama.ua.edu > > Subject: IDCAMS Delete via DD > > > > I'm drawing a blank here; > > > > when deleting sequential files (non-vsam) is it possible to use a DD > > reference in the IDCAMS cards instead of coding the actual > > dataset name > > in the DELETE statement? The example below doesn't seem > to work for > > me. > > > > Note: it's been awhile since I've had to use IDCAMS and a > look at the > > guide seems to show it is NOT possible but dang... I swear this was > > possible. Sigh, how quickly one forgets things. > > > > > > > > //STEP01 EXEC PGM=IDCAMS,REGION=4096K > > > > //SYSPRINT DD SYSOUT=* > > > > //INDD01 DD DSN=Q6498.TEST.DATASET, > > > > // DISP=(MOD,PASS), > > > > // UNIT=SYSDA,SPACE=(TRK,(60,5),RLSE) > > > > //SYSOUT DD SYSOUT=* > > > > //SYSIN DD * > > > > DELETE INFILE(INDD01) PURGE > > > > SET MAXCC = 0 > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
