Keys

CASSPOOL includes six keyed indexes from which to choose. To select an index, move its corresponding 78-level field to the KEY-ID field. To illustrate this point, the following partial listing from mfpubcas.cpy shows the available indexes:

...
  *   ==============================================
          03  KEY-DATA.
             05  ()-key-id                   PIC x. 
      *         available keys are:
                78  78-KEY-IS-type           value '1'.
      *             type, rec-class, rec-priorty, rec-version, job-nbr, job-seq
                78  78-KEY-IS-job-NUMBER     value '2'.
      *             job-nbr, job-seq  
                78  78-KEY-IS-type-job-name  value '3'.
      *              type, job-name, job-nbr 
                78  78-KEY-IS-type-userid    value '4'.                  
      *              type, userid, job-nbr 
                78  78-KEY-IS-type-job-nbr   value '5'.     
      *              type and job-nbr
                78  78-KEY-IS-type-date      value '6'.  
      *              type, date, job-nbr
      *      ===========================================
...