From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,e8550e5b10c2c0
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-02-27 00:45:51 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!logbridge.uoregon.edu!kibo.news.demon.net!news.demon.co.uk!demon!not-for-mail
From: john@nospam.demon.co.uk (John McCabe)
Newsgroups: comp.lang.ada
Subject: Re: Variant Record Component
Date: Thu, 27 Feb 2003 08:46:40 GMT
Message-ID: <3e5dd055.643284@news.demon.co.uk>
References: <3E5D00D6.F6A20AD2@boeing.com> <uof4y507a.fsf@nasa.gov>
 <kQj7a.72$QK.31@read3.inet.fi>
NNTP-Posting-Host: assen.demon.co.uk
X-Trace: news.demon.co.uk 1046335550 13929 158.152.218.101 (27 Feb 2003
 08:45:50 GMT)
X-Complaints-To: abuse@demon.net
NNTP-Posting-Date: Thu, 27 Feb 2003 08:45:50 +0000 (UTC)
X-Newsreader: Forte Free Agent 1.21/32.243
Xref: archiver1.google.com comp.lang.ada:34655
Date: 2003-02-27T08:46:40+00:00
List-Id: <comp.lang.ada>

On Thu, 27 Feb 2003 08:17:20 GMT, "Anders Wirzenius"
<anders.wirzenius@pp.qnet.fi> wrote:


>Here, Stephe, is another higher level description:
>
>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.
>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 Pascal sets :-)

Best Regards
John McCabe

To reply by email replace 'nospam' with 'assen'