uses records2u;

begin
records2u.ProcWithRecords;
records2u.ProcWithRecords2;
end.