1: package body AK_FLOW_PAGE_REGION_ITEMS_PKG as
2: /* $Header: AKDFPRIB.pls 120.2 2005/09/29 13:59:46 tshort ship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out NOCOPY VARCHAR2,
36: X_ATTRIBUTE13 in VARCHAR2,
37: X_ATTRIBUTE14 in VARCHAR2,
38: X_ATTRIBUTE15 in VARCHAR2
39: ) is
40: cursor C is select ROWID from AK_FLOW_PAGE_REGION_ITEMS
41: where FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID
42: and FLOW_CODE = X_FLOW_CODE
43: and PAGE_APPLICATION_ID = X_PAGE_APPLICATION_ID
44: and PAGE_CODE = X_PAGE_CODE
46: and REGION_CODE = X_REGION_CODE
47: and ATTRIBUTE_APPLICATION_ID = X_ATTRIBUTE_APPLICATION_ID
48: and ATTRIBUTE_CODE = X_ATTRIBUTE_CODE;
49: begin
50: insert into AK_FLOW_PAGE_REGION_ITEMS (
51: FLOW_APPLICATION_ID,
52: FLOW_CODE,
53: PAGE_APPLICATION_ID,
54: PAGE_CODE,
145: TO_PAGE_APPL_ID,
146: TO_PAGE_CODE,
147: TO_URL_ATTRIBUTE_APPL_ID,
148: TO_URL_ATTRIBUTE_CODE
149: from AK_FLOW_PAGE_REGION_ITEMS
150: where FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID
151: and FLOW_CODE = X_FLOW_CODE
152: and PAGE_APPLICATION_ID = X_PAGE_APPLICATION_ID
153: and PAGE_CODE = X_PAGE_CODE
212: X_ATTRIBUTE14 in VARCHAR2,
213: X_ATTRIBUTE15 in VARCHAR2
214: ) is
215: begin
216: update AK_FLOW_PAGE_REGION_ITEMS set
217: FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID,
218: FLOW_CODE = X_FLOW_CODE,
219: PAGE_APPLICATION_ID = X_PAGE_APPLICATION_ID,
220: PAGE_CODE = X_PAGE_CODE,
269: X_ATTRIBUTE_APPLICATION_ID in NUMBER,
270: X_ATTRIBUTE_CODE in VARCHAR2
271: ) is
272: begin
273: delete from AK_FLOW_PAGE_REGION_ITEMS
274: where FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID
275: and FLOW_CODE = X_FLOW_CODE
276: and PAGE_APPLICATION_ID = X_PAGE_APPLICATION_ID
277: and PAGE_CODE = X_PAGE_CODE
283: if (sql%notfound) then
284: raise no_data_found;
285: end if;
286: end DELETE_ROW;
287: end AK_FLOW_PAGE_REGION_ITEMS_PKG;