27: ,x_attribute13 IN VARCHAR2
28: ,x_attribute14 IN VARCHAR2
29: ,x_attribute15 IN VARCHAR2
30: )IS
31: CURSOR C IS SELECT ROWID FROM WMS_DB_OBJECTS_PARENTS
32: WHERE db_object_id = x_db_object_id
33: AND type_code = x_type_code;
34: BEGIN
35:
32: WHERE db_object_id = x_db_object_id
33: AND type_code = x_type_code;
34: BEGIN
35:
36: INSERT INTO WMS_DB_OBJECTS_PARENTS (
37: db_object_id
38: ,type_code
39: ,parent_db_object_id
40: ,last_updated_by
135: ,attribute12
136: ,attribute13
137: ,attribute14
138: ,attribute15
139: FROM WMS_DB_OBJECTS_PARENTS
140: WHERE rowid = x_rowid
141: FOR UPDATE OF db_object_id, type_code NOWAIT;
142:
143: recinfo c%ROWTYPE;
234: ,x_attribute15 IN VARCHAR2
235: )IS
236:
237: BEGIN
238: UPDATE WMS_DB_OBJECTS_PARENTS
239: SET last_updated_by = x_last_updated_by
240: ,last_update_date = x_last_update_date
241: ,last_update_login = x_last_update_login
242: ,parent_db_object_id = x_parent_db_object_id
267: x_rowid IN VARCHAR2
268: )IS
269: BEGIN
270:
271: DELETE FROM WMS_DB_OBJECTS_PARENTS
272: WHERE rowid = x_rowid;
273:
274: IF (SQL%NOTFOUND) THEN
275: RAISE NO_DATA_FOUND;