Previous Topic: EXTRACT RecordNext Topic: I/O Modules


Billing Record file

This appendix provides a description of the CA IDMS Log Analyzer Billing Record File.

Altering this record layout is necessary if you want to tailor the CA IDMS Log Analyzer Billing file.


 *--------------------------------------------------------------------------------*
 *                                                                                *
 *   BILLING RECORD                                                               *
 *                                                                                *
 *   NOTICE:  THIS COPY BOOK IS USED BY THE CA IDMS/LOG ANALYZER MODULE USLBILX. *
 *             DISCRETION MUST BE USED IN CHANGING IT.                            *
 *                                                                                *
 *      BILL-RU-START IS THE DATE/TIME THE IDMSSVCX ROUTINE RECEIVED CONTROL FOR  *
 *             THE PARTICULAR RUN-UNIT.                                           *
 *      BILL-RU-STOP IS THE TIME THE LOG RECORD WAS WRITTEN AND IS, IN EFFECT,    *
 *             THE TIME OF TASK TERMINATION.                                      *
 *      BILL-ACCT-DATA IS UP TO 16 BYTES FROM THE ACCOUNT FIELD OF THE z/OS OR      *
 *          VS/ESA JOB CARD.                                                      *
 *                                                                                *
 *      CV AND DC TASKS ARE "INTERNAL" TASKS TO CA IDMS/DC.  THE IDMSSVCX ROUTINE *
 *      DOES NOT RECEIVE CONTROL FOR INTERNAL TASKS AND AN ERE IS NEVER CREATED.  *
 *      THEREFORE, JOB NAME AND RUN-UNIT START DATE/TIME IS NOT AVAILABLE.  THE   *
 *      BILLING EXIT SETS THOSE FIELDS AS SHOWN BELOW:                      *
 *                                                                                *
 *             BILL-JOB-NAME       TO 'IDMSDBDC'                                  *
 *             BILL-RU-START-DATE  TO ZERO                                        *
 *             BILL-RU-START-TIME  TO ZERO                                        *
 *                                                                                *
 *      INTERNAL TASKS ARE IDENTIFIED BY CA IDMS WITH A POSITIVE TASK-ID.         *
 *      EXTERNAL TASKS ARE IDENTIFIED BY CA IDMS WITH A NEGATIVE TASK-ID.         *
 *      WHEN BUILDING THE BILLING RECORD, USLBILX CREATES A POSITIVE TASK-ID      *
 *      FOR EXTERNAL RUN-UNITS BY MULTIPLYING THE TASK-ID BY A NEGATIVE ONE.      *
 *                                                                                *
 *   NOTE: BILL-RU-START-DATE IS IN      00YYDDDS FORMAT ("S" IS SIGN).           *
 *         BILL-RU-START-TIME IS IN      UNITS OF 1/10,000 SECONDS.               *
     *         BILL-RU-STOP IS IN "SQL INTERNAL" FORMAT                           *
 *              BITS 00-26 = NBR OF DAYS SINCE JANUARY 1, 0001                    *
 *              BITS 27-43 = NBR OF SECONDS SINCE MIDNIGHT OF THIS DATE           *
 *              BITS 44-63 = NBR OF MICROSECONDS WITHIN THIS SECOND               *
 *                                                                                *
 *   CHANGE CONTROL.                                                              *
 *--------------------------------------------------------------------------------*
   02  BILLING-RECORD-INIT VALUE LOW-VALUE   PIC X(100).

   02  BILLING-RECORD-R                      REDEFINES
       BILLING-RECORD-INIT                                SYNC.

   05  BILL-JOB-NAME                         PIC X(08).
   05  BILL-RU-START.
   10  BILL-RU-START-DATE                    PIC S9(7)    COMP-3.
   10  BILL-RU-START-TIME                    PIC S9(9)    COMP.
   05  BILL-RU-STOP                          PIC S9(18)   COMP.
   05  BILL-CPU-TIME                         PIC S9(9)    COMP.
   05  BILL-TOTAL-IO                         PIC S9(9)    COMP.
   05  BILL-IDMS-TASK-ID                     PIC S9(9)    COMP.
   05  BILL-ONL-BTC                          PIC X(01).
   88  BILL-BTC                              VALUE 'B'.
   88  BILL-CICS                             VALUE 'C'.
   88   BILL-DC                              VALUE 'D'.
   88   BILL-ONL                             VALUE 'C' 'D'.
   05   FILLER                               PIC X(03).

   05   BILL-INFO                            PIC X(24).

   05   BILL-INFO-ONLINE                     REDEFINES
        BILL-INFO.
   10   BILL-TRAN-ID                         PIC X(08).
   10   BILL-TERM-ID                         PIC X(08).
   10   BILL-OPER-ID                         PIC X(08).

   05   BILL-INFO-BATCH                      REDEFINES
        BILL-INFO.
   10   BILL-ACCT-DATA                       PIC X(16).
   10   FILLER                               PIC X(08).

   05   FILLER                               PIC X(36).