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,eb2e0c5efa8c83d2
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-03-18 08:39:01 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!colt.net!dispose.news.demon.net!news.demon.co.uk!demon!pipehawk.demon.co.uk!not-for-mail
From: john.mccabe@emrad.ns.com (John McCabe)
Newsgroups: comp.lang.ada
Subject: Re: A very strange problem indeed...
Date: Mon, 18 Mar 2002 16:39:40 GMT
Organization: Emrad Ltd
Message-ID: <3c961783.27791091@news.demon.co.uk>
References: <3c95f466$0$6552@motown.iinet.net.au>
NNTP-Posting-Host: pipehawk.demon.co.uk
X-NNTP-Posting-Host: pipehawk.demon.co.uk:158.152.226.81
X-Trace: news.demon.co.uk 1016469521 nnrp-12:14684 NO-IDENT
 pipehawk.demon.co.uk:158.152.226.81
X-Complaints-To: abuse@demon.net
X-Newsreader: Forte Free Agent 1.21/32.243
Xref: archiver1.google.com comp.lang.ada:21411
Date: 2002-03-18T16:39:40+00:00
List-Id: <comp.lang.ada>

On 18 Mar 2002 14:06:30 GMT, "Karl-Johan Karlsson" <kjk@tt.com> wrote:

>   Put("size you want: ");
>   Item_Type_IO.Get(Choice);
>   Put("amount you want: ");
>   Get(Item_Amount);

What type is "Item_Amount"? What do you have in your context clauses.
I would suggest, if the code itself isn't very long, get rid of all
the "use" clauses related to IO packages and specify them explicitly. 

>These four lines above are the ones which are making my name string accept
>only a certain amount of characters (e.g. 20), so if I type less characters
>it will not go to the next part of the program.
>
>   Put("Please tell us");
>   New_Line;
>   Put("your name: ");
>   Get_Line(Name, Name_Count);

It's probably worth stripping this right down to a bare minimum
including these lines and posting it on this group. It would make it
easier for everyone if they had the full details, inclufing type
definitions, context etc, and we would all be able to build and run
it.