[Home] [Help]
PACKAGE BODY: APPS.OE_DEFAULT_PRICE_LIST
Source
1 PACKAGE BODY OE_Default_Price_List AS
2 /* $Header: OEXDPRHB.pls 115.2 1999/11/11 21:54:05 pkm ship $ */
3
4 -- Global constant holding the package name
5
6 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Default_Price_List';
7
8 -- Package global used within the package.
9
10 g_PRICE_LIST_rec OE_Price_List_PUB.Price_List_Rec_Type;
11
12 -- Get functions.
13
14 FUNCTION Get_Comments
15 RETURN VARCHAR2
16 IS
17 BEGIN
18
19 RETURN NULL;
20
21 END Get_Comments;
22
23 FUNCTION Get_Currency
24 RETURN VARCHAR2
25 IS
26 BEGIN
27
28 RETURN NULL;
29
30 END Get_Currency;
31
32 FUNCTION Get_Description
33 RETURN VARCHAR2
34 IS
35 BEGIN
36
37 RETURN NULL;
38
39 END Get_Description;
40
41 FUNCTION Get_End_Date_Active
42 RETURN DATE
43 IS
44 BEGIN
45
46 RETURN NULL;
47
48 END Get_End_Date_Active;
49
50 FUNCTION Get_Freight_Terms
51 RETURN VARCHAR2
52 IS
53 BEGIN
54
55 RETURN NULL;
56
57 END Get_Freight_Terms;
58
59 FUNCTION Get_Name
60 RETURN VARCHAR2
61 IS
62 BEGIN
63
64 RETURN NULL;
65
66 END Get_Name;
67
68 FUNCTION Get_Price_List
69 RETURN NUMBER
70 IS
71 l_price_list_id NUMBER := NULL;
72 BEGIN
73
74 oe_debug_pub.add('Entering OE_Default_Price_List.Get_Price_List');
75
76 select qp_list_headers_b_s.nextval into l_price_list_id
77 from dual;
78
79 oe_debug_pub.add('Exiting OE_Default_Price_List.Get_Price_List');
80 RETURN l_price_list_id;
81
82 EXCEPTION
83
84 WHEN OTHERS THEN
85
86 IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
87 THEN
88 OE_MSG_PUB.Add_Exc_Msg
89 ( G_PKG_NAME ,
90 'Get_Price_List'
91 );
92 END IF;
93
94 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
95
96 END Get_Price_List;
97
98 FUNCTION Get_Rounding_Factor
99 RETURN NUMBER
100 IS
101 BEGIN
102
103 RETURN NULL;
104
105 END Get_Rounding_Factor;
106
107 FUNCTION Get_Secondary_Price_List
108 RETURN NUMBER
109 IS
110 BEGIN
111
112 RETURN NULL;
113
114 END Get_Secondary_Price_List;
115
116 FUNCTION Get_Ship_Method
117 RETURN VARCHAR2
118 IS
119 BEGIN
120
121 RETURN NULL;
122
123 END Get_Ship_Method;
124
125 FUNCTION Get_Start_Date_Active
126 RETURN DATE
127 IS
128 BEGIN
129
130 RETURN NULL;
131
132 END Get_Start_Date_Active;
133
134 FUNCTION Get_Terms
135 RETURN NUMBER
136 IS
137 BEGIN
138
139 RETURN NULL;
140
141 END Get_Terms;
142
143 PROCEDURE Get_Flex_So_Price_Lists
144 IS
145 BEGIN
146
147 -- In the future call Flex APIs for defaults
148
149 IF g_PRICE_LIST_rec.attribute1 = FND_API.G_MISS_CHAR THEN
150 g_PRICE_LIST_rec.attribute1 := NULL;
151 END IF;
152
153 IF g_PRICE_LIST_rec.attribute10 = FND_API.G_MISS_CHAR THEN
154 g_PRICE_LIST_rec.attribute10 := NULL;
155 END IF;
156
157 IF g_PRICE_LIST_rec.attribute11 = FND_API.G_MISS_CHAR THEN
158 g_PRICE_LIST_rec.attribute11 := NULL;
159 END IF;
160
161 IF g_PRICE_LIST_rec.attribute12 = FND_API.G_MISS_CHAR THEN
162 g_PRICE_LIST_rec.attribute12 := NULL;
163 END IF;
164
165 IF g_PRICE_LIST_rec.attribute13 = FND_API.G_MISS_CHAR THEN
166 g_PRICE_LIST_rec.attribute13 := NULL;
167 END IF;
168
169 IF g_PRICE_LIST_rec.attribute14 = FND_API.G_MISS_CHAR THEN
170 g_PRICE_LIST_rec.attribute14 := NULL;
171 END IF;
172
173 IF g_PRICE_LIST_rec.attribute15 = FND_API.G_MISS_CHAR THEN
174 g_PRICE_LIST_rec.attribute15 := NULL;
175 END IF;
176
177 IF g_PRICE_LIST_rec.attribute2 = FND_API.G_MISS_CHAR THEN
178 g_PRICE_LIST_rec.attribute2 := NULL;
179 END IF;
180
181 IF g_PRICE_LIST_rec.attribute3 = FND_API.G_MISS_CHAR THEN
182 g_PRICE_LIST_rec.attribute3 := NULL;
183 END IF;
184
185 IF g_PRICE_LIST_rec.attribute4 = FND_API.G_MISS_CHAR THEN
186 g_PRICE_LIST_rec.attribute4 := NULL;
187 END IF;
188
189 IF g_PRICE_LIST_rec.attribute5 = FND_API.G_MISS_CHAR THEN
190 g_PRICE_LIST_rec.attribute5 := NULL;
191 END IF;
192
193 IF g_PRICE_LIST_rec.attribute6 = FND_API.G_MISS_CHAR THEN
194 g_PRICE_LIST_rec.attribute6 := NULL;
195 END IF;
196
197 IF g_PRICE_LIST_rec.attribute7 = FND_API.G_MISS_CHAR THEN
198 g_PRICE_LIST_rec.attribute7 := NULL;
199 END IF;
200
201 IF g_PRICE_LIST_rec.attribute8 = FND_API.G_MISS_CHAR THEN
202 g_PRICE_LIST_rec.attribute8 := NULL;
203 END IF;
204
205 IF g_PRICE_LIST_rec.attribute9 = FND_API.G_MISS_CHAR THEN
206 g_PRICE_LIST_rec.attribute9 := NULL;
207 END IF;
208
209 IF g_PRICE_LIST_rec.context = FND_API.G_MISS_CHAR THEN
210 g_PRICE_LIST_rec.context := NULL;
211 END IF;
212
213 END Get_Flex_So_Price_Lists;
214
215 -- Procedure Attributes
216
217 PROCEDURE Attributes
218 ( p_PRICE_LIST_rec IN OE_Price_List_PUB.Price_List_Rec_Type :=
219 OE_Price_List_PUB.G_MISS_PRICE_LIST_REC
220 , p_iteration IN NUMBER := 1
221 , x_PRICE_LIST_rec OUT OE_Price_List_PUB.Price_List_Rec_Type
222 )
223 IS
224 BEGIN
225
226 -- Check number of iterations.
227
228 IF p_iteration > OE_GLOBALS.G_MAX_DEF_ITERATIONS THEN
229
230 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
231 THEN
232
233 FND_MESSAGE.SET_NAME('OE','OE_DEF_MAX_ITERATION');
234 OE_MSG_PUB.Add;
235
236 END IF;
237
238 RAISE FND_API.G_EXC_ERROR;
239
240 END IF;
241
242 -- Initialize g_PRICE_LIST_rec
243
244 g_PRICE_LIST_rec := p_PRICE_LIST_rec;
245
246 -- Default missing attributes.
247
248 IF g_PRICE_LIST_rec.comments = FND_API.G_MISS_CHAR THEN
249
250 g_PRICE_LIST_rec.comments := Get_Comments;
251
252 IF g_PRICE_LIST_rec.comments IS NOT NULL THEN
253
254 IF OE_Validate_Attr.Comments(g_PRICE_LIST_rec.comments)
255 THEN
256 OE_Price_List_Util.Clear_Dependent_Attr
257 ( p_attr_id => OE_Price_List_Util.G_COMMENTS
258 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
259 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
260 );
261 ELSE
262 g_PRICE_LIST_rec.comments := NULL;
263 END IF;
264
265 END IF;
266
267 END IF;
268
269 IF g_PRICE_LIST_rec.currency_code = FND_API.G_MISS_CHAR THEN
270
271 g_PRICE_LIST_rec.currency_code := Get_Currency;
272
273 IF g_PRICE_LIST_rec.currency_code IS NOT NULL THEN
274
275 IF OE_Validate_Attr.Currency(g_PRICE_LIST_rec.currency_code)
276 THEN
277 OE_Price_List_Util.Clear_Dependent_Attr
278 ( p_attr_id => OE_Price_List_Util.G_CURRENCY
279 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
280 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
281 );
282 ELSE
283 g_PRICE_LIST_rec.currency_code := NULL;
284 END IF;
285
286 END IF;
287
288 END IF;
289
290 IF g_PRICE_LIST_rec.description = FND_API.G_MISS_CHAR THEN
291
292 g_PRICE_LIST_rec.description := Get_Description;
293
294 IF g_PRICE_LIST_rec.description IS NOT NULL THEN
295
296 IF OE_Validate_Attr.Description(g_PRICE_LIST_rec.description)
297 THEN
298 OE_Price_List_Util.Clear_Dependent_Attr
299 ( p_attr_id => OE_Price_List_Util.G_DESCRIPTION
300 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
301 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
302 );
303 ELSE
304 g_PRICE_LIST_rec.description := NULL;
305 END IF;
306
307 END IF;
308
309 END IF;
310
311 IF g_PRICE_LIST_rec.end_date_active = FND_API.G_MISS_DATE THEN
312
313 g_PRICE_LIST_rec.end_date_active := Get_End_Date_Active;
314
315 IF g_PRICE_LIST_rec.end_date_active IS NOT NULL THEN
316
317 IF OE_Validate_Attr.End_Date_Active(g_PRICE_LIST_rec.end_date_active)
318 THEN
319 OE_Price_List_Util.Clear_Dependent_Attr
320 ( p_attr_id => OE_Price_List_Util.G_END_DATE_ACTIVE
321 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
322 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
323 );
324 ELSE
325 g_PRICE_LIST_rec.end_date_active := NULL;
326 END IF;
327
328 END IF;
329
330 END IF;
331
332 IF g_PRICE_LIST_rec.freight_terms_code = FND_API.G_MISS_CHAR THEN
333
334 g_PRICE_LIST_rec.freight_terms_code := Get_Freight_Terms;
335
336 IF g_PRICE_LIST_rec.freight_terms_code IS NOT NULL THEN
337
338 IF OE_Validate_Attr.Freight_Terms(g_PRICE_LIST_rec.freight_terms_code)
339 THEN
340 OE_Price_List_Util.Clear_Dependent_Attr
341 ( p_attr_id => OE_Price_List_Util.G_FREIGHT_TERMS
342 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
343 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
344 );
345 ELSE
346 g_PRICE_LIST_rec.freight_terms_code := NULL;
347 END IF;
348
349 END IF;
350
351 END IF;
352
353 IF g_PRICE_LIST_rec.name = FND_API.G_MISS_CHAR THEN
354
355 g_PRICE_LIST_rec.name := Get_Name;
356
357 IF g_PRICE_LIST_rec.name IS NOT NULL THEN
358
359 IF OE_Validate_Attr.Name(g_PRICE_LIST_rec.name)
360 THEN
361 OE_Price_List_Util.Clear_Dependent_Attr
362 ( p_attr_id => OE_Price_List_Util.G_NAME
363 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
364 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
365 );
366 ELSE
367 g_PRICE_LIST_rec.name := NULL;
368 END IF;
369
370 END IF;
371
372 END IF;
373
374 IF g_PRICE_LIST_rec.price_list_id = FND_API.G_MISS_NUM THEN
375
376 g_PRICE_LIST_rec.price_list_id := Get_Price_List;
377
378 IF g_PRICE_LIST_rec.price_list_id IS NOT NULL THEN
379
380 IF OE_Validate_Attr.Price_List(g_PRICE_LIST_rec.price_list_id)
381 THEN
382 OE_Price_List_Util.Clear_Dependent_Attr
383 ( p_attr_id => OE_Price_List_Util.G_PRICE_LIST
384 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
385 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
386 );
387 ELSE
388 g_PRICE_LIST_rec.price_list_id := NULL;
389 END IF;
390
391 END IF;
392
396
393 END IF;
394
395 IF g_PRICE_LIST_rec.rounding_factor = FND_API.G_MISS_NUM THEN
397 g_PRICE_LIST_rec.rounding_factor := Get_Rounding_Factor;
398
399 IF g_PRICE_LIST_rec.rounding_factor IS NOT NULL THEN
400
401 IF OE_Validate_Attr.Rounding_Factor(g_PRICE_LIST_rec.rounding_factor)
402 THEN
403 OE_Price_List_Util.Clear_Dependent_Attr
404 ( p_attr_id => OE_Price_List_Util.G_ROUNDING_FACTOR
405 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
406 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
407 );
408 ELSE
409 g_PRICE_LIST_rec.rounding_factor := NULL;
410 END IF;
411
412 END IF;
413
414 END IF;
415
416 IF g_PRICE_LIST_rec.secondary_price_list_id = FND_API.G_MISS_NUM THEN
417
418 g_PRICE_LIST_rec.secondary_price_list_id := Get_Secondary_Price_List;
419
420 IF g_PRICE_LIST_rec.secondary_price_list_id IS NOT NULL THEN
421
422 IF OE_Validate_Attr.Secondary_Price_List(g_PRICE_LIST_rec.secondary_price_list_id)
423 THEN
424 OE_Price_List_Util.Clear_Dependent_Attr
425 ( p_attr_id => OE_Price_List_Util.G_SECONDARY_PRICE_LIST
426 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
427 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
428 );
429 ELSE
430 g_PRICE_LIST_rec.secondary_price_list_id := NULL;
431 END IF;
432
433 END IF;
434
435 END IF;
436
437 IF g_PRICE_LIST_rec.ship_method_code = FND_API.G_MISS_CHAR THEN
438
439 g_PRICE_LIST_rec.ship_method_code := Get_Ship_Method;
440
441 IF g_PRICE_LIST_rec.ship_method_code IS NOT NULL THEN
442
443 IF OE_Validate_Attr.Ship_Method(g_PRICE_LIST_rec.ship_method_code)
444 THEN
445 OE_Price_List_Util.Clear_Dependent_Attr
446 ( p_attr_id => OE_Price_List_Util.G_SHIP_METHOD
447 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
448 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
449 );
450 ELSE
451 g_PRICE_LIST_rec.ship_method_code := NULL;
452 END IF;
453
454 END IF;
455
456 END IF;
457
458 IF g_PRICE_LIST_rec.start_date_active = FND_API.G_MISS_DATE THEN
459
460 g_PRICE_LIST_rec.start_date_active := Get_Start_Date_Active;
461
462 IF g_PRICE_LIST_rec.start_date_active IS NOT NULL THEN
463
464 IF OE_Validate_Attr.Start_Date_Active(g_PRICE_LIST_rec.start_date_active)
465 THEN
466 OE_Price_List_Util.Clear_Dependent_Attr
467 ( p_attr_id => OE_Price_List_Util.G_START_DATE_ACTIVE
468 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
469 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
470 );
471 ELSE
472 g_PRICE_LIST_rec.start_date_active := NULL;
473 END IF;
474
475 END IF;
476
477 END IF;
478
479 IF g_PRICE_LIST_rec.terms_id = FND_API.G_MISS_NUM THEN
480
481 g_PRICE_LIST_rec.terms_id := Get_Terms;
482
483 IF g_PRICE_LIST_rec.terms_id IS NOT NULL THEN
484
485 IF OE_Validate_Attr.Terms(g_PRICE_LIST_rec.terms_id)
486 THEN
487 OE_Price_List_Util.Clear_Dependent_Attr
488 ( p_attr_id => OE_Price_List_Util.G_TERMS
489 , p_PRICE_LIST_rec => g_PRICE_LIST_rec
490 , x_PRICE_LIST_rec => g_PRICE_LIST_rec
491 );
492 ELSE
493 g_PRICE_LIST_rec.terms_id := NULL;
494 END IF;
495
496 END IF;
497
498 END IF;
499
500 IF g_PRICE_LIST_rec.attribute1 = FND_API.G_MISS_CHAR
501 OR g_PRICE_LIST_rec.attribute10 = FND_API.G_MISS_CHAR
502 OR g_PRICE_LIST_rec.attribute11 = FND_API.G_MISS_CHAR
503 OR g_PRICE_LIST_rec.attribute12 = FND_API.G_MISS_CHAR
504 OR g_PRICE_LIST_rec.attribute13 = FND_API.G_MISS_CHAR
505 OR g_PRICE_LIST_rec.attribute14 = FND_API.G_MISS_CHAR
506 OR g_PRICE_LIST_rec.attribute15 = FND_API.G_MISS_CHAR
507 OR g_PRICE_LIST_rec.attribute2 = FND_API.G_MISS_CHAR
508 OR g_PRICE_LIST_rec.attribute3 = FND_API.G_MISS_CHAR
509 OR g_PRICE_LIST_rec.attribute4 = FND_API.G_MISS_CHAR
510 OR g_PRICE_LIST_rec.attribute5 = FND_API.G_MISS_CHAR
511 OR g_PRICE_LIST_rec.attribute6 = FND_API.G_MISS_CHAR
512 OR g_PRICE_LIST_rec.attribute7 = FND_API.G_MISS_CHAR
513 OR g_PRICE_LIST_rec.attribute8 = FND_API.G_MISS_CHAR
514 OR g_PRICE_LIST_rec.attribute9 = FND_API.G_MISS_CHAR
515 OR g_PRICE_LIST_rec.context = FND_API.G_MISS_CHAR
516 THEN
517
518 Get_Flex_So_Price_Lists;
519
520 END IF;
521
522 IF g_PRICE_LIST_rec.created_by = FND_API.G_MISS_NUM THEN
523
524 g_PRICE_LIST_rec.created_by := NULL;
525
526 END IF;
527
528 IF g_PRICE_LIST_rec.creation_date = FND_API.G_MISS_DATE THEN
529
530 g_PRICE_LIST_rec.creation_date := NULL;
531
532 END IF;
533
534 IF g_PRICE_LIST_rec.last_updated_by = FND_API.G_MISS_NUM THEN
535
536 g_PRICE_LIST_rec.last_updated_by := NULL;
537
538 END IF;
539
540 IF g_PRICE_LIST_rec.last_update_date = FND_API.G_MISS_DATE THEN
544 END IF;
541
542 g_PRICE_LIST_rec.last_update_date := NULL;
543
545
546 IF g_PRICE_LIST_rec.last_update_login = FND_API.G_MISS_NUM THEN
547
548 g_PRICE_LIST_rec.last_update_login := NULL;
549
550 END IF;
551
552 IF g_PRICE_LIST_rec.program_application_id = FND_API.G_MISS_NUM THEN
553
554 g_PRICE_LIST_rec.program_application_id := NULL;
555
556 END IF;
557
558 IF g_PRICE_LIST_rec.program_id = FND_API.G_MISS_NUM THEN
559
560 g_PRICE_LIST_rec.program_id := NULL;
561
562 END IF;
563
564 IF g_PRICE_LIST_rec.program_update_date = FND_API.G_MISS_DATE THEN
565
566 g_PRICE_LIST_rec.program_update_date := NULL;
567
568 END IF;
569
570 IF g_PRICE_LIST_rec.request_id = FND_API.G_MISS_NUM THEN
571
572 g_PRICE_LIST_rec.request_id := NULL;
573
574 END IF;
575
576 -- Redefault if there are any missing attributes.
577
578 IF g_PRICE_LIST_rec.attribute1 = FND_API.G_MISS_CHAR
579 OR g_PRICE_LIST_rec.attribute10 = FND_API.G_MISS_CHAR
580 OR g_PRICE_LIST_rec.attribute11 = FND_API.G_MISS_CHAR
581 OR g_PRICE_LIST_rec.attribute12 = FND_API.G_MISS_CHAR
582 OR g_PRICE_LIST_rec.attribute13 = FND_API.G_MISS_CHAR
583 OR g_PRICE_LIST_rec.attribute14 = FND_API.G_MISS_CHAR
584 OR g_PRICE_LIST_rec.attribute15 = FND_API.G_MISS_CHAR
585 OR g_PRICE_LIST_rec.attribute2 = FND_API.G_MISS_CHAR
586 OR g_PRICE_LIST_rec.attribute3 = FND_API.G_MISS_CHAR
587 OR g_PRICE_LIST_rec.attribute4 = FND_API.G_MISS_CHAR
588 OR g_PRICE_LIST_rec.attribute5 = FND_API.G_MISS_CHAR
589 OR g_PRICE_LIST_rec.attribute6 = FND_API.G_MISS_CHAR
590 OR g_PRICE_LIST_rec.attribute7 = FND_API.G_MISS_CHAR
591 OR g_PRICE_LIST_rec.attribute8 = FND_API.G_MISS_CHAR
592 OR g_PRICE_LIST_rec.attribute9 = FND_API.G_MISS_CHAR
593 OR g_PRICE_LIST_rec.comments = FND_API.G_MISS_CHAR
594 OR g_PRICE_LIST_rec.context = FND_API.G_MISS_CHAR
595 OR g_PRICE_LIST_rec.created_by = FND_API.G_MISS_NUM
596 OR g_PRICE_LIST_rec.creation_date = FND_API.G_MISS_DATE
597 OR g_PRICE_LIST_rec.currency_code = FND_API.G_MISS_CHAR
598 OR g_PRICE_LIST_rec.description = FND_API.G_MISS_CHAR
599 OR g_PRICE_LIST_rec.end_date_active = FND_API.G_MISS_DATE
600 OR g_PRICE_LIST_rec.freight_terms_code = FND_API.G_MISS_CHAR
601 OR g_PRICE_LIST_rec.last_updated_by = FND_API.G_MISS_NUM
602 OR g_PRICE_LIST_rec.last_update_date = FND_API.G_MISS_DATE
603 OR g_PRICE_LIST_rec.last_update_login = FND_API.G_MISS_NUM
604 OR g_PRICE_LIST_rec.name = FND_API.G_MISS_CHAR
605 OR g_PRICE_LIST_rec.price_list_id = FND_API.G_MISS_NUM
606 OR g_PRICE_LIST_rec.program_application_id = FND_API.G_MISS_NUM
607 OR g_PRICE_LIST_rec.program_id = FND_API.G_MISS_NUM
608 OR g_PRICE_LIST_rec.program_update_date = FND_API.G_MISS_DATE
609 OR g_PRICE_LIST_rec.request_id = FND_API.G_MISS_NUM
610 OR g_PRICE_LIST_rec.rounding_factor = FND_API.G_MISS_NUM
611 OR g_PRICE_LIST_rec.secondary_price_list_id = FND_API.G_MISS_NUM
612 OR g_PRICE_LIST_rec.ship_method_code = FND_API.G_MISS_CHAR
613 OR g_PRICE_LIST_rec.start_date_active = FND_API.G_MISS_DATE
614 OR g_PRICE_LIST_rec.terms_id = FND_API.G_MISS_NUM
615 THEN
616
617 OE_Default_Price_List.Attributes
618 ( p_PRICE_LIST_rec => g_PRICE_LIST_rec
619 , p_iteration => p_iteration + 1
620 , x_PRICE_LIST_rec => x_PRICE_LIST_rec
621 );
622
623 ELSE
624
625 -- Done defaulting attributes
626
627 x_PRICE_LIST_rec := g_PRICE_LIST_rec;
628
629 END IF;
630
631 END Attributes;
632
633 END OE_Default_Price_List;