PACKAGE BODY: APPS.FND_OAM_METALINK_DOC_ASSOC_PKG

Source

1 package body FND_OAM_METALINK_DOC_ASSOC_PKG as
2 /* $Header: AFOAMMDAB.pls 120.0 2005/08/05 01:05:30 appldev noship $ */
3 procedure LOAD_ROW(
4     X_DOC_ID    in   VARCHAR2,
5     X_CATEGORY_KEY in VARCHAR2,
6     X_CATEGORY_TYPE in VARCHAR2,
7     X_CREATED_BY    in  NUMBER,
8     X_LAST_UPDATED_BY  in  NUMBER,
9     X_LAST_UPDATE_LOGIN	in NUMBER,
10     X_ANCHOR in VARCHAR2) is
11   begin
12 
13     begin
14       fnd_oam_metalink_doc_assoc_pkg.UPDATE_ROW(
15         X_DOC_ID => X_DOC_ID,
16         X_CATEGORY_KEY => X_CATEGORY_KEY,
17         X_CATEGORY_TYPE  => X_CATEGORY_TYPE,
18         X_CREATED_BY => X_CREATED_BY,
19         X_LAST_UPDATED_BY => X_LAST_UPDATED_BY,
20         X_LAST_UPDATE_LOGIN => X_LAST_UPDATE_LOGIN,
21         X_ANCHOR => X_ANCHOR);
22 
23      exception
24        when NO_DATA_FOUND then
25 
26        fnd_oam_metalink_doc_assoc_pkg.INSERT_ROW(
27          X_DOC_ID => X_DOC_ID,
28          X_CATEGORY_KEY => X_CATEGORY_KEY,
29          X_CATEGORY_TYPE  => X_CATEGORY_TYPE,
30          X_CREATED_BY => X_CREATED_BY,
31          X_LAST_UPDATED_BY => X_LAST_UPDATED_BY,
32          X_LAST_UPDATE_LOGIN => X_LAST_UPDATE_LOGIN,
33          X_ANCHOR => X_ANCHOR);
34 
35     end;
36 
37     commit;
38 
39 end LOAD_ROW;
40 
41 
42 
43 
44 procedure UPDATE_ROW(
45     X_DOC_ID    in   VARCHAR2,
46     X_CATEGORY_KEY     in   VARCHAR2,
47     X_CATEGORY_TYPE  in  VARCHAR2,
48     X_CREATED_BY    in  NUMBER,
49     X_LAST_UPDATED_BY  in  NUMBER,
50     X_LAST_UPDATE_LOGIN	in NUMBER,
51     X_ANCHOR in VARCHAR2 ) is
52 
53       db_id varchar2(40);
54   begin
55 
56     select doc_id into db_id from FND_OAM_METALINK_DOC_ASSOC
57        where doc_id = X_DOC_ID
58           and category_key = X_CATEGORY_KEY
59           and category_type = X_CATEGORY_TYPE ;
60 
61     update FND_OAM_METALINK_DOC_ASSOC SET
62         doc_id = X_DOC_ID,
63         category_key  = X_CATEGORY_KEY,
64         category_TYPE  = X_CATEGORY_TYPE,
65         created_by = X_CREATED_BY,
66         creation_date = sysdate,
67         last_update_date = sysdate,
68         last_updated_by = X_LAST_UPDATED_BY,
69         last_update_login = X_LAST_UPDATE_LOGIN,
70         anchor = X_ANCHOR
71       where doc_id = X_DOC_ID
72             and category_key = X_CATEGORY_KEY
73             and category_type = X_CATEGORY_TYPE ;
74 
75 end UPDATE_ROW;
76 
77 procedure INSERT_ROW(
78     X_DOC_ID    in   VARCHAR2,
79     X_CATEGORY_KEY     in   VARCHAR2,
80     X_CATEGORY_TYPE  in  VARCHAR2,
81     X_CREATED_BY    in  NUMBER,
82     X_LAST_UPDATED_BY  in  NUMBER,
83     X_LAST_UPDATE_LOGIN	in NUMBER,
84     X_ANCHOR in VARCHAR2 ) is
85 
86   begin
87     insert into FND_OAM_METALINK_DOC_ASSOC (
88       doc_id,
89       category_key,
90       category_type,
91       created_by,
92       creation_date,
93       last_update_date,
94       last_updated_by,
95       last_update_login,
96       anchor
97     ) values (
98       X_DOC_ID,
99       X_CATEGORY_KEY,
100       X_CATEGORY_TYPE,
101       X_CREATED_BY,
102       sysdate,
103       sysdate,
104       X_LAST_UPDATED_BY,
105       X_LAST_UPDATE_LOGIN,
106       X_ANCHOR);
107 
108 end INSERT_ROW;
109 
110 end FND_OAM_METALINK_DOC_ASSOC_PKG;