DEL-
        DOESTAX.PROD.VSAM.BTNO-
        NOERASE

    IF LASTCC=8 THEN-
        SET MAXCC=0

    DEFINE-
      CLUSTER(-
        NAME (DOESTAX.PROD.VSAM.BTNO)-
        KEYS (5,0)-
        RECSZ (10,10)-
        CYL (2,1)-
        FREESPACE (10 10)-
        SHR (2,3)-
        SPEED-
        VOL (DES39P)-
        UNQ)-
      DATA -
        (NAME(DOESTAX.PROD.VSAM.BTNO.DATA))-
      INDEX -
        (NAME(DOESTAX.PROD.VSAM.BTNO.INDEX)-
         CISZ(1024))