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,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,31a8e118c303e8b3
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-03-23 18:55:07 PST
Path: archiver1.google.com!postnews1.google.com!not-for-mail
From: ametayer98@hotmail.com (annabelle)
Newsgroups: comp.lang.ada
Subject: Re: beginner ada generic fonction
Date: 23 Mar 2002 18:55:06 -0800
Organization: http://groups.google.com/
Message-ID: <8235efb6.0203231855.557e94cc@posting.google.com>
References: <8235efb6.0203221737.44abefff@posting.google.com>
 <3ESm8.101615$q2.10433@sccrnsc01>
NNTP-Posting-Host: 154.5.186.185
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: posting.google.com 1016938506 12008 127.0.0.1 (24 Mar 2002 02:55:06
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: 24 Mar 2002 02:55:06 GMT
Xref: archiver1.google.com comp.lang.ada:21599
Date: 2002-03-24T02:55:06+00:00
List-Id: <comp.lang.ada>

Thank you very much for your answer.

But I still dont get how I can make this function re-usable :

  	-------------------------------------------------------------------
  	function laCle(Mon_item : T_inscription) return t_code_Cours is
		
	begin
		Return Mon_item.Code_cours;
  	end lacle;
  	-------------------------------------------------------------------

I tried to cut'n paste the function to reuse it with another type of element :

  	-------------------------------------------------------------------
  	function laCle(Mon_item : T_Course) return t_code_Cours is
		
	begin
		Return Mon_item.Code_course;
  	end lacle;
  	-------------------------------------------------------------------

But it does not work...