Friday, May 18, 2012

Using RECORD Type and TABLE TYPE

DECLARE
   TYPE name_rec IS RECORD ( first_name VARCHAR2(20), last_name VARCHAR2(25) );
   TYPE names IS table OF name_rec;
   l_name_rec name_rec;
   l_names names;
BEGIN
   l_names := names();
 
   for i in 1..10 loop
     l_name_rec.first_name := 'fname'||i;
     l_name_rec.last_name := 'Lname'|| i;
     l_names.extend(1);
     l_names(i) := l_name_rec  ;
   end loop ;
 
   /* call procedure whatever
        Bulk_update (job_id,  l_names ); */
 
   for i in l_names.first..l_names.last loop
      DBMS_OUTPUT.PUT_LINE('[' ||i ||'] ' ||l_names(i).first_name || ', '|| l_names(i).last_name  );
   end loop ;
 
END;
/

No comments:

Post a Comment