16: X_LAST_UPDATE_DATE in DATE,
17: X_LAST_UPDATED_BY in NUMBER,
18: X_LAST_UPDATE_LOGIN in NUMBER
19: ) is
20: cursor C is select ROWID from BNE_PARAM_GROUPS_B
21: where APPLICATION_ID = X_APPLICATION_ID
22: and PARAM_LIST_CODE = X_PARAM_LIST_CODE
23: and SEQUENCE_NUM = X_SEQUENCE_NUM
24: ;
22: and PARAM_LIST_CODE = X_PARAM_LIST_CODE
23: and SEQUENCE_NUM = X_SEQUENCE_NUM
24: ;
25: begin
26: insert into BNE_PARAM_GROUPS_B (
27: APPLICATION_ID,
28: PARAM_LIST_CODE,
29: SEQUENCE_NUM,
30: OBJECT_VERSION_NUMBER,
109: OBJECT_VERSION_NUMBER,
110: ATTRIBUTE_APP_ID,
111: ATTRIBUTE_CODE,
112: GROUP_RESOLVER
113: from BNE_PARAM_GROUPS_B
114: where APPLICATION_ID = X_APPLICATION_ID
115: and PARAM_LIST_CODE = X_PARAM_LIST_CODE
116: and SEQUENCE_NUM = X_SEQUENCE_NUM
117: for update of APPLICATION_ID nowait;
176: X_LAST_UPDATED_BY in NUMBER,
177: X_LAST_UPDATE_LOGIN in NUMBER
178: ) is
179: begin
180: update BNE_PARAM_GROUPS_B set
181: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
182: ATTRIBUTE_APP_ID = X_ATTRIBUTE_APP_ID,
183: ATTRIBUTE_CODE = X_ATTRIBUTE_CODE,
184: GROUP_RESOLVER = X_GROUP_RESOLVER,
223: if (sql%notfound) then
224: raise no_data_found;
225: end if;
226:
227: delete from BNE_PARAM_GROUPS_B
228: where APPLICATION_ID = X_APPLICATION_ID
229: and PARAM_LIST_CODE = X_PARAM_LIST_CODE
230: and SEQUENCE_NUM = X_SEQUENCE_NUM;
231:
239: begin
240: delete from BNE_PARAM_GROUPS_TL T
241: where not exists
242: (select NULL
243: from BNE_PARAM_GROUPS_B B
244: where B.APPLICATION_ID = T.APPLICATION_ID
245: and B.PARAM_LIST_CODE = T.PARAM_LIST_CODE
246: and B.SEQUENCE_NUM = T.SEQUENCE_NUM
247: );
426: f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
427: begin
428: select LAST_UPDATED_BY, LAST_UPDATE_DATE
429: into db_luby, db_ludate
430: from BNE_PARAM_GROUPS_B
431: where APPLICATION_ID = l_app_id
432: and PARAM_LIST_CODE = x_param_list_code
433: and SEQUENCE_NUM = x_sequence_num;
434: