I have this jcl to run before taking a volume offline. //jobname JOB acct,programmer,CLASS=c etc //SDELVVDS EXEC PGM=IDCAMS //Vvolser DD UNIT=DISK,VOL=SER=volser,DISP=SHR //SYSPRINT DD SYSOUT=* //SYSIN DD * DELETE SYS1.VVDS.Vvolser CAT(ICFCAT.usercat1) FILE(Vvolser) NSCR DELETE SYS1.VVDS.Vvolser CAT(SYS1.MVSCTLG$) FILE(Vvolser) NSCR IF MAXCC EQ 8 THEN SET MAXCC = 0 DELETE SYS1.VVDS.Vvolser CAT(ICFCAT.usercat9) FILE(Vvolser) Make sure the last DELETE without the NSCR (after the IF) exists and you should be set.
(This might be different than what you need to do.) On Thu, Oct 11, 2012 at 1:46 PM, Martin, Larry D <[email protected]> wrote: > I have old (no longer exist) catalog names in the VVCR record of many VVDS's. > > It says in "z/OS V1R13.0 DFSMS AMS for Catalogs": > > Only catalogs that reside on the > converted volume need to have their names in the VVCR. You can > remove unneeded catalog names from the VVCR by using DELETE > VVDS NOSCRATCH with the CATALOG parameter referencing the > catalog to be deleted from the VVCR. > > I have tried a few variations with no success. Does anyone know how to code > the IDCAMS statements to accomplish this task? > > (In accordance with another topic on the list - we can't ask questions at > all). > > Thanks, .............Larry > > > > > This E-mail and any of its attachments may contain Prince George’s > County Government or Prince George's County 7th Judicial Circuit > Court proprietary information or Protected Health Information, > which is privileged and confidential. This E-mail is intended > solely for the use of the individual or entity to which it is > addressed. If you are not the intended recipient of this E-mail, > you are hereby notified that any dissemination, distribution, > copying, or action taken in relation to the contents of and > attachments to this E-mail is strictly prohibited by federal law > and may expose you to civil and/or criminal penalties. If you have > received this E-mail in error, please notify the sender immediately > and permanently delete the original and any copy of this E-mail and > any printout. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
