From: dreamer@lhaven.UUmh.Ab.Ca (Lawrence "The Dreamer" Chen)
Newsgroups: alt.sys.amiga.uucp
Subject: Posting of TLPROC v0.5
Distribution: world
Date: 24 Aug 92 09:06:50 MDT
Organization: Lunatic Haven BBS

Coming soon to alt.sys.amiga.uucp.patches:

===========================================================================

Lunatic Haven Information Systems Presents:

tlproc v0.5 (C) Copyright 1992 - LKC, All Rights Reserved.
===========
This is a simple little program that takes UUSPOOL:timelog and produces
a call log report in UULIB:

Usage: tlproc

I wrote this program to be run once at the end of each month.  It reports
the CPS figure on a call by call basis for each entry and generates an estimate
of the phone bill.

Example output:

01-Aug-92 00:30 12:42 in=488495   out=152320   portal   840.965    3.19    3.19
01-Aug-92 00:33  0:10 in=1255     out=0        dialup   125.500    0.16    3.35
01-Aug-92 01:22 12:22 in=945115   out=0        ajfcal  1273.740    1.53    4.88
01-Aug-92 07:04  3:11 in=122142   out=16754    portal   727.204    0.98    5.86
01-Aug-92 10:12  2:01 in=0        out=190678   dialup  1575.851    0.49    6.35
01-Aug-92 10:19  2:01 in=0        out=218841   dialup  1808.603    0.49    6.84
01-Aug-92 10:56  0:03 in=0        out=0        gumby      0.000    0.00    6.84
01-Aug-92 18:58  0:23 in=13470    out=1279     dialup   641.261    0.16    7.00
01-Aug-92 20:22  1:31 in=0        out=122094   dialup  1341.692    0.32    7.32

The first six columns are from timelog.

The seventh column is the CPS [total in & out over time of call(col 3)]

AJFCAL & PORTAL has a T2500, and DIALUP has a WB, GUMBY is 2400.

The eighth column is the estimated cost, and the ninth is the running total.

The cost estimates are taken from the required file:

UULIB:cost.tab
==============
ajfcal	0	13	0.85	1.07
gumby
dialup	0	18	0.85	1.07
portal	0	27	0.85	1.07
bugs	0	13	0.85	1.07
Bugs	0	13	0.85	1.07
adaptex	0	27	0.85	1.07
wolves	0	27	0.85	1.07

The first field is the name of the system (case sensitive).  This field is
required. 

The second field is the amount in cents to add per call (the local phone company
used to have a fixed setup charge for Long Distance calls...until competition
moved in).

The third field is the per minute charge in cents.

The fourth field is for discounts multiplier.  Under Teleplus I get 15% off all
my calls.

The fifth field is for a second multiplier.  Namely GST our federal tax.

'gumby' above is a local system...so when all fields are left off.  The first
two fields default to 0 and the last two default to 1.0.

Infact if any combination of trailing fields are left off the defaults are used.

I wrote this program so I could brace myself for the phone bill each month.
Of course it didn't work...because the phone bill was always more money than
I would ever budget for it.

Later I though a CPS report would be handy on a per call basis...it allows me
to twiddle modem registers for optimum throughput and rate systems for transfer
efficiency.

Like both Portal and Ajfcal use the same modem, but Ajfcal does clearly better
on throughput.  Both use similar setups though, so it must be system loading.

LKC
--
 "Just a Crazy Engineer with an Amiga and an HP48sx"    - The Dreamer
 Email: dreamer@lhaven.uumh.ab.ca or "Lawrence Chen" @ 1:134/3002
 PHONE: +1 403 526 6019                          FAX: +1 403 529 5102
 Lunatic Haven BBS (1:134/3002): +1 403 526 6957 (14,400 HST/v.32bis)
 Lunatic Haven BBS (UUCP):       +1 403 526 5035 (Telebit Worldblazer)
 Praxis Society K12 BBS:         +1 403 529 1610 (2400 bps)
Newsgroups: alt.sys.amiga.uucp