APPS.GMI_LOT_TRACE_PKG dependencies on DBMS_SQL

Line 46: V_cursor_id := DBMS_SQL.OPEN_CURSOR;

42: Cir_ref CONSTANT NUMBER := 1;
43: BEGIN
44:
45: -- Open the cursor for processing
46: V_cursor_id := DBMS_SQL.OPEN_CURSOR;
47: --BEGIN BUG#3102313 James Bernard
48: --Modified the select statement to honour formula security.
49: --Joined the doc_id of the transactions with pm_btch_hdr.batch_id
50: --and pm_btch_hdr.formula_id with fm_form_mst.formula_id

Line 68: DBMS_SQL.PARSE(v_cursor_id,v_selectstmt,DBMS_SQL.V7);

64: END IF;
65: --END BUG#3102313
66: -- Parse the Query
67:
68: DBMS_SQL.PARSE(v_cursor_id,v_selectstmt,DBMS_SQL.V7);
69:
70: -- Define the output variables
71:
72: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,1,v_item_id);

Line 72: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,1,v_item_id);

68: DBMS_SQL.PARSE(v_cursor_id,v_selectstmt,DBMS_SQL.V7);
69:
70: -- Define the output variables
71:
72: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,1,v_item_id);
73: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,2,v_lot_id);
74: DBMS_SQL.DEFINE_COLUMN_CHAR(v_cursor_id,3,v_has_child,10);
75:
76: -- Execute the statement

Line 73: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,2,v_lot_id);

69:
70: -- Define the output variables
71:
72: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,1,v_item_id);
73: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,2,v_lot_id);
74: DBMS_SQL.DEFINE_COLUMN_CHAR(v_cursor_id,3,v_has_child,10);
75:
76: -- Execute the statement
77:

Line 74: DBMS_SQL.DEFINE_COLUMN_CHAR(v_cursor_id,3,v_has_child,10);

70: -- Define the output variables
71:
72: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,1,v_item_id);
73: DBMS_SQL.DEFINE_COLUMN(v_cursor_id,2,v_lot_id);
74: DBMS_SQL.DEFINE_COLUMN_CHAR(v_cursor_id,3,v_has_child,10);
75:
76: -- Execute the statement
77:
78: v_dummy := DBMS_SQL.EXECUTE(v_cursor_id);

Line 78: v_dummy := DBMS_SQL.EXECUTE(v_cursor_id);

74: DBMS_SQL.DEFINE_COLUMN_CHAR(v_cursor_id,3,v_has_child,10);
75:
76: -- Execute the statement
77:
78: v_dummy := DBMS_SQL.EXECUTE(v_cursor_id);
79: LOOP
80: IF DBMS_SQL.FETCH_ROWS(v_cursor_id) = 0 THEN
81: EXIT;
82: END IF;

Line 80: IF DBMS_SQL.FETCH_ROWS(v_cursor_id) = 0 THEN

76: -- Execute the statement
77:
78: v_dummy := DBMS_SQL.EXECUTE(v_cursor_id);
79: LOOP
80: IF DBMS_SQL.FETCH_ROWS(v_cursor_id) = 0 THEN
81: EXIT;
82: END IF;
83:
84: -- Retrieve data into PL/SQL Variables

Line 86: DBMS_SQL.COLUMN_VALUE(v_cursor_id,1,v_item_id);

82: END IF;
83:
84: -- Retrieve data into PL/SQL Variables
85:
86: DBMS_SQL.COLUMN_VALUE(v_cursor_id,1,v_item_id);
87: DBMS_SQL.COLUMN_VALUE(v_cursor_id,2,v_lot_id);
88: DBMS_SQL.COLUMN_VALUE_CHAR(v_cursor_id,3,v_has_child);
89: lot_tab(i) := v_lot_id;
90: comp_no := comp_no +1;

Line 87: DBMS_SQL.COLUMN_VALUE(v_cursor_id,2,v_lot_id);

83:
84: -- Retrieve data into PL/SQL Variables
85:
86: DBMS_SQL.COLUMN_VALUE(v_cursor_id,1,v_item_id);
87: DBMS_SQL.COLUMN_VALUE(v_cursor_id,2,v_lot_id);
88: DBMS_SQL.COLUMN_VALUE_CHAR(v_cursor_id,3,v_has_child);
89: lot_tab(i) := v_lot_id;
90: comp_no := comp_no +1;
91: IF v_has_child <> 'no' THEN

Line 88: DBMS_SQL.COLUMN_VALUE_CHAR(v_cursor_id,3,v_has_child);

84: -- Retrieve data into PL/SQL Variables
85:
86: DBMS_SQL.COLUMN_VALUE(v_cursor_id,1,v_item_id);
87: DBMS_SQL.COLUMN_VALUE(v_cursor_id,2,v_lot_id);
88: DBMS_SQL.COLUMN_VALUE_CHAR(v_cursor_id,3,v_has_child);
89: lot_tab(i) := v_lot_id;
90: comp_no := comp_no +1;
91: IF v_has_child <> 'no' THEN
92: j:= 1; -- initialize index to search through the lot stack

Line 147: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);

143: null);
144: END IF;
145: END LOOP;
146: -- Close the cursor
147: DBMS_SQL.CLOSE_CURSOR(v_cursor_id);
148: END;
149:
150:
151: function has_ingred_in_pnd(fv_item_id number, fv_lot_id number)