[Home] [Help]
PACKAGE BODY: APPS.CSF_LOCATIONS_PKG
Source
1 PACKAGE BODY csf_locations_pkg AS
2 /* $Header: CSFVLOCB.pls 120.4 2006/03/28 01:55:42 abhijkum noship $ */
3
4
5 PROCEDURE insert_row_ext (
6 p_csf_ext_location_id IN OUT NOCOPY NUMBER,
7 p_last_update_date IN DATE,
8 p_last_updated_by IN NUMBER,
9 p_creation_date IN DATE,
10 p_created_by IN NUMBER,
11 p_last_update_login IN NUMBER,
12 p_request_id IN NUMBER,
13 p_program_application_id IN NUMBER,
14 p_program_id IN NUMBER,
15 p_program_update_date IN DATE,
16 p_task_id IN NUMBER,
17 p_location_id IN NUMBER,
18 p_validated_flag IN VARCHAR2,
19 p_override_flag IN VARCHAR2,
20 p_log_detail_short IN VARCHAR2,
21 p_log_detail_long IN VARCHAR2
22 )
23 IS
24 CURSOR c
25 IS
26 SELECT csf_ext_location_id
27 FROM csf_ext_locations
28 WHERE location_id = p_location_id;
29 BEGIN
30 INSERT INTO csf_ext_locations
31 (csf_ext_location_id ,
32 last_update_date ,
33 last_updated_by ,
34 creation_date ,
35 created_by ,
36 last_update_login ,
37 request_id ,
38 program_application_id ,
39 program_id ,
40 program_update_date ,
41 task_id ,
42 location_id ,
43 validated_flag ,
44 override_flag ,
45 log_detail_short ,
46 log_detail_long
47 )
48 VALUES (p_csf_ext_location_id ,
49 p_last_update_date ,
50 p_last_updated_by ,
51 p_creation_date ,
52 p_created_by ,
53 p_last_update_login ,
54 p_request_id ,
55 p_program_application_id ,
56 p_program_id ,
57 p_program_update_date ,
58 p_task_id ,
59 p_location_id ,
60 p_validated_flag ,
61 p_override_flag ,
62 p_log_detail_short ,
63 p_log_detail_long
64 );
65
66 OPEN c;
67
68 FETCH c
69 INTO p_csf_ext_location_id;
70
71 IF (c%NOTFOUND)
72 THEN
73 CLOSE c;
74
75 RAISE NO_DATA_FOUND;
76 END IF;
77
78 CLOSE c;
79 END insert_row_ext;
80
81
82
83 PROCEDURE lock_row_ext (
84 p_csf_ext_location_id IN NUMBER,
85 p_last_update_date IN DATE,
86 p_last_updated_by IN NUMBER,
87 p_creation_date IN DATE,
88 p_created_by IN NUMBER,
89 p_last_update_login IN NUMBER,
90 p_request_id IN NUMBER,
91 p_program_application_id IN NUMBER,
92 p_program_id IN NUMBER,
93 p_program_update_date IN DATE,
94 p_task_id IN NUMBER,
95 p_location_id IN NUMBER,
96 p_validated_flag IN VARCHAR2,
97 p_override_flag IN VARCHAR2,
98 p_log_detail_short IN VARCHAR2,
99 p_log_detail_long IN VARCHAR2
100 )
101 IS
102 CURSOR c1
103 IS
104 SELECT csf_ext_location_id ,
105 last_update_date ,
106 last_updated_by ,
107 creation_date ,
108 created_by ,
109 last_update_login ,
110 request_id ,
111 program_application_id ,
112 program_id ,
113 program_update_date ,
114 task_id ,
115 location_id ,
116 validated_flag ,
117 override_flag ,
118 log_detail_short ,
119
120 log_detail_long
121 FROM csf_ext_locations
122 WHERE location_id = p_location_id
123 FOR UPDATE OF location_id NOWAIT;
124 BEGIN
125 FOR tlinfo IN c1
126 LOOP
127 IF ( ( (tlinfo.csf_ext_location_id = p_csf_ext_location_id)
128 OR ( (tlinfo.csf_ext_location_id IS NULL)
129 AND (p_csf_ext_location_id IS NULL)
130 )
131 )
132 AND ( (tlinfo.last_update_date = p_last_update_date)
133 OR ( (tlinfo.last_update_date IS NULL)
134 AND (p_last_update_date IS NULL)
135 )
136 )
137 AND ( (tlinfo.last_updated_by = p_last_updated_by)
138 OR ( (tlinfo.last_updated_by IS NULL)
139 AND (p_last_updated_by IS NULL)
140 )
141 )
142 AND ( (tlinfo.creation_date = p_creation_date)
143 OR ( (tlinfo.creation_date IS NULL)
144 AND (p_creation_date IS NULL)
145 )
146 )
147 AND ( (tlinfo.created_by = p_created_by)
148 OR ((tlinfo.created_by IS NULL) AND (p_created_by IS NULL)
149 )
150 )
151 AND ( (tlinfo.last_update_login = p_last_update_login)
152 OR ( (tlinfo.last_update_login IS NULL)
153 AND (p_last_update_login IS NULL)
154 )
155 )
156 AND ( (tlinfo.request_id = p_request_id)
157 OR ((tlinfo.request_id IS NULL) AND (p_request_id IS NULL)
158 )
159 )
160 AND ( (tlinfo.program_application_id = p_program_application_id
161 )
162 OR ( (tlinfo.program_application_id IS NULL)
163 AND (p_program_application_id IS NULL)
164 )
165 )
166 AND ( (tlinfo.program_id = p_program_id)
167 OR ((tlinfo.program_id IS NULL) AND (p_program_id IS NULL)
168 )
169 )
170 AND ( (tlinfo.program_update_date = p_program_update_date)
171 OR ( (tlinfo.program_update_date IS NULL)
172 AND (p_program_update_date IS NULL)
173 )
174 )
175 AND ( (tlinfo.task_id = p_task_id)
176 OR ((tlinfo.task_id IS NULL) AND (p_task_id IS NULL))
177 )
178 AND ( (tlinfo.location_id = p_location_id)
179 OR ( (tlinfo.location_id IS NULL)
180 AND (p_location_id IS NULL)
181 )
182 )
183 AND ( (tlinfo.validated_flag = p_validated_flag)
184 OR ( (tlinfo.validated_flag IS NULL)
185 AND (p_validated_flag IS NULL)
186 )
187 )
188 AND ( (tlinfo.override_flag = p_override_flag)
189 OR ( (tlinfo.override_flag IS NULL)
190 AND (p_override_flag IS NULL)
191 )
192 )
193 AND ( (tlinfo.log_detail_short = p_log_detail_short)
194 OR ( (tlinfo.log_detail_short IS NULL)
195 AND (p_log_detail_short IS NULL)
196 )
197 )
198 AND ( (tlinfo.log_detail_long = p_log_detail_long)
199 OR ( (tlinfo.log_detail_long IS NULL)
200 AND (p_log_detail_long IS NULL)
201 )
202 )
203 )
204 THEN
205 NULL;
206 ELSE
207 fnd_message.set_name ('FND', 'FORM_RECORD_CHANGED');
208 app_exception.raise_exception;
209 END IF;
210 END LOOP;
211 END lock_row_ext;
212
213 PROCEDURE update_row_ext (
214 p_csf_ext_location_id IN NUMBER,
215 p_last_update_date IN DATE,
216 p_last_updated_by IN NUMBER,
217 p_last_update_login IN NUMBER,
218 p_request_id IN NUMBER,
219 p_program_application_id IN NUMBER,
220 p_program_id IN NUMBER,
221 p_program_update_date IN DATE,
222 p_location_id IN NUMBER,
223 p_validated_flag IN VARCHAR2,
224 p_override_flag IN VARCHAR2,
225 p_log_detail_short IN VARCHAR2,
226 p_log_detail_long IN VARCHAR2
227 )
228 IS
229 BEGIN
230 UPDATE csf_ext_locations
231 SET csf_ext_location_id = p_csf_ext_location_id,
232 last_update_date = p_last_update_date,
233 last_updated_by = p_last_updated_by,
234 last_update_login = p_last_update_login,
235 request_id = p_request_id,
236 program_application_id = p_program_application_id,
237 program_id = p_program_id,
238 program_update_date = p_program_update_date,
239 location_id =
240 DECODE (p_location_id,
241 NULL, location_id,
242 fnd_api.g_miss_char, NULL,
243 p_location_id
244 ),
245 override_flag =
246 DECODE (p_override_flag,
247 NULL, override_flag,
248 fnd_api.g_miss_char, NULL,
249 p_override_flag
250 ),
251 validated_flag =
252 DECODE (p_validated_flag,
253 NULL, validated_flag,
254 fnd_api.g_miss_char, NULL,
255 p_validated_flag
256 ),
257 log_detail_short =
258 DECODE (p_log_detail_short,
259 NULL, log_detail_short,
260 fnd_api.g_miss_char, NULL,
261 p_log_detail_short
262 ),
263 log_detail_long =
264 DECODE (p_log_detail_long,
265 NULL, log_detail_long,
266 fnd_api.g_miss_char, NULL,
267 p_log_detail_long
268 )
269 WHERE location_id = p_location_id;
270
271 IF (SQL%NOTFOUND)
272 THEN
273 RAISE NO_DATA_FOUND;
274 END IF;
275 END update_row_ext;
276
277 PROCEDURE update_row_hz (
278 p_last_update_date IN DATE,
279 p_last_updated_by IN NUMBER,
280 p_last_update_login IN NUMBER,
281 p_request_id IN NUMBER,
282 p_program_application_id IN NUMBER,
283 p_program_id IN NUMBER,
284 p_program_update_date IN DATE,
285 p_address1 IN VARCHAR2,
286 p_address2 IN VARCHAR2,
287 p_address3 IN VARCHAR2,
288 p_address4 IN VARCHAR2,
289 p_city IN VARCHAR2,
290 p_postal_code IN VARCHAR2,
291 p_county IN VARCHAR2,
292 p_state IN VARCHAR2,
293 p_province IN VARCHAR2,
294 p_country IN VARCHAR2,
295 p_validated_flag IN VARCHAR2 DEFAULT NULL,
296 p_location_id IN NUMBER,
297 p_timezone_id IN NUMBER
298 )
299 IS
300 BEGIN
301 UPDATE hz_locations
302 SET last_update_date = p_last_update_date,
303 last_updated_by = p_last_updated_by,
304 last_update_login = p_last_update_login,
305 request_id = p_request_id,
306 program_application_id = p_program_application_id,
307 program_id = p_program_id,
308 program_update_date = p_program_update_date,
309 address1 =
310 DECODE (p_address1,
311 NULL, address1,
312 fnd_api.g_miss_char, NULL,
313 p_address1
314 ),
315 address2 = p_address2,
316 address3 = p_address3,
317 address4 = p_address4,
318 city = p_city,
319 postal_code = p_postal_code,
320 county = p_county,
321 state = p_state,
322 province = p_province,
323 country = p_country,
324 validated_flag =
325 DECODE (p_validated_flag,
326 NULL, validated_flag,
327 fnd_api.g_miss_char, NULL,
328 p_validated_flag
329 ),
330 timezone_id =
331 DECODE (p_timezone_id,
332 NULL, timezone_id,
333 fnd_api.g_miss_num, NULL,
334 p_timezone_id)
335 WHERE location_id = p_location_id;
336
337 IF (SQL%NOTFOUND)
338 THEN
339 RAISE NO_DATA_FOUND;
340 END IF;
341 END update_row_hz;
342
343
344
345 PROCEDURE delete_row_ext (p_location_id IN NUMBER)
346 IS
347 BEGIN
348 DELETE FROM csf_ext_locations
349 WHERE location_id = p_location_id;
350
351 IF (SQL%NOTFOUND)
352 THEN
353 RAISE NO_DATA_FOUND;
354 END IF;
355 END delete_row_ext;
356 END csf_locations_pkg;