[Home] [Help]
PACKAGE BODY: APPS.CN_ROLE_QUOTA_CATES_PKG
Source
1 package body CN_ROLE_QUOTA_CATES_PKG as
2 /* $Header: cntrlqcb.pls 115.6 2002/11/21 21:30:33 hlchen ship $ */
3 procedure INSERT_ROW (
4 X_ROWID in out nocopy VARCHAR2,
5 X_ROLE_QUOTA_CATE_ID in NUMBER,
6 X_FORMULA_TYPE in VARCHAR2,
7 X_ROLE_ID in NUMBER,
8 X_ROLE_MODEL_ID in NUMBER,
9 X_QUOTA_CATEGORY_ID in NUMBER,
10 X_WEIGHT in NUMBER,
11 X_OTE in NUMBER,
12 X_RATE_SCHEDULE_ID in NUMBER,
13 X_SEQ in NUMBER,
14 X_PLAN_ELEMENT_NAME in VARCHAR2,
15 X_MONETARY_FLAG in VARCHAR2,
16 X_CALC_FORMULA_ID in NUMBER,
17 X_DISABLE_ANCHORS_FLAG in VARCHAR2,
18 X_ANC_RATE_CALC_METHOD in VARCHAR2,
19 X_SEAS_SCHEDULE_ID in NUMBER,
20 X_RATE_CALC_METHOD in VARCHAR2,
21 X_ATTRIBUTE_CATEGORY in VARCHAR2,
22 X_ATTRIBUTE1 in VARCHAR2,
23 X_ATTRIBUTE2 in VARCHAR2,
24 X_ATTRIBUTE3 in VARCHAR2,
25 X_ATTRIBUTE4 in VARCHAR2,
26 X_ATTRIBUTE5 in VARCHAR2,
27 X_ATTRIBUTE6 in VARCHAR2,
28 X_ATTRIBUTE7 in VARCHAR2,
29 X_ATTRIBUTE8 in VARCHAR2,
30 X_ATTRIBUTE9 in VARCHAR2,
31 X_ATTRIBUTE10 in VARCHAR2,
32 X_ATTRIBUTE11 in VARCHAR2,
33 X_ATTRIBUTE12 in VARCHAR2,
34 X_ATTRIBUTE13 in VARCHAR2,
35 X_ATTRIBUTE14 in VARCHAR2,
36 X_ATTRIBUTE15 in VARCHAR2,
37 X_OBJECT_VERSION_NUMBER in NUMBER,
38 X_CREATION_DATE in DATE,
39 X_CREATED_BY in NUMBER,
40 X_LAST_UPDATE_DATE in DATE,
41 X_LAST_UPDATED_BY in NUMBER,
42 X_LAST_UPDATE_LOGIN in NUMBER
43 ) is
44 cursor C is select ROWID from CN_ROLE_QUOTA_CATES
45 where ROLE_QUOTA_CATE_ID = X_ROLE_QUOTA_CATE_ID
46 ;
47 begin
48 insert into CN_ROLE_QUOTA_CATES (
49 FORMULA_TYPE,
50 ROLE_ID,
51 ROLE_MODEL_ID,
52 QUOTA_CATEGORY_ID,
53 WEIGHT,
54 OTE,
55 RATE_SCHEDULE_ID,
56 SEQ,
57 PLAN_ELEMENT_NAME,
58 MONETARY_FLAG,
59 CALC_FORMULA_ID,
60 DISABLE_ANCHORS_FLAG,
61 ANC_RATE_CALC_METHOD,
62 SEAS_SCHEDULE_ID,
63 RATE_CALC_METHOD,
64 ATTRIBUTE_CATEGORY,
65 ATTRIBUTE1,
66 ATTRIBUTE2,
67 ATTRIBUTE3,
68 ATTRIBUTE4,
69 ATTRIBUTE5,
70 ATTRIBUTE6,
71 ATTRIBUTE7,
72 ATTRIBUTE8,
73 ATTRIBUTE9,
74 ATTRIBUTE10,
75 ATTRIBUTE11,
76 ATTRIBUTE12,
77 ATTRIBUTE13,
78 ATTRIBUTE14,
79 ATTRIBUTE15,
80 LAST_UPDATE_DATE,
81 LAST_UPDATED_BY,
82 LAST_UPDATE_LOGIN,
83 CREATION_DATE,
84 CREATED_BY,
85 OBJECT_VERSION_NUMBER,
86 ROLE_QUOTA_CATE_ID
87 ) values
88 (
89 X_FORMULA_TYPE,
90 X_ROLE_ID,
91 X_ROLE_MODEL_ID,
92 X_QUOTA_CATEGORY_ID,
93 X_WEIGHT,
94 X_OTE,
95 X_RATE_SCHEDULE_ID,
96 X_SEQ,
97 X_PLAN_ELEMENT_NAME,
98 X_MONETARY_FLAG,
99 X_CALC_FORMULA_ID,
100 X_DISABLE_ANCHORS_FLAG,
101 X_ANC_RATE_CALC_METHOD,
102 X_SEAS_SCHEDULE_ID,
103 X_RATE_CALC_METHOD,
104 X_ATTRIBUTE_CATEGORY,
105 X_ATTRIBUTE1,
106 X_ATTRIBUTE2,
107 X_ATTRIBUTE3,
108 X_ATTRIBUTE4,
109 X_ATTRIBUTE5,
110 X_ATTRIBUTE6,
111 X_ATTRIBUTE7,
112 X_ATTRIBUTE8,
113 X_ATTRIBUTE9,
114 X_ATTRIBUTE10,
115 X_ATTRIBUTE11,
116 X_ATTRIBUTE12,
117 X_ATTRIBUTE13,
118 X_ATTRIBUTE14,
119 X_ATTRIBUTE15,
120 X_LAST_UPDATE_DATE,
121 X_LAST_UPDATED_BY,
122 X_LAST_UPDATE_LOGIN,
123 X_CREATION_DATE,
124 X_CREATED_BY,
125 X_OBJECT_VERSION_NUMBER,
126 X_ROLE_QUOTA_CATE_ID
127 );
128
129 open c;
130 fetch c into X_ROWID;
131 if (c%notfound) then
132 close c;
133 raise no_data_found;
134 end if;
135 close c;
136
137 end INSERT_ROW;
138
139 procedure UPDATE_ROW (
140 X_ROLE_QUOTA_CATE_ID in NUMBER,
141 X_FORMULA_TYPE in VARCHAR2,
142 X_ROLE_ID in NUMBER,
143 X_ROLE_MODEL_ID in NUMBER,
144 X_QUOTA_CATEGORY_ID in NUMBER,
145 X_WEIGHT in NUMBER,
146 X_OTE in NUMBER,
147 X_RATE_SCHEDULE_ID in NUMBER,
148 X_SEQ in NUMBER,
149 X_PLAN_ELEMENT_NAME in VARCHAR2,
150 X_MONETARY_FLAG in VARCHAR2,
151 X_CALC_FORMULA_ID in NUMBER,
152 X_DISABLE_ANCHORS_FLAG in VARCHAR2,
153 X_ANC_RATE_CALC_METHOD in VARCHAR2,
154 X_SEAS_SCHEDULE_ID in NUMBER,
155 X_RATE_CALC_METHOD in VARCHAR2,
156 X_ATTRIBUTE_CATEGORY in VARCHAR2,
157 X_ATTRIBUTE1 in VARCHAR2,
158 X_ATTRIBUTE2 in VARCHAR2,
159 X_ATTRIBUTE3 in VARCHAR2,
160 X_ATTRIBUTE4 in VARCHAR2,
161 X_ATTRIBUTE5 in VARCHAR2,
162 X_ATTRIBUTE6 in VARCHAR2,
163 X_ATTRIBUTE7 in VARCHAR2,
164 X_ATTRIBUTE8 in VARCHAR2,
165 X_ATTRIBUTE9 in VARCHAR2,
166 X_ATTRIBUTE10 in VARCHAR2,
167 X_ATTRIBUTE11 in VARCHAR2,
168 X_ATTRIBUTE12 in VARCHAR2,
169 X_ATTRIBUTE13 in VARCHAR2,
170 X_ATTRIBUTE14 in VARCHAR2,
171 X_ATTRIBUTE15 in VARCHAR2,
172 X_OBJECT_VERSION_NUMBER in NUMBER,
173 X_LAST_UPDATE_DATE in DATE,
174 X_LAST_UPDATED_BY in NUMBER,
175 X_LAST_UPDATE_LOGIN in NUMBER
176 ) is
177 begin
178 update CN_ROLE_QUOTA_CATES set
179 FORMULA_TYPE = X_FORMULA_TYPE,
180 ROLE_ID = X_ROLE_ID,
181 ROLE_MODEL_ID = X_ROLE_MODEL_ID,
182 QUOTA_CATEGORY_ID = X_QUOTA_CATEGORY_ID,
183 WEIGHT = X_WEIGHT,
184 OTE = X_OTE,
185 RATE_SCHEDULE_ID = X_RATE_SCHEDULE_ID,
186 SEQ = X_SEQ,
187 PLAN_ELEMENT_NAME = X_PLAN_ELEMENT_NAME,
188 MONETARY_FLAG = X_MONETARY_FLAG,
189 CALC_FORMULA_ID = X_CALC_FORMULA_ID,
190 DISABLE_ANCHORS_FLAG = X_DISABLE_ANCHORS_FLAG,
191 ANC_RATE_CALC_METHOD = X_ANC_RATE_CALC_METHOD,
192 SEAS_SCHEDULE_ID = X_SEAS_SCHEDULE_ID,
193 RATE_CALC_METHOD = X_RATE_CALC_METHOD,
194 ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
195 ATTRIBUTE1 = X_ATTRIBUTE1,
196 ATTRIBUTE2 = X_ATTRIBUTE2,
197 ATTRIBUTE3 = X_ATTRIBUTE3,
198 ATTRIBUTE4 = X_ATTRIBUTE4,
199 ATTRIBUTE5 = X_ATTRIBUTE5,
200 ATTRIBUTE6 = X_ATTRIBUTE6,
201 ATTRIBUTE7 = X_ATTRIBUTE7,
202 ATTRIBUTE8 = X_ATTRIBUTE8,
203 ATTRIBUTE9 = X_ATTRIBUTE9,
204 ATTRIBUTE10 = X_ATTRIBUTE10,
205 ATTRIBUTE11 = X_ATTRIBUTE11,
206 ATTRIBUTE12 = X_ATTRIBUTE12,
207 ATTRIBUTE13 = X_ATTRIBUTE13,
208 ATTRIBUTE14 = X_ATTRIBUTE14,
209 ATTRIBUTE15 = X_ATTRIBUTE15,
210 OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
211 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
212 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
213 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
214 where ROLE_QUOTA_CATE_ID = X_ROLE_QUOTA_CATE_ID;
215
216 if (sql%notfound) then
217 raise no_data_found;
218 end if;
219 end UPDATE_ROW;
220
221 procedure DELETE_ROW (
222 X_ROLE_QUOTA_CATE_ID in NUMBER
223 ) is
224 begin
225 delete from CN_ROLE_QUOTA_CATES
226 where ROLE_QUOTA_CATE_ID = X_ROLE_QUOTA_CATE_ID;
227
228 if (sql%notfound) then
229 raise no_data_found;
230 end if;
231
232 end DELETE_ROW;
233
234 end CN_ROLE_QUOTA_CATES_PKG;