DBA Data[Home] [Help]

PACKAGE BODY: APPS.OE_OE_FORM_HEADER_PATTR

Source


1 PACKAGE BODY OE_OE_Form_Header_PAttr AS
2 /* $Header: OEXFHPAB.pls 120.0 2005/06/01 02:24:15 appldev noship $ */
3 
4 
5 G_PKG_NAME              CONSTANT VARCHAR2(30) := 'OE_OE_Form_Header_PAttr';
6 
7 g_Header_Price_Att_rec		OE_Order_PUB.Header_Price_Att_Rec_Type
8                                 := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_REC;
9 g_db_Header_Price_Att_rec 	OE_Order_PUB.Header_Price_Att_Rec_Type
10                                 := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_REC;
11 
12 
13 /* Get Header Pricing Attr */
14 PROCEDURE Write_Order_Header_PAttr
15 (	p_Header_Price_Att_rec	IN OE_Order_PUB.Header_Price_Att_Rec_Type
16 ,	p_db_record			IN BOOLEAN := FALSE
17 );
18 
19 PROCEDURE Get_Order_Header_PAttr
20 (
21 	p_db_record	IN	BOOLEAN := FALSE
22 , 	p_order_price_attrib_id	IN 	NUMBER
23 ,    x_Header_Price_Att_rec IN OUT NOCOPY OE_Order_PUB.Header_Price_Att_Rec_Type
24 );
25 
26 PROCEDURE Clear_Order_Header_Attr;
27 
28 
29 PROCEDURE Default_Attributes
30 ( x_return_status OUT NOCOPY VARCHAR2
31 
32 , x_msg_count OUT NOCOPY NUMBER
33 
34 , x_msg_data OUT NOCOPY VARCHAR2
35 
36 ,   p_header_id				 in  NUMBER
37 ,   p_line_id					 in  NUMBER
38 , x_attribute1 OUT NOCOPY VARCHAR2
39 
40 , x_attribute10 OUT NOCOPY VARCHAR2
41 
42 , x_attribute11 OUT NOCOPY VARCHAR2
43 
44 , x_attribute12 OUT NOCOPY VARCHAR2
45 
46 , x_attribute13 OUT NOCOPY VARCHAR2
47 
48 , x_attribute14 OUT NOCOPY VARCHAR2
49 
50 , x_attribute15 OUT NOCOPY VARCHAR2
51 
52 , x_attribute2 OUT NOCOPY VARCHAR2
53 
54 , x_attribute3 OUT NOCOPY VARCHAR2
55 
56 , x_attribute4 OUT NOCOPY VARCHAR2
57 
58 , x_attribute5 OUT NOCOPY VARCHAR2
59 
60 , x_attribute6 OUT NOCOPY VARCHAR2
61 
62 , x_attribute7 OUT NOCOPY VARCHAR2
63 
64 , x_attribute8 OUT NOCOPY VARCHAR2
65 
66 , x_attribute9 OUT NOCOPY VARCHAR2
67 
68 , x_flex_title OUT NOCOPY VARCHAR2
69 
70 , x_context OUT NOCOPY VARCHAR2
71 
72 , x_header_id OUT NOCOPY NUMBER
73 
74 , x_line_id OUT NOCOPY NUMBER
75 
76 , x_order_price_attrib_id OUT NOCOPY NUMBER
77 
78 , x_pricing_attribute1 OUT NOCOPY VARCHAR2
79 
80 , x_pricing_attribute10 OUT NOCOPY VARCHAR2
81 
82 , x_pricing_attribute11 OUT NOCOPY VARCHAR2
83 
84 , x_pricing_attribute12 OUT NOCOPY VARCHAR2
85 
86 , x_pricing_attribute13 OUT NOCOPY VARCHAR2
87 
88 , x_pricing_attribute14 OUT NOCOPY VARCHAR2
89 
90 , x_pricing_attribute15 OUT NOCOPY VARCHAR2
91 
92 , x_pricing_attribute2 OUT NOCOPY VARCHAR2
93 
94 , x_pricing_attribute3 OUT NOCOPY VARCHAR2
95 
96 , x_pricing_attribute4 OUT NOCOPY VARCHAR2
97 
98 , x_pricing_attribute5 OUT NOCOPY VARCHAR2
99 
100 , x_pricing_attribute6 OUT NOCOPY VARCHAR2
101 
102 , x_pricing_attribute7 OUT NOCOPY VARCHAR2
103 
104 , x_pricing_attribute8 OUT NOCOPY VARCHAR2
105 
106 , x_pricing_attribute9 OUT NOCOPY VARCHAR2
107 
108 , x_pricing_attribute16 OUT NOCOPY VARCHAR2
109 
110 , x_pricing_attribute17 OUT NOCOPY VARCHAR2
111 
112 , x_pricing_attribute18 OUT NOCOPY VARCHAR2
113 
114 , x_pricing_attribute19 OUT NOCOPY VARCHAR2
115 
116 , x_pricing_attribute20 OUT NOCOPY VARCHAR2
117 
118 , x_pricing_attribute21 OUT NOCOPY VARCHAR2
119 
120 , x_pricing_attribute22 OUT NOCOPY VARCHAR2
121 
122 , x_pricing_attribute23 OUT NOCOPY VARCHAR2
123 
124 , x_pricing_attribute24 OUT NOCOPY VARCHAR2
125 
126 , x_pricing_attribute25 OUT NOCOPY VARCHAR2
127 
128 , x_pricing_attribute26 OUT NOCOPY VARCHAR2
129 
130 , x_pricing_attribute27 OUT NOCOPY VARCHAR2
131 
132 , x_pricing_attribute28 OUT NOCOPY VARCHAR2
133 
134 , x_pricing_attribute29 OUT NOCOPY VARCHAR2
135 
136 , x_pricing_attribute30 OUT NOCOPY VARCHAR2
137 
138 , x_pricing_attribute31 OUT NOCOPY VARCHAR2
139 
140 , x_pricing_attribute32 OUT NOCOPY VARCHAR2
141 
142 , x_pricing_attribute33 OUT NOCOPY VARCHAR2
143 
144 , x_pricing_attribute34 OUT NOCOPY VARCHAR2
145 
146 , x_pricing_attribute35 OUT NOCOPY VARCHAR2
147 
148 , x_pricing_attribute36 OUT NOCOPY VARCHAR2
149 
150 , x_pricing_attribute37 OUT NOCOPY VARCHAR2
151 
152 , x_pricing_attribute38 OUT NOCOPY VARCHAR2
153 
154 , x_pricing_attribute39 OUT NOCOPY VARCHAR2
155 
156 , x_pricing_attribute40 OUT NOCOPY VARCHAR2
157 
158 , x_pricing_attribute41 OUT NOCOPY VARCHAR2
159 
160 , x_pricing_attribute42 OUT NOCOPY VARCHAR2
161 
162 , x_pricing_attribute43 OUT NOCOPY VARCHAR2
163 
164 , x_pricing_attribute44 OUT NOCOPY VARCHAR2
165 
166 , x_pricing_attribute45 OUT NOCOPY VARCHAR2
167 
168 , x_pricing_attribute46 OUT NOCOPY VARCHAR2
169 
170 , x_pricing_attribute47 OUT NOCOPY VARCHAR2
171 
172 , x_pricing_attribute48 OUT NOCOPY VARCHAR2
173 
174 , x_pricing_attribute49 OUT NOCOPY VARCHAR2
175 
176 , x_pricing_attribute50 OUT NOCOPY VARCHAR2
177 
178 , x_pricing_attribute51 OUT NOCOPY VARCHAR2
179 
180 , x_pricing_attribute52 OUT NOCOPY VARCHAR2
181 
182 , x_pricing_attribute53 OUT NOCOPY VARCHAR2
183 
184 , x_pricing_attribute54 OUT NOCOPY VARCHAR2
185 
186 , x_pricing_attribute55 OUT NOCOPY VARCHAR2
187 
188 , x_pricing_attribute56 OUT NOCOPY VARCHAR2
189 
190 , x_pricing_attribute57 OUT NOCOPY VARCHAR2
191 
192 , x_pricing_attribute58 OUT NOCOPY VARCHAR2
193 
194 , x_pricing_attribute59 OUT NOCOPY VARCHAR2
195 
196 , x_pricing_attribute60 OUT NOCOPY VARCHAR2
197 
198 , x_pricing_attribute61 OUT NOCOPY VARCHAR2
199 
200 , x_pricing_attribute62 OUT NOCOPY VARCHAR2
201 
202 , x_pricing_attribute63 OUT NOCOPY VARCHAR2
203 
204 , x_pricing_attribute64 OUT NOCOPY VARCHAR2
205 
206 , x_pricing_attribute65 OUT NOCOPY VARCHAR2
207 
208 , x_pricing_attribute66 OUT NOCOPY VARCHAR2
209 
210 , x_pricing_attribute67 OUT NOCOPY VARCHAR2
211 
212 , x_pricing_attribute68 OUT NOCOPY VARCHAR2
213 
214 , x_pricing_attribute69 OUT NOCOPY VARCHAR2
215 
216 , x_pricing_attribute70 OUT NOCOPY VARCHAR2
217 
218 , x_pricing_attribute71 OUT NOCOPY VARCHAR2
219 
220 , x_pricing_attribute72 OUT NOCOPY VARCHAR2
221 
222 , x_pricing_attribute73 OUT NOCOPY VARCHAR2
223 
224 , x_pricing_attribute74 OUT NOCOPY VARCHAR2
225 
226 , x_pricing_attribute75 OUT NOCOPY VARCHAR2
227 
228 , x_pricing_attribute76 OUT NOCOPY VARCHAR2
229 
230 , x_pricing_attribute77 OUT NOCOPY VARCHAR2
231 
232 , x_pricing_attribute78 OUT NOCOPY VARCHAR2
233 
234 , x_pricing_attribute79 OUT NOCOPY VARCHAR2
235 
236 , x_pricing_attribute80 OUT NOCOPY VARCHAR2
237 
238 , x_pricing_attribute81 OUT NOCOPY VARCHAR2
239 
240 , x_pricing_attribute82 OUT NOCOPY VARCHAR2
241 
242 , x_pricing_attribute83 OUT NOCOPY VARCHAR2
243 
244 , x_pricing_attribute84 OUT NOCOPY VARCHAR2
245 
246 , x_pricing_attribute85 OUT NOCOPY VARCHAR2
247 
248 , x_pricing_attribute86 OUT NOCOPY VARCHAR2
249 
250 , x_pricing_attribute87 OUT NOCOPY VARCHAR2
251 
252 , x_pricing_attribute88 OUT NOCOPY VARCHAR2
253 
254 , x_pricing_attribute89 OUT NOCOPY VARCHAR2
255 
256 , x_pricing_attribute90 OUT NOCOPY VARCHAR2
257 
258 , x_pricing_attribute91 OUT NOCOPY VARCHAR2
259 
260 , x_pricing_attribute92 OUT NOCOPY VARCHAR2
261 
262 , x_pricing_attribute93 OUT NOCOPY VARCHAR2
263 
264 , x_pricing_attribute94 OUT NOCOPY VARCHAR2
265 
266 , x_pricing_attribute95 OUT NOCOPY VARCHAR2
267 
268 , x_pricing_attribute96 OUT NOCOPY VARCHAR2
269 
270 , x_pricing_attribute97 OUT NOCOPY VARCHAR2
271 
272 , x_pricing_attribute98 OUT NOCOPY VARCHAR2
273 
274 , x_pricing_attribute99 OUT NOCOPY VARCHAR2
275 
276 , x_pricing_attribute100 OUT NOCOPY VARCHAR2
277 
278 , x_pricing_context OUT NOCOPY VARCHAR2
279 
280 , x_override_flag OUT NOCOPY VARCHAR2
281 
282 , x_creation_date OUT NOCOPY DATE
283 
284 
285 )
286 IS
287 l_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
288 l_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
289 
290 l_control_rec                 OE_GLOBALS.Control_Rec_Type;
291 l_return_status               VARCHAR2(1);
292 l_action_request_tbl          OE_Order_PUB.Request_Tbl_Type;
293 l_x_header_rec                OE_Order_PUB.Header_Rec_Type;
294 l_x_Header_Adj_rec            OE_Order_PUB.Header_Adj_Rec_Type;
295 l_x_Header_Adj_tbl            OE_Order_PUB.Header_Adj_Tbl_Type;
296 l_x_Header_Scredit_rec        OE_Order_PUB.Header_Scredit_Rec_Type;
297 l_x_Header_Scredit_tbl        OE_Order_PUB.Header_Scredit_Tbl_Type;
298 l_x_line_rec                  OE_Order_PUB.Line_Rec_Type;
299 l_x_line_tbl                  OE_Order_PUB.Line_Tbl_Type;
300 l_x_Line_Adj_rec              OE_Order_PUB.Line_Adj_Rec_Type;
301 l_x_Line_Adj_tbl              OE_Order_PUB.Line_Adj_Tbl_Type;
302 l_x_Line_Scredit_rec          OE_Order_PUB.Line_Scredit_Rec_Type;
303 l_x_Line_Scredit_tbl          OE_Order_PUB.Line_Scredit_Tbl_Type;
304 l_x_Lot_Serial_rec            OE_Order_PUB.Lot_Serial_Rec_Type;
305 l_x_Lot_Serial_tbl            OE_Order_PUB.Lot_Serial_Tbl_Type;
306 l_x_Header_Price_Att_tbl      OE_Order_PUB.Header_Price_Att_Tbl_Type;
307 l_x_old_Header_Price_Att_tbl  OE_Order_PUB.Header_Price_Att_Tbl_Type;
308 l_x_Header_Adj_Att_tbl        OE_Order_PUB.Header_Adj_Att_Tbl_Type;
309 l_x_Header_Adj_Assoc_tbl      OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
310 l_x_Line_Price_Att_tbl        OE_Order_PUB.Line_Price_Att_Tbl_Type ;
311 l_x_Header_Price_Att_rec      OE_Order_PUB.Header_Price_Att_Rec_Type ;
312 l_x_old_Header_Price_Att_rec  OE_Order_PUB.Header_Price_Att_Rec_Type ;
313 l_x_Line_Adj_Att_tbl          OE_Order_PUB.Line_Adj_Att_Tbl_Type ;
314 l_x_Line_Adj_Assoc_tbl        OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
315 
316 --
317 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
318 --
319 BEGIN
320 
321 	oe_debug_pub.debug_on;
322 	IF l_debug_level  > 0 THEN
323 	    oe_debug_pub.add(  'ENTERING OE_OE_FORM_HEADER_PATTR.DEFAULT_ATTRIBUTES' , 1 ) ;
324 	END IF;
325     -- Set the UI flag
326     OE_GLOBALS.G_UI_FLAG := TRUE;
327 
328 -- Set Control Flags
329 	l_control_rec.controlled_operation := TRUE;
330 	l_control_rec.check_security       := TRUE;
331 	l_control_rec.default_attributes   := TRUE;
332 	l_control_rec.change_attributes    := TRUE;
333 
334 	l_control_rec.clear_dependents     := FALSE;
335 	l_control_rec.validate_entity      := FALSE;
336 	l_control_rec.write_to_DB          := FALSE;
337 	l_control_rec.process              := FALSE;
338 
339 	--  Instruct API to retain its caches
340 	l_control_rec.clear_api_cache      := FALSE;
341 	l_control_rec.clear_api_requests   := FALSE;
342 -----------------------------------------------
343 -- Set attributes to NULL
344 -----------------------------------------------
345      l_x_old_header_price_att_rec := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_REC;
346      l_x_header_price_att_rec := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_REC;
347 
348 	l_x_Header_Price_Att_rec.header_id := p_header_id;
349 	l_x_Header_Price_Att_rec.line_id := p_Line_id;
350 
351 	l_x_Header_Price_Att_rec.context := NULL;
352 	l_x_Header_Price_Att_rec.attribute1 := NULL;
353 	l_x_Header_Price_Att_rec.attribute2 := NULL;
354 	l_x_Header_Price_Att_rec.attribute3 := NULL;
355 	l_x_Header_Price_Att_rec.attribute4 := NULL;
356 	l_x_Header_Price_Att_rec.attribute5 := NULL;
357 	l_x_Header_Price_Att_rec.attribute6 := NULL;
358 	l_x_Header_Price_Att_rec.attribute7 := NULL;
359 	l_x_Header_Price_Att_rec.attribute8 := NULL;
360 	l_x_Header_Price_Att_rec.attribute9 := NULL;
361 	l_x_Header_Price_Att_rec.attribute10 := NULL;
362 	l_x_Header_Price_Att_rec.attribute11 := NULL;
363 	l_x_Header_Price_Att_rec.attribute12 := NULL;
364 	l_x_Header_Price_Att_rec.attribute13 := NULL;
365 	l_x_Header_Price_Att_rec.attribute14 := NULL;
366 	l_x_Header_Price_Att_rec.attribute15 := NULL;
367 	l_x_Header_Price_Att_rec.pricing_context	:= NULL;
368 	l_x_Header_Price_Att_rec.Pricing_Attribute1 := NULL;
369 	l_x_Header_Price_Att_rec.Pricing_Attribute2 := NULL;
370 	l_x_Header_Price_Att_rec.Pricing_Attribute3 := NULL;
371 	l_x_Header_Price_Att_rec.Pricing_Attribute4 := NULL;
372 	l_x_Header_Price_Att_rec.Pricing_Attribute5 := NULL;
373 	l_x_Header_Price_Att_rec.Pricing_Attribute6 := NULL;
374 	l_x_Header_Price_Att_rec.Pricing_Attribute7 := NULL;
375 	l_x_Header_Price_Att_rec.Pricing_Attribute8 := NULL;
376 	l_x_Header_Price_Att_rec.Pricing_Attribute9 := NULL;
377 	l_x_Header_Price_Att_rec.Pricing_Attribute10 := NULL;
378 	l_x_Header_Price_Att_rec.Pricing_Attribute11 := NULL;
379 	l_x_Header_Price_Att_rec.Pricing_Attribute12 := NULL;
380 	l_x_Header_Price_Att_rec.Pricing_Attribute13 := NULL;
381 	l_x_Header_Price_Att_rec.Pricing_Attribute14 := NULL;
382 	l_x_Header_Price_Att_rec.Pricing_Attribute15 := NULL;
383 	l_x_Header_Price_Att_rec.pricing_attribute16 := NULL;
384 	l_x_Header_Price_Att_rec.pricing_attribute17 := NULL;
385 	l_x_Header_Price_Att_rec.pricing_attribute18 := NULL;
386 	l_x_Header_Price_Att_rec.pricing_attribute19 := NULL;
387 	l_x_Header_Price_Att_rec.pricing_attribute20 := NULL;
388 	l_x_Header_Price_Att_rec.pricing_attribute21 := NULL;
389 	l_x_Header_Price_Att_rec.pricing_attribute22 := NULL;
390 	l_x_Header_Price_Att_rec.pricing_attribute23 := NULL;
391 	l_x_Header_Price_Att_rec.pricing_attribute24 := NULL;
392 	l_x_Header_Price_Att_rec.pricing_attribute25 := NULL;
393 	l_x_Header_Price_Att_rec.pricing_attribute26 := NULL;
394 	l_x_Header_Price_Att_rec.pricing_attribute27 := NULL;
395 	l_x_Header_Price_Att_rec.pricing_attribute28 := NULL;
396 	l_x_Header_Price_Att_rec.pricing_attribute29 := NULL;
397 	l_x_Header_Price_Att_rec.pricing_attribute30 := NULL;
398 	l_x_Header_Price_Att_rec.pricing_attribute31 := NULL;
399 	l_x_Header_Price_Att_rec.pricing_attribute32 := NULL;
400 	l_x_Header_Price_Att_rec.pricing_attribute33 := NULL;
401 	l_x_Header_Price_Att_rec.pricing_attribute34 := NULL;
402 	l_x_Header_Price_Att_rec.pricing_attribute35 := NULL;
403 	l_x_Header_Price_Att_rec.pricing_attribute36 := NULL;
404 	l_x_Header_Price_Att_rec.pricing_attribute37 := NULL;
405 	l_x_Header_Price_Att_rec.pricing_attribute38 := NULL;
406 	l_x_Header_Price_Att_rec.pricing_attribute39 := NULL;
407 	l_x_Header_Price_Att_rec.pricing_attribute40 := NULL;
408 	l_x_Header_Price_Att_rec.pricing_attribute41 := NULL;
409 	l_x_Header_Price_Att_rec.pricing_attribute42 := NULL;
410 	l_x_Header_Price_Att_rec.pricing_attribute43 := NULL;
411 	l_x_Header_Price_Att_rec.pricing_attribute44 := NULL;
412 	l_x_Header_Price_Att_rec.pricing_attribute45 := NULL;
413 	l_x_Header_Price_Att_rec.pricing_attribute46 := NULL;
414 	l_x_Header_Price_Att_rec.pricing_attribute47 := NULL;
415 	l_x_Header_Price_Att_rec.pricing_attribute48 := NULL;
416 	l_x_Header_Price_Att_rec.pricing_attribute49 := NULL;
417 	l_x_Header_Price_Att_rec.pricing_attribute50 := NULL;
418 	l_x_Header_Price_Att_rec.pricing_attribute51 := NULL;
419 	l_x_Header_Price_Att_rec.pricing_attribute52 := NULL;
420 	l_x_Header_Price_Att_rec.pricing_attribute53 := NULL;
421 	l_x_Header_Price_Att_rec.pricing_attribute54 := NULL;
422 	l_x_Header_Price_Att_rec.pricing_attribute55 := NULL;
423 	l_x_Header_Price_Att_rec.pricing_attribute56 := NULL;
424 	l_x_Header_Price_Att_rec.pricing_attribute57 := NULL;
425 	l_x_Header_Price_Att_rec.pricing_attribute58 := NULL;
426 	l_x_Header_Price_Att_rec.pricing_attribute59 := NULL;
427 	l_x_Header_Price_Att_rec.pricing_attribute60 := NULL;
428 	l_x_Header_Price_Att_rec.pricing_attribute61 := NULL;
429 	l_x_Header_Price_Att_rec.pricing_attribute62 := NULL;
430 	l_x_Header_Price_Att_rec.pricing_attribute63 := NULL;
431 	l_x_Header_Price_Att_rec.pricing_attribute64 := NULL;
432 	l_x_Header_Price_Att_rec.pricing_attribute65 := NULL;
433 	l_x_Header_Price_Att_rec.pricing_attribute66 := NULL;
434 	l_x_Header_Price_Att_rec.pricing_attribute67 := NULL;
435 	l_x_Header_Price_Att_rec.pricing_attribute68 := NULL;
436 	l_x_Header_Price_Att_rec.pricing_attribute69 := NULL;
437 	l_x_Header_Price_Att_rec.pricing_attribute70 := NULL;
438 	l_x_Header_Price_Att_rec.pricing_attribute71 := NULL;
439 	l_x_Header_Price_Att_rec.pricing_attribute72 := NULL;
440 	l_x_Header_Price_Att_rec.pricing_attribute73 := NULL;
441 	l_x_Header_Price_Att_rec.pricing_attribute74 := NULL;
442 	l_x_Header_Price_Att_rec.pricing_attribute75 := NULL;
443 	l_x_Header_Price_Att_rec.pricing_attribute76 := NULL;
444 	l_x_Header_Price_Att_rec.pricing_attribute77 := NULL;
445 	l_x_Header_Price_Att_rec.pricing_attribute78 := NULL;
446 	l_x_Header_Price_Att_rec.pricing_attribute79 := NULL;
447 	l_x_Header_Price_Att_rec.pricing_attribute80 := NULL;
448 	l_x_Header_Price_Att_rec.pricing_attribute81 := NULL;
449 	l_x_Header_Price_Att_rec.pricing_attribute82 := NULL;
450 	l_x_Header_Price_Att_rec.pricing_attribute83 := NULL;
451 	l_x_Header_Price_Att_rec.pricing_attribute84 := NULL;
452 	l_x_Header_Price_Att_rec.pricing_attribute85 := NULL;
453 	l_x_Header_Price_Att_rec.pricing_attribute86 := NULL;
454 	l_x_Header_Price_Att_rec.pricing_attribute87 := NULL;
455 	l_x_Header_Price_Att_rec.pricing_attribute88 := NULL;
456 	l_x_Header_Price_Att_rec.pricing_attribute89 := NULL;
457 	l_x_Header_Price_Att_rec.pricing_attribute90 := NULL;
458 	l_x_Header_Price_Att_rec.pricing_attribute91 := NULL;
459 	l_x_Header_Price_Att_rec.pricing_attribute92 := NULL;
460 	l_x_Header_Price_Att_rec.pricing_attribute93 := NULL;
461 	l_x_Header_Price_Att_rec.pricing_attribute94 := NULL;
462 	l_x_Header_Price_Att_rec.pricing_attribute95 := NULL;
463 	l_x_Header_Price_Att_rec.pricing_attribute96 := NULL;
464 	l_x_Header_Price_Att_rec.pricing_attribute97 := NULL;
465 	l_x_Header_Price_Att_rec.pricing_attribute98 := NULL;
466 	l_x_Header_Price_Att_rec.pricing_attribute99 := NULL;
467 	l_x_Header_Price_Att_rec.pricing_attribute100 := NULL;
468 	l_x_Header_Price_Att_rec.override_flag := NULL;
469 
470 
471 -- Set Operation to Create
472 	l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_CREATE;
473 
474      l_x_Header_Price_Att_tbl(1) := l_x_Header_Price_Att_rec;
475 
476 
477     -- Call Oe_Order_Adj_Pvt.Header_Price_Atts
478     oe_order_adj_pvt.Header_Price_Atts
479     (	p_init_msg_list	=> FND_API.G_TRUE
480     ,	p_validation_level 	=> FND_API.G_VALID_LEVEL_NONE
481     ,	p_control_rec		=> l_control_rec
482     ,	p_x_header_price_att_tbl	=> l_x_Header_Price_Att_tbl
483     ,	p_x_old_header_price_att_tbl	=> l_x_old_Header_Price_Att_tbl
484     );
485 
486     /************************************************************************
487     -- Call OE_Order_PVT.Process_order
488     OE_Order_PVT.Process_order
489 	   (   p_api_version_number          => 1.0
490 		,   p_init_msg_list               => FND_API.G_TRUE
491 		,   x_return_status               => l_return_status
492 		,   x_msg_count                   => x_msg_count
493 		,   x_msg_data                    => x_msg_data
494 		,   p_control_rec                 => l_control_rec
495 		,   p_Header_price_Att_tbl        => l_Header_Price_Att_tbl
496 
497 		,   x_header_rec                  => l_x_header_rec
498 		,   x_Header_Adj_tbl              => l_x_Header_Adj_tbl
499 		,   x_Header_price_Att_tbl         => l_x_Header_Price_Att_tbl
500 		,   x_Header_Adj_Att_tbl           => l_x_Header_Adj_Att_tbl
501 		,   x_Header_Adj_Assoc_tbl         => l_x_Header_Adj_Assoc_tbl
502 		,   x_Header_Scredit_tbl          => l_x_Header_Scredit_tbl
503 		,   x_line_tbl                    => l_x_line_tbl
504 		,   x_Line_Adj_tbl                => l_x_Line_Adj_tbl
505 		,   x_Line_price_Att_tbl          => l_x_Line_Price_Att_tbl
506 		,   x_Line_Adj_Att_tbl            => l_x_Line_Adj_Att_tbl
507 		,   x_Line_Adj_Assoc_tbl          => l_x_Line_Adj_Assoc_tbl
508 		,   x_Line_Scredit_tbl            => l_x_Line_Scredit_tbl
509 		,   x_Lot_Serial_tbl              => l_x_Lot_Serial_tbl
510 		,    x_action_request_tbl           => l_action_request_tbl
511 	  );
512      *******************************************************************/
513 
514      l_x_Header_Price_Att_rec := l_x_Header_Price_Att_tbl(1);
515 
516      IF l_x_header_price_att_rec.return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
517 		  RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
518      ELSIF l_x_header_price_att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
519 		    RAISE FND_API.G_EXC_ERROR;
520 	END IF;
521 
522 
523 -- Load out parameters
524 
525     x_attribute1                := l_x_Header_Price_Att_rec.attribute1;
526     x_attribute10               := l_x_Header_Price_Att_rec.attribute10;
527     x_attribute11               := l_x_Header_Price_Att_rec.attribute11;
528     x_attribute12               := l_x_Header_Price_Att_rec.attribute12;
529     x_attribute13               := l_x_Header_Price_Att_rec.attribute13;
530     x_attribute14               := l_x_Header_Price_Att_rec.attribute14;
531     x_attribute15               := l_x_Header_Price_Att_rec.attribute15;
532     x_attribute2                := l_x_Header_Price_Att_rec.attribute2;
533     x_attribute3                := l_x_Header_Price_Att_rec.attribute3;
534     x_attribute4                := l_x_Header_Price_Att_rec.attribute4;
535     x_attribute5                := l_x_Header_Price_Att_rec.attribute5;
536     x_attribute6                := l_x_Header_Price_Att_rec.attribute6;
537     x_attribute7                := l_x_Header_Price_Att_rec.attribute7;
538     x_attribute8                := l_x_Header_Price_Att_rec.attribute8;
539     x_attribute9                := l_x_Header_Price_Att_rec.attribute9;
540     x_context                   := l_x_Header_Price_Att_rec.context;
541     x_flex_title                := l_x_Header_Price_Att_rec.flex_title;
542     x_header_id                 := l_x_Header_Price_Att_rec.header_id;
543     x_line_id                   := l_x_Header_Price_Att_rec.line_id;
544     x_order_price_attrib_id     := l_x_Header_Price_Att_rec.order_price_attrib_id;
545     x_pricing_attribute1        := l_x_Header_Price_Att_rec.pricing_attribute1;
546     x_pricing_attribute10       := l_x_Header_Price_Att_rec.pricing_attribute10;
547     x_pricing_attribute100      := l_x_Header_Price_Att_rec.pricing_attribute100;
548     x_pricing_attribute11       := l_x_Header_Price_Att_rec.pricing_attribute11;
549     x_pricing_attribute12       := l_x_Header_Price_Att_rec.pricing_attribute12;
550     x_pricing_attribute13       := l_x_Header_Price_Att_rec.pricing_attribute13;
551     x_pricing_attribute14       := l_x_Header_Price_Att_rec.pricing_attribute14;
552     x_pricing_attribute15       := l_x_Header_Price_Att_rec.pricing_attribute15;
553     x_pricing_attribute16       := l_x_Header_Price_Att_rec.pricing_attribute16;
554     x_pricing_attribute17       := l_x_Header_Price_Att_rec.pricing_attribute17;
555     x_pricing_attribute18       := l_x_Header_Price_Att_rec.pricing_attribute18;
556     x_pricing_attribute19       := l_x_Header_Price_Att_rec.pricing_attribute19;
557     x_pricing_attribute2        := l_x_Header_Price_Att_rec.pricing_attribute2;
558     x_pricing_attribute20       := l_x_Header_Price_Att_rec.pricing_attribute20;
559     x_pricing_attribute21       := l_x_Header_Price_Att_rec.pricing_attribute21;
560     x_pricing_attribute22       := l_x_Header_Price_Att_rec.pricing_attribute22;
561     x_pricing_attribute23       := l_x_Header_Price_Att_rec.pricing_attribute23;
562     x_pricing_attribute24       := l_x_Header_Price_Att_rec.pricing_attribute24;
563     x_pricing_attribute25       := l_x_Header_Price_Att_rec.pricing_attribute25;
564     x_pricing_attribute26       := l_x_Header_Price_Att_rec.pricing_attribute26;
565     x_pricing_attribute27       := l_x_Header_Price_Att_rec.pricing_attribute27;
566     x_pricing_attribute28       := l_x_Header_Price_Att_rec.pricing_attribute28;
567     x_pricing_attribute29       := l_x_Header_Price_Att_rec.pricing_attribute29;
568     x_pricing_attribute3        := l_x_Header_Price_Att_rec.pricing_attribute3;
569     x_pricing_attribute30       := l_x_Header_Price_Att_rec.pricing_attribute30;
570     x_pricing_attribute31       := l_x_Header_Price_Att_rec.pricing_attribute31;
571     x_pricing_attribute32       := l_x_Header_Price_Att_rec.pricing_attribute32;
572     x_pricing_attribute33       := l_x_Header_Price_Att_rec.pricing_attribute33;
573     x_pricing_attribute34       := l_x_Header_Price_Att_rec.pricing_attribute34;
574     x_pricing_attribute35       := l_x_Header_Price_Att_rec.pricing_attribute35;
575     x_pricing_attribute36       := l_x_Header_Price_Att_rec.pricing_attribute36;
576     x_pricing_attribute37       := l_x_Header_Price_Att_rec.pricing_attribute37;
577     x_pricing_attribute38       := l_x_Header_Price_Att_rec.pricing_attribute38;
578     x_pricing_attribute39       := l_x_Header_Price_Att_rec.pricing_attribute39;
579     x_pricing_attribute4        := l_x_Header_Price_Att_rec.pricing_attribute4;
580     x_pricing_attribute40       := l_x_Header_Price_Att_rec.pricing_attribute40;
581     x_pricing_attribute41       := l_x_Header_Price_Att_rec.pricing_attribute41;
582     x_pricing_attribute42       := l_x_Header_Price_Att_rec.pricing_attribute42;
583     x_pricing_attribute43       := l_x_Header_Price_Att_rec.pricing_attribute43;
584     x_pricing_attribute44       := l_x_Header_Price_Att_rec.pricing_attribute44;
585     x_pricing_attribute45       := l_x_Header_Price_Att_rec.pricing_attribute45;
586     x_pricing_attribute46       := l_x_Header_Price_Att_rec.pricing_attribute46;
587     x_pricing_attribute47       := l_x_Header_Price_Att_rec.pricing_attribute47;
588     x_pricing_attribute48       := l_x_Header_Price_Att_rec.pricing_attribute48;
589     x_pricing_attribute49       := l_x_Header_Price_Att_rec.pricing_attribute49;
590     x_pricing_attribute5        := l_x_Header_Price_Att_rec.pricing_attribute5;
591     x_pricing_attribute50       := l_x_Header_Price_Att_rec.pricing_attribute50;
592     x_pricing_attribute51       := l_x_Header_Price_Att_rec.pricing_attribute51;
593     x_pricing_attribute52       := l_x_Header_Price_Att_rec.pricing_attribute52;
594     x_pricing_attribute53       := l_x_Header_Price_Att_rec.pricing_attribute53;
595     x_pricing_attribute54       := l_x_Header_Price_Att_rec.pricing_attribute54;
596     x_pricing_attribute55       := l_x_Header_Price_Att_rec.pricing_attribute55;
597     x_pricing_attribute56       := l_x_Header_Price_Att_rec.pricing_attribute56;
598     x_pricing_attribute57       := l_x_Header_Price_Att_rec.pricing_attribute57;
599     x_pricing_attribute58       := l_x_Header_Price_Att_rec.pricing_attribute58;
600     x_pricing_attribute59       := l_x_Header_Price_Att_rec.pricing_attribute59;
601     x_pricing_attribute6        := l_x_Header_Price_Att_rec.pricing_attribute6;
602     x_pricing_attribute60       := l_x_Header_Price_Att_rec.pricing_attribute60;
603     x_pricing_attribute61       := l_x_Header_Price_Att_rec.pricing_attribute61;
604     x_pricing_attribute62       := l_x_Header_Price_Att_rec.pricing_attribute62;
605     x_pricing_attribute63       := l_x_Header_Price_Att_rec.pricing_attribute63;
606     x_pricing_attribute64       := l_x_Header_Price_Att_rec.pricing_attribute64;
607     x_pricing_attribute65       := l_x_Header_Price_Att_rec.pricing_attribute65;
608     x_pricing_attribute66       := l_x_Header_Price_Att_rec.pricing_attribute66;
609     x_pricing_attribute67       := l_x_Header_Price_Att_rec.pricing_attribute67;
610     x_pricing_attribute68       := l_x_Header_Price_Att_rec.pricing_attribute68;
611     x_pricing_attribute69       := l_x_Header_Price_Att_rec.pricing_attribute69;
612     x_pricing_attribute7        := l_x_Header_Price_Att_rec.pricing_attribute7;
613     x_pricing_attribute70       := l_x_Header_Price_Att_rec.pricing_attribute70;
614     x_pricing_attribute71       := l_x_Header_Price_Att_rec.pricing_attribute71;
615     x_pricing_attribute72       := l_x_Header_Price_Att_rec.pricing_attribute72;
616     x_pricing_attribute73       := l_x_Header_Price_Att_rec.pricing_attribute73;
617     x_pricing_attribute74       := l_x_Header_Price_Att_rec.pricing_attribute74;
618     x_pricing_attribute75       := l_x_Header_Price_Att_rec.pricing_attribute75;
619     x_pricing_attribute76       := l_x_Header_Price_Att_rec.pricing_attribute76;
620     x_pricing_attribute77       := l_x_Header_Price_Att_rec.pricing_attribute77;
621     x_pricing_attribute78       := l_x_Header_Price_Att_rec.pricing_attribute78;
622     x_pricing_attribute79       := l_x_Header_Price_Att_rec.pricing_attribute79;
623     x_pricing_attribute8        := l_x_Header_Price_Att_rec.pricing_attribute8;
624     x_pricing_attribute80       := l_x_Header_Price_Att_rec.pricing_attribute80;
625     x_pricing_attribute81       := l_x_Header_Price_Att_rec.pricing_attribute81;
626     x_pricing_attribute82       := l_x_Header_Price_Att_rec.pricing_attribute82;
627     x_pricing_attribute83       := l_x_Header_Price_Att_rec.pricing_attribute83;
628     x_pricing_attribute84       := l_x_Header_Price_Att_rec.pricing_attribute84;
629     x_pricing_attribute85       := l_x_Header_Price_Att_rec.pricing_attribute85;
630     x_pricing_attribute86       := l_x_Header_Price_Att_rec.pricing_attribute86;
631     x_pricing_attribute87       := l_x_Header_Price_Att_rec.pricing_attribute87;
632     x_pricing_attribute88       := l_x_Header_Price_Att_rec.pricing_attribute88;
633     x_pricing_attribute89       := l_x_Header_Price_Att_rec.pricing_attribute89;
634     x_pricing_attribute9        := l_x_Header_Price_Att_rec.pricing_attribute9;
635     x_pricing_attribute90       := l_x_Header_Price_Att_rec.pricing_attribute90;
636     x_pricing_attribute91       := l_x_Header_Price_Att_rec.pricing_attribute91;
637     x_pricing_attribute92       := l_x_Header_Price_Att_rec.pricing_attribute92;
638     x_pricing_attribute93       := l_x_Header_Price_Att_rec.pricing_attribute93;
639     x_pricing_attribute94       := l_x_Header_Price_Att_rec.pricing_attribute94;
640     x_pricing_attribute95       := l_x_Header_Price_Att_rec.pricing_attribute95;
641     x_pricing_attribute96       := l_x_Header_Price_Att_rec.pricing_attribute96;
642     x_pricing_attribute97       := l_x_Header_Price_Att_rec.pricing_attribute97;
643     x_pricing_attribute98       := l_x_Header_Price_Att_rec.pricing_attribute98;
644     x_pricing_attribute99       := l_x_Header_Price_Att_rec.pricing_attribute99;
645     x_pricing_context           := l_x_Header_Price_Att_rec.pricing_context;
646 
647     x_override_flag           := l_x_Header_Price_Att_rec.override_flag;
648 
649 
650 	l_x_Header_Price_Att_rec.db_flag := FND_API.G_FALSE;
651 
652 	IF l_debug_level  > 0 THEN
653 	    oe_debug_pub.add(  'WRITING TO CACHE..'||L_X_HEADER_PRICE_ATT_REC.ORDER_PRICE_ATTRIB_ID , 1 ) ;
654 	END IF;
655 
656 	Write_Order_Header_PAttr (
657 			p_Header_Price_Att_rec => l_x_Header_Price_Att_rec
658 		);
659 
660     -- Re-set the UI flag to FALSE
661     OE_GLOBALS.G_UI_FLAG := FALSE;
662 
663  --  Set return status.
664 	x_return_status := FND_API.G_RET_STS_SUCCESS;
665 
666 
667 	  --  Get message count and data
668 	 OE_MSG_PUB.Count_And_Get
669 	 (   	p_count                       => x_msg_count
670 	    ,    p_data                        => x_msg_data
671 	  );
672 
673 
674 EXCEPTION
675  	WHEN FND_API.G_EXC_ERROR THEN
676 
677 	   OE_GLOBALS.G_UI_FLAG := FALSE;
678 		 x_return_status := FND_API.G_RET_STS_ERROR;
679 
680 	    --  Get message count and data
681 
682 			  OE_MSG_PUB.Count_And_Get
683 			(   p_count                       => x_msg_count
684 			   ,   p_data                        => x_msg_data
685 			 );
686 
687  	WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
688 
689 	   OE_GLOBALS.G_UI_FLAG := FALSE;
690 
691         x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
692 
693 		 --  Get message count and data
694 
695 		    OE_MSG_PUB.Count_And_Get
696 		  (   p_count                       => x_msg_count
697 		,   p_data                        => x_msg_data
698 		   );
699 
700 	 WHEN OTHERS THEN
701 
702 	   OE_GLOBALS.G_UI_FLAG := FALSE;
703 
704        x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
705 
706 	  IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
707 	  THEN
708 	 	   OE_MSG_PUB.Add_Exc_Msg
709 		    (   G_PKG_NAME
710 			 ,   'Default_Attributes'
711 		   );
712 	  END IF;
713 
714 
715 
716        --  Get message count and data
717 
718 	OE_MSG_PUB.Count_And_Get
719 	(   p_count                       => x_msg_count
720 	,   	p_data                        => x_msg_data
721 	);
722 
723 END Default_Attributes;
724 
725 
726 PROCEDURE Change_Attributes
727 ( x_return_status OUT NOCOPY VARCHAR2
728 
729 , x_msg_count OUT NOCOPY NUMBER
730 
731 , x_msg_data OUT NOCOPY VARCHAR2
732 
733 ,    p_order_price_attrib_id		 IN NUMBER
734 ,    p_attr_id					 IN NUMBER
735 ,	p_context					 IN VARCHAR2
736 ,    p_attr_value				 IN VARCHAR2
737 ,	p_attribute1				 IN VARCHAR2
738 ,	p_attribute2				 IN VARCHAR2
739 ,	p_attribute3				 IN VARCHAR2
740 ,	p_attribute4				 IN VARCHAR2
741 ,	p_attribute5				 IN VARCHAR2
742 ,	p_attribute6				 IN VARCHAR2
743 ,	p_attribute7				 IN VARCHAR2
744 ,	p_attribute8				 IN VARCHAR2
745 ,	p_attribute9				 IN VARCHAR2
746 ,	p_attribute10				 IN VARCHAR2
747 ,	p_attribute11				 IN VARCHAR2
748 ,	p_attribute12				 IN VARCHAR2
749 ,	p_attribute13				 IN VARCHAR2
750 ,	p_attribute14				 IN VARCHAR2
751 ,	p_attribute15				 IN VARCHAR2
752 ,   p_pricing_attribute1            IN VARCHAR2
753 ,   p_pricing_attribute10           IN VARCHAR2
754 ,   p_pricing_attribute11           IN VARCHAR2
755 ,   p_pricing_attribute12           IN VARCHAR2
756 ,   p_pricing_attribute13           IN VARCHAR2
757 ,   p_pricing_attribute14           IN VARCHAR2
758 ,   p_pricing_attribute15           IN VARCHAR2
759 ,   p_pricing_attribute2            IN VARCHAR2
760 ,   p_pricing_attribute3            IN VARCHAR2
761 ,   p_pricing_attribute4            IN VARCHAR2
762 ,   p_pricing_attribute5            IN VARCHAR2
763 ,   p_pricing_attribute6            IN VARCHAR2
764 ,   p_pricing_attribute7            IN VARCHAR2
765 ,   p_pricing_attribute8            IN VARCHAR2
766 ,   p_pricing_attribute9            IN VARCHAR2
767 ,   p_pricing_attribute16           IN VARCHAR2
768 ,   p_pricing_attribute17           IN VARCHAR2
769 ,   p_pricing_attribute18           IN VARCHAR2
770 ,   p_pricing_attribute19           IN VARCHAR2
771 ,   p_pricing_attribute20           IN VARCHAR2
772 ,   p_pricing_attribute21           IN VARCHAR2
773 ,   p_pricing_attribute22           IN VARCHAR2
774 ,   p_pricing_attribute23           IN VARCHAR2
775 ,   p_pricing_attribute24           IN VARCHAR2
776 ,   p_pricing_attribute25           IN VARCHAR2
777 ,   p_pricing_attribute26           IN VARCHAR2
778 ,   p_pricing_attribute27           IN VARCHAR2
779 ,   p_pricing_attribute28           IN VARCHAR2
780 ,   p_pricing_attribute29           IN VARCHAR2
781 ,   p_pricing_attribute30           IN VARCHAR2
782 ,   p_pricing_attribute31           IN VARCHAR2
783 ,   p_pricing_attribute32           IN VARCHAR2
784 ,   p_pricing_attribute33           IN VARCHAR2
785 ,   p_pricing_attribute34           IN VARCHAR2
786 ,   p_pricing_attribute35           IN VARCHAR2
787 ,   p_pricing_attribute36           IN VARCHAR2
788 ,   p_pricing_attribute37           IN VARCHAR2
789 ,   p_pricing_attribute38           IN VARCHAR2
790 ,   p_pricing_attribute39           IN VARCHAR2
791 ,   p_pricing_attribute40           IN VARCHAR2
792 ,   p_pricing_attribute41           IN VARCHAR2
793 ,   p_pricing_attribute42           IN VARCHAR2
794 ,   p_pricing_attribute43           IN VARCHAR2
795 ,   p_pricing_attribute44           IN VARCHAR2
796 ,   p_pricing_attribute45           IN VARCHAR2
797 ,   p_pricing_attribute46           IN VARCHAR2
798 ,   p_pricing_attribute47           IN VARCHAR2
799 ,   p_pricing_attribute48           IN VARCHAR2
800 ,   p_pricing_attribute49           IN VARCHAR2
801 ,   p_pricing_attribute50           IN VARCHAR2
802 ,   p_pricing_attribute51           IN VARCHAR2
803 ,   p_pricing_attribute52           IN VARCHAR2
804 ,   p_pricing_attribute53           IN VARCHAR2
805 ,   p_pricing_attribute54           IN VARCHAR2
806 ,   p_pricing_attribute55           IN VARCHAR2
807 ,   p_pricing_attribute56           IN VARCHAR2
808 ,   p_pricing_attribute57           IN VARCHAR2
809 ,   p_pricing_attribute58           IN VARCHAR2
810 ,   p_pricing_attribute59           IN VARCHAR2
811 ,   p_pricing_attribute60           IN VARCHAR2
812 ,   p_pricing_attribute61           IN VARCHAR2
813 ,   p_pricing_attribute62           IN VARCHAR2
814 ,   p_pricing_attribute63           IN VARCHAR2
815 ,   p_pricing_attribute64           IN VARCHAR2
816 ,   p_pricing_attribute65           IN VARCHAR2
817 ,   p_pricing_attribute66           IN VARCHAR2
818 ,   p_pricing_attribute67           IN VARCHAR2
819 ,   p_pricing_attribute68           IN VARCHAR2
820 ,   p_pricing_attribute69           IN VARCHAR2
821 ,   p_pricing_attribute70           IN VARCHAR2
822 ,   p_pricing_attribute71           IN VARCHAR2
823 ,   p_pricing_attribute72           IN VARCHAR2
824 ,   p_pricing_attribute73           IN VARCHAR2
825 ,   p_pricing_attribute74           IN VARCHAR2
826 ,   p_pricing_attribute75           IN VARCHAR2
827 ,   p_pricing_attribute76           IN VARCHAR2
828 ,   p_pricing_attribute77           IN VARCHAR2
829 ,   p_pricing_attribute78           IN VARCHAR2
830 ,   p_pricing_attribute79           IN VARCHAR2
831 ,   p_pricing_attribute80           IN VARCHAR2
832 ,   p_pricing_attribute81           IN VARCHAR2
833 ,   p_pricing_attribute82           IN VARCHAR2
834 ,   p_pricing_attribute83           IN VARCHAR2
835 ,   p_pricing_attribute84           IN VARCHAR2
836 ,   p_pricing_attribute85           IN VARCHAR2
837 ,   p_pricing_attribute86           IN VARCHAR2
838 ,   p_pricing_attribute87           IN VARCHAR2
839 ,   p_pricing_attribute88           IN VARCHAR2
840 ,   p_pricing_attribute89           IN VARCHAR2
841 ,   p_pricing_attribute90           IN VARCHAR2
842 ,   p_pricing_attribute91           IN VARCHAR2
843 ,   p_pricing_attribute92           IN VARCHAR2
844 ,   p_pricing_attribute93           IN VARCHAR2
845 ,   p_pricing_attribute94           IN VARCHAR2
846 ,   p_pricing_attribute95           IN VARCHAR2
847 ,   p_pricing_attribute96           IN VARCHAR2
848 ,   p_pricing_attribute97           IN VARCHAR2
849 ,   p_pricing_attribute98           IN VARCHAR2
850 ,   p_pricing_attribute99           IN VARCHAR2
851 ,   p_pricing_attribute100          IN VARCHAR2
852 ,   p_pricing_context               IN VARCHAR2
853 ,   p_flex_title				 IN VARCHAR2
854 , x_flex_title OUT NOCOPY VARCHAR2
855 
856 , x_order_price_attrib_id OUT NOCOPY NUMBER
857 
858 , x_header_id OUT NOCOPY NUMBER
859 
860 , x_line_id OUT NOCOPY NUMBER
861 
862 , x_context OUT NOCOPY VARCHAR2
863 
864 , x_attribute1 OUT NOCOPY VARCHAR2
865 
866 , x_attribute2 OUT NOCOPY VARCHAR2
867 
868 , x_attribute3 OUT NOCOPY VARCHAR2
869 
870 , x_attribute4 OUT NOCOPY VARCHAR2
871 
872 , x_attribute5 OUT NOCOPY VARCHAR2
873 
874 , x_attribute6 OUT NOCOPY VARCHAR2
875 
876 , x_attribute7 OUT NOCOPY VARCHAR2
877 
878 , x_attribute8 OUT NOCOPY VARCHAR2
879 
880 , x_attribute9 OUT NOCOPY VARCHAR2
881 
882 , x_attribute10 OUT NOCOPY VARCHAR2
883 
884 , x_attribute11 OUT NOCOPY VARCHAR2
885 
886 , x_attribute12 OUT NOCOPY VARCHAR2
887 
888 , x_attribute13 OUT NOCOPY VARCHAR2
889 
890 , x_attribute14 OUT NOCOPY VARCHAR2
891 
892 , x_attribute15 OUT NOCOPY VARCHAR2
893 
894 , x_pricing_attribute1 OUT NOCOPY VARCHAR2
895 
896 , x_pricing_attribute10 OUT NOCOPY VARCHAR2
897 
898 , x_pricing_attribute11 OUT NOCOPY VARCHAR2
899 
900 , x_pricing_attribute12 OUT NOCOPY VARCHAR2
901 
902 , x_pricing_attribute13 OUT NOCOPY VARCHAR2
903 
904 , x_pricing_attribute14 OUT NOCOPY VARCHAR2
905 
906 , x_pricing_attribute15 OUT NOCOPY VARCHAR2
907 
908 , x_pricing_attribute2 OUT NOCOPY VARCHAR2
909 
910 , x_pricing_attribute3 OUT NOCOPY VARCHAR2
911 
912 , x_pricing_attribute4 OUT NOCOPY VARCHAR2
913 
914 , x_pricing_attribute5 OUT NOCOPY VARCHAR2
915 
916 , x_pricing_attribute6 OUT NOCOPY VARCHAR2
917 
918 , x_pricing_attribute7 OUT NOCOPY VARCHAR2
919 
920 , x_pricing_attribute8 OUT NOCOPY VARCHAR2
921 
922 , x_pricing_attribute9 OUT NOCOPY VARCHAR2
923 
924 , x_pricing_attribute16 OUT NOCOPY VARCHAR2
925 
926 , x_pricing_attribute17 OUT NOCOPY VARCHAR2
927 
928 , x_pricing_attribute18 OUT NOCOPY VARCHAR2
929 
930 , x_pricing_attribute19 OUT NOCOPY VARCHAR2
931 
932 , x_pricing_attribute20 OUT NOCOPY VARCHAR2
933 
934 , x_pricing_attribute21 OUT NOCOPY VARCHAR2
935 
936 , x_pricing_attribute22 OUT NOCOPY VARCHAR2
937 
938 , x_pricing_attribute23 OUT NOCOPY VARCHAR2
939 
940 , x_pricing_attribute24 OUT NOCOPY VARCHAR2
941 
942 , x_pricing_attribute25 OUT NOCOPY VARCHAR2
943 
944 , x_pricing_attribute26 OUT NOCOPY VARCHAR2
945 
946 , x_pricing_attribute27 OUT NOCOPY VARCHAR2
947 
948 , x_pricing_attribute28 OUT NOCOPY VARCHAR2
949 
950 , x_pricing_attribute29 OUT NOCOPY VARCHAR2
951 
952 , x_pricing_attribute30 OUT NOCOPY VARCHAR2
953 
954 , x_pricing_attribute31 OUT NOCOPY VARCHAR2
955 
956 , x_pricing_attribute32 OUT NOCOPY VARCHAR2
957 
958 , x_pricing_attribute33 OUT NOCOPY VARCHAR2
959 
960 , x_pricing_attribute34 OUT NOCOPY VARCHAR2
961 
962 , x_pricing_attribute35 OUT NOCOPY VARCHAR2
963 
964 , x_pricing_attribute36 OUT NOCOPY VARCHAR2
965 
966 , x_pricing_attribute37 OUT NOCOPY VARCHAR2
967 
968 , x_pricing_attribute38 OUT NOCOPY VARCHAR2
969 
970 , x_pricing_attribute39 OUT NOCOPY VARCHAR2
971 
972 , x_pricing_attribute40 OUT NOCOPY VARCHAR2
973 
974 , x_pricing_attribute41 OUT NOCOPY VARCHAR2
975 
976 , x_pricing_attribute42 OUT NOCOPY VARCHAR2
977 
978 , x_pricing_attribute43 OUT NOCOPY VARCHAR2
979 
980 , x_pricing_attribute44 OUT NOCOPY VARCHAR2
981 
982 , x_pricing_attribute45 OUT NOCOPY VARCHAR2
983 
984 , x_pricing_attribute46 OUT NOCOPY VARCHAR2
985 
986 , x_pricing_attribute47 OUT NOCOPY VARCHAR2
987 
988 , x_pricing_attribute48 OUT NOCOPY VARCHAR2
989 
990 , x_pricing_attribute49 OUT NOCOPY VARCHAR2
991 
992 , x_pricing_attribute50 OUT NOCOPY VARCHAR2
993 
994 , x_pricing_attribute51 OUT NOCOPY VARCHAR2
995 
996 , x_pricing_attribute52 OUT NOCOPY VARCHAR2
997 
998 , x_pricing_attribute53 OUT NOCOPY VARCHAR2
999 
1000 , x_pricing_attribute54 OUT NOCOPY VARCHAR2
1001 
1002 , x_pricing_attribute55 OUT NOCOPY VARCHAR2
1003 
1004 , x_pricing_attribute56 OUT NOCOPY VARCHAR2
1005 
1006 , x_pricing_attribute57 OUT NOCOPY VARCHAR2
1007 
1008 , x_pricing_attribute58 OUT NOCOPY VARCHAR2
1009 
1010 , x_pricing_attribute59 OUT NOCOPY VARCHAR2
1011 
1012 , x_pricing_attribute60 OUT NOCOPY VARCHAR2
1013 
1014 , x_pricing_attribute61 OUT NOCOPY VARCHAR2
1015 
1016 , x_pricing_attribute62 OUT NOCOPY VARCHAR2
1017 
1018 , x_pricing_attribute63 OUT NOCOPY VARCHAR2
1019 
1020 , x_pricing_attribute64 OUT NOCOPY VARCHAR2
1021 
1022 , x_pricing_attribute65 OUT NOCOPY VARCHAR2
1023 
1024 , x_pricing_attribute66 OUT NOCOPY VARCHAR2
1025 
1026 , x_pricing_attribute67 OUT NOCOPY VARCHAR2
1027 
1028 , x_pricing_attribute68 OUT NOCOPY VARCHAR2
1029 
1030 , x_pricing_attribute69 OUT NOCOPY VARCHAR2
1031 
1032 , x_pricing_attribute70 OUT NOCOPY VARCHAR2
1033 
1034 , x_pricing_attribute71 OUT NOCOPY VARCHAR2
1035 
1036 , x_pricing_attribute72 OUT NOCOPY VARCHAR2
1037 
1038 , x_pricing_attribute73 OUT NOCOPY VARCHAR2
1039 
1040 , x_pricing_attribute74 OUT NOCOPY VARCHAR2
1041 
1042 , x_pricing_attribute75 OUT NOCOPY VARCHAR2
1043 
1044 , x_pricing_attribute76 OUT NOCOPY VARCHAR2
1045 
1046 , x_pricing_attribute77 OUT NOCOPY VARCHAR2
1047 
1048 , x_pricing_attribute78 OUT NOCOPY VARCHAR2
1049 
1050 , x_pricing_attribute79 OUT NOCOPY VARCHAR2
1051 
1052 , x_pricing_attribute80 OUT NOCOPY VARCHAR2
1053 
1054 , x_pricing_attribute81 OUT NOCOPY VARCHAR2
1055 
1056 , x_pricing_attribute82 OUT NOCOPY VARCHAR2
1057 
1058 , x_pricing_attribute83 OUT NOCOPY VARCHAR2
1059 
1060 , x_pricing_attribute84 OUT NOCOPY VARCHAR2
1061 
1062 , x_pricing_attribute85 OUT NOCOPY VARCHAR2
1063 
1064 , x_pricing_attribute86 OUT NOCOPY VARCHAR2
1065 
1066 , x_pricing_attribute87 OUT NOCOPY VARCHAR2
1067 
1068 , x_pricing_attribute88 OUT NOCOPY VARCHAR2
1069 
1070 , x_pricing_attribute89 OUT NOCOPY VARCHAR2
1071 
1072 , x_pricing_attribute90 OUT NOCOPY VARCHAR2
1073 
1074 , x_pricing_attribute91 OUT NOCOPY VARCHAR2
1075 
1076 , x_pricing_attribute92 OUT NOCOPY VARCHAR2
1077 
1078 , x_pricing_attribute93 OUT NOCOPY VARCHAR2
1079 
1080 , x_pricing_attribute94 OUT NOCOPY VARCHAR2
1081 
1082 , x_pricing_attribute95 OUT NOCOPY VARCHAR2
1083 
1084 , x_pricing_attribute96 OUT NOCOPY VARCHAR2
1085 
1086 , x_pricing_attribute97 OUT NOCOPY VARCHAR2
1087 
1088 , x_pricing_attribute98 OUT NOCOPY VARCHAR2
1089 
1090 , x_pricing_attribute99 OUT NOCOPY VARCHAR2
1091 
1092 , x_pricing_attribute100 OUT NOCOPY VARCHAR2
1093 
1094 , x_pricing_context OUT NOCOPY VARCHAR2
1095 
1096 , x_override_flag OUT NOCOPY VARCHAR2
1097 
1098 
1099 )
1100 IS
1101 
1102 l_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
1103 l_old_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
1104 l_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
1105 l_old_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
1106 
1107 l_control_rec                 OE_GLOBALS.Control_Rec_Type;
1108 l_return_status               VARCHAR2(1);
1109 l_action_request_tbl          OE_Order_PUB.Request_Tbl_Type;
1110 l_x_header_rec                OE_Order_PUB.Header_Rec_Type;
1111 l_x_Header_Adj_rec            OE_Order_PUB.Header_Adj_Rec_Type;
1112 l_x_Header_Adj_tbl            OE_Order_PUB.Header_Adj_Tbl_Type;
1113 l_x_Header_Scredit_rec        OE_Order_PUB.Header_Scredit_Rec_Type;
1114 l_x_Header_Scredit_tbl        OE_Order_PUB.Header_Scredit_Tbl_Type;
1115 l_x_line_rec                  OE_Order_PUB.Line_Rec_Type;
1116 l_x_line_tbl                  OE_Order_PUB.Line_Tbl_Type;
1117 l_x_Line_Adj_rec              OE_Order_PUB.Line_Adj_Rec_Type;
1118 l_x_Line_Adj_tbl              OE_Order_PUB.Line_Adj_Tbl_Type;
1119 l_x_Line_Scredit_rec          OE_Order_PUB.Line_Scredit_Rec_Type;
1120 l_x_Line_Scredit_tbl          OE_Order_PUB.Line_Scredit_Tbl_Type;
1121 l_x_Lot_Serial_rec            OE_Order_PUB.Lot_Serial_Rec_Type;
1122 l_x_Lot_Serial_tbl            OE_Order_PUB.Lot_Serial_Tbl_Type;
1123 l_x_Header_Price_Att_tbl      OE_Order_PUB.Header_Price_Att_Tbl_Type;
1124 l_x_old_Header_Price_Att_tbl  OE_Order_PUB.Header_Price_Att_Tbl_Type;
1125 l_x_Header_Adj_Att_tbl        OE_Order_PUB.Header_Adj_Att_Tbl_Type;
1126 l_x_Header_Adj_Assoc_tbl      OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
1127 l_x_Line_Price_Att_tbl        OE_Order_PUB.Line_Price_Att_Tbl_Type ;
1128 l_x_Header_Price_Att_rec      OE_Order_PUB.Header_Price_Att_Rec_Type ;
1129 l_x_old_Header_Price_Att_rec  OE_Order_PUB.Header_Price_Att_Rec_Type ;
1130 l_x_Line_Adj_Att_tbl          OE_Order_PUB.Line_Adj_Att_Tbl_Type ;
1131 l_x_Line_Adj_Assoc_tbl        OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
1132 
1133 --
1134 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1135 --
1136 BEGIN
1137 	IF l_debug_level  > 0 THEN
1138 	    oe_debug_pub.add(  'ENTERING OE_OE_FORM_HEADER_PATTR.CHANGE_ATTRIBUTES' , 1 ) ;
1139 	END IF;
1140     -- Set the UI flag
1141     OE_GLOBALS.G_UI_FLAG := TRUE;
1142 
1143     --  Set control flags.
1144      l_control_rec.controlled_operation := TRUE;
1145 	l_control_rec.check_security       := TRUE;
1146 	l_control_rec.clear_dependents     := TRUE;
1147 	l_control_rec.default_attributes   := TRUE;
1148 	l_control_rec.change_attributes    := TRUE;
1149 
1150 	l_control_rec.validate_entity      := FALSE;
1151 	l_control_rec.write_to_DB          := FALSE;
1152 	l_control_rec.process              := FALSE;
1153 	l_control_rec.process_entity       := OE_GLOBALS.G_ENTITY_HEADER_PRICE_ATT;
1154 
1155 
1156 		--  Instruct API to retain its caches
1157 		l_control_rec.clear_api_cache      := FALSE;
1158 		l_control_rec.clear_api_requests   := FALSE;
1159 
1160 		SAVEPOINT change_attributes;
1161 
1162 	IF l_debug_level  > 0 THEN
1163 	    oe_debug_pub.add(  'BEFORE GETORDER IN CHANGE_ATTR'||P_ORDER_PRICE_ATTRIB_ID , 1 ) ;
1164 	END IF;
1165 	IF l_debug_level  > 0 THEN
1166 	    oe_debug_pub.add(  'BEFORE GETORDER GLOBAL IS '||G_HEADER_PRICE_ATT_REC.ORDER_PRICE_ATTRIB_ID , 1 ) ;
1167 	END IF;
1168 
1169 			Get_Order_Header_PAttr
1170 			( 	p_db_record  => FALSE
1171 				, p_order_price_attrib_id => p_order_price_attrib_id
1172 				, x_Header_Price_Att_rec  => l_x_Header_Price_Att_rec
1173 			);
1174 
1175 
1176 		l_x_old_Header_Price_Att_rec := l_x_Header_Price_Att_rec;
1177 
1178 
1179 
1180 		   IF p_attr_id = OE_Header_PAttr_Util.G_FLEX_TITLE THEN
1181 			l_x_Header_Price_Att_rec.flex_title := p_attr_value;
1182 	     ELSIF p_attr_id = OE_Header_PAttr_Util.G_HEADER THEN
1183 			l_x_Header_Price_Att_rec.header_id := TO_NUMBER(p_attr_value);
1184 		ELSIF p_attr_id = OE_Header_PAttr_Util.G_LINE THEN
1185 			l_x_Header_Price_Att_rec.line_id := TO_NUMBER(p_attr_value);
1186 		ELSIF p_attr_id = OE_Header_PAttr_Util.G_ORDER_PRICE_ATTRIB THEN
1187 			l_x_Header_Price_Att_rec.order_price_attrib_id := TO_NUMBER(p_attr_value);
1188 
1189 	     ELSIF p_attr_id = OE_Header_PAttr_Util.G_OVERRIDE_FLAG THEN
1190 			l_x_Header_Price_Att_rec.override_flag := p_attr_value;
1191 
1192 	     ELSIF p_attr_id = OE_Header_PAttr_Util.G_CONTEXT
1193 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE1
1194 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE2
1195 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE3
1196 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE4
1197 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE5
1198 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE6
1199 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE7
1200 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE8
1201 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE9
1202 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE10
1203 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE11
1204 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE12
1205 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE13
1206 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE14
1207 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE15
1208 			THEN
1209 				l_x_Header_Price_Att_rec.context       := p_context;
1210 				l_x_Header_Price_Att_rec.attribute1    := p_attribute1;
1211 				l_x_Header_Price_Att_rec.attribute2    := p_attribute2;
1212 				l_x_Header_Price_Att_rec.attribute3    := p_attribute3;
1213 				l_x_Header_Price_Att_rec.attribute4    := p_attribute4;
1214 				l_x_Header_Price_Att_rec.attribute5    := p_attribute5;
1215 				l_x_Header_Price_Att_rec.attribute6    := p_attribute6;
1216 				l_x_Header_Price_Att_rec.attribute7    := p_attribute7;
1217 				l_x_Header_Price_Att_rec.attribute8    := p_attribute8;
1218 				l_x_Header_Price_Att_rec.attribute9    := p_attribute9;
1219 				l_x_Header_Price_Att_rec.attribute10   := p_attribute10;
1220 				l_x_Header_Price_Att_rec.attribute11   := p_attribute11;
1221 				l_x_Header_Price_Att_rec.attribute12   := p_attribute12;
1222 				l_x_Header_Price_Att_rec.attribute13   := p_attribute13;
1223 				l_x_Header_Price_Att_rec.attribute14   := p_attribute14;
1224 				l_x_Header_Price_Att_rec.attribute15   := p_attribute15;
1225 	    ELSIF p_attr_id = OE_Header_PAttr_Util.G_PRICING_CONTEXT
1226 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE1
1227 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE2
1228 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE3
1229 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE4
1230 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE5
1231 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE6
1232 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE7
1233 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE8
1234 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE9
1235 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE10
1236 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE11
1237 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE12
1238 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE13
1239 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE14
1240 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE15
1241 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE16
1242 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE17
1243 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE18
1244 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE19
1245 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE20
1246 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE21
1247 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE22
1248 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE23
1249 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE24
1250 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE25
1251 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE26
1252 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE27
1253 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE28
1254 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE29
1255 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE30
1256 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE31
1257 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE32
1258 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE33
1259 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE34
1260 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE35
1261 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE36
1262 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE37
1263 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE38
1264 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE39
1265 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE40
1266 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE41
1267 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE42
1268 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE43
1269 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE44
1270 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE45
1271 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE46
1272 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE47
1273 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE48
1274 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE49
1275 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE50
1276 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE51
1277 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE52
1278 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE53
1279 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE54
1280 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE55
1281 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE56
1282 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE57
1283 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE58
1284 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE59
1285 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE60
1286 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE61
1287 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE62
1288 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE63
1289 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE64
1290 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE65
1291 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE66
1292 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE67
1293 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE68
1294 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE69
1295 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE70
1296 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE71
1297 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE72
1298 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE73
1299 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE74
1300 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE75
1301 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE76
1302 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE77
1303 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE78
1304 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE79
1305 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE80
1306 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE81
1307 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE82
1308 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE83
1309 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE84
1310 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE85
1311 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE86
1312 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE87
1313 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE88
1314 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE89
1315 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE90
1316 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE91
1317 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE92
1318 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE93
1319 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE94
1320 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE95
1321 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE96
1322 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE97
1323 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE98
1324 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE99
1325 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE100
1326 			THEN
1327 				l_x_Header_Price_Att_rec.flex_title := p_flex_title;
1328 				l_x_Header_Price_Att_rec.pricing_context       := p_pricing_context;
1329 				l_x_Header_Price_Att_rec.pricing_attribute1    := p_pricing_attribute1;
1330 				l_x_Header_Price_Att_rec.pricing_attribute2    := p_pricing_attribute2;
1331 				l_x_Header_Price_Att_rec.pricing_attribute3    := p_pricing_attribute3;
1332 				l_x_Header_Price_Att_rec.pricing_attribute4    := p_pricing_attribute4;
1333 				l_x_Header_Price_Att_rec.pricing_attribute5    := p_pricing_attribute5;
1334 				l_x_Header_Price_Att_rec.pricing_attribute6    := p_pricing_attribute6;
1335 				l_x_Header_Price_Att_rec.pricing_attribute7    := p_pricing_attribute7;
1336 				l_x_Header_Price_Att_rec.pricing_attribute8    := p_pricing_attribute8;
1337 				l_x_Header_Price_Att_rec.pricing_attribute9    := p_pricing_attribute9;
1338 				l_x_Header_Price_Att_rec.pricing_attribute10   := p_pricing_attribute10;
1339 				l_x_Header_Price_Att_rec.pricing_attribute11   := p_pricing_attribute11;
1340 				l_x_Header_Price_Att_rec.pricing_attribute12   := p_pricing_attribute12;
1341 				l_x_Header_Price_Att_rec.pricing_attribute13   := p_pricing_attribute13;
1342 				l_x_Header_Price_Att_rec.pricing_attribute14   := p_pricing_attribute14;
1343 				l_x_Header_Price_Att_rec.pricing_attribute15   := p_pricing_attribute15;
1344 				l_x_Header_Price_Att_rec.pricing_attribute16    := p_pricing_attribute16;
1345 				l_x_Header_Price_Att_rec.pricing_attribute17    := p_pricing_attribute17;
1346 				l_x_Header_Price_Att_rec.pricing_attribute18    := p_pricing_attribute18;
1347 				l_x_Header_Price_Att_rec.pricing_attribute19    := p_pricing_attribute19;
1348 				l_x_Header_Price_Att_rec.pricing_attribute20   := p_pricing_attribute20;
1349 				l_x_Header_Price_Att_rec.pricing_attribute21   := p_pricing_attribute21;
1350 				l_x_Header_Price_Att_rec.pricing_attribute22   := p_pricing_attribute22;
1351 				l_x_Header_Price_Att_rec.pricing_attribute23   := p_pricing_attribute23;
1352 				l_x_Header_Price_Att_rec.pricing_attribute24   := p_pricing_attribute24;
1353 				l_x_Header_Price_Att_rec.pricing_attribute25   := p_pricing_attribute25;
1354 				l_x_Header_Price_Att_rec.pricing_attribute26    := p_pricing_attribute26;
1355 				l_x_Header_Price_Att_rec.pricing_attribute27    := p_pricing_attribute27;
1356 				l_x_Header_Price_Att_rec.pricing_attribute28    := p_pricing_attribute28;
1357 				l_x_Header_Price_Att_rec.pricing_attribute29    := p_pricing_attribute29;
1358 				l_x_Header_Price_Att_rec.pricing_attribute30   := p_pricing_attribute30;
1359 				l_x_Header_Price_Att_rec.pricing_attribute31   := p_pricing_attribute31;
1360 				l_x_Header_Price_Att_rec.pricing_attribute32   := p_pricing_attribute32;
1361 				l_x_Header_Price_Att_rec.pricing_attribute33   := p_pricing_attribute33;
1362 				l_x_Header_Price_Att_rec.pricing_attribute34   := p_pricing_attribute34;
1363 				l_x_Header_Price_Att_rec.pricing_attribute35   := p_pricing_attribute35;
1364 				l_x_Header_Price_Att_rec.pricing_attribute36    := p_pricing_attribute36;
1365 				l_x_Header_Price_Att_rec.pricing_attribute37    := p_pricing_attribute37;
1366 				l_x_Header_Price_Att_rec.pricing_attribute38    := p_pricing_attribute38;
1367 				l_x_Header_Price_Att_rec.pricing_attribute39    := p_pricing_attribute39;
1368 				l_x_Header_Price_Att_rec.pricing_attribute40   := p_pricing_attribute40;
1369 				l_x_Header_Price_Att_rec.pricing_attribute41   := p_pricing_attribute41;
1370 				l_x_Header_Price_Att_rec.pricing_attribute42   := p_pricing_attribute42;
1371 				l_x_Header_Price_Att_rec.pricing_attribute43   := p_pricing_attribute43;
1372 				l_x_Header_Price_Att_rec.pricing_attribute44   := p_pricing_attribute44;
1373 				l_x_Header_Price_Att_rec.pricing_attribute45   := p_pricing_attribute45;
1374 				l_x_Header_Price_Att_rec.pricing_attribute46    := p_pricing_attribute46;
1375 				l_x_Header_Price_Att_rec.pricing_attribute47    := p_pricing_attribute47;
1376 				l_x_Header_Price_Att_rec.pricing_attribute48    := p_pricing_attribute48;
1377 				l_x_Header_Price_Att_rec.pricing_attribute49    := p_pricing_attribute49;
1378 				l_x_Header_Price_Att_rec.pricing_attribute50   := p_pricing_attribute50;
1379 				l_x_Header_Price_Att_rec.pricing_attribute51   := p_pricing_attribute51;
1380 				l_x_Header_Price_Att_rec.pricing_attribute52   := p_pricing_attribute52;
1381 				l_x_Header_Price_Att_rec.pricing_attribute53   := p_pricing_attribute53;
1382 				l_x_Header_Price_Att_rec.pricing_attribute54   := p_pricing_attribute54;
1383 				l_x_Header_Price_Att_rec.pricing_attribute55   := p_pricing_attribute55;
1384 				l_x_Header_Price_Att_rec.pricing_attribute56    := p_pricing_attribute56;
1385 				l_x_Header_Price_Att_rec.pricing_attribute57    := p_pricing_attribute57;
1386 				l_x_Header_Price_Att_rec.pricing_attribute58    := p_pricing_attribute58;
1387 				l_x_Header_Price_Att_rec.pricing_attribute59    := p_pricing_attribute59;
1388 				l_x_Header_Price_Att_rec.pricing_attribute60   := p_pricing_attribute60;
1389 				l_x_Header_Price_Att_rec.pricing_attribute61   := p_pricing_attribute61;
1390 				l_x_Header_Price_Att_rec.pricing_attribute62   := p_pricing_attribute62;
1391 				l_x_Header_Price_Att_rec.pricing_attribute63   := p_pricing_attribute63;
1392 				l_x_Header_Price_Att_rec.pricing_attribute64   := p_pricing_attribute64;
1393 				l_x_Header_Price_Att_rec.pricing_attribute65   := p_pricing_attribute65;
1394 				l_x_Header_Price_Att_rec.pricing_attribute66    := p_pricing_attribute66;
1395 				l_x_Header_Price_Att_rec.pricing_attribute67    := p_pricing_attribute67;
1396 				l_x_Header_Price_Att_rec.pricing_attribute68    := p_pricing_attribute68;
1397 				l_x_Header_Price_Att_rec.pricing_attribute69    := p_pricing_attribute69;
1398 				l_x_Header_Price_Att_rec.pricing_attribute70   := p_pricing_attribute70;
1399 				l_x_Header_Price_Att_rec.pricing_attribute71   := p_pricing_attribute71;
1400 				l_x_Header_Price_Att_rec.pricing_attribute72   := p_pricing_attribute72;
1401 				l_x_Header_Price_Att_rec.pricing_attribute73   := p_pricing_attribute73;
1402 				l_x_Header_Price_Att_rec.pricing_attribute74   := p_pricing_attribute74;
1403 				l_x_Header_Price_Att_rec.pricing_attribute75   := p_pricing_attribute75;
1404 				l_x_Header_Price_Att_rec.pricing_attribute76    := p_pricing_attribute76;
1405 				l_x_Header_Price_Att_rec.pricing_attribute77    := p_pricing_attribute77;
1406 				l_x_Header_Price_Att_rec.pricing_attribute78    := p_pricing_attribute78;
1407 				l_x_Header_Price_Att_rec.pricing_attribute79    := p_pricing_attribute79;
1408 				l_x_Header_Price_Att_rec.pricing_attribute80   := p_pricing_attribute80;
1409 				l_x_Header_Price_Att_rec.pricing_attribute81   := p_pricing_attribute81;
1410 				l_x_Header_Price_Att_rec.pricing_attribute82   := p_pricing_attribute82;
1411 				l_x_Header_Price_Att_rec.pricing_attribute83   := p_pricing_attribute83;
1412 				l_x_Header_Price_Att_rec.pricing_attribute84   := p_pricing_attribute84;
1413 				l_x_Header_Price_Att_rec.pricing_attribute85   := p_pricing_attribute85;
1414 				l_x_Header_Price_Att_rec.pricing_attribute86    := p_pricing_attribute86;
1415 				l_x_Header_Price_Att_rec.pricing_attribute87    := p_pricing_attribute87;
1416 				l_x_Header_Price_Att_rec.pricing_attribute88    := p_pricing_attribute88;
1417 				l_x_Header_Price_Att_rec.pricing_attribute89    := p_pricing_attribute89;
1418 				l_x_Header_Price_Att_rec.pricing_attribute90   := p_pricing_attribute90;
1419 				l_x_Header_Price_Att_rec.pricing_attribute91   := p_pricing_attribute91;
1420 				l_x_Header_Price_Att_rec.pricing_attribute92   := p_pricing_attribute92;
1421 				l_x_Header_Price_Att_rec.pricing_attribute93   := p_pricing_attribute93;
1422 				l_x_Header_Price_Att_rec.pricing_attribute94   := p_pricing_attribute94;
1423 				l_x_Header_Price_Att_rec.pricing_attribute95   := p_pricing_attribute95;
1424 				l_x_Header_Price_Att_rec.pricing_attribute96    := p_pricing_attribute96;
1425 				l_x_Header_Price_Att_rec.pricing_attribute97    := p_pricing_attribute97;
1426 				l_x_Header_Price_Att_rec.pricing_attribute98    := p_pricing_attribute98;
1427 				l_x_Header_Price_Att_rec.pricing_attribute99    := p_pricing_attribute99;
1428 				l_x_Header_Price_Att_rec.pricing_attribute100    := p_pricing_attribute100;
1429 
1430 		ELSE
1431 
1432 	 --  Unexpected error, unrecognized attribute
1433 
1434 		    	IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1435 			THEN
1436 			OE_MSG_PUB.Add_Exc_Msg
1437 			(   G_PKG_NAME
1438 			,   'Change_Attributes'
1439 			,   'Unrecognized attribute'
1440 			);
1441 			END IF;
1442 
1443 																			RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1444 																		END IF;
1445 
1446 
1447 
1448     --  Set Operation.
1449 	   IF FND_API.To_Boolean(l_x_Header_Price_Att_rec.db_flag) THEN
1450 		   IF l_debug_level  > 0 THEN
1451 		       oe_debug_pub.add(  'IT IS AN UPDATE ' , 1 ) ;
1452 		   END IF;
1453 		   l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1454 	   ELSE
1455 		   IF l_debug_level  > 0 THEN
1456 		       oe_debug_pub.add(  'IT IS CREATE ' , 1 ) ;
1457 		   END IF;
1458 		   l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1459 	   END IF;
1460 
1461 
1462   	--  Populate Order Line pricing Attributes table
1463 
1464 	 l_x_Header_Price_Att_tbl(1) := l_x_Header_Price_Att_rec;
1465 	 l_x_old_Header_Price_Att_tbl(1) := l_x_old_Header_Price_Att_rec;
1466 
1467 
1468     -- Call Oe_Order_Adj_Pvt.Header_Price_Atts
1469     l_Header_Price_Att_rec := l_x_Header_Price_Att_rec;
1470 
1471     oe_order_adj_pvt.Header_Price_Atts
1472     (	p_init_msg_list	=> FND_API.G_TRUE
1473     ,	p_validation_level 	=> FND_API.G_VALID_LEVEL_NONE
1474     ,	p_control_rec		=> l_control_rec
1475     ,	p_x_header_price_att_tbl	=> l_x_Header_Price_Att_tbl
1476     ,	p_x_old_header_price_att_tbl	=> l_x_old_Header_Price_Att_tbl
1477     );
1478 
1479     /*********************************************************************
1480 	-- Call OE_Order_PVT.Process_order
1481     OE_Order_PVT.Process_order
1482 	   (   p_api_version_number          => 1.0
1483 		,   p_init_msg_list               => FND_API.G_TRUE
1484 		,   p_validation_level            => FND_API.G_VALID_LEVEL_NONE
1485 		,   x_return_status               => l_return_status
1486 		,   x_msg_count                   => x_msg_count
1487 		,   x_msg_data                    => x_msg_data
1488 		,   p_control_rec                 => l_control_rec
1489 		,   p_Header_price_Att_tbl        => l_Header_Price_Att_tbl
1490 
1491 		,   x_header_rec                  => l_x_header_rec
1492 		,   x_Header_Adj_tbl              => l_x_Header_Adj_tbl
1493 		,   x_Header_price_Att_tbl         => l_x_Header_Price_Att_tbl
1494 		,   x_Header_Adj_Att_tbl           => l_x_Header_Adj_Att_tbl
1495 		,   x_Header_Adj_Assoc_tbl         => l_x_Header_Adj_Assoc_tbl
1496 		,   x_Header_Scredit_tbl          => l_x_Header_Scredit_tbl
1497 		,   x_line_tbl                    => l_x_line_tbl
1498 		,   x_Line_Adj_tbl                => l_x_Line_Adj_tbl
1499 		,   x_Line_price_Att_tbl          => l_x_Line_Price_Att_tbl
1500 		,   x_Line_Adj_Att_tbl            => l_x_Line_Adj_Att_tbl
1501 		,   x_Line_Adj_Assoc_tbl          => l_x_Line_Adj_Assoc_tbl
1502 		,   x_Line_Scredit_tbl            => l_x_Line_Scredit_tbl
1503 		,   x_Lot_Serial_tbl              => l_x_Lot_Serial_tbl
1504 		,    x_action_request_tbl           => l_action_request_tbl
1505 	  );
1506     *************************************************************************/
1507 
1508 	l_x_Header_Price_Att_rec := l_x_Header_Price_Att_tbl(1);
1509 
1510     	IF l_x_Header_Price_Att_rec.return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1511 		RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1512 	ELSIF l_x_Header_Price_att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1513 		RAISE FND_API.G_EXC_ERROR;
1514 	END IF;
1515 
1516 
1517 	-- Init Out parameters
1518     x_attribute1                   := FND_API.G_MISS_CHAR;
1519     x_attribute10                  := FND_API.G_MISS_CHAR;
1520     x_attribute11                  := FND_API.G_MISS_CHAR;
1521     x_attribute12                  := FND_API.G_MISS_CHAR;
1522     x_attribute13                  := FND_API.G_MISS_CHAR;
1523     x_attribute14                  := FND_API.G_MISS_CHAR;
1524     x_attribute15                  := FND_API.G_MISS_CHAR;
1525     x_attribute2                   := FND_API.G_MISS_CHAR;
1526     x_attribute3                   := FND_API.G_MISS_CHAR;
1527     x_attribute4                   := FND_API.G_MISS_CHAR;
1528     x_attribute5                   := FND_API.G_MISS_CHAR;
1529     x_attribute6                   := FND_API.G_MISS_CHAR;
1530     x_attribute7                   := FND_API.G_MISS_CHAR;
1531     x_attribute8                   := FND_API.G_MISS_CHAR;
1532     x_attribute9                   := FND_API.G_MISS_CHAR;
1533     x_context                      := FND_API.G_MISS_CHAR;
1534     x_flex_title                   := FND_API.G_MISS_CHAR;
1535     x_header_id                    := FND_API.G_MISS_NUM;
1536     x_line_id                      := FND_API.G_MISS_NUM;
1537     x_order_price_attrib_id        := FND_API.G_MISS_NUM;
1538     x_pricing_attribute1           := FND_API.G_MISS_CHAR;
1539     x_pricing_attribute10          := FND_API.G_MISS_CHAR;
1540     x_pricing_attribute100         := FND_API.G_MISS_CHAR;
1541     x_pricing_attribute11          := FND_API.G_MISS_CHAR;
1542     x_pricing_attribute12          := FND_API.G_MISS_CHAR;
1543     x_pricing_attribute13          := FND_API.G_MISS_CHAR;
1544     x_pricing_attribute14          := FND_API.G_MISS_CHAR;
1545     x_pricing_attribute15          := FND_API.G_MISS_CHAR;
1546     x_pricing_attribute16          := FND_API.G_MISS_CHAR;
1547     x_pricing_attribute17          := FND_API.G_MISS_CHAR;
1548     x_pricing_attribute18          := FND_API.G_MISS_CHAR;
1549     x_pricing_attribute19          := FND_API.G_MISS_CHAR;
1550     x_pricing_attribute2           := FND_API.G_MISS_CHAR;
1551     x_pricing_attribute20          := FND_API.G_MISS_CHAR;
1552     x_pricing_attribute21          := FND_API.G_MISS_CHAR;
1553     x_pricing_attribute22          := FND_API.G_MISS_CHAR;
1554     x_pricing_attribute23          := FND_API.G_MISS_CHAR;
1555     x_pricing_attribute24          := FND_API.G_MISS_CHAR;
1556     x_pricing_attribute25          := FND_API.G_MISS_CHAR;
1557     x_pricing_attribute26          := FND_API.G_MISS_CHAR;
1558     x_pricing_attribute27          := FND_API.G_MISS_CHAR;
1559     x_pricing_attribute28          := FND_API.G_MISS_CHAR;
1560     x_pricing_attribute29          := FND_API.G_MISS_CHAR;
1561     x_pricing_attribute3           := FND_API.G_MISS_CHAR;
1562     x_pricing_attribute30          := FND_API.G_MISS_CHAR;
1563     x_pricing_attribute31          := FND_API.G_MISS_CHAR;
1564     x_pricing_attribute32          := FND_API.G_MISS_CHAR;
1565     x_pricing_attribute33          := FND_API.G_MISS_CHAR;
1566     x_pricing_attribute34          := FND_API.G_MISS_CHAR;
1567     x_pricing_attribute35          := FND_API.G_MISS_CHAR;
1568     x_pricing_attribute36          := FND_API.G_MISS_CHAR;
1569     x_pricing_attribute37          := FND_API.G_MISS_CHAR;
1570     x_pricing_attribute38          := FND_API.G_MISS_CHAR;
1571     x_pricing_attribute39          := FND_API.G_MISS_CHAR;
1572     x_pricing_attribute4           := FND_API.G_MISS_CHAR;
1573     x_pricing_attribute40          := FND_API.G_MISS_CHAR;
1574     x_pricing_attribute41          := FND_API.G_MISS_CHAR;
1575     x_pricing_attribute42          := FND_API.G_MISS_CHAR;
1576     x_pricing_attribute43          := FND_API.G_MISS_CHAR;
1577     x_pricing_attribute44          := FND_API.G_MISS_CHAR;
1578     x_pricing_attribute45          := FND_API.G_MISS_CHAR;
1579     x_pricing_attribute46          := FND_API.G_MISS_CHAR;
1580     x_pricing_attribute47          := FND_API.G_MISS_CHAR;
1581     x_pricing_attribute48          := FND_API.G_MISS_CHAR;
1582     x_pricing_attribute49          := FND_API.G_MISS_CHAR;
1583     x_pricing_attribute5           := FND_API.G_MISS_CHAR;
1584     x_pricing_attribute50          := FND_API.G_MISS_CHAR;
1585     x_pricing_attribute51          := FND_API.G_MISS_CHAR;
1586     x_pricing_attribute52          := FND_API.G_MISS_CHAR;
1587     x_pricing_attribute53          := FND_API.G_MISS_CHAR;
1588     x_pricing_attribute54          := FND_API.G_MISS_CHAR;
1589     x_pricing_attribute55          := FND_API.G_MISS_CHAR;
1590     x_pricing_attribute56          := FND_API.G_MISS_CHAR;
1591     x_pricing_attribute57          := FND_API.G_MISS_CHAR;
1592     x_pricing_attribute58          := FND_API.G_MISS_CHAR;
1593     x_pricing_attribute59          := FND_API.G_MISS_CHAR;
1594     x_pricing_attribute6           := FND_API.G_MISS_CHAR;
1595     x_pricing_attribute60          := FND_API.G_MISS_CHAR;
1596     x_pricing_attribute61          := FND_API.G_MISS_CHAR;
1597     x_pricing_attribute62          := FND_API.G_MISS_CHAR;
1598     x_pricing_attribute63          := FND_API.G_MISS_CHAR;
1599     x_pricing_attribute64          := FND_API.G_MISS_CHAR;
1600     x_pricing_attribute65          := FND_API.G_MISS_CHAR;
1601     x_pricing_attribute66          := FND_API.G_MISS_CHAR;
1602     x_pricing_attribute67          := FND_API.G_MISS_CHAR;
1603     x_pricing_attribute68          := FND_API.G_MISS_CHAR;
1604     x_pricing_attribute69          := FND_API.G_MISS_CHAR;
1605     x_pricing_attribute7           := FND_API.G_MISS_CHAR;
1606     x_pricing_attribute70          := FND_API.G_MISS_CHAR;
1607     x_pricing_attribute71          := FND_API.G_MISS_CHAR;
1608     x_pricing_attribute72          := FND_API.G_MISS_CHAR;
1609     x_pricing_attribute73          := FND_API.G_MISS_CHAR;
1610     x_pricing_attribute74          := FND_API.G_MISS_CHAR;
1611     x_pricing_attribute75          := FND_API.G_MISS_CHAR;
1612     x_pricing_attribute76          := FND_API.G_MISS_CHAR;
1613     x_pricing_attribute77          := FND_API.G_MISS_CHAR;
1614     x_pricing_attribute78          := FND_API.G_MISS_CHAR;
1615     x_pricing_attribute79          := FND_API.G_MISS_CHAR;
1616     x_pricing_attribute8           := FND_API.G_MISS_CHAR;
1617     x_pricing_attribute80          := FND_API.G_MISS_CHAR;
1618     x_pricing_attribute81          := FND_API.G_MISS_CHAR;
1619     x_pricing_attribute82          := FND_API.G_MISS_CHAR;
1620     x_pricing_attribute83          := FND_API.G_MISS_CHAR;
1621     x_pricing_attribute84          := FND_API.G_MISS_CHAR;
1622     x_pricing_attribute85          := FND_API.G_MISS_CHAR;
1623     x_pricing_attribute86          := FND_API.G_MISS_CHAR;
1624     x_pricing_attribute87          := FND_API.G_MISS_CHAR;
1625     x_pricing_attribute88          := FND_API.G_MISS_CHAR;
1626     x_pricing_attribute89          := FND_API.G_MISS_CHAR;
1627     x_pricing_attribute9           := FND_API.G_MISS_CHAR;
1628     x_pricing_attribute90          := FND_API.G_MISS_CHAR;
1629     x_pricing_attribute91          := FND_API.G_MISS_CHAR;
1630     x_pricing_attribute92          := FND_API.G_MISS_CHAR;
1631     x_pricing_attribute93          := FND_API.G_MISS_CHAR;
1632     x_pricing_attribute94          := FND_API.G_MISS_CHAR;
1633     x_pricing_attribute95          := FND_API.G_MISS_CHAR;
1634     x_pricing_attribute96          := FND_API.G_MISS_CHAR;
1635     x_pricing_attribute97          := FND_API.G_MISS_CHAR;
1636     x_pricing_attribute98          := FND_API.G_MISS_CHAR;
1637     x_pricing_attribute99          := FND_API.G_MISS_CHAR;
1638     x_pricing_context              := FND_API.G_MISS_CHAR;
1639     x_override_flag              := FND_API.G_MISS_CHAR;
1640 
1641 	-- Record structure
1642 
1643          -- No Get Values
1644 
1645 
1646 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute1,
1647 		   l_Header_Price_Att_rec.attribute1)
1648      THEN
1649 		x_attribute1 := l_x_Header_Price_Att_rec.attribute1;
1650      END IF;
1651 
1652 
1653 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute2,
1654 		   l_Header_Price_Att_rec.attribute2)
1655      THEN
1656 		x_attribute3 := l_x_Header_Price_Att_rec.attribute2;
1657      END IF;
1658 
1659 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute3,
1660 		   l_Header_Price_Att_rec.attribute3)
1661      THEN
1662 		x_attribute3 := l_x_Header_Price_Att_rec.attribute3;
1663      END IF;
1664 
1665 
1666 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute4,
1667 		   l_Header_Price_Att_rec.attribute4)
1668      THEN
1669 		x_attribute4 := l_x_Header_Price_Att_rec.attribute4;
1670      END IF;
1671 
1672 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute5,
1673 		   l_Header_Price_Att_rec.attribute5)
1674      THEN
1675 		x_attribute5 := l_x_Header_Price_Att_rec.attribute5;
1676      END IF;
1677 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute6,
1678 		   l_Header_Price_Att_rec.attribute6)
1679      THEN
1680 		x_attribute6 := l_x_Header_Price_Att_rec.attribute6;
1681      END IF;
1682 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute7,
1683 		   l_Header_Price_Att_rec.attribute7)
1684      THEN
1685 		x_attribute7 := l_x_Header_Price_Att_rec.attribute7;
1686      END IF;
1687 
1688 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute8,
1689 		   l_Header_Price_Att_rec.attribute8)
1690      THEN
1691 		x_attribute8 := l_x_Header_Price_Att_rec.attribute8;
1692      END IF;
1693 
1694 
1695 
1696 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute9,
1697 		   l_Header_Price_Att_rec.attribute9)
1698      THEN
1699 		x_attribute9 := l_x_Header_Price_Att_rec.attribute9;
1700      END IF;
1701 
1702 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute10,
1703 		   l_Header_Price_Att_rec.attribute10)
1704      THEN
1705 		x_attribute10 := l_x_Header_Price_Att_rec.attribute10;
1706      END IF;
1707 
1708 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute11,
1709 		   l_Header_Price_Att_rec.attribute11)
1710      THEN
1711 		x_attribute11 := l_x_Header_Price_Att_rec.attribute11;
1712      END IF;
1713 
1714 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute12,
1715 		   l_Header_Price_Att_rec.attribute12)
1716      THEN
1717 		x_attribute12 := l_x_Header_Price_Att_rec.attribute12;
1718      END IF;
1719 
1720 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute13,
1721 		   l_Header_Price_Att_rec.attribute13)
1722      THEN
1723 		x_attribute13 := l_x_Header_Price_Att_rec.attribute13;
1724      END IF;
1725 
1726 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute14,
1727 		   l_Header_Price_Att_rec.attribute14)
1728      THEN
1729 		x_attribute14 := l_x_Header_Price_Att_rec.attribute14;
1730      END IF;
1731 
1732 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute15,
1733 		   l_Header_Price_Att_rec.attribute15)
1734      THEN
1735 		x_attribute15 := l_x_Header_Price_Att_rec.attribute15;
1736      END IF;
1737 
1738 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.header_id,
1739 		   l_Header_Price_Att_rec.header_id)
1740      THEN
1741 		x_header_id := l_x_Header_Price_Att_rec.header_id;
1742      END IF;
1743 
1744 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.line_id,
1745 		   l_Header_Price_Att_rec.line_id)
1746      THEN
1747 		x_line_id := l_x_Header_Price_Att_rec.line_id;
1748      END IF;
1749 
1750 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.flex_title,
1751 		   l_Header_Price_Att_rec.flex_title)
1752      THEN
1753 		x_flex_title := l_x_Header_Price_Att_rec.flex_title;
1754      END IF;
1755 
1756     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.order_price_attrib_id,
1757                             l_Header_Price_Att_rec.order_price_attrib_id)
1758     THEN
1759         x_order_price_attrib_id := l_x_Header_Price_Att_rec.order_price_attrib_id;
1760     END IF;
1761 
1762     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute1,
1763                             l_Header_Price_Att_rec.pricing_attribute1)
1764     THEN
1765         x_pricing_attribute1 := l_x_Header_Price_Att_rec.pricing_attribute1;
1766     END IF;
1767 
1768     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute10,
1769                             l_Header_Price_Att_rec.pricing_attribute10)
1770     THEN
1771         x_pricing_attribute10 := l_x_Header_Price_Att_rec.pricing_attribute10;
1772     END IF;
1773 
1774     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute100,
1775                             l_Header_Price_Att_rec.pricing_attribute100)
1776     THEN
1777         x_pricing_attribute100 := l_x_Header_Price_Att_rec.pricing_attribute100;
1778     END IF;
1779 
1780     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute11,
1781                             l_Header_Price_Att_rec.pricing_attribute11)
1782     THEN
1783         x_pricing_attribute11 := l_x_Header_Price_Att_rec.pricing_attribute11;
1784     END IF;
1785 
1786     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute12,
1787                             l_Header_Price_Att_rec.pricing_attribute12)
1788     THEN
1789         x_pricing_attribute12 := l_x_Header_Price_Att_rec.pricing_attribute12;
1790     END IF;
1791 
1792     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute13,
1793                             l_Header_Price_Att_rec.pricing_attribute13)
1794     THEN
1795         x_pricing_attribute13 := l_x_Header_Price_Att_rec.pricing_attribute13;
1796     END IF;
1797 
1798     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute14,
1799                             l_Header_Price_Att_rec.pricing_attribute14)
1800     THEN
1801         x_pricing_attribute14 := l_x_Header_Price_Att_rec.pricing_attribute14;
1802     END IF;
1803 
1804     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute15,
1805                             l_Header_Price_Att_rec.pricing_attribute15)
1806     THEN
1807         x_pricing_attribute15 := l_x_Header_Price_Att_rec.pricing_attribute15;
1808     END IF;
1809 
1810     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute16,
1811                             l_Header_Price_Att_rec.pricing_attribute16)
1812     THEN
1813         x_pricing_attribute16 := l_x_Header_Price_Att_rec.pricing_attribute16;
1814     END IF;
1815 
1816     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute17,
1817                             l_Header_Price_Att_rec.pricing_attribute17)
1818     THEN
1819         x_pricing_attribute17 := l_x_Header_Price_Att_rec.pricing_attribute17;
1820     END IF;
1821 
1822     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute18,
1823                             l_Header_Price_Att_rec.pricing_attribute18)
1824     THEN
1825         x_pricing_attribute18 := l_x_Header_Price_Att_rec.pricing_attribute18;
1826     END IF;
1827 
1828     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute19,
1829                             l_Header_Price_Att_rec.pricing_attribute19)
1830     THEN
1831         x_pricing_attribute19 := l_x_Header_Price_Att_rec.pricing_attribute19;
1832     END IF;
1833 
1834     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute2,
1835                             l_Header_Price_Att_rec.pricing_attribute2)
1836     THEN
1837         x_pricing_attribute2 := l_x_Header_Price_Att_rec.pricing_attribute2;
1838     END IF;
1839 
1840     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute20,
1841                             l_Header_Price_Att_rec.pricing_attribute20)
1842     THEN
1843         x_pricing_attribute20 := l_x_Header_Price_Att_rec.pricing_attribute20;
1844     END IF;
1845 
1846     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute21,
1847                             l_Header_Price_Att_rec.pricing_attribute21)
1848     THEN
1849         x_pricing_attribute21 := l_x_Header_Price_Att_rec.pricing_attribute21;
1850     END IF;
1851 
1852     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute22,
1853                             l_Header_Price_Att_rec.pricing_attribute22)
1854     THEN
1855         x_pricing_attribute22 := l_x_Header_Price_Att_rec.pricing_attribute22;
1856     END IF;
1857 
1858     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute23,
1859                             l_Header_Price_Att_rec.pricing_attribute23)
1860     THEN
1861         x_pricing_attribute23 := l_x_Header_Price_Att_rec.pricing_attribute23;
1862     END IF;
1863 
1864     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute24,
1865                             l_Header_Price_Att_rec.pricing_attribute24)
1866     THEN
1867         x_pricing_attribute24 := l_x_Header_Price_Att_rec.pricing_attribute24;
1868     END IF;
1869 
1870     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute25,
1871                             l_Header_Price_Att_rec.pricing_attribute25)
1872     THEN
1873         x_pricing_attribute25 := l_x_Header_Price_Att_rec.pricing_attribute25;
1874     END IF;
1875 
1876     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute26,
1877                             l_Header_Price_Att_rec.pricing_attribute26)
1878     THEN
1879         x_pricing_attribute26 := l_x_Header_Price_Att_rec.pricing_attribute26;
1880     END IF;
1881 
1882     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute27,
1883                             l_Header_Price_Att_rec.pricing_attribute27)
1884     THEN
1885         x_pricing_attribute27 := l_x_Header_Price_Att_rec.pricing_attribute27;
1886     END IF;
1887 
1888     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute28,
1889                             l_Header_Price_Att_rec.pricing_attribute28)
1890     THEN
1891         x_pricing_attribute28 := l_x_Header_Price_Att_rec.pricing_attribute28;
1892     END IF;
1893 
1894     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute29,
1895                             l_Header_Price_Att_rec.pricing_attribute29)
1896     THEN
1897         x_pricing_attribute29 := l_x_Header_Price_Att_rec.pricing_attribute29;
1898     END IF;
1899 
1900     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute3,
1901                             l_Header_Price_Att_rec.pricing_attribute3)
1902     THEN
1903         x_pricing_attribute3 := l_x_Header_Price_Att_rec.pricing_attribute3;
1904     END IF;
1905 
1906     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute30,
1907                             l_Header_Price_Att_rec.pricing_attribute30)
1908     THEN
1909         x_pricing_attribute30 := l_x_Header_Price_Att_rec.pricing_attribute30;
1910     END IF;
1911 
1912     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute31,
1913                             l_Header_Price_Att_rec.pricing_attribute31)
1914     THEN
1915         x_pricing_attribute31 := l_x_Header_Price_Att_rec.pricing_attribute31;
1916     END IF;
1917 
1918     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute32,
1919                             l_Header_Price_Att_rec.pricing_attribute32)
1920     THEN
1921         x_pricing_attribute32 := l_x_Header_Price_Att_rec.pricing_attribute32;
1922     END IF;
1923 
1924     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute33,
1925                             l_Header_Price_Att_rec.pricing_attribute33)
1926     THEN
1927         x_pricing_attribute33 := l_x_Header_Price_Att_rec.pricing_attribute33;
1928     END IF;
1929 
1930     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute34,
1931                             l_Header_Price_Att_rec.pricing_attribute34)
1932     THEN
1933         x_pricing_attribute34 := l_x_Header_Price_Att_rec.pricing_attribute34;
1934     END IF;
1935 
1936     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute35,
1937                             l_Header_Price_Att_rec.pricing_attribute35)
1938     THEN
1939         x_pricing_attribute35 := l_x_Header_Price_Att_rec.pricing_attribute35;
1940     END IF;
1941 
1942     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute36,
1943                             l_Header_Price_Att_rec.pricing_attribute36)
1944     THEN
1945         x_pricing_attribute36 := l_x_Header_Price_Att_rec.pricing_attribute36;
1946     END IF;
1947 
1948     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute37,
1949                             l_Header_Price_Att_rec.pricing_attribute37)
1950     THEN
1951         x_pricing_attribute37 := l_x_Header_Price_Att_rec.pricing_attribute37;
1952     END IF;
1953 
1954     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute38,
1955                             l_Header_Price_Att_rec.pricing_attribute38)
1956     THEN
1957         x_pricing_attribute38 := l_x_Header_Price_Att_rec.pricing_attribute38;
1958     END IF;
1959 
1960     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute39,
1961                             l_Header_Price_Att_rec.pricing_attribute39)
1962     THEN
1963         x_pricing_attribute39 := l_x_Header_Price_Att_rec.pricing_attribute39;
1964     END IF;
1965 
1966     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute4,
1967                             l_Header_Price_Att_rec.pricing_attribute4)
1968     THEN
1969         x_pricing_attribute4 := l_x_Header_Price_Att_rec.pricing_attribute4;
1970     END IF;
1971 
1972     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute40,
1973                             l_Header_Price_Att_rec.pricing_attribute40)
1974     THEN
1975         x_pricing_attribute40 := l_x_Header_Price_Att_rec.pricing_attribute40;
1976     END IF;
1977 
1978     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute41,
1979                             l_Header_Price_Att_rec.pricing_attribute41)
1980     THEN
1981         x_pricing_attribute41 := l_x_Header_Price_Att_rec.pricing_attribute41;
1982     END IF;
1983 
1984     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute42,
1985                             l_Header_Price_Att_rec.pricing_attribute42)
1986     THEN
1987         x_pricing_attribute42 := l_x_Header_Price_Att_rec.pricing_attribute42;
1988     END IF;
1989 
1990     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute43,
1991                             l_Header_Price_Att_rec.pricing_attribute43)
1992     THEN
1993         x_pricing_attribute43 := l_x_Header_Price_Att_rec.pricing_attribute43;
1994     END IF;
1995 
1996     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute44,
1997                             l_Header_Price_Att_rec.pricing_attribute44)
1998     THEN
1999         x_pricing_attribute44 := l_x_Header_Price_Att_rec.pricing_attribute44;
2000     END IF;
2001 
2002     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute45,
2003                             l_Header_Price_Att_rec.pricing_attribute45)
2004     THEN
2005         x_pricing_attribute45 := l_x_Header_Price_Att_rec.pricing_attribute45;
2006     END IF;
2007 
2008     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute46,
2009                             l_Header_Price_Att_rec.pricing_attribute46)
2010     THEN
2011         x_pricing_attribute46 := l_x_Header_Price_Att_rec.pricing_attribute46;
2012     END IF;
2013 
2014     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute47,
2015                             l_Header_Price_Att_rec.pricing_attribute47)
2016     THEN
2017         x_pricing_attribute47 := l_x_Header_Price_Att_rec.pricing_attribute47;
2018     END IF;
2019 
2020     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute48,
2021                             l_Header_Price_Att_rec.pricing_attribute48)
2022     THEN
2023         x_pricing_attribute48 := l_x_Header_Price_Att_rec.pricing_attribute48;
2024     END IF;
2025 
2026     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute49,
2027                             l_Header_Price_Att_rec.pricing_attribute49)
2028     THEN
2029         x_pricing_attribute49 := l_x_Header_Price_Att_rec.pricing_attribute49;
2030     END IF;
2031 
2032     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute5,
2033                             l_Header_Price_Att_rec.pricing_attribute5)
2034     THEN
2035         x_pricing_attribute5 := l_x_Header_Price_Att_rec.pricing_attribute5;
2036     END IF;
2037 
2038     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute50,
2039                             l_Header_Price_Att_rec.pricing_attribute50)
2040     THEN
2041         x_pricing_attribute50 := l_x_Header_Price_Att_rec.pricing_attribute50;
2042     END IF;
2043 
2044     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute51,
2045                             l_Header_Price_Att_rec.pricing_attribute51)
2046     THEN
2047         x_pricing_attribute51 := l_x_Header_Price_Att_rec.pricing_attribute51;
2048     END IF;
2049 
2050     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute52,
2051                             l_Header_Price_Att_rec.pricing_attribute52)
2052     THEN
2053         x_pricing_attribute52 := l_x_Header_Price_Att_rec.pricing_attribute52;
2054     END IF;
2055 
2056     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute53,
2057                             l_Header_Price_Att_rec.pricing_attribute53)
2058     THEN
2059         x_pricing_attribute53 := l_x_Header_Price_Att_rec.pricing_attribute53;
2060     END IF;
2061 
2062     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute54,
2063                             l_Header_Price_Att_rec.pricing_attribute54)
2064     THEN
2065         x_pricing_attribute54 := l_x_Header_Price_Att_rec.pricing_attribute54;
2066     END IF;
2067 
2068     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute55,
2069                             l_Header_Price_Att_rec.pricing_attribute55)
2070     THEN
2071         x_pricing_attribute55 := l_x_Header_Price_Att_rec.pricing_attribute55;
2072     END IF;
2073 
2074     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute56,
2075                             l_Header_Price_Att_rec.pricing_attribute56)
2076     THEN
2077         x_pricing_attribute56 := l_x_Header_Price_Att_rec.pricing_attribute56;
2078     END IF;
2079 
2080     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute57,
2081                             l_Header_Price_Att_rec.pricing_attribute57)
2082     THEN
2083         x_pricing_attribute57 := l_x_Header_Price_Att_rec.pricing_attribute57;
2084     END IF;
2085 
2086     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute58,
2087                             l_Header_Price_Att_rec.pricing_attribute58)
2088     THEN
2089         x_pricing_attribute58 := l_x_Header_Price_Att_rec.pricing_attribute58;
2090     END IF;
2091 
2092     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute59,
2093                             l_Header_Price_Att_rec.pricing_attribute59)
2094     THEN
2095         x_pricing_attribute59 := l_x_Header_Price_Att_rec.pricing_attribute59;
2096     END IF;
2097 
2098     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute6,
2099                             l_Header_Price_Att_rec.pricing_attribute6)
2100     THEN
2101         x_pricing_attribute6 := l_x_Header_Price_Att_rec.pricing_attribute6;
2102     END IF;
2103 
2104     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute60,
2105                             l_Header_Price_Att_rec.pricing_attribute60)
2106     THEN
2107         x_pricing_attribute60 := l_x_Header_Price_Att_rec.pricing_attribute60;
2108     END IF;
2109 
2110     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute61,
2111                             l_Header_Price_Att_rec.pricing_attribute61)
2112     THEN
2113         x_pricing_attribute61 := l_x_Header_Price_Att_rec.pricing_attribute61;
2114     END IF;
2115 
2116     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute62,
2117                             l_Header_Price_Att_rec.pricing_attribute62)
2118     THEN
2119         x_pricing_attribute62 := l_x_Header_Price_Att_rec.pricing_attribute62;
2120     END IF;
2121 
2122     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute63,
2123                             l_Header_Price_Att_rec.pricing_attribute63)
2124     THEN
2125         x_pricing_attribute63 := l_x_Header_Price_Att_rec.pricing_attribute63;
2126     END IF;
2127 
2128     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute64,
2129                             l_Header_Price_Att_rec.pricing_attribute64)
2130     THEN
2131         x_pricing_attribute64 := l_x_Header_Price_Att_rec.pricing_attribute64;
2132     END IF;
2133 
2134     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute65,
2135                             l_Header_Price_Att_rec.pricing_attribute65)
2136     THEN
2137         x_pricing_attribute65 := l_x_Header_Price_Att_rec.pricing_attribute65;
2138     END IF;
2139 
2140     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute66,
2141                             l_Header_Price_Att_rec.pricing_attribute66)
2142     THEN
2143         x_pricing_attribute66 := l_x_Header_Price_Att_rec.pricing_attribute66;
2144     END IF;
2145 
2146     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute67,
2147                             l_Header_Price_Att_rec.pricing_attribute67)
2148     THEN
2149         x_pricing_attribute67 := l_x_Header_Price_Att_rec.pricing_attribute67;
2150     END IF;
2151 
2152     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute68,
2153                             l_Header_Price_Att_rec.pricing_attribute68)
2154     THEN
2155         x_pricing_attribute68 := l_x_Header_Price_Att_rec.pricing_attribute68;
2156     END IF;
2157 
2158     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute69,
2159                             l_Header_Price_Att_rec.pricing_attribute69)
2160     THEN
2161         x_pricing_attribute69 := l_x_Header_Price_Att_rec.pricing_attribute69;
2162     END IF;
2163 
2164     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute7,
2165                             l_Header_Price_Att_rec.pricing_attribute7)
2166     THEN
2167         x_pricing_attribute7 := l_x_Header_Price_Att_rec.pricing_attribute7;
2168     END IF;
2169 
2170     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute70,
2171                             l_Header_Price_Att_rec.pricing_attribute70)
2172     THEN
2173         x_pricing_attribute70 := l_x_Header_Price_Att_rec.pricing_attribute70;
2174     END IF;
2175 
2176     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute71,
2177                             l_Header_Price_Att_rec.pricing_attribute71)
2178     THEN
2179         x_pricing_attribute71 := l_x_Header_Price_Att_rec.pricing_attribute71;
2180     END IF;
2181 
2182     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute72,
2183                             l_Header_Price_Att_rec.pricing_attribute72)
2184     THEN
2185         x_pricing_attribute72 := l_x_Header_Price_Att_rec.pricing_attribute72;
2186     END IF;
2187 
2188     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute73,
2189                             l_Header_Price_Att_rec.pricing_attribute73)
2190     THEN
2191         x_pricing_attribute73 := l_x_Header_Price_Att_rec.pricing_attribute73;
2192     END IF;
2193 
2194     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute74,
2195                             l_Header_Price_Att_rec.pricing_attribute74)
2196     THEN
2197         x_pricing_attribute74 := l_x_Header_Price_Att_rec.pricing_attribute74;
2198     END IF;
2199 
2200     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute75,
2201                             l_Header_Price_Att_rec.pricing_attribute75)
2202     THEN
2203         x_pricing_attribute75 := l_x_Header_Price_Att_rec.pricing_attribute75;
2204     END IF;
2205 
2206     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute76,
2207                             l_Header_Price_Att_rec.pricing_attribute76)
2208     THEN
2209         x_pricing_attribute76 := l_x_Header_Price_Att_rec.pricing_attribute76;
2210     END IF;
2211 
2212     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute77,
2213                             l_Header_Price_Att_rec.pricing_attribute77)
2214     THEN
2215         x_pricing_attribute77 := l_x_Header_Price_Att_rec.pricing_attribute77;
2216     END IF;
2217 
2218     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute78,
2219                             l_Header_Price_Att_rec.pricing_attribute78)
2220     THEN
2221         x_pricing_attribute78 := l_x_Header_Price_Att_rec.pricing_attribute78;
2222     END IF;
2223 
2224     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute79,
2225                             l_Header_Price_Att_rec.pricing_attribute79)
2226     THEN
2227         x_pricing_attribute79 := l_x_Header_Price_Att_rec.pricing_attribute79;
2228     END IF;
2229 
2230     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute8,
2231                             l_Header_Price_Att_rec.pricing_attribute8)
2232     THEN
2233         x_pricing_attribute8 := l_x_Header_Price_Att_rec.pricing_attribute8;
2234     END IF;
2235 
2236     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute80,
2237                             l_Header_Price_Att_rec.pricing_attribute80)
2238     THEN
2239         x_pricing_attribute80 := l_x_Header_Price_Att_rec.pricing_attribute80;
2240     END IF;
2241 
2242     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute81,
2243                             l_Header_Price_Att_rec.pricing_attribute81)
2244     THEN
2245         x_pricing_attribute81 := l_x_Header_Price_Att_rec.pricing_attribute81;
2246     END IF;
2247 
2248     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute82,
2249                             l_Header_Price_Att_rec.pricing_attribute82)
2250     THEN
2251         x_pricing_attribute82 := l_x_Header_Price_Att_rec.pricing_attribute82;
2252     END IF;
2253 
2254     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute83,
2255                             l_Header_Price_Att_rec.pricing_attribute83)
2256     THEN
2257         x_pricing_attribute83 := l_x_Header_Price_Att_rec.pricing_attribute83;
2258     END IF;
2259 
2260     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute84,
2261                             l_Header_Price_Att_rec.pricing_attribute84)
2262     THEN
2263         x_pricing_attribute84 := l_x_Header_Price_Att_rec.pricing_attribute84;
2264     END IF;
2265 
2266     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute85,
2267                             l_Header_Price_Att_rec.pricing_attribute85)
2268     THEN
2269         x_pricing_attribute85 := l_x_Header_Price_Att_rec.pricing_attribute85;
2270     END IF;
2271 
2272     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute86,
2273                             l_Header_Price_Att_rec.pricing_attribute86)
2274     THEN
2275         x_pricing_attribute86 := l_x_Header_Price_Att_rec.pricing_attribute86;
2276     END IF;
2277 
2278     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute87,
2279                             l_Header_Price_Att_rec.pricing_attribute87)
2280     THEN
2281         x_pricing_attribute87 := l_x_Header_Price_Att_rec.pricing_attribute87;
2282     END IF;
2283 
2284     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute88,
2285                             l_Header_Price_Att_rec.pricing_attribute88)
2286     THEN
2287         x_pricing_attribute88 := l_x_Header_Price_Att_rec.pricing_attribute88;
2288     END IF;
2289 
2290     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute89,
2291                             l_Header_Price_Att_rec.pricing_attribute89)
2292     THEN
2293         x_pricing_attribute89 := l_x_Header_Price_Att_rec.pricing_attribute89;
2294     END IF;
2295 
2296     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute9,
2297                             l_Header_Price_Att_rec.pricing_attribute9)
2298     THEN
2299         x_pricing_attribute9 := l_x_Header_Price_Att_rec.pricing_attribute9;
2300     END IF;
2301 
2302     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute90,
2303                             l_Header_Price_Att_rec.pricing_attribute90)
2304     THEN
2305         x_pricing_attribute90 := l_x_Header_Price_Att_rec.pricing_attribute90;
2306     END IF;
2307 
2308     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute91,
2309                             l_Header_Price_Att_rec.pricing_attribute91)
2310     THEN
2311         x_pricing_attribute91 := l_x_Header_Price_Att_rec.pricing_attribute91;
2312     END IF;
2313 
2314     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute92,
2315                             l_Header_Price_Att_rec.pricing_attribute92)
2316     THEN
2317         x_pricing_attribute92 := l_x_Header_Price_Att_rec.pricing_attribute92;
2318     END IF;
2319 
2320     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute93,
2321                             l_Header_Price_Att_rec.pricing_attribute93)
2322     THEN
2323         x_pricing_attribute93 := l_x_Header_Price_Att_rec.pricing_attribute93;
2324     END IF;
2325 
2326     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute94,
2327                             l_Header_Price_Att_rec.pricing_attribute94)
2328     THEN
2329         x_pricing_attribute94 := l_x_Header_Price_Att_rec.pricing_attribute94;
2330     END IF;
2331 
2332     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute95,
2333                             l_Header_Price_Att_rec.pricing_attribute95)
2334     THEN
2335         x_pricing_attribute95 := l_x_Header_Price_Att_rec.pricing_attribute95;
2336     END IF;
2337 
2338     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute96,
2339                             l_Header_Price_Att_rec.pricing_attribute96)
2340     THEN
2341         x_pricing_attribute96 := l_x_Header_Price_Att_rec.pricing_attribute96;
2342     END IF;
2343 
2344     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute97,
2345                             l_Header_Price_Att_rec.pricing_attribute97)
2346     THEN
2347         x_pricing_attribute97 := l_x_Header_Price_Att_rec.pricing_attribute97;
2348     END IF;
2349 
2350     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute98,
2351                             l_Header_Price_Att_rec.pricing_attribute98)
2352     THEN
2353         x_pricing_attribute98 := l_x_Header_Price_Att_rec.pricing_attribute98;
2354     END IF;
2355 
2356     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute99,
2357                             l_Header_Price_Att_rec.pricing_attribute99)
2358     THEN
2359         x_pricing_attribute99 := l_x_Header_Price_Att_rec.pricing_attribute99;
2360     END IF;
2361 
2362     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_context,
2363                             l_Header_Price_Att_rec.pricing_context)
2364     THEN
2365         x_pricing_context := l_x_Header_Price_Att_rec.pricing_context;
2366 	END IF;
2367 
2368     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.override_flag,
2369                             l_Header_Price_Att_rec.override_flag)
2370     THEN
2371         x_pricing_context := l_x_Header_Price_Att_rec.override_flag;
2372 	END IF;
2373 
2374 	Write_Order_Header_PAttr
2375 	(
2376 	   p_Header_Price_Att_rec   => l_x_Header_Price_Att_rec
2377 	) ;
2378 
2379 
2380     -- Re-set the UI flag to FALSE
2381     OE_GLOBALS.G_UI_FLAG := FALSE;
2382 
2383  	--  Set return status.
2384 
2385 	x_return_status := FND_API.G_RET_STS_SUCCESS;
2386 
2387 	    --  Get message count and data
2388 
2389 	OE_MSG_PUB.Count_And_Get
2390 	(   p_count                       => x_msg_count
2391 	 ,   p_data                        => x_msg_data
2392 	);
2393 
2394 
2395 	IF l_debug_level  > 0 THEN
2396 	    oe_debug_pub.add(  'EXITING OE_OE_FORM_HEADER_PATTR.CHANGE_ATTRIBUTES' , 1 ) ;
2397 	END IF;
2398 
2399 EXCEPTION
2400 
2401     WHEN FND_API.G_EXC_ERROR THEN
2402 
2403 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2404 
2405 	  x_return_status := FND_API.G_RET_STS_ERROR;
2406 
2407 		--  Get message count and data
2408 	   OE_MSG_PUB.Count_And_Get
2409 	 (   p_count                       => x_msg_count
2410     		,   p_data                        => x_msg_data
2411 	  );
2412 
2413      WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2414 
2415 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2416 
2417 		 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2418 
2419 	    --  Get message count and data
2420 
2421 		  OE_MSG_PUB.Count_And_Get
2422 		(   p_count                       => x_msg_count
2423 		   ,   p_data                        => x_msg_data
2424 		 );
2425 
2426 	 WHEN OTHERS THEN
2427 
2428 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2429 
2430 		   x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2431 
2432 	   IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2433 	   THEN
2434 	    	OE_MSG_PUB.Add_Exc_Msg
2435 		   (   G_PKG_NAME
2436 		   ,   'Change_Attribute');
2437 	   END IF;
2438 
2439 END Change_Attributes;
2440 
2441 
2442 PROCEDURE Validate_And_Write
2443 ( x_return_status OUT NOCOPY VARCHAR2
2444 
2445 , x_msg_count OUT NOCOPY NUMBER
2446 
2447 , x_msg_data OUT NOCOPY VARCHAR2
2448 
2449 ,   p_order_price_attrib_id         IN  NUMBER
2450 , x_creation_date OUT NOCOPY DATE
2451 
2452 , x_created_by OUT NOCOPY NUMBER
2453 
2454 , x_last_update_date OUT NOCOPY DATE
2455 
2456 , x_last_updated_by OUT NOCOPY NUMBER
2457 
2458 , x_last_update_login OUT NOCOPY NUMBER
2459 
2460 , x_program_id OUT NOCOPY NUMBER
2461 
2462 , x_program_application_id OUT NOCOPY NUMBER
2463 
2464 , x_program_update_date OUT NOCOPY DATE
2465 
2466 , x_request_id OUT NOCOPY NUMBER
2467 
2468 , x_lock_control OUT NOCOPY NUMBER
2469 
2470 )
2471 IS
2472 l_Header_Price_Att_rec		OE_Order_PUB.Header_Price_Att_Rec_Type;
2473 l_old_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
2474 l_x_old_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
2475 l_Header_Price_Att_tbl		OE_Order_PUB.Header_Price_Att_Tbl_Type;
2476 l_old_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
2477 l_x_old_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
2478 l_control_rec                 OE_GLOBALS.Control_Rec_Type;
2479 l_return_status               VARCHAR2(1);
2480 l_action_request_tbl          OE_Order_PUB.Request_Tbl_Type;
2481 
2482 /* OUT NOCOPY parameters for Process Order */
2483 
2484 l_x_header_rec                OE_Order_PUB.Header_Rec_Type;
2485 l_x_Header_Adj_rec            OE_Order_PUB.Header_Adj_Rec_Type;
2486 l_x_Header_Adj_tbl            OE_Order_PUB.Header_Adj_Tbl_Type;
2487 l_x_Header_Scredit_rec        OE_Order_PUB.Header_Scredit_Rec_Type;
2488 l_x_Header_Scredit_tbl        OE_Order_PUB.Header_Scredit_Tbl_Type;
2489 l_x_line_rec                  OE_Order_PUB.Line_Rec_Type;
2490 l_x_line_tbl                  OE_Order_PUB.Line_Tbl_Type;
2491 l_x_Line_Adj_rec              OE_Order_PUB.Line_Adj_Rec_Type;
2492 l_x_Line_Adj_tbl              OE_Order_PUB.Line_Adj_Tbl_Type;
2493 l_x_Line_Scredit_rec          OE_Order_PUB.Line_Scredit_Rec_Type;
2494 l_x_Line_Scredit_tbl          OE_Order_PUB.Line_Scredit_Tbl_Type;
2495 l_x_Lot_Serial_rec            OE_Order_PUB.Lot_Serial_Rec_Type;
2496 l_x_Lot_Serial_tbl            OE_Order_PUB.Lot_Serial_Tbl_Type;
2497 l_x_Header_Price_Att_tbl      OE_Order_PUB.Header_Price_Att_Tbl_Type;
2498 l_x_Header_Adj_Att_tbl        OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2499 l_x_Header_Adj_Assoc_tbl      OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2500 l_x_Line_Price_Att_tbl        OE_Order_PUB.Line_Price_Att_Tbl_Type ;
2501 l_x_Header_Price_Att_rec        OE_Order_PUB.Header_Price_Att_Rec_Type ;
2502 l_x_Line_Adj_Att_tbl          OE_Order_PUB.Line_Adj_Att_Tbl_Type ;
2503 l_x_Line_Adj_Assoc_tbl        OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2504 
2505 --
2506 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2507 --
2508 BEGIN
2509 
2510     -- Set the UI flag
2511     OE_GLOBALS.G_UI_FLAG := TRUE;
2512 
2513     --  Set control flags.
2514     l_control_rec.controlled_operation := TRUE;
2515 	l_control_rec.validate_entity      := TRUE;
2516 	l_control_rec.write_to_DB          := TRUE;
2517 
2518 	l_control_rec.check_security       := FALSE;
2519 	l_control_rec.clear_dependents     := FALSE;
2520 	l_control_rec.default_attributes   := FALSE;
2521 	l_control_rec.change_attributes    := FALSE;
2522 	l_control_rec.process              := FALSE;
2523 	l_control_rec.process_entity       := OE_GLOBALS.G_ENTITY_HEADER_PRICE_ATT;
2524 
2525 	    --  Instruct API to retain its caches
2526 	     l_control_rec.clear_api_cache      := FALSE;
2527 		l_control_rec.clear_api_requests   := FALSE;
2528 
2529 
2530 		SAVEPOINT validate_and_write;
2531 
2532 		Get_Order_Header_PAttr
2533 		( p_db_record					=>  TRUE
2534 		, 	p_order_price_attrib_id		=>  p_order_price_attrib_id
2535 		,    x_Header_Price_Att_rec		=> l_x_old_Header_Price_Att_rec
2536 		) ;
2537 
2538 		Get_Order_Header_PAttr
2539 		( p_db_record					=>	FALSE
2540 		, 	p_order_price_attrib_id		=> p_order_price_attrib_id
2541 		,    x_Header_Price_Att_rec		=> l_x_Header_Price_Att_rec
2542 			) ;
2543 
2544     --  Set Operation.
2545 	     IF FND_API.To_Boolean(l_x_Header_Price_Att_rec.db_flag) THEN
2546 			 l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
2547 		ELSE
2548 			 l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_CREATE;
2549 		END IF;
2550 
2551 		l_x_Header_Price_Att_tbl(1) := l_x_Header_Price_Att_rec	;
2552 		l_x_old_Header_Price_Att_tbl(1) := l_x_old_Header_Price_Att_rec;
2553 
2554     		-- Call Oe_Order_Adj_Pvt.Header_Price_Atts
2555     		oe_order_adj_pvt.Header_Price_Atts
2556     		(	p_init_msg_list	=> FND_API.G_TRUE
2557     		,	p_validation_level 	=> FND_API.G_VALID_LEVEL_NONE
2558     		,	p_control_rec		=> l_control_rec
2559     		,	p_x_header_price_att_tbl	=> l_x_Header_Price_Att_tbl
2560     		,	p_x_old_header_price_att_tbl	=> l_x_old_Header_Price_Att_tbl
2561     		);
2562 
2563         /******************************************************************
2564 	   -- Call Process Pricing
2565     	   OE_Order_PVT.Process_order
2566 	   	(   p_api_version_number          => 1.0
2567 		,   p_init_msg_list               => FND_API.G_TRUE
2568 		,   x_return_status               => l_return_status
2569 		,   x_msg_count                   => x_msg_count
2570 		,   x_msg_data                    => x_msg_data
2571 		,   p_control_rec                 => l_control_rec
2572 		,   p_Header_price_Att_tbl        => l_Header_Price_Att_tbl
2573 
2574 		,   x_header_rec                  => l_x_header_rec
2575 		,   x_Header_Adj_tbl              => l_x_Header_Adj_tbl
2576 		,   x_Header_price_Att_tbl         => l_x_Header_Price_Att_tbl
2577 		,   x_Header_Adj_Att_tbl           => l_x_Header_Adj_Att_tbl
2578 		,   x_Header_Adj_Assoc_tbl         => l_x_Header_Adj_Assoc_tbl
2579 		,   x_Header_Scredit_tbl          => l_x_Header_Scredit_tbl
2580 		,   x_line_tbl                    => l_x_line_tbl
2581 		,   x_Line_Adj_tbl                => l_x_Line_Adj_tbl
2582 		,   x_Line_price_Att_tbl          => l_x_Line_Price_Att_tbl
2583 		,   x_Line_Adj_Att_tbl            => l_x_Line_Adj_Att_tbl
2584 		,   x_Line_Adj_Assoc_tbl          => l_x_Line_Adj_Assoc_tbl
2585 		,   x_Line_Scredit_tbl            => l_x_Line_Scredit_tbl
2586 		,   x_Lot_Serial_tbl              => l_x_Lot_Serial_tbl
2587 		,    x_action_request_tbl           => l_action_request_tbl
2588 	  );
2589        ******************************************************************/
2590 
2591 		l_x_Header_Price_Att_rec := l_x_Header_Price_Att_tbl(1);
2592 
2593     		IF l_x_Header_Price_Att_rec.return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2594 		  RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2595 		ELSIF l_X_Header_Price_Att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
2596 		    RAISE FND_API.G_EXC_ERROR;
2597 		END IF;
2598 
2599     /******
2600     Oe_Order_Pvt.Process_Requests_And_Notify
2601     (	p_process_requests		=> FALSE
2602     ,	p_notify				=> TRUE
2603     ,	p_header_price_att_tbl	=> l_x_header_price_att_tbl
2604     ,	p_old_header_price_att_tbl => l_x_old_header_price_att_tbl
2605     ,	x_return_status		=> l_return_status
2606     );
2607     ******/
2608 
2609 
2610     		x_lock_control         := l_x_Header_Price_Att_rec.lock_control;
2611     		x_creation_date        := l_x_Header_Price_Att_rec.creation_date;
2612 		x_created_by           := l_x_Header_Price_Att_rec.created_by;
2613 		x_last_update_date     := l_x_Header_Price_Att_rec.last_update_date;
2614 		x_last_updated_by      := l_x_Header_Price_Att_rec.last_updated_by;
2615 		x_last_update_login    := l_x_Header_Price_Att_rec.last_update_login;
2616     		x_program_id           := l_x_Header_Price_Att_rec.program_id;
2617     		x_program_application_id  := l_x_Header_Price_Att_rec.program_application_id;
2618     		x_program_update_date  := l_x_Header_Price_Att_rec.program_update_date;
2619     		x_request_id      	   := l_x_Header_Price_Att_rec.request_id;
2620 
2621 	/* Clears the Line record cache */
2622 		Clear_Order_Header_Attr;
2623 
2624 	  --  Get message count and data
2625 		OE_MSG_PUB.Count_And_Get
2626 		(   p_count                       => x_msg_count
2627 	    ,   p_data                        => x_msg_data
2628 	     );
2629 
2630     -- Re-set the UI flag to FALSE
2631     OE_GLOBALS.G_UI_FLAG := FALSE;
2632 
2633 
2634 EXCEPTION
2635    WHEN FND_API.G_EXC_ERROR THEN
2636 
2637 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2638 
2639 	    x_return_status := FND_API.G_RET_STS_ERROR;
2640 
2641 		--  Get message count and data
2642 
2643        OE_MSG_PUB.Count_And_Get
2644        (   p_count                       => x_msg_count
2645 	  ,   p_data                        => x_msg_data
2646 	   );
2647 
2648        ROLLBACK TO SAVEPOINT validate_and_write;
2649 
2650 
2651     WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2652 
2653 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2654 
2655 	   x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2656 
2657 	  --  Get message count and data
2658 
2659 	   OE_MSG_PUB.Count_And_Get
2660 	   (   p_count                       => x_msg_count
2661 		 ,   p_data                        => x_msg_data
2662 	   );
2663 
2664 	  ROLLBACK TO SAVEPOINT validate_and_write;
2665 
2666 	WHEN OTHERS THEN
2667 
2668 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2669 		NULL;
2670 
2671 END Validate_And_Write;
2672 
2673 
2674 
2675 PROCEDURE Delete_Row
2676 ( x_return_status OUT NOCOPY VARCHAR2
2677 
2678 , x_msg_count OUT NOCOPY NUMBER
2679 
2680 , x_msg_data OUT NOCOPY VARCHAR2
2681 
2682 ,   p_order_price_attrib_id         IN  NUMBER
2683 )
2684 IS
2685 l_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
2686 l_old_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
2687 l_x_old_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
2688 l_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
2689 l_old_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
2690 l_x_old_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
2691 l_control_rec                 OE_GLOBALS.Control_Rec_Type;
2692 l_return_status               VARCHAR2(1);
2693 l_action_request_tbl          OE_Order_PUB.Request_Tbl_Type;
2694 
2695 /* out nocopy parameters for Process Order */
2696 
2697 l_x_header_rec                OE_Order_PUB.Header_Rec_Type;
2698 l_x_Header_Adj_rec            OE_Order_PUB.Header_Adj_Rec_Type;
2699 l_x_Header_Adj_tbl            OE_Order_PUB.Header_Adj_Tbl_Type;
2700 l_x_Header_Scredit_rec        OE_Order_PUB.Header_Scredit_Rec_Type;
2701 l_x_Header_Scredit_tbl        OE_Order_PUB.Header_Scredit_Tbl_Type;
2702 l_x_line_rec                  OE_Order_PUB.Line_Rec_Type;
2703 l_x_line_tbl                  OE_Order_PUB.Line_Tbl_Type;
2704 l_x_Line_Adj_rec              OE_Order_PUB.Line_Adj_Rec_Type;
2705 l_x_Line_Adj_tbl              OE_Order_PUB.Line_Adj_Tbl_Type;
2706 l_x_Line_Scredit_rec          OE_Order_PUB.Line_Scredit_Rec_Type;
2707 l_x_Line_Scredit_tbl          OE_Order_PUB.Line_Scredit_Tbl_Type;
2708 l_x_Lot_Serial_rec            OE_Order_PUB.Lot_Serial_Rec_Type;
2709 l_x_Lot_Serial_tbl            OE_Order_PUB.Lot_Serial_Tbl_Type;
2710 l_x_Header_Price_Att_tbl      OE_Order_PUB.Header_Price_Att_Tbl_Type;
2711 l_x_Header_Adj_Att_tbl        OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2712 l_x_Header_Adj_Assoc_tbl      OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2713 l_x_Line_Price_Att_tbl        OE_Order_PUB.Line_Price_Att_Tbl_Type ;
2714 l_x_Header_Price_Att_rec        OE_Order_PUB.Header_Price_Att_Rec_Type ;
2715 l_x_Line_Adj_Att_tbl          OE_Order_PUB.Line_Adj_Att_Tbl_Type ;
2716 l_x_Line_Adj_Assoc_tbl        OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2717 --
2718 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2719 --
2720 BEGIN
2721 
2722 	   IF l_debug_level  > 0 THEN
2723 	       oe_debug_pub.add(  'ENTERING OE_OE_FORM_HEADER_PATTR.DELETE_ROW' , 1 ) ;
2724 	   END IF;
2725 
2726     -- Set the UI flag
2727     OE_GLOBALS.G_UI_FLAG := TRUE;
2728 
2729 	--  Set control flags.
2730 		l_control_rec.controlled_operation := TRUE;
2731 		l_control_rec.check_security       := TRUE;
2732 		l_control_rec.validate_entity      := TRUE;
2733 		l_control_rec.write_to_DB          := TRUE;
2734 
2735 		l_control_rec.clear_dependents     := FALSE;
2736 		l_control_rec.default_attributes   := FALSE;
2737                 --bug 2702382
2738 		l_control_rec.change_attributes    := TRUE;
2739 		l_control_rec.process              := FALSE;
2740 
2741 		l_control_rec.process_entity       := OE_GLOBALS.G_ENTITY_HEADER_PRICE_ATT;
2742 
2743 	    --  Instruct API to retain its caches
2744 	     l_control_rec.clear_api_cache      := FALSE;
2745 		l_control_rec.clear_api_requests   := FALSE;
2746 
2747 
2748 		Get_Order_Header_PAttr
2749 			( p_db_record					=>	FALSE
2750 			, p_order_price_attrib_id		=> p_order_price_attrib_id
2751 			, x_Header_Price_Att_rec			=> l_x_Header_Price_Att_rec
2752 			) ;
2753 
2754 		l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_DELETE;
2755 	     l_x_Header_Price_Att_tbl(1) := l_x_Header_Price_Att_rec;
2756 
2757     		-- Call Oe_Order_Adj_Pvt.Header_Price_Atts
2758     		oe_order_adj_pvt.Header_Price_Atts
2759     		(	p_init_msg_list			=> FND_API.G_TRUE
2760     		,	p_validation_level 			=> FND_API.G_VALID_LEVEL_NONE
2761     		,	p_control_rec				=> l_control_rec
2762     		,	p_x_header_price_att_tbl		=> l_x_Header_Price_Att_tbl
2763     		,	p_x_old_header_price_att_tbl	=> l_x_old_Header_Price_Att_tbl
2764     		);
2765 
2766           /******************************************************************
2767 	     -- Call Process Order
2768     	   	OE_Order_PVT.Process_order
2769 	   		(   p_api_version_number          => 1.0
2770 		,   p_init_msg_list               => FND_API.G_TRUE
2771 		,   x_return_status               => l_return_status
2772 		,   x_msg_count                   => x_msg_count
2773 		,   x_msg_data                    => x_msg_data
2774 		,   p_control_rec                 => l_control_rec
2775 		,   p_Header_price_Att_tbl        => l_Header_Price_Att_tbl
2776 
2777 		,   x_header_rec                  => l_x_header_rec
2778 		,   x_Header_Adj_tbl              => l_x_Header_Adj_tbl
2779 		,   x_Header_price_Att_tbl        => l_x_Header_Price_Att_tbl
2780 		,   x_Header_Adj_Att_tbl          => l_x_Header_Adj_Att_tbl
2781 		,   x_Header_Adj_Assoc_tbl        => l_x_Header_Adj_Assoc_tbl
2782 		,   x_Header_Scredit_tbl          => l_x_Header_Scredit_tbl
2783 		,   x_line_tbl                    => l_x_line_tbl
2784 		,   x_Line_Adj_tbl                => l_x_Line_Adj_tbl
2785 		,   x_Line_price_Att_tbl          => l_x_Line_Price_Att_tbl
2786 		,   x_Line_Adj_Att_tbl            => l_x_Line_Adj_Att_tbl
2787 		,   x_Line_Adj_Assoc_tbl          => l_x_Line_Adj_Assoc_tbl
2788 		,   x_Line_Scredit_tbl            => l_x_Line_Scredit_tbl
2789 		,   x_Lot_Serial_tbl              => l_x_Lot_Serial_tbl
2790 		,    x_action_request_tbl           => l_action_request_tbl
2791 	  );
2792        ********************************************************************/
2793 
2794 	l_x_Header_Price_Att_rec := l_x_Header_Price_Att_tbl(1);
2795 
2796     	IF l_x_Header_Price_Att_rec.return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2797 	  RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2798 	ELSIF l_x_Header_Price_Att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
2799 	    RAISE FND_API.G_EXC_ERROR;
2800 	END IF;
2801 
2802     -- Re-set the UI flag to FALSE
2803     OE_GLOBALS.G_UI_FLAG := FALSE;
2804 
2805 
2806     		x_return_status := FND_API.G_RET_STS_SUCCESS;
2807 
2808 
2809 	   --  Get message count and data
2810 		OE_MSG_PUB.Count_And_Get
2811 		(   p_count                       => x_msg_count
2812 		,   p_data                        => x_msg_data
2813 		);
2814 
2815 EXCEPTION
2816 
2817     		WHEN FND_API.G_EXC_ERROR THEN
2818 
2819 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2820 
2821 		  x_return_status := FND_API.G_RET_STS_ERROR;
2822 
2823 			--  Get message count and data
2824 		  OE_MSG_PUB.Count_And_Get
2825 		  (   p_count                       => x_msg_count
2826 		    ,   p_data                        => x_msg_data
2827 		  );
2828 
2829     		WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2830 
2831 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2832 
2833 		  x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2834 
2835 		--  Get message count and data
2836 		  OE_MSG_PUB.Count_And_Get
2837 		  (   p_count                       => x_msg_count
2838 		    ,   p_data                        => x_msg_data
2839 		  );
2840 
2841 		WHEN OTHERS THEN
2842 
2843 	   OE_GLOBALS.G_UI_FLAG := FALSE;
2844 			NULL;
2845 
2846 END Delete_Row;
2847 
2848 PROCEDURE Lock_Row
2849 (
2850 x_return_status OUT NOCOPY VARCHAR2
2851 
2852 , x_msg_count OUT NOCOPY NUMBER
2853 
2854 , x_msg_data OUT NOCOPY VARCHAR2
2855 
2856 ,   p_order_price_attrib_id         IN  NUMBER
2857 ,   p_lock_control                  IN  NUMBER
2858 )
2859 IS
2860 l_return_status               VARCHAR2(1);
2861 l_x_Header_price_Att_tbl      OE_Order_PUB.Header_Price_Att_Tbl_Type;
2862 l_x_Header_price_Att_Rec      OE_Order_PUB.Header_Price_Att_Rec_Type;
2863 
2864 --
2865 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2866 --
2867 BEGIN
2868 
2869     --  Load Line_Pricing_PAttr record
2870 
2871     l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_LOCK;
2872     l_x_Header_Price_Att_rec.lock_control := p_lock_control;
2873     l_x_Header_Price_Att_rec.order_price_attrib_id := p_order_price_attrib_id;
2874 
2875 	OE_Header_PAttr_Util.Lock_Row
2876 	(   p_x_Header_Price_Att_rec      => l_x_Header_Price_Att_rec
2877  	,   x_return_status               => l_return_status
2878  	);
2879 
2880     IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2881 
2882         --  Set DB flag and write record to cache.
2883 
2884         l_x_Header_Price_Att_rec.db_flag := FND_API.G_TRUE;
2885 
2886         Write_Order_Header_PAttr
2887         (   p_Header_Price_Att_rec      => l_x_Header_Price_Att_rec
2888         ,   p_db_record                   => TRUE
2889         );
2890 
2891     END IF;
2892 
2893     --  Set return status.
2894 
2895     x_return_status := l_return_status;
2896 
2897     --  Get message count and data
2898 
2899     FND_MSG_PUB.Count_And_Get
2900     (   p_count                       => x_msg_count
2901     ,   p_data                        => x_msg_data
2902     );
2903 
2904 
2905 EXCEPTION
2906 
2907     WHEN OTHERS THEN
2908 
2909         IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2910         THEN
2911             FND_MSG_PUB.Add_Exc_Msg
2912             (   G_PKG_NAME
2913             ,   'Lock_Row'
2914             );
2915         END IF;
2916 
2917         x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2918 
2919         --  Get message count and data
2920 
2921         FND_MSG_PUB.Count_And_Get
2922         (   p_count                       => x_msg_count
2923         ,   p_data                        => x_msg_data
2924         );
2925 
2926 
2927 END Lock_Row;
2928 
2929 PROCEDURE Write_Order_Header_PAttr
2930 (	p_Header_Price_Att_rec	IN OE_Order_PUB.Header_Price_Att_Rec_Type
2931 ,	p_db_record			IN BOOLEAN := FALSE
2932 )
2933 IS
2934 
2935 --
2936 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2937 --
2938 BEGIN
2939 
2940 	g_Header_Price_Att_rec := p_Header_Price_Att_rec;
2941 
2942 	IF p_db_record THEN
2943 		g_db_Header_Price_Att_rec	:= p_Header_Price_Att_rec	;
2944 	END IF;
2945 
2946 END Write_Order_Header_PAttr ;
2947 
2948 
2949 PROCEDURE Get_Order_Header_PAttr
2950 (
2951 	p_db_record	IN	BOOLEAN := FALSE
2952 , 	p_order_price_attrib_id	IN 	NUMBER
2953 ,	x_Header_Price_Att_rec	IN OUT NOCOPY OE_Order_PUB.Header_Price_Att_Rec_Type
2954 )
2955 IS
2956 --
2957 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2958 --
2959 BEGIN
2960 
2961 	IF p_order_price_attrib_id <>
2962 			g_Header_Price_Att_rec.order_price_attrib_id THEN
2963 
2964 
2965 		OE_Header_PAttr_Util.Query_Row
2966 			(	p_order_price_attrib_id => p_order_price_attrib_id
2967 			,	x_Header_Price_Att_rec  => g_Header_Price_Att_rec
2968 			) ;
2969 
2970 		g_Header_Price_Att_rec.db_flag := FND_API.G_TRUE;
2971 
2972 	-- 	Load DB Record
2973 
2974 		g_db_Header_Price_Att_rec := g_Header_Price_Att_rec;
2975 
2976 	END IF;
2977 
2978 	IF p_db_record THEN
2979      	-- RETURN g_db_Header_Price_Att_rec;
2980      	x_Header_Price_Att_rec :=  g_db_Header_Price_Att_rec;
2981 	ELSE
2982      	-- RETURN g_Header_Price_Att_rec;
2983      	x_Header_Price_Att_rec := g_Header_Price_Att_rec;
2984 	END IF;
2985 
2986 
2987 END Get_Order_Header_PAttr;
2988 
2989 
2990 PROCEDURE Clear_Order_Header_Attr
2991 IS
2992 --
2993 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2994 --
2995 BEGIN
2996    	g_Header_Price_Att_Rec         := OE_Order_PUB.G_MISS_HEADER_PRICE_ATT_REC;
2997 	g_db_Header_Price_Att_rec      := OE_Order_PUB.G_MISS_HEADER_PRICE_ATT_REC;
2998 
2999 
3000 END Clear_Order_Header_Attr;
3001 
3002 
3003 PROCEDURE Default_Attributes
3004 ( x_return_status OUT NOCOPY VARCHAR2
3005 
3006 , x_msg_count OUT NOCOPY NUMBER
3007 
3008 , x_msg_data OUT NOCOPY VARCHAR2
3009 
3010 ,   p_header_id				 in  NUMBER
3011 ,   p_line_id					 in  NUMBER
3012 , x_attribute1 OUT NOCOPY VARCHAR2
3013 
3014 , x_attribute10 OUT NOCOPY VARCHAR2
3015 
3016 , x_attribute11 OUT NOCOPY VARCHAR2
3017 
3018 , x_attribute12 OUT NOCOPY VARCHAR2
3019 
3020 , x_attribute13 OUT NOCOPY VARCHAR2
3021 
3022 , x_attribute14 OUT NOCOPY VARCHAR2
3023 
3024 , x_attribute15 OUT NOCOPY VARCHAR2
3025 
3026 , x_attribute2 OUT NOCOPY VARCHAR2
3027 
3028 , x_attribute3 OUT NOCOPY VARCHAR2
3029 
3030 , x_attribute4 OUT NOCOPY VARCHAR2
3031 
3032 , x_attribute5 OUT NOCOPY VARCHAR2
3033 
3034 , x_attribute6 OUT NOCOPY VARCHAR2
3035 
3036 , x_attribute7 OUT NOCOPY VARCHAR2
3037 
3038 , x_attribute8 OUT NOCOPY VARCHAR2
3039 
3040 , x_attribute9 OUT NOCOPY VARCHAR2
3041 
3042 , x_flex_title OUT NOCOPY VARCHAR2
3043 
3044 , x_context OUT NOCOPY VARCHAR2
3045 
3046 , x_header_id OUT NOCOPY NUMBER
3047 
3048 , x_line_id OUT NOCOPY NUMBER
3049 
3050 , x_order_price_attrib_id OUT NOCOPY NUMBER
3051 
3052 , x_pricing_attribute1 OUT NOCOPY VARCHAR2
3053 
3054 , x_pricing_attribute10 OUT NOCOPY VARCHAR2
3055 
3056 , x_pricing_attribute11 OUT NOCOPY VARCHAR2
3057 
3058 , x_pricing_attribute12 OUT NOCOPY VARCHAR2
3059 
3060 , x_pricing_attribute13 OUT NOCOPY VARCHAR2
3061 
3062 , x_pricing_attribute14 OUT NOCOPY VARCHAR2
3063 
3064 , x_pricing_attribute15 OUT NOCOPY VARCHAR2
3065 
3066 , x_pricing_attribute2 OUT NOCOPY VARCHAR2
3067 
3068 , x_pricing_attribute3 OUT NOCOPY VARCHAR2
3069 
3070 , x_pricing_attribute4 OUT NOCOPY VARCHAR2
3071 
3072 , x_pricing_attribute5 OUT NOCOPY VARCHAR2
3073 
3074 , x_pricing_attribute6 OUT NOCOPY VARCHAR2
3075 
3076 , x_pricing_attribute7 OUT NOCOPY VARCHAR2
3077 
3078 , x_pricing_attribute8 OUT NOCOPY VARCHAR2
3079 
3080 , x_pricing_attribute9 OUT NOCOPY VARCHAR2
3081 
3082 , x_pricing_attribute16 OUT NOCOPY VARCHAR2
3083 
3084 , x_pricing_attribute17 OUT NOCOPY VARCHAR2
3085 
3086 , x_pricing_attribute18 OUT NOCOPY VARCHAR2
3087 
3088 , x_pricing_attribute19 OUT NOCOPY VARCHAR2
3089 
3090 , x_pricing_attribute20 OUT NOCOPY VARCHAR2
3091 
3092 , x_pricing_attribute21 OUT NOCOPY VARCHAR2
3093 
3094 , x_pricing_attribute22 OUT NOCOPY VARCHAR2
3095 
3096 , x_pricing_attribute23 OUT NOCOPY VARCHAR2
3097 
3098 , x_pricing_attribute24 OUT NOCOPY VARCHAR2
3099 
3100 , x_pricing_attribute25 OUT NOCOPY VARCHAR2
3101 
3102 , x_pricing_attribute26 OUT NOCOPY VARCHAR2
3103 
3104 , x_pricing_attribute27 OUT NOCOPY VARCHAR2
3105 
3106 , x_pricing_attribute28 OUT NOCOPY VARCHAR2
3107 
3108 , x_pricing_attribute29 OUT NOCOPY VARCHAR2
3109 
3110 , x_pricing_attribute30 OUT NOCOPY VARCHAR2
3111 
3112 , x_pricing_context OUT NOCOPY VARCHAR2
3113 
3114 , x_override_flag OUT NOCOPY VARCHAR2
3115 
3116 , x_creation_date OUT NOCOPY DATE
3117 
3118 )
3119 IS
3120 l_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
3121 l_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
3122 
3123 l_control_rec                 OE_GLOBALS.Control_Rec_Type;
3124 l_return_status               VARCHAR2(1);
3125 l_action_request_tbl          OE_Order_PUB.Request_Tbl_Type;
3126 l_x_header_rec                OE_Order_PUB.Header_Rec_Type;
3127 l_x_Header_Adj_rec            OE_Order_PUB.Header_Adj_Rec_Type;
3128 l_x_Header_Adj_tbl            OE_Order_PUB.Header_Adj_Tbl_Type;
3129 l_x_Header_Scredit_rec        OE_Order_PUB.Header_Scredit_Rec_Type;
3130 l_x_Header_Scredit_tbl        OE_Order_PUB.Header_Scredit_Tbl_Type;
3131 l_x_line_rec                  OE_Order_PUB.Line_Rec_Type;
3132 l_x_line_tbl                  OE_Order_PUB.Line_Tbl_Type;
3133 l_x_Line_Adj_rec              OE_Order_PUB.Line_Adj_Rec_Type;
3134 l_x_Line_Adj_tbl              OE_Order_PUB.Line_Adj_Tbl_Type;
3135 l_x_Line_Scredit_rec          OE_Order_PUB.Line_Scredit_Rec_Type;
3136 l_x_Line_Scredit_tbl          OE_Order_PUB.Line_Scredit_Tbl_Type;
3137 l_x_Lot_Serial_rec            OE_Order_PUB.Lot_Serial_Rec_Type;
3138 l_x_Lot_Serial_tbl            OE_Order_PUB.Lot_Serial_Tbl_Type;
3139 l_x_Header_Price_Att_tbl      OE_Order_PUB.Header_Price_Att_Tbl_Type;
3140 l_x_old_Header_Price_Att_tbl  OE_Order_PUB.Header_Price_Att_Tbl_Type;
3141 l_x_Header_Adj_Att_tbl        OE_Order_PUB.Header_Adj_Att_Tbl_Type;
3142 l_x_Header_Adj_Assoc_tbl      OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
3143 l_x_Line_Price_Att_tbl        OE_Order_PUB.Line_Price_Att_Tbl_Type ;
3144 l_x_Header_Price_Att_rec      OE_Order_PUB.Header_Price_Att_Rec_Type ;
3145 l_x_old_Header_Price_Att_rec  OE_Order_PUB.Header_Price_Att_Rec_Type ;
3146 l_x_Line_Adj_Att_tbl          OE_Order_PUB.Line_Adj_Att_Tbl_Type ;
3147 l_x_Line_Adj_Assoc_tbl        OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
3148 
3149 --
3150 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3151 --
3152 BEGIN
3153 
3154 	oe_debug_pub.debug_on;
3155 	IF l_debug_level  > 0 THEN
3156 	    oe_debug_pub.add(  'ENTERING OE_OE_FORM_HEADER_PATTR.DEFAULT_ATTRIBUTES' , 1 ) ;
3157 	END IF;
3158     -- Set the UI flag
3159     OE_GLOBALS.G_UI_FLAG := TRUE;
3160 
3161 -- Set Control Flags
3162 	l_control_rec.controlled_operation := TRUE;
3163 	l_control_rec.check_security       := TRUE;
3164 	l_control_rec.default_attributes   := TRUE;
3165 	l_control_rec.change_attributes    := TRUE;
3166 
3167 	l_control_rec.clear_dependents     := FALSE;
3168 	l_control_rec.validate_entity      := FALSE;
3169 	l_control_rec.write_to_DB          := FALSE;
3170 	l_control_rec.process              := FALSE;
3171 
3172 	--  Instruct API to retain its caches
3173 	l_control_rec.clear_api_cache      := FALSE;
3174 	l_control_rec.clear_api_requests   := FALSE;
3175 -----------------------------------------------
3176 -- Set attributes to NULL
3177 -----------------------------------------------
3178      l_x_old_header_price_att_rec := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_REC;
3179      l_x_header_price_att_rec := OE_ORDER_PUB.G_MISS_HEADER_PRICE_ATT_REC;
3180 
3181 	l_x_Header_Price_Att_rec.header_id := p_header_id;
3182 	l_x_Header_Price_Att_rec.line_id := p_Line_id;
3183 
3184 	l_x_Header_Price_Att_rec.context := NULL;
3185 	l_x_Header_Price_Att_rec.attribute1 := NULL;
3186 	l_x_Header_Price_Att_rec.attribute2 := NULL;
3187 	l_x_Header_Price_Att_rec.attribute3 := NULL;
3188 	l_x_Header_Price_Att_rec.attribute4 := NULL;
3189 	l_x_Header_Price_Att_rec.attribute5 := NULL;
3190 	l_x_Header_Price_Att_rec.attribute6 := NULL;
3191 	l_x_Header_Price_Att_rec.attribute7 := NULL;
3192 	l_x_Header_Price_Att_rec.attribute8 := NULL;
3193 	l_x_Header_Price_Att_rec.attribute9 := NULL;
3194 	l_x_Header_Price_Att_rec.attribute10 := NULL;
3195 	l_x_Header_Price_Att_rec.attribute11 := NULL;
3196 	l_x_Header_Price_Att_rec.attribute12 := NULL;
3197 	l_x_Header_Price_Att_rec.attribute13 := NULL;
3198 	l_x_Header_Price_Att_rec.attribute14 := NULL;
3199 	l_x_Header_Price_Att_rec.attribute15 := NULL;
3200 	l_x_Header_Price_Att_rec.pricing_context	:= NULL;
3201 	l_x_Header_Price_Att_rec.Pricing_Attribute1 := NULL;
3202 	l_x_Header_Price_Att_rec.Pricing_Attribute2 := NULL;
3203 	l_x_Header_Price_Att_rec.Pricing_Attribute3 := NULL;
3204 	l_x_Header_Price_Att_rec.Pricing_Attribute4 := NULL;
3205 	l_x_Header_Price_Att_rec.Pricing_Attribute5 := NULL;
3206 	l_x_Header_Price_Att_rec.Pricing_Attribute6 := NULL;
3207 	l_x_Header_Price_Att_rec.Pricing_Attribute7 := NULL;
3208 	l_x_Header_Price_Att_rec.Pricing_Attribute8 := NULL;
3209 	l_x_Header_Price_Att_rec.Pricing_Attribute9 := NULL;
3210 	l_x_Header_Price_Att_rec.Pricing_Attribute10 := NULL;
3211 	l_x_Header_Price_Att_rec.Pricing_Attribute11 := NULL;
3212 	l_x_Header_Price_Att_rec.Pricing_Attribute12 := NULL;
3213 	l_x_Header_Price_Att_rec.Pricing_Attribute13 := NULL;
3214 	l_x_Header_Price_Att_rec.Pricing_Attribute14 := NULL;
3215 	l_x_Header_Price_Att_rec.Pricing_Attribute15 := NULL;
3216 	l_x_Header_Price_Att_rec.pricing_attribute16 := NULL;
3217 	l_x_Header_Price_Att_rec.pricing_attribute17 := NULL;
3218 	l_x_Header_Price_Att_rec.pricing_attribute18 := NULL;
3219 	l_x_Header_Price_Att_rec.pricing_attribute19 := NULL;
3220 	l_x_Header_Price_Att_rec.pricing_attribute20 := NULL;
3221 	l_x_Header_Price_Att_rec.pricing_attribute21 := NULL;
3222 	l_x_Header_Price_Att_rec.pricing_attribute22 := NULL;
3223 	l_x_Header_Price_Att_rec.pricing_attribute23 := NULL;
3224 	l_x_Header_Price_Att_rec.pricing_attribute24 := NULL;
3225 	l_x_Header_Price_Att_rec.pricing_attribute25 := NULL;
3226 	l_x_Header_Price_Att_rec.pricing_attribute26 := NULL;
3227 	l_x_Header_Price_Att_rec.pricing_attribute27 := NULL;
3228 	l_x_Header_Price_Att_rec.pricing_attribute28 := NULL;
3229 	l_x_Header_Price_Att_rec.pricing_attribute29 := NULL;
3230 	l_x_Header_Price_Att_rec.pricing_attribute30 := NULL;
3231 	l_x_Header_Price_Att_rec.override_flag := NULL;
3232 
3233 
3234 -- Set Operation to Create
3235 	l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_CREATE;
3236 
3237      l_x_Header_Price_Att_tbl(1) := l_x_Header_Price_Att_rec;
3238 
3239 
3240     -- Call Oe_Order_Adj_Pvt.Header_Price_Atts
3241     oe_order_adj_pvt.Header_Price_Atts
3242     (	p_init_msg_list	=> FND_API.G_TRUE
3243     ,	p_validation_level 	=> FND_API.G_VALID_LEVEL_NONE
3244     ,	p_control_rec		=> l_control_rec
3245     ,	p_x_header_price_att_tbl	=> l_x_Header_Price_Att_tbl
3246     ,	p_x_old_header_price_att_tbl	=> l_x_old_Header_Price_Att_tbl
3247     );
3248 
3249 
3250      l_x_Header_Price_Att_rec := l_x_Header_Price_Att_tbl(1);
3251 
3252      IF l_x_header_price_att_rec.return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3253 		  RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3254      ELSIF l_x_header_price_att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
3255 		    RAISE FND_API.G_EXC_ERROR;
3256 	END IF;
3257 
3258 
3259 -- Load out parameters
3260 
3261     x_attribute1                := l_x_Header_Price_Att_rec.attribute1;
3262     x_attribute10               := l_x_Header_Price_Att_rec.attribute10;
3263     x_attribute11               := l_x_Header_Price_Att_rec.attribute11;
3264     x_attribute12               := l_x_Header_Price_Att_rec.attribute12;
3265     x_attribute13               := l_x_Header_Price_Att_rec.attribute13;
3266     x_attribute14               := l_x_Header_Price_Att_rec.attribute14;
3267     x_attribute15               := l_x_Header_Price_Att_rec.attribute15;
3268     x_attribute2                := l_x_Header_Price_Att_rec.attribute2;
3269     x_attribute3                := l_x_Header_Price_Att_rec.attribute3;
3270     x_attribute4                := l_x_Header_Price_Att_rec.attribute4;
3271     x_attribute5                := l_x_Header_Price_Att_rec.attribute5;
3272     x_attribute6                := l_x_Header_Price_Att_rec.attribute6;
3273     x_attribute7                := l_x_Header_Price_Att_rec.attribute7;
3274     x_attribute8                := l_x_Header_Price_Att_rec.attribute8;
3275     x_attribute9                := l_x_Header_Price_Att_rec.attribute9;
3276     x_context                   := l_x_Header_Price_Att_rec.context;
3277     x_flex_title                := l_x_Header_Price_Att_rec.flex_title;
3278     x_header_id                 := l_x_Header_Price_Att_rec.header_id;
3279     x_line_id                   := l_x_Header_Price_Att_rec.line_id;
3280     x_order_price_attrib_id     := l_x_Header_Price_Att_rec.order_price_attrib_id;
3281     x_pricing_attribute1        := l_x_Header_Price_Att_rec.pricing_attribute1;
3282     x_pricing_attribute10       := l_x_Header_Price_Att_rec.pricing_attribute10;
3283     x_pricing_attribute11       := l_x_Header_Price_Att_rec.pricing_attribute11;
3284     x_pricing_attribute12       := l_x_Header_Price_Att_rec.pricing_attribute12;
3285     x_pricing_attribute13       := l_x_Header_Price_Att_rec.pricing_attribute13;
3286     x_pricing_attribute14       := l_x_Header_Price_Att_rec.pricing_attribute14;
3287     x_pricing_attribute15       := l_x_Header_Price_Att_rec.pricing_attribute15;
3288     x_pricing_attribute16       := l_x_Header_Price_Att_rec.pricing_attribute16;
3289     x_pricing_attribute17       := l_x_Header_Price_Att_rec.pricing_attribute17;
3290     x_pricing_attribute18       := l_x_Header_Price_Att_rec.pricing_attribute18;
3291     x_pricing_attribute19       := l_x_Header_Price_Att_rec.pricing_attribute19;
3292     x_pricing_attribute2        := l_x_Header_Price_Att_rec.pricing_attribute2;
3293     x_pricing_attribute20       := l_x_Header_Price_Att_rec.pricing_attribute20;
3294     x_pricing_attribute21       := l_x_Header_Price_Att_rec.pricing_attribute21;
3295     x_pricing_attribute22       := l_x_Header_Price_Att_rec.pricing_attribute22;
3296     x_pricing_attribute23       := l_x_Header_Price_Att_rec.pricing_attribute23;
3297     x_pricing_attribute24       := l_x_Header_Price_Att_rec.pricing_attribute24;
3298     x_pricing_attribute25       := l_x_Header_Price_Att_rec.pricing_attribute25;
3299     x_pricing_attribute26       := l_x_Header_Price_Att_rec.pricing_attribute26;
3300     x_pricing_attribute27       := l_x_Header_Price_Att_rec.pricing_attribute27;
3301     x_pricing_attribute28       := l_x_Header_Price_Att_rec.pricing_attribute28;
3302     x_pricing_attribute29       := l_x_Header_Price_Att_rec.pricing_attribute29;
3303     x_pricing_attribute3        := l_x_Header_Price_Att_rec.pricing_attribute3;
3304     x_pricing_attribute30       := l_x_Header_Price_Att_rec.pricing_attribute30;
3305     x_pricing_attribute4        := l_x_Header_Price_Att_rec.pricing_attribute4;
3306     x_pricing_attribute5        := l_x_Header_Price_Att_rec.pricing_attribute5;
3307     x_pricing_attribute6        := l_x_Header_Price_Att_rec.pricing_attribute6;
3308     x_pricing_attribute7        := l_x_Header_Price_Att_rec.pricing_attribute7;
3309     x_pricing_attribute8        := l_x_Header_Price_Att_rec.pricing_attribute8;
3310     x_pricing_attribute9        := l_x_Header_Price_Att_rec.pricing_attribute9;
3311     x_pricing_context           := l_x_Header_Price_Att_rec.pricing_context;
3312 
3313     x_override_flag           := l_x_Header_Price_Att_rec.override_flag;
3314 
3315 
3316 	l_x_Header_Price_Att_rec.db_flag := FND_API.G_FALSE;
3317 
3318 	IF l_debug_level  > 0 THEN
3319 	    oe_debug_pub.add(  'WRITING TO CACHE..'||L_X_HEADER_PRICE_ATT_REC.ORDER_PRICE_ATTRIB_ID , 1 ) ;
3320 	END IF;
3321 
3322 	Write_Order_Header_PAttr (
3323 			p_Header_Price_Att_rec => l_x_Header_Price_Att_rec
3324 		);
3325 
3326     -- Re-set the UI flag to FALSE
3327     OE_GLOBALS.G_UI_FLAG := FALSE;
3328 
3329  --  Set return status.
3330 	x_return_status := FND_API.G_RET_STS_SUCCESS;
3331 
3332 
3333 	  --  Get message count and data
3334 	 OE_MSG_PUB.Count_And_Get
3335 	 (   	p_count                       => x_msg_count
3336 	    ,    p_data                        => x_msg_data
3337 	  );
3338 
3339 
3340 EXCEPTION
3341  	WHEN FND_API.G_EXC_ERROR THEN
3342 
3343 	   OE_GLOBALS.G_UI_FLAG := FALSE;
3344 		 x_return_status := FND_API.G_RET_STS_ERROR;
3345 
3346 	    --  Get message count and data
3347 
3348 			  OE_MSG_PUB.Count_And_Get
3349 			(   p_count                       => x_msg_count
3350 			   ,   p_data                        => x_msg_data
3351 			 );
3352 
3353  	WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3354 
3355 	   OE_GLOBALS.G_UI_FLAG := FALSE;
3356 
3357         x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3358 
3359 		 --  Get message count and data
3360 
3361 		    OE_MSG_PUB.Count_And_Get
3362 		  (   p_count                       => x_msg_count
3363 		,   p_data                        => x_msg_data
3364 		   );
3365 
3366 	 WHEN OTHERS THEN
3367 
3368 	   OE_GLOBALS.G_UI_FLAG := FALSE;
3369 
3370        x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3371 
3372 	  IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3373 	  THEN
3374 	 	   OE_MSG_PUB.Add_Exc_Msg
3375 		    (   G_PKG_NAME
3376 			 ,   'Default_Attributes'
3377 		   );
3378 	  END IF;
3379 
3380 
3381 
3382        --  Get message count and data
3383 
3384 	OE_MSG_PUB.Count_And_Get
3385 	(   p_count                       => x_msg_count
3386 	,   	p_data                        => x_msg_data
3387 	);
3388 
3389 END Default_Attributes;
3390 
3391 
3392 PROCEDURE Change_Attributes
3393 ( x_return_status OUT NOCOPY VARCHAR2
3394 
3395 , x_msg_count OUT NOCOPY NUMBER
3396 
3397 , x_msg_data OUT NOCOPY VARCHAR2
3398 
3399 ,    p_order_price_attrib_id		 IN NUMBER
3400 ,    p_attr_id					 IN NUMBER
3401 ,	p_context					 IN VARCHAR2
3402 ,    p_attr_value				 IN VARCHAR2
3403 ,	p_attribute1				 IN VARCHAR2
3404 ,	p_attribute2				 IN VARCHAR2
3405 ,	p_attribute3				 IN VARCHAR2
3406 ,	p_attribute4				 IN VARCHAR2
3407 ,	p_attribute5				 IN VARCHAR2
3408 ,	p_attribute6				 IN VARCHAR2
3409 ,	p_attribute7				 IN VARCHAR2
3410 ,	p_attribute8				 IN VARCHAR2
3411 ,	p_attribute9				 IN VARCHAR2
3412 ,	p_attribute10				 IN VARCHAR2
3413 ,	p_attribute11				 IN VARCHAR2
3414 ,	p_attribute12				 IN VARCHAR2
3415 ,	p_attribute13				 IN VARCHAR2
3416 ,	p_attribute14				 IN VARCHAR2
3417 ,	p_attribute15				 IN VARCHAR2
3418 ,   p_pricing_attribute1            IN VARCHAR2
3419 ,   p_pricing_attribute10           IN VARCHAR2
3420 ,   p_pricing_attribute11           IN VARCHAR2
3421 ,   p_pricing_attribute12           IN VARCHAR2
3422 ,   p_pricing_attribute13           IN VARCHAR2
3423 ,   p_pricing_attribute14           IN VARCHAR2
3424 ,   p_pricing_attribute15           IN VARCHAR2
3425 ,   p_pricing_attribute2            IN VARCHAR2
3426 ,   p_pricing_attribute3            IN VARCHAR2
3427 ,   p_pricing_attribute4            IN VARCHAR2
3428 ,   p_pricing_attribute5            IN VARCHAR2
3429 ,   p_pricing_attribute6            IN VARCHAR2
3430 ,   p_pricing_attribute7            IN VARCHAR2
3431 ,   p_pricing_attribute8            IN VARCHAR2
3432 ,   p_pricing_attribute9            IN VARCHAR2
3433 ,   p_pricing_attribute16           IN VARCHAR2
3434 ,   p_pricing_attribute17           IN VARCHAR2
3435 ,   p_pricing_attribute18           IN VARCHAR2
3436 ,   p_pricing_attribute19           IN VARCHAR2
3437 ,   p_pricing_attribute20           IN VARCHAR2
3438 ,   p_pricing_attribute21           IN VARCHAR2
3439 ,   p_pricing_attribute22           IN VARCHAR2
3440 ,   p_pricing_attribute23           IN VARCHAR2
3441 ,   p_pricing_attribute24           IN VARCHAR2
3442 ,   p_pricing_attribute25           IN VARCHAR2
3443 ,   p_pricing_attribute26           IN VARCHAR2
3444 ,   p_pricing_attribute27           IN VARCHAR2
3445 ,   p_pricing_attribute28           IN VARCHAR2
3446 ,   p_pricing_attribute29           IN VARCHAR2
3447 ,   p_pricing_attribute30           IN VARCHAR2
3448 ,   p_pricing_context               IN VARCHAR2
3449 ,   p_flex_title				 IN VARCHAR2
3450 , x_flex_title OUT NOCOPY VARCHAR2
3451 
3452 , x_order_price_attrib_id OUT NOCOPY NUMBER
3453 
3454 , x_header_id OUT NOCOPY NUMBER
3455 
3456 , x_line_id OUT NOCOPY NUMBER
3457 
3458 , x_context OUT NOCOPY VARCHAR2
3459 
3460 , x_attribute1 OUT NOCOPY VARCHAR2
3461 
3462 , x_attribute2 OUT NOCOPY VARCHAR2
3463 
3464 , x_attribute3 OUT NOCOPY VARCHAR2
3465 
3466 , x_attribute4 OUT NOCOPY VARCHAR2
3467 
3468 , x_attribute5 OUT NOCOPY VARCHAR2
3469 
3470 , x_attribute6 OUT NOCOPY VARCHAR2
3471 
3472 , x_attribute7 OUT NOCOPY VARCHAR2
3473 
3474 , x_attribute8 OUT NOCOPY VARCHAR2
3475 
3476 , x_attribute9 OUT NOCOPY VARCHAR2
3477 
3478 , x_attribute10 OUT NOCOPY VARCHAR2
3479 
3480 , x_attribute11 OUT NOCOPY VARCHAR2
3481 
3482 , x_attribute12 OUT NOCOPY VARCHAR2
3483 
3484 , x_attribute13 OUT NOCOPY VARCHAR2
3485 
3486 , x_attribute14 OUT NOCOPY VARCHAR2
3487 
3488 , x_attribute15 OUT NOCOPY VARCHAR2
3489 
3490 , x_pricing_attribute1 OUT NOCOPY VARCHAR2
3491 
3492 , x_pricing_attribute10 OUT NOCOPY VARCHAR2
3493 
3494 , x_pricing_attribute11 OUT NOCOPY VARCHAR2
3495 
3496 , x_pricing_attribute12 OUT NOCOPY VARCHAR2
3497 
3498 , x_pricing_attribute13 OUT NOCOPY VARCHAR2
3499 
3500 , x_pricing_attribute14 OUT NOCOPY VARCHAR2
3501 
3502 , x_pricing_attribute15 OUT NOCOPY VARCHAR2
3503 
3504 , x_pricing_attribute2 OUT NOCOPY VARCHAR2
3505 
3506 , x_pricing_attribute3 OUT NOCOPY VARCHAR2
3507 
3508 , x_pricing_attribute4 OUT NOCOPY VARCHAR2
3509 
3510 , x_pricing_attribute5 OUT NOCOPY VARCHAR2
3511 
3512 , x_pricing_attribute6 OUT NOCOPY VARCHAR2
3513 
3514 , x_pricing_attribute7 OUT NOCOPY VARCHAR2
3515 
3516 , x_pricing_attribute8 OUT NOCOPY VARCHAR2
3517 
3518 , x_pricing_attribute9 OUT NOCOPY VARCHAR2
3519 
3520 , x_pricing_attribute16 OUT NOCOPY VARCHAR2
3521 
3522 , x_pricing_attribute17 OUT NOCOPY VARCHAR2
3523 
3524 , x_pricing_attribute18 OUT NOCOPY VARCHAR2
3525 
3526 , x_pricing_attribute19 OUT NOCOPY VARCHAR2
3527 
3528 , x_pricing_attribute20 OUT NOCOPY VARCHAR2
3529 
3530 , x_pricing_attribute21 OUT NOCOPY VARCHAR2
3531 
3532 , x_pricing_attribute22 OUT NOCOPY VARCHAR2
3533 
3534 , x_pricing_attribute23 OUT NOCOPY VARCHAR2
3535 
3536 , x_pricing_attribute24 OUT NOCOPY VARCHAR2
3537 
3538 , x_pricing_attribute25 OUT NOCOPY VARCHAR2
3539 
3540 , x_pricing_attribute26 OUT NOCOPY VARCHAR2
3541 
3542 , x_pricing_attribute27 OUT NOCOPY VARCHAR2
3543 
3544 , x_pricing_attribute28 OUT NOCOPY VARCHAR2
3545 
3546 , x_pricing_attribute29 OUT NOCOPY VARCHAR2
3547 
3548 , x_pricing_attribute30 OUT NOCOPY VARCHAR2
3549 
3550 , x_pricing_context OUT NOCOPY VARCHAR2
3551 
3552 , x_override_flag OUT NOCOPY VARCHAR2
3553 
3554 
3555 )
3556 IS
3557 l_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
3558 l_old_Header_Price_Att_rec	OE_Order_PUB.Header_Price_Att_Rec_Type;
3559 l_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
3560 l_old_Header_Price_Att_tbl	OE_Order_PUB.Header_Price_Att_Tbl_Type;
3561 
3562 l_control_rec                 OE_GLOBALS.Control_Rec_Type;
3563 l_return_status               VARCHAR2(1);
3564 l_action_request_tbl          OE_Order_PUB.Request_Tbl_Type;
3565 l_x_header_rec                OE_Order_PUB.Header_Rec_Type;
3566 l_x_Header_Adj_rec            OE_Order_PUB.Header_Adj_Rec_Type;
3567 l_x_Header_Adj_tbl            OE_Order_PUB.Header_Adj_Tbl_Type;
3568 l_x_Header_Scredit_rec        OE_Order_PUB.Header_Scredit_Rec_Type;
3569 l_x_Header_Scredit_tbl        OE_Order_PUB.Header_Scredit_Tbl_Type;
3570 l_x_line_rec                  OE_Order_PUB.Line_Rec_Type;
3571 l_x_line_tbl                  OE_Order_PUB.Line_Tbl_Type;
3572 l_x_Line_Adj_rec              OE_Order_PUB.Line_Adj_Rec_Type;
3573 l_x_Line_Adj_tbl              OE_Order_PUB.Line_Adj_Tbl_Type;
3574 l_x_Line_Scredit_rec          OE_Order_PUB.Line_Scredit_Rec_Type;
3575 l_x_Line_Scredit_tbl          OE_Order_PUB.Line_Scredit_Tbl_Type;
3576 l_x_Lot_Serial_rec            OE_Order_PUB.Lot_Serial_Rec_Type;
3577 l_x_Lot_Serial_tbl            OE_Order_PUB.Lot_Serial_Tbl_Type;
3578 l_x_Header_Price_Att_tbl      OE_Order_PUB.Header_Price_Att_Tbl_Type;
3579 l_x_old_Header_Price_Att_tbl  OE_Order_PUB.Header_Price_Att_Tbl_Type;
3580 l_x_Header_Adj_Att_tbl        OE_Order_PUB.Header_Adj_Att_Tbl_Type;
3581 l_x_Header_Adj_Assoc_tbl      OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
3582 l_x_Line_Price_Att_tbl        OE_Order_PUB.Line_Price_Att_Tbl_Type ;
3583 l_x_Header_Price_Att_rec      OE_Order_PUB.Header_Price_Att_Rec_Type ;
3584 l_x_old_Header_Price_Att_rec  OE_Order_PUB.Header_Price_Att_Rec_Type ;
3585 l_x_Line_Adj_Att_tbl          OE_Order_PUB.Line_Adj_Att_Tbl_Type ;
3586 l_x_Line_Adj_Assoc_tbl        OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
3587 
3588 --
3589 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3590 --
3591 BEGIN
3592 	IF l_debug_level  > 0 THEN
3593 	    oe_debug_pub.add(  'ENTERING OE_OE_FORM_HEADER_PATTR.CHANGE_ATTRIBUTES' , 1 ) ;
3594 	END IF;
3595     -- Set the UI flag
3596     OE_GLOBALS.G_UI_FLAG := TRUE;
3597 
3598     --  Set control flags.
3599      l_control_rec.controlled_operation := TRUE;
3600 	l_control_rec.check_security       := TRUE;
3601 	l_control_rec.clear_dependents     := TRUE;
3602 	l_control_rec.default_attributes   := TRUE;
3603 	l_control_rec.change_attributes    := TRUE;
3604 
3605 	l_control_rec.validate_entity      := FALSE;
3606 	l_control_rec.write_to_DB          := FALSE;
3607 	l_control_rec.process              := FALSE;
3608 	l_control_rec.process_entity       := OE_GLOBALS.G_ENTITY_HEADER_PRICE_ATT;
3609 
3610 
3611 		--  Instruct API to retain its caches
3612 		l_control_rec.clear_api_cache      := FALSE;
3613 		l_control_rec.clear_api_requests   := FALSE;
3614 
3615 		SAVEPOINT change_attributes;
3616 
3617 	IF l_debug_level  > 0 THEN
3618 	    oe_debug_pub.add(  'BEFORE GETORDER IN CHANGE_ATTR'||P_ORDER_PRICE_ATTRIB_ID , 1 ) ;
3619 	END IF;
3620 	IF l_debug_level  > 0 THEN
3621 	    oe_debug_pub.add(  'BEFORE GETORDER GLOBAL IS '||G_HEADER_PRICE_ATT_REC.ORDER_PRICE_ATTRIB_ID , 1 ) ;
3622 	END IF;
3623 
3624 			Get_Order_Header_PAttr
3625 			( 	p_db_record  => FALSE
3626 				, p_order_price_attrib_id => p_order_price_attrib_id
3627 				, x_Header_Price_Att_rec  => l_x_Header_Price_Att_rec
3628 			);
3629 
3630 
3631 		l_x_old_Header_Price_Att_rec := l_x_Header_Price_Att_rec;
3632 
3633 
3634 
3635 		   IF p_attr_id = OE_Header_PAttr_Util.G_FLEX_TITLE THEN
3636 			l_x_Header_Price_Att_rec.flex_title := p_attr_value;
3637 	     ELSIF p_attr_id = OE_Header_PAttr_Util.G_HEADER THEN
3638 			l_x_Header_Price_Att_rec.header_id := TO_NUMBER(p_attr_value);
3639 		ELSIF p_attr_id = OE_Header_PAttr_Util.G_LINE THEN
3640 			l_x_Header_Price_Att_rec.line_id := TO_NUMBER(p_attr_value);
3641 		ELSIF p_attr_id = OE_Header_PAttr_Util.G_ORDER_PRICE_ATTRIB THEN
3642 			l_x_Header_Price_Att_rec.order_price_attrib_id := TO_NUMBER(p_attr_value);
3643 
3644 	     ELSIF p_attr_id = OE_Header_PAttr_Util.G_OVERRIDE_FLAG THEN
3645 			l_x_Header_Price_Att_rec.override_flag := p_attr_value;
3646 
3647 	     ELSIF p_attr_id = OE_Header_PAttr_Util.G_CONTEXT
3648 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE1
3649 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE2
3650 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE3
3651 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE4
3652 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE5
3653 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE6
3654 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE7
3655 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE8
3656 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE9
3657 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE10
3658 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE11
3659 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE12
3660 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE13
3661 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE14
3662 			OR     p_attr_id = OE_Header_PAttr_Util.G_ATTRIBUTE15
3663 			THEN
3664 				l_x_Header_Price_Att_rec.context       := p_context;
3665 				l_x_Header_Price_Att_rec.attribute1    := p_attribute1;
3666 				l_x_Header_Price_Att_rec.attribute2    := p_attribute2;
3667 				l_x_Header_Price_Att_rec.attribute3    := p_attribute3;
3668 				l_x_Header_Price_Att_rec.attribute4    := p_attribute4;
3669 				l_x_Header_Price_Att_rec.attribute5    := p_attribute5;
3670 				l_x_Header_Price_Att_rec.attribute6    := p_attribute6;
3671 				l_x_Header_Price_Att_rec.attribute7    := p_attribute7;
3672 				l_x_Header_Price_Att_rec.attribute8    := p_attribute8;
3673 				l_x_Header_Price_Att_rec.attribute9    := p_attribute9;
3674 				l_x_Header_Price_Att_rec.attribute10   := p_attribute10;
3675 				l_x_Header_Price_Att_rec.attribute11   := p_attribute11;
3676 				l_x_Header_Price_Att_rec.attribute12   := p_attribute12;
3677 				l_x_Header_Price_Att_rec.attribute13   := p_attribute13;
3678 				l_x_Header_Price_Att_rec.attribute14   := p_attribute14;
3679 				l_x_Header_Price_Att_rec.attribute15   := p_attribute15;
3680 	    ELSIF p_attr_id = OE_Header_PAttr_Util.G_PRICING_CONTEXT
3681 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE1
3682 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE2
3683 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE3
3684 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE4
3685 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE5
3686 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE6
3687 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE7
3688 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE8
3689 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE9
3690 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE10
3691 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE11
3692 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE12
3693 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE13
3694 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE14
3695 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE15
3696 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE16
3697 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE17
3698 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE18
3699 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE19
3700 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE20
3701 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE21
3702 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE22
3703 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE23
3704 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE24
3705 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE25
3706 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE26
3707 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE27
3708 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE28
3709 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE29
3710 			OR     p_attr_id = OE_Header_PAttr_Util.G_PRICING_ATTRIBUTE30
3711 			THEN
3712 				l_x_Header_Price_Att_rec.flex_title := p_flex_title;
3713 				l_x_Header_Price_Att_rec.pricing_context       := p_pricing_context;
3714 				l_x_Header_Price_Att_rec.pricing_attribute1    := p_pricing_attribute1;
3715 				l_x_Header_Price_Att_rec.pricing_attribute2    := p_pricing_attribute2;
3716 				l_x_Header_Price_Att_rec.pricing_attribute3    := p_pricing_attribute3;
3717 				l_x_Header_Price_Att_rec.pricing_attribute4    := p_pricing_attribute4;
3718 				l_x_Header_Price_Att_rec.pricing_attribute5    := p_pricing_attribute5;
3719 				l_x_Header_Price_Att_rec.pricing_attribute6    := p_pricing_attribute6;
3720 				l_x_Header_Price_Att_rec.pricing_attribute7    := p_pricing_attribute7;
3721 				l_x_Header_Price_Att_rec.pricing_attribute8    := p_pricing_attribute8;
3722 				l_x_Header_Price_Att_rec.pricing_attribute9    := p_pricing_attribute9;
3723 				l_x_Header_Price_Att_rec.pricing_attribute10   := p_pricing_attribute10;
3724 				l_x_Header_Price_Att_rec.pricing_attribute11   := p_pricing_attribute11;
3725 				l_x_Header_Price_Att_rec.pricing_attribute12   := p_pricing_attribute12;
3726 				l_x_Header_Price_Att_rec.pricing_attribute13   := p_pricing_attribute13;
3727 				l_x_Header_Price_Att_rec.pricing_attribute14   := p_pricing_attribute14;
3728 				l_x_Header_Price_Att_rec.pricing_attribute15   := p_pricing_attribute15;
3729 				l_x_Header_Price_Att_rec.pricing_attribute16    := p_pricing_attribute16;
3730 				l_x_Header_Price_Att_rec.pricing_attribute17    := p_pricing_attribute17;
3731 				l_x_Header_Price_Att_rec.pricing_attribute18    := p_pricing_attribute18;
3732 				l_x_Header_Price_Att_rec.pricing_attribute19    := p_pricing_attribute19;
3733 				l_x_Header_Price_Att_rec.pricing_attribute20   := p_pricing_attribute20;
3734 				l_x_Header_Price_Att_rec.pricing_attribute21   := p_pricing_attribute21;
3735 				l_x_Header_Price_Att_rec.pricing_attribute22   := p_pricing_attribute22;
3736 				l_x_Header_Price_Att_rec.pricing_attribute23   := p_pricing_attribute23;
3737 				l_x_Header_Price_Att_rec.pricing_attribute24   := p_pricing_attribute24;
3738 				l_x_Header_Price_Att_rec.pricing_attribute25   := p_pricing_attribute25;
3739 				l_x_Header_Price_Att_rec.pricing_attribute26    := p_pricing_attribute26;
3740 				l_x_Header_Price_Att_rec.pricing_attribute27    := p_pricing_attribute27;
3741 				l_x_Header_Price_Att_rec.pricing_attribute28    := p_pricing_attribute28;
3742 				l_x_Header_Price_Att_rec.pricing_attribute29    := p_pricing_attribute29;
3743 				l_x_Header_Price_Att_rec.pricing_attribute30   := p_pricing_attribute30;
3744 
3745 		ELSE
3746 
3747 	 --  Unexpected error, unrecognized attribute
3748 
3749 		    	IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3750 			THEN
3751 			OE_MSG_PUB.Add_Exc_Msg
3752 			(   G_PKG_NAME
3753 			,   'Change_Attributes'
3754 			,   'Unrecognized attribute'
3755 			);
3756 			END IF;
3757 
3758 																			RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3759 																		END IF;
3760 
3761 
3762 
3763     --  Set Operation.
3764 	   IF FND_API.To_Boolean(l_x_Header_Price_Att_rec.db_flag) THEN
3765 		   IF l_debug_level  > 0 THEN
3766 		       oe_debug_pub.add(  'IT IS AN UPDATE ' , 1 ) ;
3767 		   END IF;
3768 		   l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
3769 	   ELSE
3770 		   IF l_debug_level  > 0 THEN
3771 		       oe_debug_pub.add(  'IT IS CREATE ' , 1 ) ;
3772 		   END IF;
3773 		   l_x_Header_Price_Att_rec.operation := OE_GLOBALS.G_OPR_CREATE;
3774 	   END IF;
3775 
3776 
3777   	--  Populate Order Line pricing Attributes table
3778 
3779 	 l_x_Header_Price_Att_tbl(1) := l_x_Header_Price_Att_rec;
3780 	 l_x_old_Header_Price_Att_tbl(1) := l_x_old_Header_Price_Att_rec;
3781 
3782 
3783     -- Call Oe_Order_Adj_Pvt.Header_Price_Atts
3784     l_Header_Price_Att_rec := l_x_Header_Price_Att_rec;
3785 
3786     oe_order_adj_pvt.Header_Price_Atts
3787     (	p_init_msg_list	=> FND_API.G_TRUE
3788     ,	p_validation_level 	=> FND_API.G_VALID_LEVEL_NONE
3789     ,	p_control_rec		=> l_control_rec
3790     ,	p_x_header_price_att_tbl	=> l_x_Header_Price_Att_tbl
3791     ,	p_x_old_header_price_att_tbl	=> l_x_old_Header_Price_Att_tbl
3792     );
3793 
3794 	l_x_Header_Price_Att_rec := l_x_Header_Price_Att_tbl(1);
3795 
3796     	IF l_x_Header_Price_Att_rec.return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3797 		RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3798 	ELSIF l_x_Header_Price_att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
3799 		RAISE FND_API.G_EXC_ERROR;
3800 	END IF;
3801 
3802 
3803 	-- Init Out parameters
3804     x_attribute1                   := FND_API.G_MISS_CHAR;
3805     x_attribute10                  := FND_API.G_MISS_CHAR;
3806     x_attribute11                  := FND_API.G_MISS_CHAR;
3807     x_attribute12                  := FND_API.G_MISS_CHAR;
3808     x_attribute13                  := FND_API.G_MISS_CHAR;
3809     x_attribute14                  := FND_API.G_MISS_CHAR;
3810     x_attribute15                  := FND_API.G_MISS_CHAR;
3811     x_attribute2                   := FND_API.G_MISS_CHAR;
3812     x_attribute3                   := FND_API.G_MISS_CHAR;
3813     x_attribute4                   := FND_API.G_MISS_CHAR;
3814     x_attribute5                   := FND_API.G_MISS_CHAR;
3815     x_attribute6                   := FND_API.G_MISS_CHAR;
3816     x_attribute7                   := FND_API.G_MISS_CHAR;
3817     x_attribute8                   := FND_API.G_MISS_CHAR;
3818     x_attribute9                   := FND_API.G_MISS_CHAR;
3819     x_context                      := FND_API.G_MISS_CHAR;
3820     x_flex_title                   := FND_API.G_MISS_CHAR;
3821     x_header_id                    := FND_API.G_MISS_NUM;
3822     x_line_id                      := FND_API.G_MISS_NUM;
3823     x_order_price_attrib_id        := FND_API.G_MISS_NUM;
3824     x_pricing_attribute1           := FND_API.G_MISS_CHAR;
3825     x_pricing_attribute10          := FND_API.G_MISS_CHAR;
3826     x_pricing_attribute11          := FND_API.G_MISS_CHAR;
3827     x_pricing_attribute12          := FND_API.G_MISS_CHAR;
3828     x_pricing_attribute13          := FND_API.G_MISS_CHAR;
3829     x_pricing_attribute14          := FND_API.G_MISS_CHAR;
3830     x_pricing_attribute15          := FND_API.G_MISS_CHAR;
3831     x_pricing_attribute16          := FND_API.G_MISS_CHAR;
3832     x_pricing_attribute17          := FND_API.G_MISS_CHAR;
3833     x_pricing_attribute18          := FND_API.G_MISS_CHAR;
3834     x_pricing_attribute19          := FND_API.G_MISS_CHAR;
3835     x_pricing_attribute2           := FND_API.G_MISS_CHAR;
3836     x_pricing_attribute20          := FND_API.G_MISS_CHAR;
3837     x_pricing_attribute21          := FND_API.G_MISS_CHAR;
3838     x_pricing_attribute22          := FND_API.G_MISS_CHAR;
3839     x_pricing_attribute23          := FND_API.G_MISS_CHAR;
3840     x_pricing_attribute24          := FND_API.G_MISS_CHAR;
3841     x_pricing_attribute25          := FND_API.G_MISS_CHAR;
3842     x_pricing_attribute26          := FND_API.G_MISS_CHAR;
3843     x_pricing_attribute27          := FND_API.G_MISS_CHAR;
3844     x_pricing_attribute28          := FND_API.G_MISS_CHAR;
3845     x_pricing_attribute29          := FND_API.G_MISS_CHAR;
3846     x_pricing_attribute3           := FND_API.G_MISS_CHAR;
3847     x_pricing_attribute30          := FND_API.G_MISS_CHAR;
3848     x_pricing_attribute4           := FND_API.G_MISS_CHAR;
3849     x_pricing_attribute5           := FND_API.G_MISS_CHAR;
3850     x_pricing_attribute6           := FND_API.G_MISS_CHAR;
3851     x_pricing_attribute7           := FND_API.G_MISS_CHAR;
3852     x_pricing_attribute8           := FND_API.G_MISS_CHAR;
3853     x_pricing_attribute9           := FND_API.G_MISS_CHAR;
3854     x_pricing_context              := FND_API.G_MISS_CHAR;
3855     x_override_flag              := FND_API.G_MISS_CHAR;
3856 
3857 	-- Record structure
3858 
3859          -- No Get Values
3860 
3861 
3862 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute1,
3863 		   l_Header_Price_Att_rec.attribute1)
3864      THEN
3865 		x_attribute1 := l_x_Header_Price_Att_rec.attribute1;
3866      END IF;
3867 
3868 
3869 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute2,
3870 		   l_Header_Price_Att_rec.attribute2)
3871      THEN
3872 		x_attribute3 := l_x_Header_Price_Att_rec.attribute2;
3873      END IF;
3874 
3875 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute3,
3876 		   l_Header_Price_Att_rec.attribute3)
3877      THEN
3878 		x_attribute3 := l_x_Header_Price_Att_rec.attribute3;
3879      END IF;
3880 
3881 
3882 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute4,
3883 		   l_Header_Price_Att_rec.attribute4)
3884      THEN
3885 		x_attribute4 := l_x_Header_Price_Att_rec.attribute4;
3886      END IF;
3887 
3888 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute5,
3889 		   l_Header_Price_Att_rec.attribute5)
3890      THEN
3891 		x_attribute5 := l_x_Header_Price_Att_rec.attribute5;
3892      END IF;
3893 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute6,
3894 		   l_Header_Price_Att_rec.attribute6)
3895      THEN
3896 		x_attribute6 := l_x_Header_Price_Att_rec.attribute6;
3897      END IF;
3898 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute7,
3899 		   l_Header_Price_Att_rec.attribute7)
3900      THEN
3901 		x_attribute7 := l_x_Header_Price_Att_rec.attribute7;
3902      END IF;
3903 
3904 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute8,
3905 		   l_Header_Price_Att_rec.attribute8)
3906      THEN
3907 		x_attribute8 := l_x_Header_Price_Att_rec.attribute8;
3908      END IF;
3909 
3910 
3911 
3912 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute9,
3913 		   l_Header_Price_Att_rec.attribute9)
3914      THEN
3915 		x_attribute9 := l_x_Header_Price_Att_rec.attribute9;
3916      END IF;
3917 
3918 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute10,
3919 		   l_Header_Price_Att_rec.attribute10)
3920      THEN
3921 		x_attribute10 := l_x_Header_Price_Att_rec.attribute10;
3922      END IF;
3923 
3924 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute11,
3925 		   l_Header_Price_Att_rec.attribute11)
3926      THEN
3927 		x_attribute11 := l_x_Header_Price_Att_rec.attribute11;
3928      END IF;
3929 
3930 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute12,
3931 		   l_Header_Price_Att_rec.attribute12)
3932      THEN
3933 		x_attribute12 := l_x_Header_Price_Att_rec.attribute12;
3934      END IF;
3935 
3936 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute13,
3937 		   l_Header_Price_Att_rec.attribute13)
3938      THEN
3939 		x_attribute13 := l_x_Header_Price_Att_rec.attribute13;
3940      END IF;
3941 
3942 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute14,
3943 		   l_Header_Price_Att_rec.attribute14)
3944      THEN
3945 		x_attribute14 := l_x_Header_Price_Att_rec.attribute14;
3946      END IF;
3947 
3948 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.attribute15,
3949 		   l_Header_Price_Att_rec.attribute15)
3950      THEN
3951 		x_attribute15 := l_x_Header_Price_Att_rec.attribute15;
3952      END IF;
3953 
3954 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.header_id,
3955 		   l_Header_Price_Att_rec.header_id)
3956      THEN
3957 		x_header_id := l_x_Header_Price_Att_rec.header_id;
3958      END IF;
3959 
3960 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.line_id,
3961 		   l_Header_Price_Att_rec.line_id)
3962      THEN
3963 		x_line_id := l_x_Header_Price_Att_rec.line_id;
3964      END IF;
3965 
3966 	IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.flex_title,
3967 		   l_Header_Price_Att_rec.flex_title)
3968      THEN
3969 		x_flex_title := l_x_Header_Price_Att_rec.flex_title;
3970      END IF;
3971 
3972     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.order_price_attrib_id,
3973                             l_Header_Price_Att_rec.order_price_attrib_id)
3974     THEN
3975         x_order_price_attrib_id := l_x_Header_Price_Att_rec.order_price_attrib_id;
3976     END IF;
3977 
3978     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute1,
3979                             l_Header_Price_Att_rec.pricing_attribute1)
3980     THEN
3981         x_pricing_attribute1 := l_x_Header_Price_Att_rec.pricing_attribute1;
3982     END IF;
3983 
3984     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute10,
3985                             l_Header_Price_Att_rec.pricing_attribute10)
3986     THEN
3987         x_pricing_attribute10 := l_x_Header_Price_Att_rec.pricing_attribute10;
3988     END IF;
3989 
3990     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute11,
3991                             l_Header_Price_Att_rec.pricing_attribute11)
3992     THEN
3993         x_pricing_attribute11 := l_x_Header_Price_Att_rec.pricing_attribute11;
3994     END IF;
3995 
3996     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute12,
3997                             l_Header_Price_Att_rec.pricing_attribute12)
3998     THEN
3999         x_pricing_attribute12 := l_x_Header_Price_Att_rec.pricing_attribute12;
4000     END IF;
4001 
4002     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute13,
4003                             l_Header_Price_Att_rec.pricing_attribute13)
4004     THEN
4005         x_pricing_attribute13 := l_x_Header_Price_Att_rec.pricing_attribute13;
4006     END IF;
4007 
4008     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute14,
4009                             l_Header_Price_Att_rec.pricing_attribute14)
4010     THEN
4011         x_pricing_attribute14 := l_x_Header_Price_Att_rec.pricing_attribute14;
4012     END IF;
4013 
4014     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute15,
4015                             l_Header_Price_Att_rec.pricing_attribute15)
4016     THEN
4017         x_pricing_attribute15 := l_x_Header_Price_Att_rec.pricing_attribute15;
4018     END IF;
4019 
4020     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute16,
4021                             l_Header_Price_Att_rec.pricing_attribute16)
4022     THEN
4023         x_pricing_attribute16 := l_x_Header_Price_Att_rec.pricing_attribute16;
4024     END IF;
4025 
4026     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute17,
4027                             l_Header_Price_Att_rec.pricing_attribute17)
4028     THEN
4029         x_pricing_attribute17 := l_x_Header_Price_Att_rec.pricing_attribute17;
4030     END IF;
4031 
4032     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute18,
4033                             l_Header_Price_Att_rec.pricing_attribute18)
4034     THEN
4035         x_pricing_attribute18 := l_x_Header_Price_Att_rec.pricing_attribute18;
4036     END IF;
4037 
4038     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute19,
4039                             l_Header_Price_Att_rec.pricing_attribute19)
4040     THEN
4041         x_pricing_attribute19 := l_x_Header_Price_Att_rec.pricing_attribute19;
4042     END IF;
4043 
4044     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute2,
4045                             l_Header_Price_Att_rec.pricing_attribute2)
4046     THEN
4047         x_pricing_attribute2 := l_x_Header_Price_Att_rec.pricing_attribute2;
4048     END IF;
4049 
4050     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute20,
4051                             l_Header_Price_Att_rec.pricing_attribute20)
4052     THEN
4053         x_pricing_attribute20 := l_x_Header_Price_Att_rec.pricing_attribute20;
4054     END IF;
4055 
4056     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute21,
4057                             l_Header_Price_Att_rec.pricing_attribute21)
4058     THEN
4059         x_pricing_attribute21 := l_x_Header_Price_Att_rec.pricing_attribute21;
4060     END IF;
4061 
4062     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute22,
4063                             l_Header_Price_Att_rec.pricing_attribute22)
4064     THEN
4065         x_pricing_attribute22 := l_x_Header_Price_Att_rec.pricing_attribute22;
4066     END IF;
4067 
4068     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute23,
4069                             l_Header_Price_Att_rec.pricing_attribute23)
4070     THEN
4071         x_pricing_attribute23 := l_x_Header_Price_Att_rec.pricing_attribute23;
4072     END IF;
4073 
4074     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute24,
4075                             l_Header_Price_Att_rec.pricing_attribute24)
4076     THEN
4077         x_pricing_attribute24 := l_x_Header_Price_Att_rec.pricing_attribute24;
4078     END IF;
4079 
4080     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute25,
4081                             l_Header_Price_Att_rec.pricing_attribute25)
4082     THEN
4083         x_pricing_attribute25 := l_x_Header_Price_Att_rec.pricing_attribute25;
4084     END IF;
4085 
4086     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute26,
4087                             l_Header_Price_Att_rec.pricing_attribute26)
4088     THEN
4089         x_pricing_attribute26 := l_x_Header_Price_Att_rec.pricing_attribute26;
4090     END IF;
4091 
4092     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute27,
4093                             l_Header_Price_Att_rec.pricing_attribute27)
4094     THEN
4095         x_pricing_attribute27 := l_x_Header_Price_Att_rec.pricing_attribute27;
4096     END IF;
4097 
4098     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute28,
4099                             l_Header_Price_Att_rec.pricing_attribute28)
4100     THEN
4101         x_pricing_attribute28 := l_x_Header_Price_Att_rec.pricing_attribute28;
4102     END IF;
4103 
4104     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute29,
4105                             l_Header_Price_Att_rec.pricing_attribute29)
4106     THEN
4107         x_pricing_attribute29 := l_x_Header_Price_Att_rec.pricing_attribute29;
4108     END IF;
4109 
4110     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute3,
4111                             l_Header_Price_Att_rec.pricing_attribute3)
4112     THEN
4113         x_pricing_attribute3 := l_x_Header_Price_Att_rec.pricing_attribute3;
4114     END IF;
4115 
4116     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute4,
4117                             l_Header_Price_Att_rec.pricing_attribute4)
4118     THEN
4119         x_pricing_attribute4 := l_x_Header_Price_Att_rec.pricing_attribute4;
4120     END IF;
4121 
4122     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute5,
4123                             l_Header_Price_Att_rec.pricing_attribute5)
4124     THEN
4125         x_pricing_attribute5 := l_x_Header_Price_Att_rec.pricing_attribute5;
4126     END IF;
4127 
4128     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute6,
4129                             l_Header_Price_Att_rec.pricing_attribute6)
4130     THEN
4131         x_pricing_attribute6 := l_x_Header_Price_Att_rec.pricing_attribute6;
4132     END IF;
4133 
4134     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute7,
4135                             l_Header_Price_Att_rec.pricing_attribute7)
4136     THEN
4137         x_pricing_attribute7 := l_x_Header_Price_Att_rec.pricing_attribute7;
4138     END IF;
4139 
4140 
4141     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute8,
4142                             l_Header_Price_Att_rec.pricing_attribute8)
4143     THEN
4144         x_pricing_attribute8 := l_x_Header_Price_Att_rec.pricing_attribute8;
4145     END IF;
4146 
4147     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_attribute9,
4148                             l_Header_Price_Att_rec.pricing_attribute9)
4149     THEN
4150         x_pricing_attribute9 := l_x_Header_Price_Att_rec.pricing_attribute9;
4151     END IF;
4152 
4153 
4154     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.pricing_context,
4155                             l_Header_Price_Att_rec.pricing_context)
4156     THEN
4157         x_pricing_context := l_x_Header_Price_Att_rec.pricing_context;
4158 	END IF;
4159 
4160     IF NOT OE_GLOBALS.Equal(l_x_Header_Price_Att_rec.override_flag,
4161                             l_Header_Price_Att_rec.override_flag)
4162     THEN
4163         x_pricing_context := l_x_Header_Price_Att_rec.override_flag;
4164 	END IF;
4165 
4166 	Write_Order_Header_PAttr
4167 	(
4168 	   p_Header_Price_Att_rec   => l_x_Header_Price_Att_rec
4169 	) ;
4170 
4171 
4172     -- Re-set the UI flag to FALSE
4173     OE_GLOBALS.G_UI_FLAG := FALSE;
4174 
4175  	--  Set return status.
4176 
4177 	x_return_status := FND_API.G_RET_STS_SUCCESS;
4178 
4179 	    --  Get message count and data
4180 
4181 	OE_MSG_PUB.Count_And_Get
4182 	(   p_count                       => x_msg_count
4183 	 ,   p_data                        => x_msg_data
4184 	);
4185 
4186 
4187 	IF l_debug_level  > 0 THEN
4188 	    oe_debug_pub.add(  'EXITING OE_OE_FORM_HEADER_PATTR.CHANGE_ATTRIBUTES' , 1 ) ;
4189 	END IF;
4190 
4191 EXCEPTION
4192 
4193     WHEN FND_API.G_EXC_ERROR THEN
4194 
4195 	   OE_GLOBALS.G_UI_FLAG := FALSE;
4196 
4197 	  x_return_status := FND_API.G_RET_STS_ERROR;
4198 
4199 		--  Get message count and data
4200 	   OE_MSG_PUB.Count_And_Get
4201 	 (   p_count                       => x_msg_count
4202     		,   p_data                        => x_msg_data
4203 	  );
4204 
4205      WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4206 
4207 	   OE_GLOBALS.G_UI_FLAG := FALSE;
4208 
4209 		 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4210 
4211 	    --  Get message count and data
4212 
4213 		  OE_MSG_PUB.Count_And_Get
4214 		(   p_count                       => x_msg_count
4215 		   ,   p_data                        => x_msg_data
4216 		 );
4217 
4218 	 WHEN OTHERS THEN
4219 
4220 	   OE_GLOBALS.G_UI_FLAG := FALSE;
4221 
4222 		   x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4223 
4224 	   IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4225 	   THEN
4226 	    	OE_MSG_PUB.Add_Exc_Msg
4227 		   (   G_PKG_NAME
4228 		   ,   'Change_Attribute');
4229 	   END IF;
4230 
4231 END Change_Attributes;
4232 
4233 END OE_OE_Form_Header_PAttr;