DEL-
        DOESTAX.PROD.VSAM.CHGM005-
        NOERASE

    IF LASTCC=8 THEN-
        SET MAXCC=0

    DEFINE-
      CLUSTER(-
        NAME (DOESTAX.PROD.VSAM.CHGM005)-
        KEYS (31,0)-
        RECSZ (41,41)-
        CYL (20,5)-
        FREESPACE (50 20)-
        SHR (2,3)-
        SPEED-
        VOL (DES39P)-
        UNQ)-
      DATA -
        (NAME(DOESTAX.PROD.VSAM.CHGM005.DATA))-
      INDEX -
        (NAME(DOESTAX.PROD.VSAM.CHGM005.INDEX)-
         CISZ(1024))