PACKAGE BODY: APPS.FND_OAM_METALINK_DOCS_PKG

Source

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