phone number database

[Stephen Leake <Stephen.A.Leake@nasa.gov>]

"Anders Wirzenius" <anders.wirzenius@pp.qnet.fi> writes:

> Sorry, John, for using your thread as a stepping-stone. ;-(

Please learn how to change the subject in your newsreader; hijacking
threads like this is simply not acceptable.

> I HAVE:
> 1.
> Six phone numbers: 1795, 2006, 2007, 2012, 2013, 2014.
> 2.
> A log (text file) from the company's phone system with data like:
> From_Phone_Nr, To_Phone_Nr, Answering_Time, Duration... 
> 
> I WANT TO:
> 3.
> Pick only those log data where the To_Phone_Nr is one of the six numbers.
> 4.
> Set up some statistics about those phone calls.
> 5.
> Be able to add or remove phone numbers from the list (six becomes
> seven some sunny winterday). 
> 
> I WISH I HAD:
> type Help_Desk is (1795, 2006, 2007, 2012, 2013, 2014); -- with the
> dynamics described under point 5. 

Well, since Ada enumeration types don't have the dynamics from point
5, you can't use them.

> If To_Phone_Nr in Help_Desk then
>    -- Do statistics
> end if;
> 
> What is a proper way to implement "To_Phone_Nr in Help_Desk" ? 

Use a SAL binary tree
(http://users.erols.com/leakstan/Stephe/Ada/Sal_Packages/index.htm) to
store the help desk phone numbers; then do

if Is_Present (Help_Tree, To_Phone_Nr) then 
    ...
end if;

Hmm, my web page is out of date; that version doesn't have Is_Present.
I'll update it one of these days...

-- 
-- Stephe