12: X_LAST_UPDATE_DATE in DATE,
13: X_LAST_UPDATED_BY in NUMBER,
14: X_LAST_UPDATE_LOGIN in NUMBER
15: ) is
16: cursor C is select ROWID from FEM_FUNC_DIM_SETS_B
17: where FUNC_DIM_SET_ID = X_FUNC_DIM_SET_ID
18: ;
19: begin
20: insert into FEM_FUNC_DIM_SETS_B (
16: cursor C is select ROWID from FEM_FUNC_DIM_SETS_B
17: where FUNC_DIM_SET_ID = X_FUNC_DIM_SET_ID
18: ;
19: begin
20: insert into FEM_FUNC_DIM_SETS_B (
21: FUNC_DIM_SET_OBJ_DEF_ID,
22: FUNC_DIM_SET_ID,
23: DIMENSION_ID,
24: OBJECT_VERSION_NUMBER,
87: cursor c is select
88: FUNC_DIM_SET_OBJ_DEF_ID,
89: DIMENSION_ID,
90: OBJECT_VERSION_NUMBER
91: from FEM_FUNC_DIM_SETS_B
92: where FUNC_DIM_SET_ID = X_FUNC_DIM_SET_ID
93: for update of FUNC_DIM_SET_ID nowait;
94: recinfo c%rowtype;
95:
143: X_LAST_UPDATED_BY in NUMBER,
144: X_LAST_UPDATE_LOGIN in NUMBER
145: ) is
146: begin
147: update FEM_FUNC_DIM_SETS_B set
148: FUNC_DIM_SET_OBJ_DEF_ID = X_FUNC_DIM_SET_OBJ_DEF_ID,
149: DIMENSION_ID = X_DIMENSION_ID,
150: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
151: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
181: if (sql%notfound) then
182: raise no_data_found;
183: end if;
184:
185: delete from FEM_FUNC_DIM_SETS_B
186: where FUNC_DIM_SET_ID = X_FUNC_DIM_SET_ID;
187:
188: if (sql%notfound) then
189: raise no_data_found;
195: begin
196: delete from FEM_FUNC_DIM_SETS_TL T
197: where not exists
198: (select NULL
199: from FEM_FUNC_DIM_SETS_B B
200: where B.FUNC_DIM_SET_ID = T.FUNC_DIM_SET_ID
201: );
202:
203: update FEM_FUNC_DIM_SETS_TL T set (