DBA Data[Home] [Help]

SYS.OWA_OPT_LOCK dependencies on DBMS_SQL

Line 18: stmt_cursor := dbms_sql.open_cursor;

14: found number := 0;
15: p_schema varchar2(30) := upper(p_owner);
16: p_obj varchar2(30) := upper(p_object);
17: begin
18: stmt_cursor := dbms_sql.open_cursor;
19: sys.dbms_sys_sql.parse_as_user(stmt_cursor,
20: 'begin
21: select count(*)
22: into :found

Line 29: end;', dbms_sql.v7);

25: and object_name = :p_obj;
26: exception
27: when others then
28: :found := 0;
29: end;', dbms_sql.v7);
30: dbms_sql.bind_variable(stmt_cursor, ':p_schema', p_schema);
31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);
32: dbms_sql.bind_variable(stmt_cursor, ':found', found);
33: rc := dbms_sql.execute(stmt_cursor);

Line 30: dbms_sql.bind_variable(stmt_cursor, ':p_schema', p_schema);

26: exception
27: when others then
28: :found := 0;
29: end;', dbms_sql.v7);
30: dbms_sql.bind_variable(stmt_cursor, ':p_schema', p_schema);
31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);
32: dbms_sql.bind_variable(stmt_cursor, ':found', found);
33: rc := dbms_sql.execute(stmt_cursor);
34: dbms_sql.variable_value(stmt_cursor, ':found', found);

Line 31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);

27: when others then
28: :found := 0;
29: end;', dbms_sql.v7);
30: dbms_sql.bind_variable(stmt_cursor, ':p_schema', p_schema);
31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);
32: dbms_sql.bind_variable(stmt_cursor, ':found', found);
33: rc := dbms_sql.execute(stmt_cursor);
34: dbms_sql.variable_value(stmt_cursor, ':found', found);
35: dbms_sql.close_cursor(stmt_cursor);

Line 32: dbms_sql.bind_variable(stmt_cursor, ':found', found);

28: :found := 0;
29: end;', dbms_sql.v7);
30: dbms_sql.bind_variable(stmt_cursor, ':p_schema', p_schema);
31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);
32: dbms_sql.bind_variable(stmt_cursor, ':found', found);
33: rc := dbms_sql.execute(stmt_cursor);
34: dbms_sql.variable_value(stmt_cursor, ':found', found);
35: dbms_sql.close_cursor(stmt_cursor);
36:

Line 33: rc := dbms_sql.execute(stmt_cursor);

29: end;', dbms_sql.v7);
30: dbms_sql.bind_variable(stmt_cursor, ':p_schema', p_schema);
31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);
32: dbms_sql.bind_variable(stmt_cursor, ':found', found);
33: rc := dbms_sql.execute(stmt_cursor);
34: dbms_sql.variable_value(stmt_cursor, ':found', found);
35: dbms_sql.close_cursor(stmt_cursor);
36:
37: if (found = 0) then

Line 34: dbms_sql.variable_value(stmt_cursor, ':found', found);

30: dbms_sql.bind_variable(stmt_cursor, ':p_schema', p_schema);
31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);
32: dbms_sql.bind_variable(stmt_cursor, ':found', found);
33: rc := dbms_sql.execute(stmt_cursor);
34: dbms_sql.variable_value(stmt_cursor, ':found', found);
35: dbms_sql.close_cursor(stmt_cursor);
36:
37: if (found = 0) then
38: raise_application_error(-20001, 'Cannot resolve object');

Line 35: dbms_sql.close_cursor(stmt_cursor);

31: dbms_sql.bind_variable(stmt_cursor, ':p_obj', p_obj);
32: dbms_sql.bind_variable(stmt_cursor, ':found', found);
33: rc := dbms_sql.execute(stmt_cursor);
34: dbms_sql.variable_value(stmt_cursor, ':found', found);
35: dbms_sql.close_cursor(stmt_cursor);
36:
37: if (found = 0) then
38: raise_application_error(-20001, 'Cannot resolve object');
39: end if;

Line 122: l_cursor := dbms_sql.open_cursor;

118: begin
119: -- Verify that there is no SQL injection
120: validate_object_name (p_schema, p_obj);
121:
122: l_cursor := dbms_sql.open_cursor;
123:
124: -- Fix 789868 - Common schema may not have access to this info.
125: sys.dbms_sys_sql.parse_as_user(
126: l_cursor,

Line 131: order by column_id', dbms_sql.native);

127: 'select column_name, data_type
128: from all_tab_columns
129: where owner = :p_schema
130: and table_name = :p_obj
131: order by column_id', dbms_sql.native);
132: dbms_sql.bind_variable(l_cursor, ':p_schema', p_schema);
133: dbms_sql.bind_variable(l_cursor, ':p_obj', p_obj);
134: dbms_sql.define_column(l_cursor, 1, l_column_name, 255);
135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);

Line 132: dbms_sql.bind_variable(l_cursor, ':p_schema', p_schema);

128: from all_tab_columns
129: where owner = :p_schema
130: and table_name = :p_obj
131: order by column_id', dbms_sql.native);
132: dbms_sql.bind_variable(l_cursor, ':p_schema', p_schema);
133: dbms_sql.bind_variable(l_cursor, ':p_obj', p_obj);
134: dbms_sql.define_column(l_cursor, 1, l_column_name, 255);
135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);
136:

Line 133: dbms_sql.bind_variable(l_cursor, ':p_obj', p_obj);

129: where owner = :p_schema
130: and table_name = :p_obj
131: order by column_id', dbms_sql.native);
132: dbms_sql.bind_variable(l_cursor, ':p_schema', p_schema);
133: dbms_sql.bind_variable(l_cursor, ':p_obj', p_obj);
134: dbms_sql.define_column(l_cursor, 1, l_column_name, 255);
135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);
136:
137: l_status := dbms_sql.execute(l_cursor);

Line 134: dbms_sql.define_column(l_cursor, 1, l_column_name, 255);

130: and table_name = :p_obj
131: order by column_id', dbms_sql.native);
132: dbms_sql.bind_variable(l_cursor, ':p_schema', p_schema);
133: dbms_sql.bind_variable(l_cursor, ':p_obj', p_obj);
134: dbms_sql.define_column(l_cursor, 1, l_column_name, 255);
135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);
136:
137: l_status := dbms_sql.execute(l_cursor);
138: loop

Line 135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);

131: order by column_id', dbms_sql.native);
132: dbms_sql.bind_variable(l_cursor, ':p_schema', p_schema);
133: dbms_sql.bind_variable(l_cursor, ':p_obj', p_obj);
134: dbms_sql.define_column(l_cursor, 1, l_column_name, 255);
135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);
136:
137: l_status := dbms_sql.execute(l_cursor);
138: loop
139: l_status := dbms_sql.fetch_rows(l_cursor);

Line 137: l_status := dbms_sql.execute(l_cursor);

133: dbms_sql.bind_variable(l_cursor, ':p_obj', p_obj);
134: dbms_sql.define_column(l_cursor, 1, l_column_name, 255);
135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);
136:
137: l_status := dbms_sql.execute(l_cursor);
138: loop
139: l_status := dbms_sql.fetch_rows(l_cursor);
140: if (l_status <= 0) then
141: exit;

Line 139: l_status := dbms_sql.fetch_rows(l_cursor);

135: dbms_sql.define_column(l_cursor, 2, l_data_type, 106);
136:
137: l_status := dbms_sql.execute(l_cursor);
138: loop
139: l_status := dbms_sql.fetch_rows(l_cursor);
140: if (l_status <= 0) then
141: exit;
142: end if;
143: dbms_sql.column_value(l_cursor, 1, l_column_name);

Line 143: dbms_sql.column_value(l_cursor, 1, l_column_name);

139: l_status := dbms_sql.fetch_rows(l_cursor);
140: if (l_status <= 0) then
141: exit;
142: end if;
143: dbms_sql.column_value(l_cursor, 1, l_column_name);
144: dbms_sql.column_value(l_cursor, 2, l_data_type);
145: if (l_theQuery is NULL) then
146: l_theQuery := 'select owa_opt_lock.checksum(';
147: else

Line 144: dbms_sql.column_value(l_cursor, 2, l_data_type);

140: if (l_status <= 0) then
141: exit;
142: end if;
143: dbms_sql.column_value(l_cursor, 1, l_column_name);
144: dbms_sql.column_value(l_cursor, 2, l_data_type);
145: if (l_theQuery is NULL) then
146: l_theQuery := 'select owa_opt_lock.checksum(';
147: else
148: l_theQuery := l_theQuery || '||';

Line 162: dbms_sql.close_cursor(l_cursor);

158: l_theQuery := l_theQuery || 'xmltype.getclobval(' ||
159: DBMS_ASSERT.ENQUOTE_NAME(l_column_name) || ')';
160: end if;
161: end loop;
162: dbms_sql.close_cursor(l_cursor);
163:
164: l_theQuery := l_theQuery || ') from ' || DBMS_ASSERT.ENQUOTE_NAME(p_schema) || '.' || DBMS_ASSERT.ENQUOTE_NAME(p_obj) ||
165: ' where rowid = :x1 for update';
166:

Line 167: l_cursor := dbms_sql.open_cursor;

163:
164: l_theQuery := l_theQuery || ') from ' || DBMS_ASSERT.ENQUOTE_NAME(p_schema) || '.' || DBMS_ASSERT.ENQUOTE_NAME(p_obj) ||
165: ' where rowid = :x1 for update';
166:
167: l_cursor := dbms_sql.open_cursor;
168: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7);
169: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
170: dbms_sql.define_column( l_cursor, 1, l_variable );
171:

Line 168: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7);

164: l_theQuery := l_theQuery || ') from ' || DBMS_ASSERT.ENQUOTE_NAME(p_schema) || '.' || DBMS_ASSERT.ENQUOTE_NAME(p_obj) ||
165: ' where rowid = :x1 for update';
166:
167: l_cursor := dbms_sql.open_cursor;
168: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7);
169: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
170: dbms_sql.define_column( l_cursor, 1, l_variable );
171:
172: l_status := dbms_sql.execute(l_cursor);

Line 169: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );

165: ' where rowid = :x1 for update';
166:
167: l_cursor := dbms_sql.open_cursor;
168: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7);
169: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
170: dbms_sql.define_column( l_cursor, 1, l_variable );
171:
172: l_status := dbms_sql.execute(l_cursor);
173: l_status := dbms_sql.fetch_rows(l_cursor);

Line 170: dbms_sql.define_column( l_cursor, 1, l_variable );

166:
167: l_cursor := dbms_sql.open_cursor;
168: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7);
169: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
170: dbms_sql.define_column( l_cursor, 1, l_variable );
171:
172: l_status := dbms_sql.execute(l_cursor);
173: l_status := dbms_sql.fetch_rows(l_cursor);
174: dbms_sql.column_value( l_cursor, 1, l_variable );

Line 172: l_status := dbms_sql.execute(l_cursor);

168: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7);
169: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
170: dbms_sql.define_column( l_cursor, 1, l_variable );
171:
172: l_status := dbms_sql.execute(l_cursor);
173: l_status := dbms_sql.fetch_rows(l_cursor);
174: dbms_sql.column_value( l_cursor, 1, l_variable );
175: dbms_sql.close_cursor( l_cursor );
176:

Line 173: l_status := dbms_sql.fetch_rows(l_cursor);

169: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
170: dbms_sql.define_column( l_cursor, 1, l_variable );
171:
172: l_status := dbms_sql.execute(l_cursor);
173: l_status := dbms_sql.fetch_rows(l_cursor);
174: dbms_sql.column_value( l_cursor, 1, l_variable );
175: dbms_sql.close_cursor( l_cursor );
176:
177: return l_variable;

Line 174: dbms_sql.column_value( l_cursor, 1, l_variable );

170: dbms_sql.define_column( l_cursor, 1, l_variable );
171:
172: l_status := dbms_sql.execute(l_cursor);
173: l_status := dbms_sql.fetch_rows(l_cursor);
174: dbms_sql.column_value( l_cursor, 1, l_variable );
175: dbms_sql.close_cursor( l_cursor );
176:
177: return l_variable;
178: end;

Line 175: dbms_sql.close_cursor( l_cursor );

171:
172: l_status := dbms_sql.execute(l_cursor);
173: l_status := dbms_sql.fetch_rows(l_cursor);
174: dbms_sql.column_value( l_cursor, 1, l_variable );
175: dbms_sql.close_cursor( l_cursor );
176:
177: return l_variable;
178: end;
179:

Line 201: l_cursor := dbms_sql.open_cursor;

197:
198: l_theQuery := 'select rowid, a.* from ' || DBMS_ASSERT.ENQUOTE_NAME(p_schema) || '.' || DBMS_ASSERT.ENQUOTE_NAME(p_obj) ||
199: ' a where rowid = :x1';
200:
201: l_cursor := dbms_sql.open_cursor;
202:
203: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
204: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
205: for i in 1 .. 255 loop

Line 203: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );

199: ' a where rowid = :x1';
200:
201: l_cursor := dbms_sql.open_cursor;
202:
203: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
204: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
205: for i in 1 .. 255 loop
206: begin
207: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );

Line 204: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );

200:
201: l_cursor := dbms_sql.open_cursor;
202:
203: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
204: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
205: for i in 1 .. 255 loop
206: begin
207: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );
208: l_col_cnt := l_col_cnt + 1;

Line 207: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );

203: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
204: dbms_sql.bind_variable( l_cursor, ':x1', p_rowid );
205: for i in 1 .. 255 loop
206: begin
207: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );
208: l_col_cnt := l_col_cnt + 1;
209: exception
210: when last_column then exit;
211: end;

Line 214: l_status := dbms_sql.execute(l_cursor);

210: when last_column then exit;
211: end;
212: end loop;
213:
214: l_status := dbms_sql.execute(l_cursor);
215: l_status := dbms_sql.fetch_rows(l_cursor);
216:
217: htp.formHidden( 'old_' || p_tname, htf.escape_sc(p_owner) );
218: htp.formHidden( 'old_' || p_tname, htf.escape_sc(p_tname) );

Line 215: l_status := dbms_sql.fetch_rows(l_cursor);

211: end;
212: end loop;
213:
214: l_status := dbms_sql.execute(l_cursor);
215: l_status := dbms_sql.fetch_rows(l_cursor);
216:
217: htp.formHidden( 'old_' || p_tname, htf.escape_sc(p_owner) );
218: htp.formHidden( 'old_' || p_tname, htf.escape_sc(p_tname) );
219: for i in 1 .. l_col_cnt loop

Line 220: dbms_sql.column_value( l_cursor, i, l_variable );

216:
217: htp.formHidden( 'old_' || p_tname, htf.escape_sc(p_owner) );
218: htp.formHidden( 'old_' || p_tname, htf.escape_sc(p_tname) );
219: for i in 1 .. l_col_cnt loop
220: dbms_sql.column_value( l_cursor, i, l_variable );
221: htp.formHidden( 'old_'||p_tname, htf.escape_sc(l_variable) );
222: end loop;
223:
224: dbms_sql.close_cursor( l_cursor );

Line 224: dbms_sql.close_cursor( l_cursor );

220: dbms_sql.column_value( l_cursor, i, l_variable );
221: htp.formHidden( 'old_'||p_tname, htf.escape_sc(l_variable) );
222: end loop;
223:
224: dbms_sql.close_cursor( l_cursor );
225: end;
226:
227: /******************************************************************/
228: /* Function to verify stored values */

Line 247: l_cursor := dbms_sql.open_cursor;

243:
244: l_theQuery := 'select * from ' || DBMS_ASSERT.ENQUOTE_NAME(p_schema) || '.' || DBMS_ASSERT.ENQUOTE_NAME(p_obj) ||
245: ' where rowid = :x1 for update';
246:
247: l_cursor := dbms_sql.open_cursor;
248:
249: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
250: dbms_sql.bind_variable( l_cursor, ':x1', p_old_values(3) );
251: for i in 1 .. 255 loop

Line 249: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );

245: ' where rowid = :x1 for update';
246:
247: l_cursor := dbms_sql.open_cursor;
248:
249: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
250: dbms_sql.bind_variable( l_cursor, ':x1', p_old_values(3) );
251: for i in 1 .. 255 loop
252: begin
253: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );

Line 250: dbms_sql.bind_variable( l_cursor, ':x1', p_old_values(3) );

246:
247: l_cursor := dbms_sql.open_cursor;
248:
249: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
250: dbms_sql.bind_variable( l_cursor, ':x1', p_old_values(3) );
251: for i in 1 .. 255 loop
252: begin
253: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );
254: l_col_cnt := l_col_cnt + 1;

Line 253: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );

249: sys.dbms_sys_sql.parse_as_user( l_cursor, l_theQuery, dbms_sql.v7 );
250: dbms_sql.bind_variable( l_cursor, ':x1', p_old_values(3) );
251: for i in 1 .. 255 loop
252: begin
253: dbms_sql.define_column( l_cursor, i, l_variable, 2000 );
254: l_col_cnt := l_col_cnt + 1;
255: exception
256: when last_column then exit;
257: end;

Line 260: l_status := dbms_sql.execute(l_cursor);

256: when last_column then exit;
257: end;
258: end loop;
259:
260: l_status := dbms_sql.execute(l_cursor);
261: l_status := dbms_sql.fetch_rows(l_cursor);
262:
263: for i in 1 .. l_col_cnt loop
264: dbms_sql.column_value( l_cursor, i, l_variable );

Line 261: l_status := dbms_sql.fetch_rows(l_cursor);

257: end;
258: end loop;
259:
260: l_status := dbms_sql.execute(l_cursor);
261: l_status := dbms_sql.fetch_rows(l_cursor);
262:
263: for i in 1 .. l_col_cnt loop
264: dbms_sql.column_value( l_cursor, i, l_variable );
265: if ( l_variable <> p_old_values(i+3) AND

Line 264: dbms_sql.column_value( l_cursor, i, l_variable );

260: l_status := dbms_sql.execute(l_cursor);
261: l_status := dbms_sql.fetch_rows(l_cursor);
262:
263: for i in 1 .. l_col_cnt loop
264: dbms_sql.column_value( l_cursor, i, l_variable );
265: if ( l_variable <> p_old_values(i+3) AND
266: l_variable is not null AND
267: p_old_values(i+3) is not null ) then
268: l_return_val := FALSE;

Line 273: dbms_sql.close_cursor( l_cursor );

269: exit;
270: end if;
271: end loop;
272:
273: dbms_sql.close_cursor( l_cursor );
274: return l_return_val;
275: end;
276:
277: /******************************************************************/