[Home] [Help]
14: X_LAST_UPDATE_DATE in DATE,
15: X_LAST_UPDATED_BY in NUMBER,
16: X_LAST_UPDATE_LOGIN in NUMBER
17: ) is
18: cursor C is select ROWID from AML_BUSINESS_EVENT_TYPES_B
19: where BUSINESS_EVENT_TYPE_ID = X_BUSINESS_EVENT_TYPE_ID
20: ;
21: begin
22: insert into AML_BUSINESS_EVENT_TYPES_B (
18: cursor C is select ROWID from AML_BUSINESS_EVENT_TYPES_B
19: where BUSINESS_EVENT_TYPE_ID = X_BUSINESS_EVENT_TYPE_ID
20: ;
21: begin
22: insert into AML_BUSINESS_EVENT_TYPES_B (
23: BUSINESS_EVENT_TYPE_ID,
24: ACTION_ID,
25: ACTION_ITEM_ID,
26: ENABLED_FLAG,
96: ACTION_ID,
97: ACTION_ITEM_ID,
98: ENABLED_FLAG,
99: OBJECT_VERSION_NUMBER
100: from AML_BUSINESS_EVENT_TYPES_B
101: where BUSINESS_EVENT_TYPE_ID = X_BUSINESS_EVENT_TYPE_ID
102: for update of BUSINESS_EVENT_TYPE_ID nowait;
103: recinfo c%rowtype;
104:
158: X_LAST_UPDATED_BY in NUMBER,
159: X_LAST_UPDATE_LOGIN in NUMBER
160: ) is
161: begin
162: update AML_BUSINESS_EVENT_TYPES_B set
163: ACTION_ID = X_ACTION_ID,
164: ACTION_ITEM_ID = X_ACTION_ITEM_ID,
165: ENABLED_FLAG = X_ENABLED_FLAG,
166: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
198: if (sql%notfound) then
199: raise no_data_found;
200: end if;
201:
202: delete from AML_BUSINESS_EVENT_TYPES_B
203: where BUSINESS_EVENT_TYPE_ID = X_BUSINESS_EVENT_TYPE_ID;
204:
205: if (sql%notfound) then
206: raise no_data_found;
212: begin
213: delete from AML_BUSINESS_EVENT_TYPES_TL T
214: where not exists
215: (select NULL
216: from AML_BUSINESS_EVENT_TYPES_B B
217: where B.BUSINESS_EVENT_TYPE_ID = T.BUSINESS_EVENT_TYPE_ID
218: );
219:
220: update AML_BUSINESS_EVENT_TYPES_TL T set (
286: l_row_id VARCHAR2(100);
287:
288: CURSOR c_get_last_updated (c_BUSINESS_EVENT_TYPE_ID NUMBER) IS
289: SELECT last_updated_by, OBJECT_VERSION_NUMBER
290: FROM AML_BUSINESS_EVENT_TYPES_B
291: WHERE BUSINESS_EVENT_TYPE_ID = c_BUSINESS_EVENT_TYPE_ID;
292: l_last_updated_by NUMBER;
293: l_object_version_number NUMBER;
294: