comp.lang.ada
 help / color / mirror / Atom feed
From: mrbunny@mail.zynet.co.uk
Subject: Simple Student Problem Ada83
Date: 1997/04/19
Date: 1997-04-19T00:00:00+00:00	[thread overview]
Message-ID: <3358b2bb.2065467@news> (raw)



I have started a computer programming course at Thames Valley
University in Slough, UK. where we are using Ada 83  for an
introduction to programming.

I have a simple problem but cannot find an answer in my course notes
or text books! How do I delete a record from an array? The set up for
the array is as follows;

TYPE item_rec IS
              RE CORD
                    	ref_num   	: refnum_type;
                      	descrip   	: descrip_type;
                      	value      	: integer;          	
                      	hirer        	: name_type;        	
              END RECORD;

TYPE item_array IS ARRAY(integer RANGE <> ) OF item rec;

-- declare data variable to hold stock data

max_size : CONSTANT integer := 20;         	
stock : item_array(l..max_size);
num_items : integer; 


-- Instantiation of array_file to hold stock items data

PACKAGE item_file IS NEW array_file(item_rec, item_array,
"stock.dat");

Can anyone advise of a simple solution?

Thanks for your help.

Mark.




             reply	other threads:[~1997-04-19  0:00 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1997-04-19  0:00 mrbunny [this message]
     [not found] ` <01bc4cd3$f8a7fae0$9bfd1fcc@p5120.bda>
1997-04-20  0:00   ` Simple Student Problem Ada83 Nick Roberts
1997-04-21  0:00     ` Robert Dewar
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox