1 PACKAGE BODY ONT_HEADER_PAYMENT_Def_Hdlr AS
2 /* $Header: OEXDFWKB.pls 115.0 30-MAR-09 23:23:31 appldev ship $ */
3
4 --
5 -- Copyright (c) 1996 Oracle Corporation, Redwood Shores, CA, USA
6 -- All rights reserved.
7 --
8 -- FILENAME
9 --
10 -- ONT_HEADER_PAYMENT_Def_Hdlr
11 --
12 -- DESCRIPTION
13 --
14 -- Body of package ONT_HEADER_PAYMENT_Def_Hdlr
15 --
16 -- NOTES
17 --
18 -- HISTORY
19 --
20 -- 30-MAR-09 Created
21 --
22
23 -- Global constant holding the package name
24 G_PKG_NAME CONSTANT VARCHAR2(30) := 'ONT_HEADER_PAYMENT_Def_Hdlr';
25
26 g_entity_code varchar2(15) := 'HEADER_PAYMENT';
27 g_database_object_name varchar2(30) :='OE_AK_HEADER_PAYMENTS_V';
28
29 -- Default_Record
30 PROCEDURE Default_Record
31 ( p_x_rec IN OUT NOCOPY OE_AK_HEADER_PAYMENTS_V%ROWTYPE
32 , p_in_old_rec IN OE_AK_HEADER_PAYMENTS_V%ROWTYPE
33 , p_iteration IN NUMBER default 1
34 )
35 IS
36 l_action NUMBER;
37 l_attr VARCHAR2(200);
38 BEGIN
39
40 oe_debug_pub.ADD('Enter ONT_HEADER_PAYMENT_Def_Hdlr.Default_Record');
41
42 IF p_iteration =1 THEN
43 OE_HEADER_PAYMENT_Security.G_Is_Caller_Defaulting := 'Y';
44 g_record := p_x_rec;
45 END IF;
46
47 -- if max. iteration is reached exit
48 IF p_iteration > ONT_DEF_UTIL.G_MAX_DEF_ITERATIONS THEN
49 FND_MESSAGE.SET_NAME('ONT','OE_DEF_MAX_ITERATIONS');
50 OE_MSG_PUB.ADD;
51 RAISE FND_API.G_EXC_ERROR;
52 END IF;
53
54 -- Default missing attributes
55 l_attr:= 'PAYMENT_TYPE_CODE';
56
57 IF g_record.PAYMENT_TYPE_CODE = FND_API.G_MISS_CHAR THEN
58 -- Get the defaulting api registered in the AK AND default
59 l_attr:=l_attr||' 1';
60 g_record.PAYMENT_TYPE_CODE := ONT_D1024_PAYMENT_TYPE_CODE.Get_Default_Value(g_record);
61 l_attr:=l_attr||' 2';
62 -- For UPDATE operations, check security if new defaulted value is not equal to old value
63 IF g_record.operation = OE_GLOBALS.G_OPR_UPDATE THEN
64 l_attr:=l_attr||' 3';
65 IF NOT OE_GLOBALS.Equal(g_record.payment_type_code, p_in_old_rec.payment_type_code) THEN
66 IF OE_HEADER_PAYMENT_SECURITY.PAYMENT_TYPE_CODE(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
67 -- Raise error if security returns YES, operation IS CONSTRAINED
68 RAISE FND_API.G_EXC_ERROR;
69 END IF;
70 OE_GLOBALS.G_ATTR_UPDATED_BY_DEF := 'Y';
71 END IF;
72 END IF;
73 IF g_record.PAYMENT_TYPE_CODE IS NOT NULL THEN
74 l_attr:=l_attr||' 4';
75 -- if valid, clear dependent attributes
76 OE_HEADER_PAYMENT_CL_DEP_ATTR.PAYMENT_TYPE_CODE(g_record);
77 END IF;
78 END IF;
79 l_attr:= 'ATTRIBUTE1';
80
81 IF g_record.ATTRIBUTE1 = FND_API.G_MISS_CHAR THEN
82 -- Attribute is NOT defaulting enabled, return NULL if MISSING
83 g_record.ATTRIBUTE1 := NULL;
84 END IF;
85 l_attr:= 'ATTRIBUTE10';
86
87 IF g_record.ATTRIBUTE10 = FND_API.G_MISS_CHAR THEN
88 -- Attribute is NOT defaulting enabled, return NULL if MISSING
89 g_record.ATTRIBUTE10 := NULL;
90 END IF;
91 l_attr:= 'ATTRIBUTE11';
92
93 IF g_record.ATTRIBUTE11 = FND_API.G_MISS_CHAR THEN
94 -- Attribute is NOT defaulting enabled, return NULL if MISSING
95 g_record.ATTRIBUTE11 := NULL;
96 END IF;
97 l_attr:= 'ATTRIBUTE12';
98
99 IF g_record.ATTRIBUTE12 = FND_API.G_MISS_CHAR THEN
100 -- Attribute is NOT defaulting enabled, return NULL if MISSING
101 g_record.ATTRIBUTE12 := NULL;
102 END IF;
103 l_attr:= 'ATTRIBUTE13';
104
105 IF g_record.ATTRIBUTE13 = FND_API.G_MISS_CHAR THEN
106 -- Attribute is NOT defaulting enabled, return NULL if MISSING
107 g_record.ATTRIBUTE13 := NULL;
108 END IF;
109 l_attr:= 'ATTRIBUTE14';
110
111 IF g_record.ATTRIBUTE14 = FND_API.G_MISS_CHAR THEN
112 -- Attribute is NOT defaulting enabled, return NULL if MISSING
113 g_record.ATTRIBUTE14 := NULL;
114 END IF;
115 l_attr:= 'ATTRIBUTE15';
116
117 IF g_record.ATTRIBUTE15 = FND_API.G_MISS_CHAR THEN
118 -- Attribute is NOT defaulting enabled, return NULL if MISSING
119 g_record.ATTRIBUTE15 := NULL;
120 END IF;
121 l_attr:= 'ATTRIBUTE2';
122
123 IF g_record.ATTRIBUTE2 = FND_API.G_MISS_CHAR THEN
124 -- Attribute is NOT defaulting enabled, return NULL if MISSING
125 g_record.ATTRIBUTE2 := NULL;
126 END IF;
127 l_attr:= 'ATTRIBUTE3';
128
129 IF g_record.ATTRIBUTE3 = FND_API.G_MISS_CHAR THEN
130 -- Attribute is NOT defaulting enabled, return NULL if MISSING
131 g_record.ATTRIBUTE3 := NULL;
132 END IF;
133 l_attr:= 'ATTRIBUTE4';
134
135 IF g_record.ATTRIBUTE4 = FND_API.G_MISS_CHAR THEN
136 -- Attribute is NOT defaulting enabled, return NULL if MISSING
137 g_record.ATTRIBUTE4 := NULL;
138 END IF;
139 l_attr:= 'ATTRIBUTE5';
140
141 IF g_record.ATTRIBUTE5 = FND_API.G_MISS_CHAR THEN
142 -- Attribute is NOT defaulting enabled, return NULL if MISSING
143 g_record.ATTRIBUTE5 := NULL;
144 END IF;
145 l_attr:= 'ATTRIBUTE6';
146
147 IF g_record.ATTRIBUTE6 = FND_API.G_MISS_CHAR THEN
148 -- Attribute is NOT defaulting enabled, return NULL if MISSING
149 g_record.ATTRIBUTE6 := NULL;
150 END IF;
151 l_attr:= 'ATTRIBUTE7';
152
153 IF g_record.ATTRIBUTE7 = FND_API.G_MISS_CHAR THEN
154 -- Attribute is NOT defaulting enabled, return NULL if MISSING
155 g_record.ATTRIBUTE7 := NULL;
156 END IF;
157 l_attr:= 'ATTRIBUTE8';
158
159 IF g_record.ATTRIBUTE8 = FND_API.G_MISS_CHAR THEN
160 -- Attribute is NOT defaulting enabled, return NULL if MISSING
161 g_record.ATTRIBUTE8 := NULL;
162 END IF;
163 l_attr:= 'ATTRIBUTE9';
164
165 IF g_record.ATTRIBUTE9 = FND_API.G_MISS_CHAR THEN
166 -- Attribute is NOT defaulting enabled, return NULL if MISSING
167 g_record.ATTRIBUTE9 := NULL;
168 END IF;
169 l_attr:= 'CHECK_NUMBER';
170
171 IF g_record.CHECK_NUMBER = FND_API.G_MISS_CHAR THEN
172 -- Attribute is NOT defaulting enabled, return NULL if MISSING
173 g_record.CHECK_NUMBER := NULL;
174 END IF;
175 l_attr:= 'COMMITMENT_APPLIED_AMOUNT';
176
177 IF g_record.COMMITMENT_APPLIED_AMOUNT = FND_API.G_MISS_NUM THEN
178 -- Attribute is NOT defaulting enabled, return NULL if MISSING
179 g_record.COMMITMENT_APPLIED_AMOUNT := NULL;
180 END IF;
181 l_attr:= 'COMMITMENT_INTERFACED_AMOUNT';
182
183 IF g_record.COMMITMENT_INTERFACED_AMOUNT = FND_API.G_MISS_NUM THEN
184 -- Attribute is NOT defaulting enabled, return NULL if MISSING
185 g_record.COMMITMENT_INTERFACED_AMOUNT := NULL;
186 END IF;
187 l_attr:= 'CONTEXT';
188
189 IF g_record.CONTEXT = FND_API.G_MISS_CHAR THEN
190 -- Attribute is NOT defaulting enabled, return NULL if MISSING
191 g_record.CONTEXT := NULL;
192 END IF;
193 l_attr:= 'CREATED_BY';
194
195 IF g_record.CREATED_BY = FND_API.G_MISS_NUM THEN
196 -- Attribute is NOT defaulting enabled, return NULL if MISSING
197 g_record.CREATED_BY := NULL;
198 END IF;
199 l_attr:= 'CREATION_DATE';
200
201 IF g_record.CREATION_DATE = FND_API.G_MISS_DATE THEN
202 -- Attribute is NOT defaulting enabled, return NULL if MISSING
203 g_record.CREATION_DATE := NULL;
204 END IF;
205 l_attr:= 'CREDIT_CARD_CODE';
206
207 IF g_record.CREDIT_CARD_CODE = FND_API.G_MISS_CHAR THEN
208 -- Attribute is NOT defaulting enabled, return NULL if MISSING
209 g_record.CREDIT_CARD_CODE := NULL;
210 END IF;
211 l_attr:= 'CREDIT_CARD_APPROVAL_CODE';
212
213 IF g_record.CREDIT_CARD_APPROVAL_CODE = FND_API.G_MISS_CHAR THEN
214 -- Attribute is NOT defaulting enabled, return NULL if MISSING
215 g_record.CREDIT_CARD_APPROVAL_CODE := NULL;
216 END IF;
217 l_attr:= 'CREDIT_CARD_APPROVAL_DATE';
218
219 IF g_record.CREDIT_CARD_APPROVAL_DATE = FND_API.G_MISS_DATE THEN
220 -- Attribute is NOT defaulting enabled, return NULL if MISSING
221 g_record.CREDIT_CARD_APPROVAL_DATE := NULL;
222 END IF;
223 l_attr:= 'CREDIT_CARD_NUMBER';
224
225 IF g_record.CREDIT_CARD_NUMBER = FND_API.G_MISS_CHAR THEN
226 -- Get the defaulting api registered in the AK AND default
227 l_attr:=l_attr||' 1';
228 g_record.CREDIT_CARD_NUMBER := ONT_D1024_CREDIT_CARD_NUMBER.Get_Default_Value(g_record);
229 l_attr:=l_attr||' 2';
230 -- There is no security api registered in the AK dictionary
231 -- There is no validation api registered in the AK dictionary
232 END IF;
233 l_attr:= 'DB_FLAG';
234
235 IF g_record.DB_FLAG = FND_API.G_MISS_CHAR THEN
236 -- Attribute is NOT defaulting enabled, return NULL if MISSING
237 g_record.DB_FLAG := NULL;
238 END IF;
239 l_attr:= 'HEADER_ID';
240
241 IF g_record.HEADER_ID = FND_API.G_MISS_NUM THEN
242 -- Attribute is NOT defaulting enabled, return NULL if MISSING
243 g_record.HEADER_ID := NULL;
244 END IF;
245 l_attr:= 'LAST_UPDATE_DATE';
246
247 IF g_record.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
248 -- Attribute is NOT defaulting enabled, return NULL if MISSING
249 g_record.LAST_UPDATE_DATE := NULL;
250 END IF;
251 l_attr:= 'LAST_UPDATE_LOGIN';
252
253 IF g_record.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
254 -- Attribute is NOT defaulting enabled, return NULL if MISSING
255 g_record.LAST_UPDATE_LOGIN := NULL;
256 END IF;
257 l_attr:= 'LAST_UPDATED_BY';
258
259 IF g_record.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
260 -- Attribute is NOT defaulting enabled, return NULL if MISSING
261 g_record.LAST_UPDATED_BY := NULL;
262 END IF;
263 l_attr:= 'LINE_ID';
264
265 IF g_record.LINE_ID = FND_API.G_MISS_NUM THEN
266 -- Attribute is NOT defaulting enabled, return NULL if MISSING
267 g_record.LINE_ID := NULL;
268 END IF;
269 l_attr:= 'OPERATION';
270
271 IF g_record.OPERATION = FND_API.G_MISS_CHAR THEN
272 -- Attribute is NOT defaulting enabled, return NULL if MISSING
273 g_record.OPERATION := NULL;
274 END IF;
275 l_attr:= 'PAYMENT_AMOUNT';
276
277 IF g_record.PAYMENT_AMOUNT = FND_API.G_MISS_NUM THEN
278 -- Attribute is NOT defaulting enabled, return NULL if MISSING
279 g_record.PAYMENT_AMOUNT := NULL;
280 END IF;
281 l_attr:= 'PAYMENT_COLLECTION_EVENT';
282
283 IF g_record.PAYMENT_COLLECTION_EVENT = FND_API.G_MISS_CHAR THEN
284 -- Attribute is NOT defaulting enabled, return NULL if MISSING
285 g_record.PAYMENT_COLLECTION_EVENT := NULL;
286 END IF;
287 l_attr:= 'PAYMENT_LEVEL_CODE';
288
289 IF g_record.PAYMENT_LEVEL_CODE = FND_API.G_MISS_CHAR THEN
290 -- Attribute is NOT defaulting enabled, return NULL if MISSING
291 g_record.PAYMENT_LEVEL_CODE := NULL;
292 END IF;
293 l_attr:= 'PAYMENT_NUMBER';
294
295 IF g_record.PAYMENT_NUMBER = FND_API.G_MISS_NUM THEN
296 -- Attribute is NOT defaulting enabled, return NULL if MISSING
297 g_record.PAYMENT_NUMBER := NULL;
298 END IF;
299 l_attr:= 'PAYMENT_SET_ID';
300
301 IF g_record.PAYMENT_SET_ID = FND_API.G_MISS_NUM THEN
302 -- Attribute is NOT defaulting enabled, return NULL if MISSING
303 g_record.PAYMENT_SET_ID := NULL;
304 END IF;
305 l_attr:= 'PAYMENT_TRX_ID';
306
307 IF g_record.PAYMENT_TRX_ID = FND_API.G_MISS_NUM THEN
308 -- Attribute is NOT defaulting enabled, return NULL if MISSING
309 g_record.PAYMENT_TRX_ID := NULL;
310 END IF;
311 l_attr:= 'PREPAID_AMOUNT';
312
313 IF g_record.PREPAID_AMOUNT = FND_API.G_MISS_NUM THEN
314 -- Attribute is NOT defaulting enabled, return NULL if MISSING
315 g_record.PREPAID_AMOUNT := NULL;
316 END IF;
317 l_attr:= 'PROGRAM_ID';
318
319 IF g_record.PROGRAM_ID = FND_API.G_MISS_NUM THEN
320 -- Attribute is NOT defaulting enabled, return NULL if MISSING
321 g_record.PROGRAM_ID := NULL;
322 END IF;
323 l_attr:= 'PROGRAM_APPLICATION_ID';
324
325 IF g_record.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM THEN
326 -- Attribute is NOT defaulting enabled, return NULL if MISSING
327 g_record.PROGRAM_APPLICATION_ID := NULL;
328 END IF;
329 l_attr:= 'PROGRAM_UPDATE_DATE';
330
331 IF g_record.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
332 -- Attribute is NOT defaulting enabled, return NULL if MISSING
333 g_record.PROGRAM_UPDATE_DATE := NULL;
334 END IF;
335 l_attr:= 'REQUEST_ID';
336
337 IF g_record.REQUEST_ID = FND_API.G_MISS_NUM THEN
338 -- Attribute is NOT defaulting enabled, return NULL if MISSING
339 g_record.REQUEST_ID := NULL;
340 END IF;
341 l_attr:= 'RETURN_STATUS';
342
343 IF g_record.RETURN_STATUS = FND_API.G_MISS_CHAR THEN
344 -- Attribute is NOT defaulting enabled, return NULL if MISSING
345 g_record.RETURN_STATUS := NULL;
346 END IF;
347 l_attr:= 'TANGIBLE_ID';
348
349 IF g_record.TANGIBLE_ID = FND_API.G_MISS_CHAR THEN
350 -- Attribute is NOT defaulting enabled, return NULL if MISSING
351 g_record.TANGIBLE_ID := NULL;
352 END IF;
353 l_attr:= 'CREDIT_CARD_EXPIRATION_DATE';
354
355 IF g_record.CREDIT_CARD_EXPIRATION_DATE = FND_API.G_MISS_DATE THEN
356 -- Get the defaulting api registered in the AK AND default
357 l_attr:=l_attr||' 1';
358 g_record.CREDIT_CARD_EXPIRATION_DATE := ONT_D1024_CREDIT_CARD_EXPIRATI.Get_Default_Value(g_record);
359 l_attr:=l_attr||' 2';
360 -- There is no security api registered in the AK dictionary
361 -- There is no validation api registered in the AK dictionary
362 END IF;
363 l_attr:= 'CREDIT_CARD_HOLDER_NAME';
364
365 IF g_record.CREDIT_CARD_HOLDER_NAME = FND_API.G_MISS_CHAR THEN
366 -- Get the defaulting api registered in the AK AND default
367 l_attr:=l_attr||' 1';
368 g_record.CREDIT_CARD_HOLDER_NAME := ONT_D1024_CREDIT_CARD_HOLDER_N.Get_Default_Value(g_record);
369 l_attr:=l_attr||' 2';
370 -- There is no security api registered in the AK dictionary
371 -- There is no validation api registered in the AK dictionary
372 END IF;
373 l_attr:= 'RECEIPT_METHOD_ID';
374
375 IF g_record.RECEIPT_METHOD_ID = FND_API.G_MISS_NUM THEN
376 -- Get the defaulting api registered in the AK AND default
377 l_attr:=l_attr||' 1';
378 g_record.RECEIPT_METHOD_ID := ONT_D1024_RECEIPT_METHOD_ID.Get_Default_Value(g_record);
379 l_attr:=l_attr||' 2';
380 -- For UPDATE operations, check security if new defaulted value is not equal to old value
381 IF g_record.operation = OE_GLOBALS.G_OPR_UPDATE THEN
382 l_attr:=l_attr||' 3';
383 IF NOT OE_GLOBALS.Equal(g_record.receipt_method_id, p_in_old_rec.receipt_method_id) THEN
384 IF OE_HEADER_PAYMENT_SECURITY.RECEIPT_METHOD(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
385 -- Raise error if security returns YES, operation IS CONSTRAINED
386 RAISE FND_API.G_EXC_ERROR;
387 END IF;
388 OE_GLOBALS.G_ATTR_UPDATED_BY_DEF := 'Y';
389 END IF;
390 END IF;
391 IF g_record.RECEIPT_METHOD_ID IS NOT NULL THEN
392 l_attr:=l_attr||' 4';
393 -- if valid, clear dependent attributes
394 OE_HEADER_PAYMENT_CL_DEP_ATTR.RECEIPT_METHOD(g_record);
395 END IF;
396 END IF;
397
398 -- CHeck if there are any missing values for attrs
399 -- If there are any missing call Default_Record again AND repeat till all the values
400 -- are defaulted or till the max. iterations are reached
401
402 IF(
403 (g_record.PAYMENT_TYPE_CODE =FND_API.G_MISS_CHAR)
404 OR (g_record.ATTRIBUTE1 = FND_API.G_MISS_CHAR)
405 OR (g_record.ATTRIBUTE10 = FND_API.G_MISS_CHAR)
406 OR (g_record.ATTRIBUTE11 = FND_API.G_MISS_CHAR)
407 OR (g_record.ATTRIBUTE12 = FND_API.G_MISS_CHAR)
408 OR (g_record.ATTRIBUTE13 = FND_API.G_MISS_CHAR)
409 OR (g_record.ATTRIBUTE14 = FND_API.G_MISS_CHAR)
410 OR (g_record.ATTRIBUTE15 = FND_API.G_MISS_CHAR)
411 OR (g_record.ATTRIBUTE2 = FND_API.G_MISS_CHAR)
412 OR (g_record.ATTRIBUTE3 = FND_API.G_MISS_CHAR)
413 OR (g_record.ATTRIBUTE4 = FND_API.G_MISS_CHAR)
414 OR (g_record.ATTRIBUTE5 = FND_API.G_MISS_CHAR)
415 OR (g_record.ATTRIBUTE6 = FND_API.G_MISS_CHAR)
416 OR (g_record.ATTRIBUTE7 = FND_API.G_MISS_CHAR)
417 OR (g_record.ATTRIBUTE8 = FND_API.G_MISS_CHAR)
418 OR (g_record.ATTRIBUTE9 = FND_API.G_MISS_CHAR)
419 OR (g_record.CHECK_NUMBER = FND_API.G_MISS_CHAR)
420 OR (g_record.COMMITMENT_APPLIED_AMOUNT = FND_API.G_MISS_NUM)
421 OR (g_record.COMMITMENT_INTERFACED_AMOUNT = FND_API.G_MISS_NUM)
422 OR (g_record.CONTEXT = FND_API.G_MISS_CHAR)
423 OR (g_record.CREATED_BY = FND_API.G_MISS_NUM)
424 OR (g_record.CREATION_DATE = FND_API.G_MISS_DATE)
425 OR (g_record.CREDIT_CARD_CODE = FND_API.G_MISS_CHAR)
426 OR (g_record.CREDIT_CARD_APPROVAL_CODE = FND_API.G_MISS_CHAR)
427 OR (g_record.CREDIT_CARD_APPROVAL_DATE = FND_API.G_MISS_DATE)
428 OR (g_record.CREDIT_CARD_NUMBER = FND_API.G_MISS_CHAR)
429 OR (g_record.DB_FLAG = FND_API.G_MISS_CHAR)
430 OR (g_record.HEADER_ID = FND_API.G_MISS_NUM)
431 OR (g_record.LAST_UPDATE_DATE = FND_API.G_MISS_DATE)
432 OR (g_record.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM)
433 OR (g_record.LAST_UPDATED_BY = FND_API.G_MISS_NUM)
434 OR (g_record.LINE_ID = FND_API.G_MISS_NUM)
435 OR (g_record.OPERATION = FND_API.G_MISS_CHAR)
436 OR (g_record.PAYMENT_AMOUNT = FND_API.G_MISS_NUM)
437 OR (g_record.PAYMENT_COLLECTION_EVENT = FND_API.G_MISS_CHAR)
438 OR (g_record.PAYMENT_LEVEL_CODE = FND_API.G_MISS_CHAR)
439 OR (g_record.PAYMENT_NUMBER = FND_API.G_MISS_NUM)
440 OR (g_record.PAYMENT_SET_ID = FND_API.G_MISS_NUM)
441 OR (g_record.PAYMENT_TRX_ID = FND_API.G_MISS_NUM)
442 OR (g_record.PREPAID_AMOUNT = FND_API.G_MISS_NUM)
443 OR (g_record.PROGRAM_ID = FND_API.G_MISS_NUM)
444 OR (g_record.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM)
445 OR (g_record.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE)
446 OR (g_record.REQUEST_ID = FND_API.G_MISS_NUM)
447 OR (g_record.RETURN_STATUS = FND_API.G_MISS_CHAR)
448 OR (g_record.TANGIBLE_ID = FND_API.G_MISS_CHAR)
449 OR (g_record.CREDIT_CARD_EXPIRATION_DATE = FND_API.G_MISS_DATE)
450 OR (g_record.CREDIT_CARD_HOLDER_NAME = FND_API.G_MISS_CHAR)
451 OR (g_record.RECEIPT_METHOD_ID = FND_API.G_MISS_NUM)
452 ) THEN
453 ONT_HEADER_PAYMENT_Def_Hdlr.Default_Record(
454 p_x_rec => g_record,
455 p_in_old_rec => p_in_old_rec,
456 p_iteration => p_iteration+1 );
457 END IF;
458
459 IF p_iteration =1 THEN
460 OE_HEADER_PAYMENT_Security.G_Is_Caller_Defaulting := 'N';
461 p_x_rec := g_record;
462 END IF;
463
464 oe_debug_pub.ADD('Exit ONT_HEADER_PAYMENT_Def_Hdlr.Default_Record');
465
466 EXCEPTION
467
468 WHEN FND_API.G_EXC_ERROR THEN
469 OE_HEADER_PAYMENT_Security.G_Is_Caller_Defaulting := 'N';
470 RAISE FND_API.G_EXC_ERROR;
471 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
472 OE_HEADER_PAYMENT_Security.G_Is_Caller_Defaulting := 'N';
473 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
474 WHEN OTHERS THEN
475 IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
476 THEN
477 OE_MSG_PUB.Add_Exc_Msg
478 ( G_PKG_NAME
479 ,'Default_Record: '||l_attr
480 );
481 END IF;
482 OE_HEADER_PAYMENT_Security.G_Is_Caller_Defaulting := 'N';
483 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
484
485 END Default_Record;
486
487 END ONT_HEADER_PAYMENT_Def_Hdlr;
[Home] [Help]