DBA Data[Home] [Help]

APPS.PN_MTM_ROLLFORWARD_PKG dependencies on DBMS_SQL

Line 34: /* variables for dbms_sql */

30: l_total NUMBER := 0;
31: l_success NUMBER := 0;
32: l_fail NUMBER := 0;
33:
34: /* variables for dbms_sql */
35: l_cursor INTEGER;
36: l_rows INTEGER;
37: l_count INTEGER;
38: l_where_clause VARCHAR2(2000) := NULL;

Line 68: l_cursor := dbms_sql.open_cursor;

64: THEN
65: RAISE INCORRECT_LEASE_OPTION;
66: END IF;
67:
68: l_cursor := dbms_sql.open_cursor;
69:
70: IF p_lease_no_low IS NOT NULL AND p_lease_no_high IS NOT NULL THEN
71: l_lease_no_low := p_lease_no_low;
72: l_lease_no_high := p_lease_no_high;

Line 102: dbms_sql.parse(l_cursor, Q_lease_details, dbms_sql.native);

98: Q_lease_details := Q_lease_details || l_where_clause;
99:
100: /*pnp_debug_pkg.log(' Q_lease_details :'||Q_lease_details);*/
101:
102: dbms_sql.parse(l_cursor, Q_lease_details, dbms_sql.native);
103:
104: IF p_lease_no_low IS NOT NULL AND p_lease_no_high IS NOT NULL THEN
105:
106: dbms_sql.bind_variable

Line 106: dbms_sql.bind_variable

102: dbms_sql.parse(l_cursor, Q_lease_details, dbms_sql.native);
103:
104: IF p_lease_no_low IS NOT NULL AND p_lease_no_high IS NOT NULL THEN
105:
106: dbms_sql.bind_variable
107: (l_cursor,'l_lease_no_low',l_lease_no_low );
108: dbms_sql.bind_variable
109: (l_cursor,'l_lease_no_high',l_lease_no_high );
110:

Line 108: dbms_sql.bind_variable

104: IF p_lease_no_low IS NOT NULL AND p_lease_no_high IS NOT NULL THEN
105:
106: dbms_sql.bind_variable
107: (l_cursor,'l_lease_no_low',l_lease_no_low );
108: dbms_sql.bind_variable
109: (l_cursor,'l_lease_no_high',l_lease_no_high );
110:
111: ELSIF p_lease_no_low IS NOT NULL AND p_lease_no_high IS NULL THEN
112: dbms_sql.bind_variable

Line 112: dbms_sql.bind_variable

108: dbms_sql.bind_variable
109: (l_cursor,'l_lease_no_high',l_lease_no_high );
110:
111: ELSIF p_lease_no_low IS NOT NULL AND p_lease_no_high IS NULL THEN
112: dbms_sql.bind_variable
113: (l_cursor,'l_lease_no_low',l_lease_no_low );
114:
115: ELSIF p_lease_no_high IS NOT NULL AND p_lease_no_low IS NULL THEN
116: dbms_sql.bind_variable

Line 116: dbms_sql.bind_variable

112: dbms_sql.bind_variable
113: (l_cursor,'l_lease_no_low',l_lease_no_low );
114:
115: ELSIF p_lease_no_high IS NOT NULL AND p_lease_no_low IS NULL THEN
116: dbms_sql.bind_variable
117: (l_cursor,'l_lease_no_high',l_lease_no_high );
118: END IF;
119:
120: dbms_sql.define_column (l_cursor, 1,l_lease_id);

Line 120: dbms_sql.define_column (l_cursor, 1,l_lease_id);

116: dbms_sql.bind_variable
117: (l_cursor,'l_lease_no_high',l_lease_no_high );
118: END IF;
119:
120: dbms_sql.define_column (l_cursor, 1,l_lease_id);
121: dbms_sql.define_column (l_cursor, 2,l_lease_status,30);
122: dbms_sql.define_column (l_cursor, 3,l_status,1);
123: dbms_sql.define_column (l_cursor, 4,l_old_ext_dt);
124: dbms_sql.define_column (l_cursor, 5,l_lease_change_id);

Line 121: dbms_sql.define_column (l_cursor, 2,l_lease_status,30);

117: (l_cursor,'l_lease_no_high',l_lease_no_high );
118: END IF;
119:
120: dbms_sql.define_column (l_cursor, 1,l_lease_id);
121: dbms_sql.define_column (l_cursor, 2,l_lease_status,30);
122: dbms_sql.define_column (l_cursor, 3,l_status,1);
123: dbms_sql.define_column (l_cursor, 4,l_old_ext_dt);
124: dbms_sql.define_column (l_cursor, 5,l_lease_change_id);
125:

Line 122: dbms_sql.define_column (l_cursor, 3,l_status,1);

118: END IF;
119:
120: dbms_sql.define_column (l_cursor, 1,l_lease_id);
121: dbms_sql.define_column (l_cursor, 2,l_lease_status,30);
122: dbms_sql.define_column (l_cursor, 3,l_status,1);
123: dbms_sql.define_column (l_cursor, 4,l_old_ext_dt);
124: dbms_sql.define_column (l_cursor, 5,l_lease_change_id);
125:
126: l_rows := dbms_sql.execute(l_cursor);

Line 123: dbms_sql.define_column (l_cursor, 4,l_old_ext_dt);

119:
120: dbms_sql.define_column (l_cursor, 1,l_lease_id);
121: dbms_sql.define_column (l_cursor, 2,l_lease_status,30);
122: dbms_sql.define_column (l_cursor, 3,l_status,1);
123: dbms_sql.define_column (l_cursor, 4,l_old_ext_dt);
124: dbms_sql.define_column (l_cursor, 5,l_lease_change_id);
125:
126: l_rows := dbms_sql.execute(l_cursor);
127:

Line 124: dbms_sql.define_column (l_cursor, 5,l_lease_change_id);

120: dbms_sql.define_column (l_cursor, 1,l_lease_id);
121: dbms_sql.define_column (l_cursor, 2,l_lease_status,30);
122: dbms_sql.define_column (l_cursor, 3,l_status,1);
123: dbms_sql.define_column (l_cursor, 4,l_old_ext_dt);
124: dbms_sql.define_column (l_cursor, 5,l_lease_change_id);
125:
126: l_rows := dbms_sql.execute(l_cursor);
127:
128: LOOP

Line 126: l_rows := dbms_sql.execute(l_cursor);

122: dbms_sql.define_column (l_cursor, 3,l_status,1);
123: dbms_sql.define_column (l_cursor, 4,l_old_ext_dt);
124: dbms_sql.define_column (l_cursor, 5,l_lease_change_id);
125:
126: l_rows := dbms_sql.execute(l_cursor);
127:
128: LOOP
129:
130: l_count := dbms_sql.fetch_rows( l_cursor );

Line 130: l_count := dbms_sql.fetch_rows( l_cursor );

126: l_rows := dbms_sql.execute(l_cursor);
127:
128: LOOP
129:
130: l_count := dbms_sql.fetch_rows( l_cursor );
131: EXIT WHEN l_count <> 1;
132:
133: dbms_sql.column_value (l_cursor, 1,l_lease_id);
134: dbms_sql.column_value (l_cursor, 2,l_lease_status);

Line 133: dbms_sql.column_value (l_cursor, 1,l_lease_id);

129:
130: l_count := dbms_sql.fetch_rows( l_cursor );
131: EXIT WHEN l_count <> 1;
132:
133: dbms_sql.column_value (l_cursor, 1,l_lease_id);
134: dbms_sql.column_value (l_cursor, 2,l_lease_status);
135: dbms_sql.column_value (l_cursor, 3,l_status);
136: dbms_sql.column_value (l_cursor, 4,l_old_ext_dt);
137: dbms_sql.column_value (l_cursor, 5,l_lease_change_id);

Line 134: dbms_sql.column_value (l_cursor, 2,l_lease_status);

130: l_count := dbms_sql.fetch_rows( l_cursor );
131: EXIT WHEN l_count <> 1;
132:
133: dbms_sql.column_value (l_cursor, 1,l_lease_id);
134: dbms_sql.column_value (l_cursor, 2,l_lease_status);
135: dbms_sql.column_value (l_cursor, 3,l_status);
136: dbms_sql.column_value (l_cursor, 4,l_old_ext_dt);
137: dbms_sql.column_value (l_cursor, 5,l_lease_change_id);
138:

Line 135: dbms_sql.column_value (l_cursor, 3,l_status);

131: EXIT WHEN l_count <> 1;
132:
133: dbms_sql.column_value (l_cursor, 1,l_lease_id);
134: dbms_sql.column_value (l_cursor, 2,l_lease_status);
135: dbms_sql.column_value (l_cursor, 3,l_status);
136: dbms_sql.column_value (l_cursor, 4,l_old_ext_dt);
137: dbms_sql.column_value (l_cursor, 5,l_lease_change_id);
138:
139: BEGIN

Line 136: dbms_sql.column_value (l_cursor, 4,l_old_ext_dt);

132:
133: dbms_sql.column_value (l_cursor, 1,l_lease_id);
134: dbms_sql.column_value (l_cursor, 2,l_lease_status);
135: dbms_sql.column_value (l_cursor, 3,l_status);
136: dbms_sql.column_value (l_cursor, 4,l_old_ext_dt);
137: dbms_sql.column_value (l_cursor, 5,l_lease_change_id);
138:
139: BEGIN
140:

Line 137: dbms_sql.column_value (l_cursor, 5,l_lease_change_id);

133: dbms_sql.column_value (l_cursor, 1,l_lease_id);
134: dbms_sql.column_value (l_cursor, 2,l_lease_status);
135: dbms_sql.column_value (l_cursor, 3,l_status);
136: dbms_sql.column_value (l_cursor, 4,l_old_ext_dt);
137: dbms_sql.column_value (l_cursor, 5,l_lease_change_id);
138:
139: BEGIN
140:
141: l_total := l_total + 1;

Line 213: IF dbms_sql.is_open (l_cursor) THEN

209: pnp_debug_pkg.put_log_msg(fnd_message.get);
210:
211: END IF;
212:
213: IF dbms_sql.is_open (l_cursor) THEN
214: dbms_sql.close_cursor (l_cursor);
215: END IF;
216:
217: pnp_debug_pkg.log('pn_mtm_rollforward_pkg.rollforward_leases +End+ (-)');

Line 214: dbms_sql.close_cursor (l_cursor);

210:
211: END IF;
212:
213: IF dbms_sql.is_open (l_cursor) THEN
214: dbms_sql.close_cursor (l_cursor);
215: END IF;
216:
217: pnp_debug_pkg.log('pn_mtm_rollforward_pkg.rollforward_leases +End+ (-)');
218: EXCEPTION