Sunday, September 8, 2019

JCL for creation of KSDS VSAM file

//IBMUSERA JOB NOTIFY=&SYSUID
//*****CREATION OF KSDS*******
//S1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
  DEFINE CLUSTER (NAME(IBMUSER.RATNESH.KSDS)-
  VOLUMES(ZASYS1)-
  CISZ(4096)-
  RECORDSIZE(80,80)-
  FREESPACE(10,10)-
  KEYS(4,0)-
  TRK(10,10)-
  INDEXED)
/*

No comments:

Post a Comment