DBA Data[Home] [Help]

APPS.POR_UTIL_PKG dependencies on DBMS_SQL

Line 28: l_line_ids dbms_sql.NUMBER_TABLE;

24: END IF;
25: END bool_to_varchar;
26:
27: PROCEDURE delete_requisition_internal(p_header_id IN NUMBER, p_working_copy IN BOOLEAN, p_is_purge_req_process IN BOOLEAN default false) IS
28: l_line_ids dbms_sql.NUMBER_TABLE;
29: l_award_ids dbms_sql.NUMBER_TABLE;
30: l_status VARCHAR2(1);
31: l_err_msg VARCHAR2(4000);
32: l_progress VARCHAR2(4) := '000';

Line 29: l_award_ids dbms_sql.NUMBER_TABLE;

25: END bool_to_varchar;
26:
27: PROCEDURE delete_requisition_internal(p_header_id IN NUMBER, p_working_copy IN BOOLEAN, p_is_purge_req_process IN BOOLEAN default false) IS
28: l_line_ids dbms_sql.NUMBER_TABLE;
29: l_award_ids dbms_sql.NUMBER_TABLE;
30: l_status VARCHAR2(1);
31: l_err_msg VARCHAR2(4000);
32: l_progress VARCHAR2(4) := '000';
33: l_DocumentTypeCode po_requisition_headers_all.type_lookup_code%TYPE;

Line 452: cursorID := dbms_sql.open_cursor;

448:
449: --bug 2522835 changed the direct select statement to dynamic query
450: --to remove dependency on POR_REQ_NUMBER_S sequence
451:
452: cursorID := dbms_sql.open_cursor;
453:
454: --select POR_REQ_NUMBER_S.nextval into l_req_num from sys.dual;
455: sqlString := 'select POR_REQ_NUMBER_S.nextval from sys.dual';
456: dbms_sql.parse(cursorID, sqlString, dbms_sql.NATIVE);

Line 456: dbms_sql.parse(cursorID, sqlString, dbms_sql.NATIVE);

452: cursorID := dbms_sql.open_cursor;
453:
454: --select POR_REQ_NUMBER_S.nextval into l_req_num from sys.dual;
455: sqlString := 'select POR_REQ_NUMBER_S.nextval from sys.dual';
456: dbms_sql.parse(cursorID, sqlString, dbms_sql.NATIVE);
457: dbms_sql.define_column(cursorID, 1, l_req_num);
458: result := dbms_sql.execute_and_fetch(cursorID,false);
459: dbms_sql.column_value(cursorID, 1, l_req_num);
460:

Line 457: dbms_sql.define_column(cursorID, 1, l_req_num);

453:
454: --select POR_REQ_NUMBER_S.nextval into l_req_num from sys.dual;
455: sqlString := 'select POR_REQ_NUMBER_S.nextval from sys.dual';
456: dbms_sql.parse(cursorID, sqlString, dbms_sql.NATIVE);
457: dbms_sql.define_column(cursorID, 1, l_req_num);
458: result := dbms_sql.execute_and_fetch(cursorID,false);
459: dbms_sql.column_value(cursorID, 1, l_req_num);
460:
461: WHILE (req_number_invalid(l_req_num) AND l_counter <= l_no_of_trials ) LOOP

Line 458: result := dbms_sql.execute_and_fetch(cursorID,false);

454: --select POR_REQ_NUMBER_S.nextval into l_req_num from sys.dual;
455: sqlString := 'select POR_REQ_NUMBER_S.nextval from sys.dual';
456: dbms_sql.parse(cursorID, sqlString, dbms_sql.NATIVE);
457: dbms_sql.define_column(cursorID, 1, l_req_num);
458: result := dbms_sql.execute_and_fetch(cursorID,false);
459: dbms_sql.column_value(cursorID, 1, l_req_num);
460:
461: WHILE (req_number_invalid(l_req_num) AND l_counter <= l_no_of_trials ) LOOP
462: result := dbms_sql.execute_and_fetch(cursorID,false);

Line 459: dbms_sql.column_value(cursorID, 1, l_req_num);

455: sqlString := 'select POR_REQ_NUMBER_S.nextval from sys.dual';
456: dbms_sql.parse(cursorID, sqlString, dbms_sql.NATIVE);
457: dbms_sql.define_column(cursorID, 1, l_req_num);
458: result := dbms_sql.execute_and_fetch(cursorID,false);
459: dbms_sql.column_value(cursorID, 1, l_req_num);
460:
461: WHILE (req_number_invalid(l_req_num) AND l_counter <= l_no_of_trials ) LOOP
462: result := dbms_sql.execute_and_fetch(cursorID,false);
463: dbms_sql.column_value(cursorID, 1, l_req_num);

Line 462: result := dbms_sql.execute_and_fetch(cursorID,false);

458: result := dbms_sql.execute_and_fetch(cursorID,false);
459: dbms_sql.column_value(cursorID, 1, l_req_num);
460:
461: WHILE (req_number_invalid(l_req_num) AND l_counter <= l_no_of_trials ) LOOP
462: result := dbms_sql.execute_and_fetch(cursorID,false);
463: dbms_sql.column_value(cursorID, 1, l_req_num);
464: --select POR_REQ_NUMBER_S.nextval into l_req_num from sys.dual;
465: l_counter := l_counter + 1;
466: END LOOP;

Line 463: dbms_sql.column_value(cursorID, 1, l_req_num);

459: dbms_sql.column_value(cursorID, 1, l_req_num);
460:
461: WHILE (req_number_invalid(l_req_num) AND l_counter <= l_no_of_trials ) LOOP
462: result := dbms_sql.execute_and_fetch(cursorID,false);
463: dbms_sql.column_value(cursorID, 1, l_req_num);
464: --select POR_REQ_NUMBER_S.nextval into l_req_num from sys.dual;
465: l_counter := l_counter + 1;
466: END LOOP;
467:

Line 468: dbms_sql.close_cursor(cursorID);

464: --select POR_REQ_NUMBER_S.nextval into l_req_num from sys.dual;
465: l_counter := l_counter + 1;
466: END LOOP;
467:
468: dbms_sql.close_cursor(cursorID);
469:
470: IF (l_counter < l_no_of_trials) THEN
471: RETURN l_req_num;
472: ELSE