25:
26:
27: PROCEDURE Query_Rows
28: ( p_price_adj_attrib_id IN NUMBER :=
29: FND_API.G_MISS_NUM
30: , p_price_adjustment_id IN NUMBER :=
31: FND_API.G_MISS_NUM
32: , x_Header_Adj_Att_Tbl IN OUT NOCOPY OE_Order_PUB.Header_Adj_Att_Tbl_Type)
33: IS
27: PROCEDURE Query_Rows
28: ( p_price_adj_attrib_id IN NUMBER :=
29: FND_API.G_MISS_NUM
30: , p_price_adjustment_id IN NUMBER :=
31: FND_API.G_MISS_NUM
32: , x_Header_Adj_Att_Tbl IN OUT NOCOPY OE_Order_PUB.Header_Adj_Att_Tbl_Type)
33: IS
34: l_count NUMBER;
35:
106: x_Header_Adj_Att_Tbl(l_count).PRICE_ADJ_ATTRIB_ID := iml_rec.PRICE_ADJ_ATTRIB_ID;
107: x_Header_Adj_Att_Tbl(l_count).LOCK_CONTROL := iml_rec.LOCK_CONTROL;
108:
109: -- set values for non-DB fields
110: x_Header_Adj_Att_Tbl(l_count).db_flag := FND_API.G_TRUE;
111: x_Header_Adj_Att_Tbl(l_count).operation := FND_API.G_MISS_CHAR;
112: x_Header_Adj_Att_Tbl(l_count).return_status := FND_API.G_MISS_CHAR;
113:
114: l_count := l_count + 1;
107: x_Header_Adj_Att_Tbl(l_count).LOCK_CONTROL := iml_rec.LOCK_CONTROL;
108:
109: -- set values for non-DB fields
110: x_Header_Adj_Att_Tbl(l_count).db_flag := FND_API.G_TRUE;
111: x_Header_Adj_Att_Tbl(l_count).operation := FND_API.G_MISS_CHAR;
112: x_Header_Adj_Att_Tbl(l_count).return_status := FND_API.G_MISS_CHAR;
113:
114: l_count := l_count + 1;
115:
108:
109: -- set values for non-DB fields
110: x_Header_Adj_Att_Tbl(l_count).db_flag := FND_API.G_TRUE;
111: x_Header_Adj_Att_Tbl(l_count).operation := FND_API.G_MISS_CHAR;
112: x_Header_Adj_Att_Tbl(l_count).return_status := FND_API.G_MISS_CHAR;
113:
114: l_count := l_count + 1;
115:
116: END LOOP;
115:
116: END LOOP;
117:
118: IF ( p_price_Adj_attrib_id IS NOT NULL
119: and p_price_Adj_attrib_id <> FND_API.G_MISS_NUM)
120: AND
121: (x_Header_Adj_att_tbl.COUNT = 0 )
122: THEN
123: RAISE NO_DATA_FOUND;
127: -- RETURN l_Header_Adj_att_tbl;
128:
129: EXCEPTION
130:
131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
132:
133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
134:
135: WHEN OTHERS THEN
129: EXCEPTION
130:
131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
132:
133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
134:
135: WHEN OTHERS THEN
136:
137: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
141: , 'Query_Rows'
142: );
143: END IF;
144:
145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
146:
147: END Query_Rows;
148:
149: PROCEDURE Insert_Row
210: ( G_PKG_NAME
211: , 'Insert_Row'
212: );
213: END IF;
214: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
215:
216: END Insert_Row;
217:
218: PROCEDURE Update_Row
267: ( G_PKG_NAME
268: , 'Update_Row'
269: );
270: END IF;
271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
272:
273:
274:
275: END Update_Row ;
274:
275: END Update_Row ;
276:
277: PROCEDURE Delete_Row
278: ( p_price_adj_attrib_id NUMBER := FND_API.G_MISS_NUM
279: , p_price_adjustment_id NUMBER := FND_API.G_MISS_NUM
280: )
281: IS
282: --
275: END Update_Row ;
276:
277: PROCEDURE Delete_Row
278: ( p_price_adj_attrib_id NUMBER := FND_API.G_MISS_NUM
279: , p_price_adjustment_id NUMBER := FND_API.G_MISS_NUM
280: )
281: IS
282: --
283: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
283: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
284: --
285: BEGIN
286:
287: IF p_price_adjustment_id <> FND_API.G_MISS_NUM then
288:
289: DELETE OE_PRICE_ADJ_ATTRIBS
290: WHERE price_adjustment_id = p_price_adjustment_id;
291: else
302: ( G_PKG_NAME
303: , 'Delete_Row'
304: );
305: END IF;
306: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
307:
308: END Delete_Row;
309:
310: PROCEDURE Complete_Record
318: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
319: --
320: BEGIN
321:
322: IF l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID = FND_API.G_MISS_NUM THEN
323: l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID := p_old_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID;
324: END IF;
325:
326: IF l_Header_Adj_Att_rec.PRICING_CONTEXT = FND_API.G_MISS_CHAR THEN
322: IF l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID = FND_API.G_MISS_NUM THEN
323: l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID := p_old_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID;
324: END IF;
325:
326: IF l_Header_Adj_Att_rec.PRICING_CONTEXT = FND_API.G_MISS_CHAR THEN
327: l_Header_Adj_Att_rec.PRICING_CONTEXT := p_old_Header_Adj_Att_rec.PRICING_CONTEXT;
328: END IF;
329:
330: IF l_Header_Adj_Att_rec.PRICING_ATTRIBUTE = FND_API.G_MISS_CHAR THEN
326: IF l_Header_Adj_Att_rec.PRICING_CONTEXT = FND_API.G_MISS_CHAR THEN
327: l_Header_Adj_Att_rec.PRICING_CONTEXT := p_old_Header_Adj_Att_rec.PRICING_CONTEXT;
328: END IF;
329:
330: IF l_Header_Adj_Att_rec.PRICING_ATTRIBUTE = FND_API.G_MISS_CHAR THEN
331: l_Header_Adj_Att_rec.PRICING_ATTRIBUTE := p_old_Header_Adj_Att_rec.PRICING_ATTRIBUTE;
332: END IF;
333:
334: IF l_Header_Adj_Att_rec.CREATION_DATE = FND_API.G_MISS_DATE THEN
330: IF l_Header_Adj_Att_rec.PRICING_ATTRIBUTE = FND_API.G_MISS_CHAR THEN
331: l_Header_Adj_Att_rec.PRICING_ATTRIBUTE := p_old_Header_Adj_Att_rec.PRICING_ATTRIBUTE;
332: END IF;
333:
334: IF l_Header_Adj_Att_rec.CREATION_DATE = FND_API.G_MISS_DATE THEN
335: l_Header_Adj_Att_rec.CREATION_DATE := p_old_Header_Adj_Att_rec.CREATION_DATE;
336: END IF;
337:
338: IF l_Header_Adj_Att_rec.CREATED_BY = FND_API.G_MISS_NUM THEN
334: IF l_Header_Adj_Att_rec.CREATION_DATE = FND_API.G_MISS_DATE THEN
335: l_Header_Adj_Att_rec.CREATION_DATE := p_old_Header_Adj_Att_rec.CREATION_DATE;
336: END IF;
337:
338: IF l_Header_Adj_Att_rec.CREATED_BY = FND_API.G_MISS_NUM THEN
339: l_Header_Adj_Att_rec.CREATED_BY := p_old_Header_Adj_Att_rec.CREATED_BY;
340: END IF;
341:
342: IF l_Header_Adj_Att_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
338: IF l_Header_Adj_Att_rec.CREATED_BY = FND_API.G_MISS_NUM THEN
339: l_Header_Adj_Att_rec.CREATED_BY := p_old_Header_Adj_Att_rec.CREATED_BY;
340: END IF;
341:
342: IF l_Header_Adj_Att_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
343: l_Header_Adj_Att_rec.LAST_UPDATE_DATE := p_old_Header_Adj_Att_rec.LAST_UPDATE_DATE;
344: END IF;
345:
346: IF l_Header_Adj_Att_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
342: IF l_Header_Adj_Att_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
343: l_Header_Adj_Att_rec.LAST_UPDATE_DATE := p_old_Header_Adj_Att_rec.LAST_UPDATE_DATE;
344: END IF;
345:
346: IF l_Header_Adj_Att_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
347: l_Header_Adj_Att_rec.LAST_UPDATED_BY := p_old_Header_Adj_Att_rec.LAST_UPDATED_BY;
348: END IF;
349:
350: IF l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
346: IF l_Header_Adj_Att_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
347: l_Header_Adj_Att_rec.LAST_UPDATED_BY := p_old_Header_Adj_Att_rec.LAST_UPDATED_BY;
348: END IF;
349:
350: IF l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
351: l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN := p_old_Header_Adj_Att_rec.LAST_UPDATE_LOGIN;
352: END IF;
353:
354: IF l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM THEN
350: IF l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
351: l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN := p_old_Header_Adj_Att_rec.LAST_UPDATE_LOGIN;
352: END IF;
353:
354: IF l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM THEN
355: l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID := p_old_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID;
356: END IF;
357:
358: IF l_Header_Adj_Att_rec.PROGRAM_ID = FND_API.G_MISS_NUM THEN
354: IF l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM THEN
355: l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID := p_old_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID;
356: END IF;
357:
358: IF l_Header_Adj_Att_rec.PROGRAM_ID = FND_API.G_MISS_NUM THEN
359: l_Header_Adj_Att_rec.PROGRAM_ID := p_old_Header_Adj_Att_rec.PROGRAM_ID;
360: END IF;
361:
362: IF l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
358: IF l_Header_Adj_Att_rec.PROGRAM_ID = FND_API.G_MISS_NUM THEN
359: l_Header_Adj_Att_rec.PROGRAM_ID := p_old_Header_Adj_Att_rec.PROGRAM_ID;
360: END IF;
361:
362: IF l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
363: l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE := p_old_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE;
364: END IF;
365:
366: IF l_Header_Adj_Att_rec.REQUEST_ID = FND_API.G_MISS_NUM THEN
362: IF l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
363: l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE := p_old_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE;
364: END IF;
365:
366: IF l_Header_Adj_Att_rec.REQUEST_ID = FND_API.G_MISS_NUM THEN
367: l_Header_Adj_Att_rec.REQUEST_ID := p_old_Header_Adj_Att_rec.REQUEST_ID;
368: END IF;
369:
370: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM = FND_API.G_MISS_CHAR THEN
366: IF l_Header_Adj_Att_rec.REQUEST_ID = FND_API.G_MISS_NUM THEN
367: l_Header_Adj_Att_rec.REQUEST_ID := p_old_Header_Adj_Att_rec.REQUEST_ID;
368: END IF;
369:
370: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM = FND_API.G_MISS_CHAR THEN
371: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM := p_old_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM;
372: END IF;
373:
374: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO = FND_API.G_MISS_CHAR THEN
370: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM = FND_API.G_MISS_CHAR THEN
371: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM := p_old_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM;
372: END IF;
373:
374: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO = FND_API.G_MISS_CHAR THEN
375: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO := p_old_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO;
376: END IF;
377:
378: IF l_Header_Adj_Att_rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR THEN
374: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO = FND_API.G_MISS_CHAR THEN
375: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO := p_old_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO;
376: END IF;
377:
378: IF l_Header_Adj_Att_rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR THEN
379: l_Header_Adj_Att_rec.COMPARISON_OPERATOR := p_old_Header_Adj_Att_rec.COMPARISON_OPERATOR;
380: END IF;
381:
382: IF l_Header_Adj_Att_rec.FLEX_TITLE = FND_API.G_MISS_CHAR THEN
378: IF l_Header_Adj_Att_rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR THEN
379: l_Header_Adj_Att_rec.COMPARISON_OPERATOR := p_old_Header_Adj_Att_rec.COMPARISON_OPERATOR;
380: END IF;
381:
382: IF l_Header_Adj_Att_rec.FLEX_TITLE = FND_API.G_MISS_CHAR THEN
383: l_Header_Adj_Att_rec.FLEX_TITLE := p_old_Header_Adj_Att_rec.FLEX_TITLE;
384: END IF;
385:
386: IF l_Header_Adj_Att_rec.PRICE_ADJ_ATTRIB_ID = FND_API.G_MISS_NUM THEN
382: IF l_Header_Adj_Att_rec.FLEX_TITLE = FND_API.G_MISS_CHAR THEN
383: l_Header_Adj_Att_rec.FLEX_TITLE := p_old_Header_Adj_Att_rec.FLEX_TITLE;
384: END IF;
385:
386: IF l_Header_Adj_Att_rec.PRICE_ADJ_ATTRIB_ID = FND_API.G_MISS_NUM THEN
387: l_Header_Adj_Att_rec.PRICE_ADJ_ATTRIB_ID := p_old_Header_Adj_Att_rec.PRICE_ADJ_ATTRIB_ID;
388: END IF;
389:
390: -- RETURN l_Header_Adj_Att_rec;
401: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
402: --
403: BEGIN
404:
405: IF l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID = FND_API.G_MISS_NUM THEN
406: l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID := Null;
407: END IF;
408:
409: IF l_Header_Adj_Att_rec.PRICING_CONTEXT = FND_API.G_MISS_CHAR THEN
405: IF l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID = FND_API.G_MISS_NUM THEN
406: l_Header_Adj_Att_rec.PRICE_ADJUSTMENT_ID := Null;
407: END IF;
408:
409: IF l_Header_Adj_Att_rec.PRICING_CONTEXT = FND_API.G_MISS_CHAR THEN
410: l_Header_Adj_Att_rec.PRICING_CONTEXT := Null;
411: END IF;
412:
413: IF l_Header_Adj_Att_rec.PRICING_ATTRIBUTE = FND_API.G_MISS_CHAR THEN
409: IF l_Header_Adj_Att_rec.PRICING_CONTEXT = FND_API.G_MISS_CHAR THEN
410: l_Header_Adj_Att_rec.PRICING_CONTEXT := Null;
411: END IF;
412:
413: IF l_Header_Adj_Att_rec.PRICING_ATTRIBUTE = FND_API.G_MISS_CHAR THEN
414: l_Header_Adj_Att_rec.PRICING_ATTRIBUTE := Null;
415: END IF;
416:
417: IF l_Header_Adj_Att_rec.CREATION_DATE = FND_API.G_MISS_DATE THEN
413: IF l_Header_Adj_Att_rec.PRICING_ATTRIBUTE = FND_API.G_MISS_CHAR THEN
414: l_Header_Adj_Att_rec.PRICING_ATTRIBUTE := Null;
415: END IF;
416:
417: IF l_Header_Adj_Att_rec.CREATION_DATE = FND_API.G_MISS_DATE THEN
418: l_Header_Adj_Att_rec.CREATION_DATE := Null;
419: END IF;
420:
421: IF l_Header_Adj_Att_rec.CREATED_BY = FND_API.G_MISS_NUM THEN
417: IF l_Header_Adj_Att_rec.CREATION_DATE = FND_API.G_MISS_DATE THEN
418: l_Header_Adj_Att_rec.CREATION_DATE := Null;
419: END IF;
420:
421: IF l_Header_Adj_Att_rec.CREATED_BY = FND_API.G_MISS_NUM THEN
422: l_Header_Adj_Att_rec.CREATED_BY := Null;
423: END IF;
424:
425: IF l_Header_Adj_Att_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
421: IF l_Header_Adj_Att_rec.CREATED_BY = FND_API.G_MISS_NUM THEN
422: l_Header_Adj_Att_rec.CREATED_BY := Null;
423: END IF;
424:
425: IF l_Header_Adj_Att_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
426: l_Header_Adj_Att_rec.LAST_UPDATE_DATE := Null;
427: END IF;
428:
429: IF l_Header_Adj_Att_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
425: IF l_Header_Adj_Att_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
426: l_Header_Adj_Att_rec.LAST_UPDATE_DATE := Null;
427: END IF;
428:
429: IF l_Header_Adj_Att_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
430: l_Header_Adj_Att_rec.LAST_UPDATED_BY := Null;
431: END IF;
432:
433: IF l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
429: IF l_Header_Adj_Att_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
430: l_Header_Adj_Att_rec.LAST_UPDATED_BY := Null;
431: END IF;
432:
433: IF l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
434: l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN := Null;
435: END IF;
436:
437: IF l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM THEN
433: IF l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
434: l_Header_Adj_Att_rec.LAST_UPDATE_LOGIN := Null;
435: END IF;
436:
437: IF l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM THEN
438: l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID := Null;
439: END IF;
440:
441: IF l_Header_Adj_Att_rec.PROGRAM_ID = FND_API.G_MISS_NUM THEN
437: IF l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID = FND_API.G_MISS_NUM THEN
438: l_Header_Adj_Att_rec.PROGRAM_APPLICATION_ID := Null;
439: END IF;
440:
441: IF l_Header_Adj_Att_rec.PROGRAM_ID = FND_API.G_MISS_NUM THEN
442: l_Header_Adj_Att_rec.PROGRAM_ID := Null;
443: END IF;
444:
445: IF l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
441: IF l_Header_Adj_Att_rec.PROGRAM_ID = FND_API.G_MISS_NUM THEN
442: l_Header_Adj_Att_rec.PROGRAM_ID := Null;
443: END IF;
444:
445: IF l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
446: l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE := Null;
447: END IF;
448:
449: IF l_Header_Adj_Att_rec.REQUEST_ID = FND_API.G_MISS_NUM THEN
445: IF l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
446: l_Header_Adj_Att_rec.PROGRAM_UPDATE_DATE := Null;
447: END IF;
448:
449: IF l_Header_Adj_Att_rec.REQUEST_ID = FND_API.G_MISS_NUM THEN
450: l_Header_Adj_Att_rec.REQUEST_ID := Null;
451: END IF;
452:
453: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM = FND_API.G_MISS_CHAR THEN
449: IF l_Header_Adj_Att_rec.REQUEST_ID = FND_API.G_MISS_NUM THEN
450: l_Header_Adj_Att_rec.REQUEST_ID := Null;
451: END IF;
452:
453: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM = FND_API.G_MISS_CHAR THEN
454: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM := Null;
455: END IF;
456:
457: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO = FND_API.G_MISS_CHAR THEN
453: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM = FND_API.G_MISS_CHAR THEN
454: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_FROM := Null;
455: END IF;
456:
457: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO = FND_API.G_MISS_CHAR THEN
458: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO := Null;
459: END IF;
460:
461: IF l_Header_Adj_Att_rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR THEN
457: IF l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO = FND_API.G_MISS_CHAR THEN
458: l_Header_Adj_Att_rec.PRICING_ATTR_VALUE_TO := Null;
459: END IF;
460:
461: IF l_Header_Adj_Att_rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR THEN
462: l_Header_Adj_Att_rec.COMPARISON_OPERATOR := Null;
463: END IF;
464:
465: IF l_Header_Adj_Att_rec.FLEX_TITLE = FND_API.G_MISS_CHAR THEN
461: IF l_Header_Adj_Att_rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR THEN
462: l_Header_Adj_Att_rec.COMPARISON_OPERATOR := Null;
463: END IF;
464:
465: IF l_Header_Adj_Att_rec.FLEX_TITLE = FND_API.G_MISS_CHAR THEN
466: l_Header_Adj_Att_rec.FLEX_TITLE := Null;
467: END IF;
468:
469: IF l_Header_Adj_Att_rec.PRICE_ADJ_ATTRIB_ID = FND_API.G_MISS_NUM THEN
465: IF l_Header_Adj_Att_rec.FLEX_TITLE = FND_API.G_MISS_CHAR THEN
466: l_Header_Adj_Att_rec.FLEX_TITLE := Null;
467: END IF;
468:
469: IF l_Header_Adj_Att_rec.PRICE_ADJ_ATTRIB_ID = FND_API.G_MISS_NUM THEN
470: l_Header_Adj_Att_rec.PRICE_ADJ_ATTRIB_ID := Null;
471: END IF;
472:
473: -- RETURN l_Header_Adj_Att_rec;
495: PROCEDURE Lock_Row
496: ( x_return_status OUT NOCOPY VARCHAR2
497:
498: , p_x_Header_Adj_Att_rec IN OUT NOCOPY OE_Order_PUB.Header_Adj_Att_Rec_Type
499: , p_price_adj_attrib_id IN NUMBER := FND_API.G_MISS_NUM
500: )
501: is
502: l_Header_Adj_Att_rec OE_Order_PUB.Header_Adj_Att_Rec_Type;
503: l_lock_control NUMBER;
514: SAVEPOINT Lock_Row;
515:
516: l_lock_control := NULL;
517:
518: IF p_price_adj_attrib_id <> FND_API.G_MISS_NUM THEN
519: l_price_adj_attrib_id := p_price_adj_attrib_id;
520: ELSE
521: l_price_adj_attrib_id := p_x_Header_Adj_Att_rec.price_adj_attrib_id;
522: l_lock_control := p_x_Header_Adj_Att_rec.lock_control;
540:
541: -- If lock_control is not passed(is null or missing), then return the locked record.
542:
543: IF l_lock_control is null OR
544: l_lock_control = FND_API.G_MISS_NUM
545: THEN
546:
547: -- Set return status
548: x_return_status := FND_API.G_RET_STS_SUCCESS;
544: l_lock_control = FND_API.G_MISS_NUM
545: THEN
546:
547: -- Set return status
548: x_return_status := FND_API.G_RET_STS_SUCCESS;
549: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_SUCCESS;
550:
551: -- return for lock by ID.
552: RETURN;
545: THEN
546:
547: -- Set return status
548: x_return_status := FND_API.G_RET_STS_SUCCESS;
549: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_SUCCESS;
550:
551: -- return for lock by ID.
552: RETURN;
553:
571: END IF;
572:
573: -- Set return status
574:
575: x_return_status := FND_API.G_RET_STS_SUCCESS;
576: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_SUCCESS;
577:
578: ELSE
579:
572:
573: -- Set return status
574:
575: x_return_status := FND_API.G_RET_STS_SUCCESS;
576: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_SUCCESS;
577:
578: ELSE
579:
580: -- Row has changed by another user.
581: IF l_debug_level > 0 THEN
582: oe_debug_pub.add( 'ROW CHANGED BY OTHER USER' , 1 ) ;
583: END IF;
584:
585: x_return_status := FND_API.G_RET_STS_ERROR;
586: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_ERROR;
587:
588: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
589: THEN
582: oe_debug_pub.add( 'ROW CHANGED BY OTHER USER' , 1 ) ;
583: END IF;
584:
585: x_return_status := FND_API.G_RET_STS_ERROR;
586: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_ERROR;
587:
588: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
589: THEN
590:
602: EXCEPTION
603:
604: WHEN NO_DATA_FOUND THEN
605:
606: x_return_status := FND_API.G_RET_STS_ERROR;
607: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_ERROR;
608:
609: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
610: THEN
603:
604: WHEN NO_DATA_FOUND THEN
605:
606: x_return_status := FND_API.G_RET_STS_ERROR;
607: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_ERROR;
608:
609: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
610: THEN
611:
614:
615: END IF;
616: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
617:
618: x_return_status := FND_API.G_RET_STS_ERROR;
619: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_ERROR;
620:
621: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
622: THEN
615: END IF;
616: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
617:
618: x_return_status := FND_API.G_RET_STS_ERROR;
619: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_ERROR;
620:
621: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
622: THEN
623:
626:
627: END IF;
628: WHEN OTHERS THEN
629:
630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
631: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
632:
633: end lock_row;
634:
627: END IF;
628: WHEN OTHERS THEN
629:
630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
631: p_x_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
632:
633: end lock_row;
634:
635: -- procedure lock_rows
634:
635: -- procedure lock_rows
636: PROCEDURE Lock_Rows
637: ( p_price_adj_attrib_id IN NUMBER
638: := FND_API.G_MISS_NUM
639: , p_price_adjustment_id IN NUMBER
640: := FND_API.G_MISS_NUM
641: , x_Header_Adj_Att_tbl OUT NOCOPY OE_Order_PUB.Header_Adj_Att_Tbl_Type
642: , x_return_status OUT NOCOPY VARCHAR2
636: PROCEDURE Lock_Rows
637: ( p_price_adj_attrib_id IN NUMBER
638: := FND_API.G_MISS_NUM
639: , p_price_adjustment_id IN NUMBER
640: := FND_API.G_MISS_NUM
641: , x_Header_Adj_Att_tbl OUT NOCOPY OE_Order_PUB.Header_Adj_Att_Tbl_Type
642: , x_return_status OUT NOCOPY VARCHAR2
643:
644: )
663: oe_debug_pub.add( 'ENTERING OE_HEADER_PRICE_AATTR_UTIL.LOCK_ROWS.' , 1 ) ;
664: END IF;
665:
666: IF (p_price_adj_attrib_id IS NOT NULL AND
667: p_price_adj_attrib_id <> FND_API.G_MISS_NUM) AND
668: (p_price_adjustment_id IS NOT NULL AND
669: p_price_adjustment_id <> FND_API.G_MISS_NUM)
670: THEN
671: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
665:
666: IF (p_price_adj_attrib_id IS NOT NULL AND
667: p_price_adj_attrib_id <> FND_API.G_MISS_NUM) AND
668: (p_price_adjustment_id IS NOT NULL AND
669: p_price_adjustment_id <> FND_API.G_MISS_NUM)
670: THEN
671: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
672: OE_MSG_PUB.Add_Exc_Msg
673: ( G_PKG_NAME
675: , 'Keys are mutually exclusive: price_adj_attrib_id = ' ||
676: p_price_adj_attrib_id || ', price_adjustment_id = ' || p_price_adjustment_id );
677: END IF;
678:
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681:
682: IF p_price_adj_attrib_id <> FND_API.G_MISS_NUM THEN
683:
678:
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681:
682: IF p_price_adj_attrib_id <> FND_API.G_MISS_NUM THEN
683:
684: SELECT price_adj_attrib_id
685: INTO l_price_adj_attrib_id
686: FROM oe_price_adj_attribs
690:
691: -- null header_id shouldn't be passed in unnecessarily if
692: -- price_adj_attrib_id is passed in already.
693: BEGIN
694: IF p_price_adjustment_id <> FND_API.G_MISS_NUM THEN
695: SAVEPOINT LOCK_ROWS;
696: OPEN lock_att_hdr(p_price_adjustment_id);
697:
698: LOOP
718: , p_price_adjustment_id => p_price_adjustment_id
719: , x_Header_Adj_Att_tbl => x_Header_Adj_Att_tbl
720: );
721:
722: x_return_status := FND_API.G_RET_STS_SUCCESS;
723:
724: EXCEPTION
725: WHEN NO_DATA_FOUND THEN
726: x_return_status := FND_API.G_RET_STS_ERROR;
722: x_return_status := FND_API.G_RET_STS_SUCCESS;
723:
724: EXCEPTION
725: WHEN NO_DATA_FOUND THEN
726: x_return_status := FND_API.G_RET_STS_ERROR;
727: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
728: THEN
729: fnd_message.set_name('ONT','OE_LOCK_ROW_DELETED');
730: OE_MSG_PUB.Add;
730: OE_MSG_PUB.Add;
731: END IF;
732:
733: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
734: x_return_status := FND_API.G_RET_STS_ERROR;
735: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
736: THEN
737: fnd_message.set_name('ONT','OE_LOCK_ROW_ALREADY_LOCKED');
738: OE_MSG_PUB.Add;
738: OE_MSG_PUB.Add;
739: END IF;
740:
741: WHEN OTHERS THEN
742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
743: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
744: THEN
745: OE_MSG_PUB.Add_Exc_Msg
746: ( G_PKG_NAME