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