Cost Accounting Example

Adabas Review may be used to collect Adabas user resource consumption data that can be manipulated for cost accounting and charge-back purposes. This data can be processed and viewed online or in batch, or it can be downloaded to a personal computer for further processing.

This document describes the Adabas Review Cost Accounting Example.


Viewing Data Online

A sample cost accounting report "Cost Accounting Example" is supplied with Adabas Review. It may be used without modification, customized to suit site requirements, or used as a basis for other cost accounting reports. The report definition for the "Cost Accounting Example" report is shown below:

09:19:21                  A D A B A S  -  R E V I E W                2020-02-10
REVIEW-DB (10,252)               Edit Report                  Hub Target: 296  
                                                                               
Detail/Summary: S   Report Name: COST ACCOUNTING EXAMPLE_________   DBID: _____
                                                                               
+-----------------------------------------------------------------------------+
|  Field     Order   Sum   Min   Max   Avg   Pct   Rate      Cost      Round  |
|-----------------------------------------------------------------------------|
| CQJOB___    10_     _     _     _     _     _     _     _ _______    ______ |
| TPUSERID    20_     _     _     _     _     _     _     _ _______    ______ |
| IOS_____    ___     X     _     _     _     _     _     _ _______    ______ |
| COMMANDS    ___     X     _     _     _     _     _     _ _______    ______ |
| CMDRESP_    ___     X     _     _     _     _     _     _ _______    ______ |
| ADADURA_    ___     X     _     _     _     _     _     _ _______    ______ |
| ________    ___     _     _     _     _     _     _     _ _______    ______ |
| ________    ___     _     _     _     _     _     _     _ _______    ______ |
| ________    ___     _     _     _     _     _     _     _ _______    ______ |
| ________    ___     _     _     _     _     _     _     _ _______    ______ |
+-----------------------------------------------------------------------------+                                                                               
                                                                               
Command: ______________________________________________________________________
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
      Help  Optns Exit  SOnly Save  Start  -     +    Sched Rules Flds  Menu

In this report, the generated NATURAL display program was modified to attach a cost value to the amounts of CPU time and Adabas time used, and to the number of Adabas calls and I/Os performed by each user.

By issuing the VW command, the report may be used to examine data that has been stored in the Adabas Review repository.

The following screen shows the type of information collected by the report:

09:22:31                   COST ACCOUNTING EXAMPLE                   2020-02-10
                   2020-02-10 09:21:12 - 2020-02-10 09:22:30                   
                                                                        Page: 1
                     Total        Total         Total           Total         
 CQ-Job  TPUserid  Num-of-IOs     Commands      Cmd-Resp        ADA-Dur        
-------- -------- ------------- ------------ -------------- ----------------   
        
 ALSCCOMP                   210          151         1.1202      5.152688
 ******** SUB-T==>          210          151         1.1202      5.152688
 COMPLETE                     6           12         0.0702      0.251056
          USER1             318          652         1.3057      6.523424
          USER2              57          186         0.2409      0.903504
          USER3            1241         2775         5.5287     26.014992
          USER4              97          219         0.3831      2.337776
          USER5             271          831         1.2486      7.082896
          USER6             169          147         0.4203      2.965808
          USER7             117          129         0.4519      2.433072
          USER8             136          386         0.5802      3.022160
          USER9            5573         8030         7.7051    107.307856
          USER10            323          707         1.3217      6.409696
        
 Command: _____________________________________________________________________
 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
       Help  Sort  Exit                                                  Menu

Additionally, the displayed resource consumption data may be downloaded to a personal computer using the DL command. To use this feature, the Software AG product Entire Connection must be installed.

For more information, read Downloading Report Output.

Processing Data in Batch Mode

Cost accounting values can be defined for batch command log processing by using the COST batch parameter statement.

The member REVCOST, shown below, is a sample report for cost accounting that uses the COST statement. REVCOST is located in the Adabas Review source data set.

* 
* This sample report allocates a cost value to three summary
* fields based on the JOBNAME and Adabas user's TPUSERID. 
* In this example, each I/O is assigned a cost of $0.02, 
* each command response second is valued at $0.25 and each second of  
* Adabas duration costs $0.10. 
* 
 REPORT TYPE=SUMMARY, 
    TITLE='COST ACCOUNTING EXAMPLE', 
    PROGRAM=SR-00028, 
    RESTART=Y, 
    MAXSTORE=8 
 DISPLAY JOBNAME,TPUSERID 
 SUM     IOS,CMDRESP,ADADURA 
 COST    IOS*0.02,CMDRESP*0.25,ADADURA*0.10 
*

For additional information about Adabas Review batch processor parameter statements, read Using Batch Facilities.

A sample of the data produced by the batch report is shown on the next section.

Adabas Review Command Response Time Calculation

The Adabas Review command response time calculation is based on the following information.

Adabas Review stores in the command table the minimum Adabas duration for each command type returning a zero response code.

The command table is updated whenever a lower duration value is encountered.