キー

CASSPOOL には、選択肢として 6 つのキー付き索引が含まれています。索引を選択するには、その対応する 78 レベルのフィールドを KEY-ID フィールドに移動します。このことを説明するために、次の mfpubcas.cpy の部分的なリストに利用できる索引を示します。

...
  *   ==============================================
          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
      *      ===========================================
...