Re: Delete dataset nonvsam
The MVS system I'm currently using is blocking me from creating any uncatalogued datasets to test this, but what I have used for years to delete datasets from a batch job is a delete step like this: //STEP1 EXEC PGM=IEFBR14 //DD1DD DISP=(MOD,DELETE),SPACE=(TRK,(0)),UNIT=SYSALLDA, //DSN=RBOLAN.FT7520T.RPTDATA.BYBRANCW //DD2DD DISP=(MOD,DELETE),SPACE=(TRK,(0)),UNIT=SYSALLDA, //DSN=RBOLAN.FT7520T.BRTOTAL.BYBRANCW //DD2DD DISP=(MOD,DELETE),SPACE=(TRK,(0)),UNIT=SYSALLDA, //DSN=RBOLAN.FT7520.FTPDS I believe that all that is necessary to delete uncatalogued datasets is to add the VOL=SER= information naming the volume to each DD card. --Roger IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 01/09/2008 03:32:19 AM: I have several datasets nonvsam controlled by SMS that are uncataloged, they are lost on the disks, tried to delete catalogued and SMS does not allow. I am trying to delete the VVDS the disk using the job .. //DELETE JOB... //STEP1 EXEC PGM=IDCAMS //DD1 DD VOL=SER=VSER01,UNIT=3380,DISP=OLD //SYSPRINT DD SYSOUT=A //SYSSIN DD * DELETE - EXAMPLE NONVSAM - FILE(DD1) - NVR /* Get return code 0 and dataset is not deleted, the SMS is not allowing, someone I do know how to delete these data-sets -- Hélio José da Silva Depto. Software Básico -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Delete dataset nonvsam
xx = volser
//JS010 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//VOL001 DD DISP=SHR,UNIT=3390,VOL=SER=xx
//SYSINDD *
DELETE 'YOUR.DATASET' NVR FILE(VOL001)
or
//JS010 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSINDD *
ALLOCATE -
FILE(Vxx) -
DATASET('SYS1.VVDS.Vxx') -
VOLUME(xx) UNIT(3390) -
REUS SHR;
DELETE -
YOUR.DATASET -
NVR -
FILE(Vxx)
or
ISMF.1
Specify data set name, mask, or '**'
specify 1 for VTOC
Specify volume serial number
hit enter
type del next to the dataset and hit enter
One of these methods should work
Terry Traylor
charlesSCHWAB
TIS Mainframe Storage Management
Remedy Queue: tis-hs-mstg
(602) 977-5154
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of HELIO
Sent: Wednesday, January 09, 2008 3:32 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Delete dataset nonvsam
I have several datasets nonvsam controlled by SMS that are uncataloged, they
are lost on the disks, tried to delete catalogued and SMS does not allow. I am
trying to delete the VVDS the disk using the job ..
//DELETE JOB...
//STEP1 EXEC PGM=IDCAMS
//DD1 DD VOL=SER=VSER01,UNIT=3380,DISP=OLD
//SYSPRINT DD SYSOUT=A
//SYSSIN DD *
DELETE -
EXAMPLE NONVSAM -
FILE(DD1) -
NVR
/*
Get return code 0 and dataset is not deleted, the SMS is not allowing, someone
I do know how to delete these data-sets
--
Hélio José da Silva
Depto. Software Básico
--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Delete dataset nonvsam
Helio, If you do a 3.4 on the dataset and then use PF11 to scroll to the right, do you see anything other than blanks? DSLIST - Data Sets Matching TSO.LK41591.TESTRow 1 of 5 Command === Scroll === CSR Command - Enter / to select action Tracks %Used XT Device --- TSO.LK41591.TEST.DATA 3390 If so, then it is likely you just have a cataloge entry that needs to be uncataloged. If you add the volser that the data set is on, are there any details? If you show device information, then using ISMF Option 1 (Data Set) is your best bet. Lizette I have several datasets nonvsam controlled by SMS that are uncataloged, they are lost on the disks, tried to delete catalogued and SMS does not allow. I am trying to delete the VVDS the disk using the job .. //DELETE JOB... //STEP1 EXEC PGM=IDCAMS //DD1 DD VOL=SER=VSER01,UNIT=3380,DISP=OLD //SYSPRINT DD SYSOUT=A //SYSSIN DD * DELETE - EXAMPLE NONVSAM - FILE(DD1) - NVR /* Get return code 0 and dataset is not deleted, the SMS is not allowing, someone I do know how to delete these data-sets -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
