Re: VSAM cluster allocation error
Comment out or remove the Delete statement and rerun.? It is giving an error because the file does not exist.
On Thursday, March 21, 2024 at 03:24:16 PM CDT, rcigola via groups.io <rcigola@...> wrote:
Hi guys, I am trying to allocate a VSAM file, this is the jcl :
//HERC02CP JOB (IDCAMS),'PERFORM IDCAMS? ',CLASS=A,NOTIFY=&SYSUID,???? ? //???????????? REGION=8000K,TIME=1440,MSGCLASS=X,MSGLEVEL=(1,1)??????? ? // //*????????????????? CREATE VSAM DATASET?????????????????????????????? ? //*??????????????????????????????????????????????????????????????????? ? // //STEP1 EXEC PGM=IDCAMS??????????????????????????????????????????????? ? //SYSPRINT DD SYSOUT=*???????????????????????????????????????????????? ? //SYSOUT?? DD SYSOUT=*???????????????????????????????????????????????? ? //SYSUDUMP DD SYSOUT=*???????????????????????????????????????????????? ? //SYSIN??? DD *??????????????????????????????????????????????????????? ? ? DELETE HERC02.VSAM.EXAMPLE1????????????????????????????????????????? ? ? SET MAXCC = 0??????????????????????????????????????????????????????? ? ? DEFINE CLUSTER??????????????????????????????????? -????????????????? ? ???????? (NAME(HERC02.VSAM.EXAMPLE1) INDEXED??????? -????????????????? ? ???????? VOLUMES(VSAM01)??????????????????????????? -????????????????? ? ???????? RECORDSIZE(80 80)????????????????????????? -????????????????? ? ???????? KEYS(10 0)???????????????????????????????? -????????????????? ? ???????? TRACKS(50 15)????????????????????????????? -????????????????? ? ???????? FREESPACE(5 5)???????????????????????????? -????????????????? ? ???????? CISZ(4096)???????????????????????????????? -????????????????? ? ???????? REUSE????????????????????????????????????? -????????????????? ? ???????? )????????????????????????????????????????? -????????????????? ? ???????? DATA (NAME (HERC02.VSAM.EXAMPLE1.DATA))??? -????????????????? ? ??????? INDEX (NAME (HERC02.VSAM.EXAMPLE1.INDEX))????????????????????? ? /*???????????????????????????????????????????????????????????????????? ?
but I get this error when I try to allocate a VSAM :
IDCAMS? SYSTEM SERVICES?????????????????????????????????????????? TIME: 15:45:21 ?????????????????????????????????????????????????????????????????????????????? ? ? DELETE HERC02.VSAM.EXAMPLE1????????????????????????????????????????????????? ? IDC3012I ENTRY HERC02.VSAM.EXAMPLE1 NOT FOUND????????????????????????????????? ? IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLAG-6????????? ? IDC0551I **ENTRY HERC02.VSAM.EXAMPLE1 NOT DELETED????????????????????????????? ? IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8????????????????????? ? ?????????????????????????????????????????????????????????????????????????????? ? ? SET MAXCC = 0??????????????????????????????????????????????????????????????? ? ?????????????????????????????????????????????????????????????????????????????? ? ? DEFINE CLUSTER??????????????????????????????????? -????????????????????????? ? ???????? (NAME(HERC02.VSAM.EXAMPLE1) INDEXED??????? -????????????????????????? ? ???????? VOLUMES(VSAM01)??????????????????????????? -????????????????????????? ? ???????? RECORDSIZE(80 80)????????????????????????? -????????????????????????? ? ???????? KEYS(10 0)???????????????????????????????? -????????????????????????? ? ???????? TRACKS(50 15)????????????????????????????? -????????????????????????? ? ???????? FREESPACE(5 5)???????????????????????????? -????????????????????????? ? ???????? CISZ(4096)???????????????????????????????? -????????????????????????? ? ???????? REUSE????????????????????????????????????? -????????????????????????? ? ???????? )????????????????????????????????????????? -????????????????????????? ? ???????? DATA (NAME (HERC02.VSAM.EXAMPLE1.DATA))??? -????????????????????????? ? ??????? INDEX (NAME (HERC02.VSAM.EXAMPLE1.INDEX))????????????????????????????? ? IDC3033I VOLUME RECORD NOT FOUND IN CATALOG??????????????????????????????????? ? IDC3009I ** VSAM CATALOG RETURN CODE IS 248 - REASON CODE IS IGG0CLBX-0??????? ? IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12???????????????????????????? ? ?????????????????????????????????????????????????????????????????????????????? ? the VSAM01 is a 3380-E disk created with : dasdinit -a vsam01.382 3380-E VSAM01 then I initialized with this job? :
//HERC02CP JOB (ICKDSF),'PERFORM ICKDSF13',CLASS=A,NOTIFY=&SYSUID,??? ? //???????????? REGION=8000K,TIME=1440,MSGCLASS=X,MSGLEVEL=(1,1)?????? ? //*?????????????????????????????????????????????????????????????????? ? //*?? INITIALIZE A DEVICE OTHER THAN 3340 OR 3350 DASD VOLUME???????? ? //*?????????????????????????????????????????????????????????????????? ? //ICKDSF?? EXEC PGM=ICKDSF13,REGION=6096K???????????????????????????? ? //SYSPRINT DD? SYSOUT=*?????????????????????????????????????????????? ? //SYSIN??? DD? *????????????????????????????????????????????????????? ? ? INIT UNITADDRESS(382) NOVERIFY VOLID(VSAM01) OWNER(HERCULES) -????? ? ?????????????? VTOC(0,1,80)?????????????????????????????????????????? ? /*??????????????????????????????????????????????????????????????????? ? //???????????????????????????????????????????????????????????????????? ?
and I see the volume on 3.4 and I allocated a PD dataset without effort. does anyone have any clue why I am getting this error ? Thanks
|