387: l_obj_type VARCHAR2(30);
388:
389: CURSOR c_header_id IS
390: SELECT bim_r_resp_int_header_s.NEXTVAL
391: FROM dual;
392:
393: CURSOR c_grade_id IS
394: SELECT bim_r_resp_int_grades_s.NEXTVAL
395: FROM dual;
391: FROM dual;
392:
393: CURSOR c_grade_id IS
394: SELECT bim_r_resp_int_grades_s.NEXTVAL
395: FROM dual;
396:
397: CURSOR c_reason_id IS
398: SELECT bim_r_resp_int_reason_s.NEXTVAL
399: FROM dual;
395: FROM dual;
396:
397: CURSOR c_reason_id IS
398: SELECT bim_r_resp_int_reason_s.NEXTVAL
399: FROM dual;
400:
401: CURSOR c_source_code_ids (c_source_code IN Varchar2) IS
402: SELECT source_code_id ,source_code_for_id ,arc_source_code_for
403: FROM AMS_SOURCE_CODES