Tbl_main (
Main_id number primary key,
M_field1,
…
M_fieldN);

Tbl_detail(
Detail_id number primary key,
Main_id number foreign key references tbl_main (main_id),
D_field1,
…
D_fieldN);

Package pkg_job
Is
Type t_main is table of tbl_main%ROWTYPE;
Type t_detail is table of tbl_detail%ROWTYPE;
Procedure add_element(i_main_rec in tbl_main%ROWTYPE,
I_detail_set in t_detail);
…
END;

Package body pkg_job
Is

Procedure add_element (i_main_rec in tbl_main%ROWTYPE,
I_detail_set in t_detail)
Is
New_id tbl_main.main_id%TYPE;
Begin
Insert into tbl_main (main_id, M_field1, …, M_fieldN)
Values (i_main_seq.NEXTVAL, i_main_rec.M_field1, … , i_main_rec.M_fieldN)
Return main_id into new_id;

For indx n i_detail_set.first .. i_detail_set.last
Loop
 Insert into tbl_detail (detail_id, main_id, d_field1, …, d_fieldN)
Values (i_detail_seq.NEXTVAL, new_id, i_detail_set(indx).d_field1, …, i_detail_set(indx).d_fieldN);
End loop;
Commit;
End;
...
End;