DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦44e8ca2c1⟧ Ada Source

    Length: 4096 (0x1000)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, procedure Accounting_Report, seg_001861

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

E3 Source Code



procedure Accounting_Report
             (From_Date : String := "";
              To_Date : String := "";
              For_User : String := "@";
              Accounting_Directory : String := "!Machine.Accounting");
--
-- This procedure will generate an accounting summary from the accounting files
-- located in !Machine.Accounting.  Parameters are:
--
--      From_Date, To_Date  : String values acceptable by Time_Utilities.
--                            This value MUST be the date only (no time value).
--      For_User            : Specific users to display accounting information
--                            for.  The default "@" specifies ALL users.
--
-- Output will go to the standard output window.

--
-- For example:
--
--     Accounting_Summary (From_Date => "87/11/04",
--                         To_Date => "87/11/18",
--                         For_User => "[smp,tom,cbh,phil]");
--
-- would generate the following output:
--
-- Accounting Summary for Period  4-NOV-87 to 18-NOV-87.
-- Total 'Work' Time for Period :  80 hours ( 10 days )
--
--
--    NAME      LOGINS  LOGIN_TIME  CPU_TIME   DISK_IO  JOBS_RUN  P_LOG  L_CPU
-- ===========  ======  ==========  =========  =======  ========  =====  =====
-- CBH             17     7/11:12    12:10:22   842020    3191      224    152
-- PHIL            28     5/01:57     6:06:42   393996    2439      152     76
-- SMP              9    22:44:02    9:42.306    19326     223       28      2
-- TOM              2     2:26:52    3:12.889     7513      29        3      1
--              <Avg>       <Avg>       <Avg>    <Avg>   <Avg>    <Avg>  <Avg>
-- Total ( 4 )     14     3/09:35     4:37:30   315713    1470      102     58
--
--
-- where 'Total Work Hours for Period' is calculated by multiplying the
-- number of week days (MON-FRI) in the period by 8 hours, and :
--     NAME            : User account name.
--     LOGINS          : Number of times user has logged in.
--     LOGIN_TIME      : Total amount of time user was logged in.
--     CPU_TIME        : Total amount of CPU time user has consumed.
--     DISK_IO         : Total number of disk I/O requests for user.
--     JOBS_RUN        : Total number of jobs run by user.
--     P_LOG           : Percent user was logged in of 'Total Work Hours'
--     L_CPU           : 'Load' CPU, weights user consumption of available
--                       CPU time from 'Total Work Hours'.
-- The summary line at the bottom totals the amounts in each column.

E3 Meta Data

    nblk1=3
    nid=0
    hdr6=6
        [0x00] rec0=1b rec1=00 rec2=01 rec3=024
        [0x01] rec0=11 rec1=00 rec2=02 rec3=078
        [0x02] rec0=09 rec1=00 rec2=03 rec3=000
    tail 0x203003c727da188f8ecf8 0x42a00088462060003