passing an array

[heiser@acs3.bu.edu (Bill Heiser)]

Given a setup like the following in one procedure:

  type employee is
    record
      id: integer;
      name: string(1..5);
      dept: string(1..5);
      salary: float;
    end record;

  emprec: employee;
  emp_a: array(1..50) of employee;


How can I pass the emp_a array to another function so that in the
called procedure I can change emp_a records by referencing them
as emp_a(n).id and so forth?

Thanks in advance.
Bill
-- 
Bill Heiser    heiser@acs.bu.edu, heiser@world.std.com
               Boston University, Boston MA