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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,c30b74e0aa9cd004
X-Google-Attributes: gid103376,public
From: "DuckE" <nospam_steved@pacifier.com>
Subject: Re: Character Handling
Date: 2000/04/30
Message-ID: <390c5836.0@news.pacifier.com>#1/1
X-Deja-AN: 617525115
References: <390D1159.83CAEA7F@cantech.net.au>
X-Trace: 30 Apr 2000 08:58:46 PST, 198.145.224.104
X-MSMail-Priority: Normal
X-Priority: 3
Newsgroups: comp.lang.ada
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700
Date: 2000-04-30T00:00:00+00:00
List-Id: <comp.lang.ada>

The function To_Upper is a function that takes a string as an argument and
returns a string.  Here's a working sample program that uses
Ada.Characters.Handling.To_Upper:

-- == Start of file: DemoHandling.adb =========
WITH Ada.Characters.Handling;

WITH Ada.Text_Io;

PROCEDURE DemoHandling IS

PACKAGE Text_Io RENAMES Ada.Text_Io;

PACKAGE Handling RENAMES Ada.Characters.Handling;

inputText : String(1..80);

lastIndex : Natural;

BEGIN

Text_Io.Put( "Enter Text > " );

Text_Io.Get_Line( inputText, lastIndex );

DECLARE

ucText : String := Handling.To_Upper( inputText(1..lastIndex) );

lcText : String := Handling.To_Lower( inputText(1..lastIndex) );

BEGIN

Text_Io.Put_Line( "Upper case: " & ucText );

Text_Io.Put_Line( "Lower case: " & lcText );

END;

END DemoHandling;

--========End of File: DemoHandling.adb=============

I hope this helps,
SteveD

"Robert Stephen Breen" <emages@cantech.net.au> wrote in message
news:390D1159.83CAEA7F@cantech.net.au...
> Hi everyone,
> I am currently working on an assigment at uni and I have to convert a
> String input to upper case. I have discovered that package
> Characters.Handling will do the trick, however mebe its because I am
> Irish, but I can not make heads or tails of how you actually use it in
> your code!
>
> I have put
>
> With Text_io,Ada.Characters.Handling;
> Use Text_io;
>
> and in one of my procedures I have tried to convert an input.
>
> Ada.Characters.Handling.To_upper(Clients_Name(Name_Last)) etc
>
> all I get is a message stating Ivalid parameter call ? How
>
> could someone please explain!!!!!!!!!!!!!!!!!
>
> Thanks
> Rob
>