JCL+Example


 * JCL Example**

This code segment will create a VSAM dataset named KC03K00.LAB2C.ACCTM2

code format="text"

000100 CREATEKS JOB 000400 STEP1 EXEC PGM=IDCAMS 001300 SYSPRINT DD SYSOUT=* 001400 SYSIN DD * 001500 DEFINE CLUSTER (NAME(KC03K00.LAB2C.ACCTM2) - 001600                            RECORDS(15 15) - 001700                             RECORDSIZE(100 100) - 001800                             KEYS(9 60) - 001900                             INDEXED) - 002000                            DATA (NAME(KC03K00.LAB2C.ACCTM2.DAT)) - 002100                            INDEX (NAME(KC03K00.LAB2C.ACCTM2.IDX)) 002200 /* 002300 //* code