[Home] [Help]
PACKAGE BODY: APPS.PV_ATTRIBUTE_USAGES_PKG
Source
1 PACKAGE BODY PV_ATTRIBUTE_USAGES_PKG as
2 /* $Header: pvxtatub.pls 115.3 2002/12/10 19:38:47 amaram ship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- PV_ATTRIBUTE_USAGES_PKG
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- End of Comments
14 -- ===============================================================
15
16
17 G_PKG_NAME CONSTANT VARCHAR2(30):= 'PV_ATTRIBUTE_USAGES_PKG';
18 G_FILE_NAME CONSTANT VARCHAR2(12) := 'pvxtatub.pls';
19
20
21 ----------------------------------------------------------
22 ---- MEDIA ----
23 ----------------------------------------------------------
24
25 -- ========================================================
26 --
27 -- NAME
28 -- createInsertBody
29 --
30 -- PURPOSE
31 --
32 -- NOTES
33 --
34 -- HISTORY
35 --
36 -- ========================================================
37 PROCEDURE Insert_Row(
38 px_attribute_usage_id IN OUT NOCOPY NUMBER,
39 p_last_update_date DATE,
40 p_last_updated_by NUMBER,
41 p_creation_date DATE,
42 p_created_by NUMBER,
43 p_last_update_login NUMBER,
44 p_request_id NUMBER,
45 p_program_application_id NUMBER,
46 p_program_id NUMBER,
47 p_program_update_date DATE,
48 px_object_version_number IN OUT NOCOPY NUMBER,
49 p_attribute_usage_type VARCHAR2,
50 p_attribute_usage_code VARCHAR2,
51 p_attribute_id NUMBER,
52 p_enabled_flag VARCHAR2
53 --p_security_group_id NUMBER
54 )
55
56 IS
57 x_rowid VARCHAR2(30);
58
59
60 BEGIN
61
62
63 px_object_version_number := 1;
64
65
66 INSERT INTO PV_ATTRIBUTE_USAGES(
67 attribute_usage_id,
68 last_update_date,
69 last_updated_by,
70 creation_date,
71 created_by,
72 last_update_login,
73 request_id,
74 program_application_id,
75 program_id,
76 program_update_date,
77 object_version_number,
78 attribute_usage_type,
79 attribute_usage_code,
80 attribute_id,
81 enabled_flag
82 --security_group_id
83 ) VALUES (
84 DECODE( px_attribute_usage_id, FND_API.g_miss_num, NULL, px_attribute_usage_id),
85 DECODE( p_last_update_date, FND_API.g_miss_date, NULL, p_last_update_date),
86 DECODE( p_last_updated_by, FND_API.g_miss_num, NULL, p_last_updated_by),
87 DECODE( p_creation_date, FND_API.g_miss_date, NULL, p_creation_date),
88 DECODE( p_created_by, FND_API.g_miss_num, NULL, p_created_by),
89 DECODE( p_last_update_login, FND_API.g_miss_num, NULL, p_last_update_login),
90 DECODE( p_request_id, FND_API.g_miss_num, NULL, p_request_id),
91 DECODE( p_program_application_id, FND_API.g_miss_num, NULL, p_program_application_id),
92 DECODE( p_program_id, FND_API.g_miss_num, NULL, p_program_id),
93 DECODE( p_program_update_date, FND_API.g_miss_date, NULL, p_program_update_date),
94 DECODE( px_object_version_number, FND_API.g_miss_num, NULL, px_object_version_number),
95 DECODE( p_attribute_usage_type, FND_API.g_miss_char, NULL, p_attribute_usage_type),
96 DECODE( p_attribute_usage_code, FND_API.g_miss_char, NULL, p_attribute_usage_code),
97 DECODE( p_attribute_id, FND_API.g_miss_num, NULL, p_attribute_id),
98 DECODE( p_enabled_flag, FND_API.g_miss_char, NULL, p_enabled_flag)
99 --DECODE( p_security_group_id, FND_API.g_miss_num, NULL, p_security_group_id)
100 );
101 END Insert_Row;
102
103
104 ----------------------------------------------------------
105 ---- MEDIA ----
106 ----------------------------------------------------------
107
108 -- ========================================================
109 --
110 -- NAME
111 -- createUpdateBody
112 --
113 -- PURPOSE
114 --
115 -- NOTES
116 --
117 -- HISTORY
118 --
119 -- ========================================================
120 PROCEDURE Update_Row(
121 p_attribute_usage_id NUMBER,
122 p_last_update_date DATE,
123 p_last_updated_by NUMBER,
124 p_creation_date DATE := FND_API.g_miss_date ,
125 p_created_by NUMBER := FND_API.g_miss_num ,
126 p_last_update_login NUMBER,
127 p_request_id NUMBER,
128 p_program_application_id NUMBER,
129 p_program_id NUMBER,
130 p_program_update_date DATE,
131 p_object_version_number NUMBER,
132 p_attribute_usage_type VARCHAR2,
133 p_attribute_usage_code VARCHAR2,
134 p_attribute_id NUMBER,
135 p_enabled_flag VARCHAR2
136 --p_security_group_id NUMBER
137 )
138
139 IS
140 BEGIN
141 Update PV_ATTRIBUTE_USAGES
142 SET
143 attribute_usage_id = DECODE( p_attribute_usage_id, FND_API.g_miss_num, attribute_usage_id, p_attribute_usage_id),
144 last_update_date = DECODE( p_last_update_date, FND_API.g_miss_date, last_update_date, p_last_update_date),
145 last_updated_by = DECODE( p_last_updated_by, FND_API.g_miss_num, last_updated_by, p_last_updated_by),
146 --creation_date = DECODE( p_creation_date, FND_API.g_miss_date, creation_date, p_creation_date),
147 --created_by = DECODE( p_created_by, FND_API.g_miss_num, created_by, p_created_by),
148 last_update_login = DECODE( p_last_update_login, FND_API.g_miss_num, last_update_login, p_last_update_login),
149 request_id = DECODE( p_request_id, FND_API.g_miss_num, request_id, p_request_id),
150 program_application_id = DECODE( p_program_application_id, FND_API.g_miss_num, program_application_id, p_program_application_id),
151 program_id = DECODE( p_program_id, FND_API.g_miss_num, program_id, p_program_id),
152 program_update_date = DECODE( p_program_update_date, FND_API.g_miss_date, program_update_date, p_program_update_date),
153 object_version_number = DECODE( p_object_version_number, FND_API.g_miss_num, object_version_number, p_object_version_number+1),
154 attribute_usage_type = DECODE( p_attribute_usage_type, FND_API.g_miss_char, attribute_usage_type, p_attribute_usage_type),
155 attribute_usage_code = DECODE( p_attribute_usage_code, FND_API.g_miss_char, attribute_usage_code, p_attribute_usage_code),
156 attribute_id = DECODE( p_attribute_id, FND_API.g_miss_num, attribute_id, p_attribute_id),
157 enabled_flag = DECODE( p_enabled_flag, FND_API.g_miss_char, enabled_flag, p_enabled_flag)
158 --security_group_id = DECODE( p_security_group_id, FND_API.g_miss_num, security_group_id, p_security_group_id)
159 WHERE ATTRIBUTE_USAGE_ID = p_ATTRIBUTE_USAGE_ID
160 AND object_version_number = p_object_version_number;
161
162 IF (SQL%NOTFOUND) THEN
163 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
164 END IF;
165 END Update_Row;
166
167
168 ----------------------------------------------------------
169 ---- MEDIA ----
170 ----------------------------------------------------------
171
172 -- ========================================================
173 --
174 -- NAME
175 -- createDeleteBody
176 --
177 -- PURPOSE
178 --
179 -- NOTES
180 --
181 -- HISTORY
182 --
183 -- ========================================================
184 PROCEDURE Delete_Row(
185 p_ATTRIBUTE_USAGE_ID NUMBER)
186 IS
187 BEGIN
188 DELETE FROM PV_ATTRIBUTE_USAGES
189 WHERE ATTRIBUTE_USAGE_ID = p_ATTRIBUTE_USAGE_ID;
190 If (SQL%NOTFOUND) then
191 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
192 End If;
193 END Delete_Row ;
194
195
196
197 ----------------------------------------------------------
198 ---- MEDIA ----
199 ----------------------------------------------------------
200
201 -- ========================================================
202 --
203 -- NAME
204 -- createLockBody
205 --
206 -- PURPOSE
207 --
208 -- NOTES
209 --
210 -- HISTORY
211 --
212 -- ========================================================
213 PROCEDURE Lock_Row(
214 p_attribute_usage_id NUMBER,
215 p_last_update_date DATE,
216 p_last_updated_by NUMBER,
217 p_creation_date DATE,
218 p_created_by NUMBER,
219 p_last_update_login NUMBER,
220 p_request_id NUMBER,
221 p_program_application_id NUMBER,
222 p_program_id NUMBER,
223 p_program_update_date DATE,
224 p_object_version_number NUMBER,
225 p_attribute_usage_type VARCHAR2,
226 p_attribute_usage_code VARCHAR2,
227 p_attribute_id NUMBER,
228 p_enabled_flag VARCHAR2
229 --p_security_group_id NUMBER
230 )
231
232 IS
233 CURSOR C IS
234 SELECT *
235 FROM PV_ATTRIBUTE_USAGES
236 WHERE ATTRIBUTE_USAGE_ID = p_ATTRIBUTE_USAGE_ID
237 FOR UPDATE of ATTRIBUTE_USAGE_ID NOWAIT;
238 Recinfo C%ROWTYPE;
239 BEGIN
240 OPEN c;
241 FETCH c INTO Recinfo;
242 If (c%NOTFOUND) then
243 CLOSE c;
244 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
245 APP_EXCEPTION.RAISE_EXCEPTION;
246 END IF;
247 CLOSE C;
248 IF (
249 ( Recinfo.attribute_usage_id = p_attribute_usage_id)
250 AND ( ( Recinfo.last_update_date = p_last_update_date)
251 OR ( ( Recinfo.last_update_date IS NULL )
252 AND ( p_last_update_date IS NULL )))
253 AND ( ( Recinfo.last_updated_by = p_last_updated_by)
254 OR ( ( Recinfo.last_updated_by IS NULL )
255 AND ( p_last_updated_by IS NULL )))
256 AND ( ( Recinfo.creation_date = p_creation_date)
257 OR ( ( Recinfo.creation_date IS NULL )
258 AND ( p_creation_date IS NULL )))
259 AND ( ( Recinfo.created_by = p_created_by)
260 OR ( ( Recinfo.created_by IS NULL )
261 AND ( p_created_by IS NULL )))
262 AND ( ( Recinfo.last_update_login = p_last_update_login)
263 OR ( ( Recinfo.last_update_login IS NULL )
264 AND ( p_last_update_login IS NULL )))
265 AND ( ( Recinfo.request_id = p_request_id)
266 OR ( ( Recinfo.request_id IS NULL )
267 AND ( p_request_id IS NULL )))
268 AND ( ( Recinfo.program_application_id = p_program_application_id)
269 OR ( ( Recinfo.program_application_id IS NULL )
270 AND ( p_program_application_id IS NULL )))
271 AND ( ( Recinfo.program_id = p_program_id)
272 OR ( ( Recinfo.program_id IS NULL )
273 AND ( p_program_id IS NULL )))
274 AND ( ( Recinfo.program_update_date = p_program_update_date)
275 OR ( ( Recinfo.program_update_date IS NULL )
276 AND ( p_program_update_date IS NULL )))
277 AND ( ( Recinfo.object_version_number = p_object_version_number)
278 OR ( ( Recinfo.object_version_number IS NULL )
279 AND ( p_object_version_number IS NULL )))
280 AND ( ( Recinfo.attribute_usage_type = p_attribute_usage_type)
281 OR ( ( Recinfo.attribute_usage_type IS NULL )
282 AND ( p_attribute_usage_type IS NULL )))
283 AND ( ( Recinfo.attribute_usage_code = p_attribute_usage_code)
284 OR ( ( Recinfo.attribute_usage_code IS NULL )
285 AND ( p_attribute_usage_code IS NULL )))
286 AND ( ( Recinfo.attribute_id = p_attribute_id)
287 OR ( ( Recinfo.attribute_id IS NULL )
288 AND ( p_attribute_id IS NULL )))
289 AND ( ( Recinfo.enabled_flag = p_enabled_flag)
290 OR ( ( Recinfo.enabled_flag IS NULL )
291 AND ( p_enabled_flag IS NULL )))
292 /*
293 AND ( ( Recinfo.security_group_id = p_security_group_id)
294 OR ( ( Recinfo.security_group_id IS NULL )
295 AND ( p_security_group_id IS NULL )))
296 */
297 ) THEN
298 RETURN;
299 ELSE
300 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
301 APP_EXCEPTION.RAISE_EXCEPTION;
302 END IF;
303 END Lock_Row;
304
305 END PV_ATTRIBUTE_USAGES_PKG;
306