DEL-
        DOESTAX.PROD.VSAM.CURRCERT-
        NOERASE

    IF LASTCC=8 THEN-
        SET MAXCC=0

    DEFINE-
      CLUSTER(-
        NAME (DOESTAX.PROD.VSAM.CURRCERT)-
        KEYS (4,0)-
        RECSZ (8,8)-
        CYL (10,2)-
        FREESPACE (0 0)-
        SHR (2,3)-
        SPEED-
        VOL (DES39Q)-
        UNQ)-
      DATA -
        (NAME(DOESTAX.PROD.VSAM.CURRCERT.DATA)  CISZ(4096))-
      INDEX -
        (NAME(DOESTAX.PROD.VSAM.CURRCERT.INDEX) CISZ(2048))