[Home] [Help]
23: And sct.quota_flag = 'Y';
24:
25: BEGIN
26:
27: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.VALIDATE_LSC_QUOTA_TOTAL', 1);
28:
29: x_return_status := FND_API.G_RET_STS_SUCCESS;
30: OPEN C_LSC_Quota_Total(p_line_id);
31: FETCH C_LSC_Quota_Total
41: OE_MSG_PUB.Add;
42: x_return_status := FND_API.G_RET_STS_ERROR;
43: END IF;
44:
45: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.VALIDATE_LSC_QUOTA_TOTAL', 1);
46:
47: EXCEPTION
48:
49: WHEN FND_API.G_EXC_ERROR THEN
75: ) IS
76:
77: BEGIN
78:
79: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.VALIDATE_HSC_QUOTA_TOTAL', 1);
80:
81: OE_Validate_Header_Scredit.Validate_HSC_QUOTA_TOTAL(x_return_status => x_return_status, p_header_id => p_header_id);
82:
83: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.VALIDATE_HSC_QUOTA_TOTAL', 1);
79: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.VALIDATE_HSC_QUOTA_TOTAL', 1);
80:
81: OE_Validate_Header_Scredit.Validate_HSC_QUOTA_TOTAL(x_return_status => x_return_status, p_header_id => p_header_id);
82:
83: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.VALIDATE_HSC_QUOTA_TOTAL', 1);
84:
85: EXCEPTION
86:
87: WHEN OTHERS THEN
118: x_msg_count NUMBER;
119: x_msg_data VARCHAR2(2000);
120: Begin
121:
122: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.DFLT_HSCREDIT_PRIMARY_SREP', 1);
123: OE_HEADER_SCREDIT_UTIL.DFLT_Hscredit_Primary_Srep
124: ( p_header_id =>p_header_id
125: ,p_SalesRep_id =>p_SalesRep_id
126: ,x_return_status=>x_return_status);
123: OE_HEADER_SCREDIT_UTIL.DFLT_Hscredit_Primary_Srep
124: ( p_header_id =>p_header_id
125: ,p_SalesRep_id =>p_SalesRep_id
126: ,x_return_status=>x_return_status);
127: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.DFLT_HSCREDIT_PRIMARY_SREP', 1);
128:
129: EXCEPTION
130:
131: WHEN OTHERS THEN
197:
198:
199: BEGIN
200:
201: OE_DEBUG_PUB.Add('Entering OE_DELAYED_REQUESTS_UTIL.Cascade_Service_Scredit',1);
202: l_line_id := p_request_rec.param8;
203: l_new_salesrep_id := p_request_rec.param1;
204: l_old_salesrep_id := p_request_rec.param2;
205: l_new_sales_credit_type_id := p_request_rec.param3;
207: l_new_percent := p_request_rec.param5;
208: l_old_percent := p_request_rec.param6;
209: l_operation := p_request_rec.param7;
210:
211: oe_debug_pub.add('l_line_id := ' || p_request_rec.param8,2);
212: oe_debug_pub.add('l_new_salesrep_id := ' || p_request_rec.param1,2);
213: oe_debug_pub.add('l_old_salesrep_id := ' || p_request_rec.param2,2);
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
208: l_old_percent := p_request_rec.param6;
209: l_operation := p_request_rec.param7;
210:
211: oe_debug_pub.add('l_line_id := ' || p_request_rec.param8,2);
212: oe_debug_pub.add('l_new_salesrep_id := ' || p_request_rec.param1,2);
213: oe_debug_pub.add('l_old_salesrep_id := ' || p_request_rec.param2,2);
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
216: oe_debug_pub.add('l_new_percent := ' || p_request_rec.param5,2);
209: l_operation := p_request_rec.param7;
210:
211: oe_debug_pub.add('l_line_id := ' || p_request_rec.param8,2);
212: oe_debug_pub.add('l_new_salesrep_id := ' || p_request_rec.param1,2);
213: oe_debug_pub.add('l_old_salesrep_id := ' || p_request_rec.param2,2);
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
216: oe_debug_pub.add('l_new_percent := ' || p_request_rec.param5,2);
217: oe_debug_pub.add('l_old_percent := ' || p_request_rec.param6,2);
210:
211: oe_debug_pub.add('l_line_id := ' || p_request_rec.param8,2);
212: oe_debug_pub.add('l_new_salesrep_id := ' || p_request_rec.param1,2);
213: oe_debug_pub.add('l_old_salesrep_id := ' || p_request_rec.param2,2);
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
216: oe_debug_pub.add('l_new_percent := ' || p_request_rec.param5,2);
217: oe_debug_pub.add('l_old_percent := ' || p_request_rec.param6,2);
218: oe_debug_pub.add('l_operation := ' || p_request_rec.param7,2);
211: oe_debug_pub.add('l_line_id := ' || p_request_rec.param8,2);
212: oe_debug_pub.add('l_new_salesrep_id := ' || p_request_rec.param1,2);
213: oe_debug_pub.add('l_old_salesrep_id := ' || p_request_rec.param2,2);
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
216: oe_debug_pub.add('l_new_percent := ' || p_request_rec.param5,2);
217: oe_debug_pub.add('l_old_percent := ' || p_request_rec.param6,2);
218: oe_debug_pub.add('l_operation := ' || p_request_rec.param7,2);
219:
212: oe_debug_pub.add('l_new_salesrep_id := ' || p_request_rec.param1,2);
213: oe_debug_pub.add('l_old_salesrep_id := ' || p_request_rec.param2,2);
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
216: oe_debug_pub.add('l_new_percent := ' || p_request_rec.param5,2);
217: oe_debug_pub.add('l_old_percent := ' || p_request_rec.param6,2);
218: oe_debug_pub.add('l_operation := ' || p_request_rec.param7,2);
219:
220: OPEN PARENT;
213: oe_debug_pub.add('l_old_salesrep_id := ' || p_request_rec.param2,2);
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
216: oe_debug_pub.add('l_new_percent := ' || p_request_rec.param5,2);
217: oe_debug_pub.add('l_old_percent := ' || p_request_rec.param6,2);
218: oe_debug_pub.add('l_operation := ' || p_request_rec.param7,2);
219:
220: OPEN PARENT;
221: FETCH PARENT
214: oe_debug_pub.add('l_new_sales_credit_type_id :=' || p_request_rec.param3,2);
215: oe_debug_pub.add('l_old_sales_credit_type_id := ' || p_request_rec.param4,2);
216: oe_debug_pub.add('l_new_percent := ' || p_request_rec.param5,2);
217: oe_debug_pub.add('l_old_percent := ' || p_request_rec.param6,2);
218: oe_debug_pub.add('l_operation := ' || p_request_rec.param7,2);
219:
220: OPEN PARENT;
221: FETCH PARENT
222: INTO l_line_id,l_item_type_code,l_line_set_id,l_service_reference_line_id,
237: CLOSE PARENT;
238:
239: IF l_item_type_code = 'MODEL' THEN
240:
241: oe_debug_pub.Add('Need to cascade the sales credit');
242:
243: FOR I IN MODEL_SERVICES LOOP
244: l_temp := 0;
245: -- For create check the existance of the record based on the
250:
251: l_sales_credit_type_id := l_new_sales_credit_type_id;
252: l_salesrep_id := l_new_salesrep_id;
253: l_percent := l_new_percent;
254: oe_debug_pub.Add('In l_operation if');
255: ELSE
256: l_sales_credit_type_id := l_old_sales_credit_type_id;
257: l_salesrep_id := l_old_salesrep_id;
258: l_percent := l_old_percent;
266: And sales_credit_type_id = l_sales_credit_type_id
267: AND salesrep_id = l_salesrep_id;
268: -- AND Percent = l_percent;
269:
270: oe_debug_pub.Add('l_q_percent ' || l_q_percent);
271: oe_debug_pub.Add('l_percent ' || l_percent);
272: EXCEPTION
273:
274: WHEN NO_DATA_FOUND THEN
267: AND salesrep_id = l_salesrep_id;
268: -- AND Percent = l_percent;
269:
270: oe_debug_pub.Add('l_q_percent ' || l_q_percent);
271: oe_debug_pub.Add('l_percent ' || l_percent);
272: EXCEPTION
273:
274: WHEN NO_DATA_FOUND THEN
275:
284: l_temp := 10;
285:
286: END;
287:
288: oe_debug_pub.Add('l_temp: ' || l_temp);
289: --Get Quota flag.
290:
291: BEGIN
292:
314: IF l_operation = OE_GLOBALS.G_OPR_CREATE THEN
315:
316: IF l_new_quota_flag = 'Y' THEN
317:
318: oe_debug_pub.Add(' In create and quota');
319: Select nvl(sum(Percent),0) Per_total
320: Into l_per_total
321: From oe_sales_credits sc,
322: oe_sales_credit_types sct
326: And sct.quota_flag = 'Y';
327:
328: END IF; -- Quota flag.
329:
330: oe_debug_pub.Add(' L_per_total : ' || nvl(l_per_total,0) || 'End');
331: oe_debug_pub.Add(' L_new_percent : ' || nvl(l_new_percent,0) || 'End');
332:
333: IF (l_per_total + l_new_percent) <= 100
334: OR l_new_quota_flag = 'N' THEN
327:
328: END IF; -- Quota flag.
329:
330: oe_debug_pub.Add(' L_per_total : ' || nvl(l_per_total,0) || 'End');
331: oe_debug_pub.Add(' L_new_percent : ' || nvl(l_new_percent,0) || 'End');
332:
333: IF (l_per_total + l_new_percent) <= 100
334: OR l_new_quota_flag = 'N' THEN
335:
332:
333: IF (l_per_total + l_new_percent) <= 100
334: OR l_new_quota_flag = 'N' THEN
335:
336: oe_debug_pub.Add(' Populate sales credit ');
337: -- Child.service does not have a sales credit and create the
338: -- same.
339: l_count := l_count + 1;
340:
383: END IF;
384:
385: END IF; -- Quota flag.
386:
387: oe_debug_pub.Add(' L_per_total : ' || nvl(l_per_total,0) || 'End');
388: oe_debug_pub.Add(' L_new_percent : ' || nvl(l_new_percent,0) || 'End');
389:
390:
391: IF nvl(l_per_total,0) <= 100
384:
385: END IF; -- Quota flag.
386:
387: oe_debug_pub.Add(' L_per_total : ' || nvl(l_per_total,0) || 'End');
388: oe_debug_pub.Add(' L_new_percent : ' || nvl(l_new_percent,0) || 'End');
389:
390:
391: IF nvl(l_per_total,0) <= 100
392: OR l_new_quota_flag = 'N' THEN
422: END LOOP;
423: END IF; -- Model.
424: END IF; -- Service
425:
426: oe_debug_pub.Add(' l_count : ' || to_char(l_count));
427: IF l_count > 0 THEN -- Have some data that need to get cascaded.
428:
429: -- Call OE_Order_PVT.Process_order to insert sales credits.
430: -- Set recursion mode.
464: l_Line_Scredit_tbl.DELETE;
465:
466: END IF; -- l_count.
467:
468: OE_DEBUG_PUB.Add('Exiting OE_DELAYED_REQUESTS_UTIL.Cascade_Service_Scredit',1);
469: x_return_status := l_return_status;
470:
471: EXCEPTION
472:
523: DUPLICATE_DISCOUNT EXCEPTION;
524:
525: BEGIN
526:
527: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.CHECK_DUPLICATE', 1);
528:
529: l_entity_id := p_request_rec.entity_id;
530: l_entity_code := p_request_rec.entity_code;
531: l_discount_id := To_number(p_request_rec.param1);
531: l_discount_id := To_number(p_request_rec.param1);
532: l_header_id := To_number(p_request_rec.param2);
533: l_line_id := To_number(p_request_rec.param3);
534:
535: oe_debug_pub.ADD('OEXSRLNB: Check Duplicate. '||
536: ' entity_code = ' || l_entity_code, 2);
537:
538:
539: -- Check if same discount has already been applied
596:
597:
598: x_return_status := l_return_status;
599:
600: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.CHECK_DUPLICATE', 1);
601:
602: EXCEPTION
603:
604: WHEN NO_DATA_FOUND OR DUPLICATE_DISCOUNT
657:
658:
659: BEGIN
660:
661: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.CHECK_FIXED_PRICE', 1);
662:
663: l_entity_id := p_request_rec.entity_id;
664: l_entity_code := p_request_rec.entity_code;
665: l_discount_line_id := To_number(p_request_rec.param1);
666: l_header_id := To_number(p_request_rec.param2);
667: l_line_id := To_number(p_request_rec.param3);
668:
669:
670: oe_debug_pub.ADD('OEXSRLNB: Check Fixed Price. '||
671: ' entity_code = ' || l_entity_code, 2);
672:
673: IF l_entity_code = OE_GLOBALS.G_ENTITY_HEADER_ADJ THEN
674: FOR l_hdr_adjustment IN hdr_line_adjustments LOOP
693: AND ROWNUM = 1;
694:
695: IF l_count <> 0
696: AND l_discount_count = 1 THEN
697: oe_debug_pub.ADD('OEXSRLNB2: Check Fixed Price. '||
698: ' entity_code = ' || l_entity_code, 2);
699: l_return_status := FND_API.G_RET_STS_ERROR;
700: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
701: THEN
755: AND dln.discount_line_id = adj.discount_line_id
756: AND dln.price IS NOT NULL
757: AND ROWNUM = 1;
758:
759: oe_debug_pub.ADD('OEXSRLNB1: Check Fixed Price. '||
760: ' entity_code = ' || l_entity_code, 2);
761: IF SQL%rowcount <> 0
762: AND l_discount_count = 1 THEN
763: oe_debug_pub.ADD('OEXSRLNB2: Check Fixed Price. '||
759: oe_debug_pub.ADD('OEXSRLNB1: Check Fixed Price. '||
760: ' entity_code = ' || l_entity_code, 2);
761: IF SQL%rowcount <> 0
762: AND l_discount_count = 1 THEN
763: oe_debug_pub.ADD('OEXSRLNB2: Check Fixed Price. '||
764: ' entity_code = ' || l_entity_code, 2);
765: l_return_status := FND_API.G_RET_STS_ERROR;
766: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
767: THEN
779:
780:
781: x_return_status := FND_API.G_RET_STS_SUCCESS;
782:
783: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.CHECK_FIXED_PRICE', 1);
784:
785: EXCEPTION
786:
787: WHEN NO_DATA_FOUND OR FIXED_PRICE
864:
865:
866: BEGIN
867:
868: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.CHECK_PERCENTAGE', 1);
869:
870: l_entity_code := p_request_rec.entity_code;
871:
872: oe_debug_pub.ADD('OEXSRLNB: Check Percentage. '||
868: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.CHECK_PERCENTAGE', 1);
869:
870: l_entity_code := p_request_rec.entity_code;
871:
872: oe_debug_pub.ADD('OEXSRLNB: Check Percentage. '||
873: ' entity_code = ' || l_entity_code, 2);
874:
875:
876: -- Check if maximum percentage has not been execeded on the
879: THEN
880:
881: l_header_id := p_request_rec.entity_id;
882:
883: oe_debug_pub.ADD('OEXSRLNB: check header percentage', 2);
884:
885: OPEN hdr_adj_total;
886: FETCH hdr_adj_total INTO l_percent_total;
887: CLOSE hdr_adj_total;
889: OPEN max_line_adj_total;
890: FETCH max_line_adj_total INTO l_percent_total;
891: CLOSE max_line_adj_total;
892:
893: oe_debug_pub.ADD('OEXSRLNB: maximum percentage total = ' ||
894: To_char(l_percent_total), 2);
895:
896: IF ( l_percent_total > 100 ) THEN
897:
917:
918: l_line_id := p_request_rec.entity_id;
919: l_header_id := To_number(p_request_rec.param1);
920:
921: oe_debug_pub.ADD('OEXSRLNB: check line percentage', 2);
922:
923: OPEN hdr_adj_total;
924: FETCH hdr_adj_total INTO l_percent_total;
925: CLOSE hdr_adj_total;
927: OPEN line_adj_total;
928: FETCH line_adj_total INTO l_percent_total;
929: CLOSE line_adj_total;
930:
931: oe_debug_pub.ADD('OEXSRLNB: line percentage total = ' ||
932: To_char(l_percent_total), 2);
933:
934:
935: IF ( l_percent_total > 100 ) THEN
987:
988:
989: x_return_status := l_return_status;
990:
991: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.CHECK_PERCENTAGE', 1);
992:
993: EXCEPTION
994:
995: WHEN PERCENTAGE_EXCEEDED
1056: l_request_tbl OE_Order_Pub.Request_Tbl_Type;
1057: req_ind NUMBER;
1058: BEGIN
1059:
1060: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.CREATE_CONFIG_ITEM', 1);
1061:
1062:
1063: oe_debug_pub.add('In procedure Create_Config', 2);
1064:
1059:
1060: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.CREATE_CONFIG_ITEM', 1);
1061:
1062:
1063: oe_debug_pub.add('In procedure Create_Config', 2);
1064:
1065: l_line_rec := OE_Order_PUB.G_MISS_LINE_REC;
1066:
1067:
1074: l_control_rec.write_to_DB := TRUE;
1075: l_control_rec.process := FALSE;
1076:
1077:
1078: OE_DEBUG_PUB.ADD('Loading top_model_line_id: ' || p_top_model_line_id, 2);
1079: l_config_rec :=
1080: OE_Order_Cache.Load_Top_Model_Line (p_top_model_line_id);
1081:
1082: l_line_rec.top_model_line_id := p_top_model_line_id;
1123: RAISE FND_API.G_EXC_ERROR;
1124: END IF;
1125: */
1126:
1127: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.CREATE_CONFIG_ITEM', 1);
1128:
1129: EXCEPTION
1130:
1131: WHEN FND_API.G_EXC_ERROR THEN
1156: )
1157: IS
1158: BEGIN
1159:
1160: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.INS_INCLUDED_ITEMS', 1);
1161:
1162: OE_DEBUG_PUB.ADD('Inserting Included Items', 2);
1163:
1164: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.INS_INCLUDED_ITEMS', 1);
1158: BEGIN
1159:
1160: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.INS_INCLUDED_ITEMS', 1);
1161:
1162: OE_DEBUG_PUB.ADD('Inserting Included Items', 2);
1163:
1164: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.INS_INCLUDED_ITEMS', 1);
1165: Null;
1166: END;
1160: oe_debug_pub.add('Entering OE_DELAYED_REQUESTS_UTIL.INS_INCLUDED_ITEMS', 1);
1161:
1162: OE_DEBUG_PUB.ADD('Inserting Included Items', 2);
1163:
1164: oe_debug_pub.add('Exiting OE_DELAYED_REQUESTS_UTIL.INS_INCLUDED_ITEMS', 1);
1165: Null;
1166: END;
1167:
1168: PROCEDURE verify_payment
1177: BEGIN
1178:
1179: x_return_status := FND_API.G_RET_STS_SUCCESS;
1180:
1181: oe_debug_pub.ADD('Entering delayed request utility for verify payment',1);
1182:
1183: OE_Verify_Payment_PUB.Verify_Payment
1184: ( p_header_id => p_header_id
1185: , p_calling_action => 'UPDATE'
1194: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1195: RAISE FND_API.G_EXC_ERROR;
1196: END IF;
1197:
1198: oe_debug_pub.ADD('Exiting delayed request utility for verify payment',1);
1199:
1200: EXCEPTION
1201:
1202: WHEN FND_API.G_EXC_ERROR THEN
1250: l_split_by VARCHAR2(30);
1251: l_src_doc_type_id NUMBER; -- added for bug 6778016
1252: BEGIN
1253:
1254: OE_DEBUG_PUB.ADD('RMA: In INSERT_RMA_SCREDIT_ADJUSTMENT',1);
1255:
1256: OE_DEBUG_PUB.ADD('RMA: Line Id is '||TO_CHAR(p_line_id),2);
1257:
1258: x_return_status := FND_API.G_RET_STS_SUCCESS;
1252: BEGIN
1253:
1254: OE_DEBUG_PUB.ADD('RMA: In INSERT_RMA_SCREDIT_ADJUSTMENT',1);
1255:
1256: OE_DEBUG_PUB.ADD('RMA: Line Id is '||TO_CHAR(p_line_id),2);
1257:
1258: x_return_status := FND_API.G_RET_STS_SUCCESS;
1259:
1260: -- bug 3317323
1266: FROM oe_order_lines
1267: WHERE line_id = p_line_id;
1268: EXCEPTION
1269: WHEN NO_DATA_FOUND THEN
1270: OE_DEBUG_PUB.ADD('Invalid line_id',1);
1271: RETURN;
1272: END;
1273: IF l_split_by = 'SYSTEM' THEN
1274: RETURN;
1288: RAISE FND_API.G_EXC_ERROR;
1289: END IF;
1290: EXCEPTION
1291: WHEN NO_DATA_FOUND THEN
1292: OE_DEBUG_PUB.ADD('There are no existing sales credits to delete',1);
1293: NULL;
1294: END;
1295:
1296: IF l_Line_Scredit_tbl.COUNT > 0 THEN
1317: FROM oe_order_lines
1318: WHERE line_id = p_line_id;
1319: EXCEPTION
1320: WHEN NO_DATA_FOUND THEN
1321: OE_DEBUG_PUB.ADD('Invalid line_id',1);
1322: RETURN;
1323: END;
1324: */
1325:
1328: ,x_line_Scredit_tbl => l_Line_Scredit_tbl);
1329: EXCEPTION
1330: WHEN NO_DATA_FOUND THEN
1331: --RETURN;
1332: OE_DEBUG_PUB.ADD('There are no Sales credits on the reference line',1);
1333: NULL;
1334: END;
1335:
1336: IF l_Line_Scredit_tbl.COUNT > 0 THEN
1361: changed.This is resulting in some issues. Hence we are resetting these two parametes to the
1362: initial values passed.
1363: */
1364: if l_src_doc_type_id=2 then
1365: OE_DEBUG_PUB.ADD('Order is getting copied, Setting process partial flag to true');
1366: l_control_rec.controlled_operation:=true;
1367: l_control_rec.process_partial:=true;
1368: l_control_rec.clear_dependents:= FALSE;
1369: end if; /*End of changes for bug 6778016*/
1367: l_control_rec.process_partial:=true;
1368: l_control_rec.clear_dependents:= FALSE;
1369: end if; /*End of changes for bug 6778016*/
1370:
1371: OE_DEBUG_PUB.ADD('Calling OE_ORDER_PVT.Line_Scredits',1);
1372: OE_ORDER_PVT.Line_Scredits
1373: (p_validation_level => FND_API.G_VALID_LEVEL_FULL
1374: ,p_control_rec => l_control_rec
1375: ,p_x_Line_Scredit_tbl => l_x_Line_Scredit_tbl
1375: ,p_x_Line_Scredit_tbl => l_x_Line_Scredit_tbl
1376: ,p_x_old_Line_Scredit_tbl => l_x_old_Line_Scredit_tbl
1377: ,x_return_status => l_return_status);
1378:
1379: OE_DEBUG_PUB.ADD('After Calling OE_ORDER_PVT.Line_Scredits',1);
1380: -- Reset recursion mode.
1381: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
1382:
1383: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1404: l_Line_Scredit_tbl.DELETE;
1405:
1406: END IF; /* end inserting sales credit */
1407:
1408: oe_debug_pub.add('Exit INSERT_RMA_SCREDIT_ADJUSTMENT',1);
1409: EXCEPTION
1410:
1411:
1412: WHEN FND_API.G_EXC_ERROR THEN
1495: BEGIN
1496: x_return_status := l_return_status;
1497:
1498: -- Get the Line record
1499: oe_debug_pub.add('Entering Tax line',1);
1500:
1501: BEGIN
1502:
1503: OE_LINE_UTIL.Query_Row(p_line_id => l_line_id,
1527: END IF;
1528:
1529: l_line_rec.tax_value := l_tax_value;
1530:
1531: oe_debug_pub.add('After Successfully calculating Tax',2);
1532:
1533: -- Check for existing TAX records in OE_PRICE_ADJUSTMENTS table for the
1534: -- given line record.
1535: -- Replace Query_rows with lock rows --
1548: x_return_status := FND_API.G_RET_STS_SUCCESS;
1549: END;
1550:
1551: -- If any TAX records exists, then delete those records.
1552: oe_debug_pub.add('line_adj_tbl count is : ' || l_l_line_adj_tbl.count , 1);
1553:
1554: IF l_l_line_adj_tbl.COUNT > 0 THEN
1555:
1556: FOR I IN 1..l_l_line_adj_tbl.COUNT LOOP
1553:
1554: IF l_l_line_adj_tbl.COUNT > 0 THEN
1555:
1556: FOR I IN 1..l_l_line_adj_tbl.COUNT LOOP
1557: oe_debug_pub.add('Parent adj Id is '||
1558: to_char(l_l_line_adj_tbl(I).parent_adjustment_id),2);
1559: IF l_l_line_adj_tbl(I).list_line_type_code = 'TAX' AND
1560: l_l_line_adj_tbl(I).parent_adjustment_id IS NULL
1561: THEN
1568: END IF;
1569:
1570: -- Load IN parameters for Line Adjustment record
1571:
1572: oe_debug_pub.add('line tax rec out nocopy table 1: ' || l_tax_rec_out_tbl.count , 1);
1573:
1574: IF l_tax_rec_out_tbl.COUNT > 0
1575: THEN
1576: FOR I IN 1..l_tax_rec_out_tbl.COUNT LOOP
1667:
1668: -- Set control flags.
1669: l_control_rec.controlled_operation := FALSE;
1670:
1671: oe_debug_pub.add('Before calling Process Order API',2);
1672:
1673: -- Set recursion mode.
1674: -- OE_GLOBALS.G_RECURSION_MODE := 'Y';
1675:
1710: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1711: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1712: RAISE FND_API.G_EXC_ERROR;
1713: END IF;
1714: oe_debug_pub.add('After calling Process_order API',2);
1715: END IF;
1716: l_tax_rec_out_tbl.delete;
1717: x_return_status := l_return_status;
1718: oe_debug_pub.add('Exiting Tax Line',1);
1714: oe_debug_pub.add('After calling Process_order API',2);
1715: END IF;
1716: l_tax_rec_out_tbl.delete;
1717: x_return_status := l_return_status;
1718: oe_debug_pub.add('Exiting Tax Line',1);
1719: EXCEPTION
1720: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1721: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1722:
1761: l_msg_data VARCHAR2(2000);
1762:
1763: BEGIN
1764:
1765: OE_Debug_PUB.Add('Entering OE_Delayed_Requests_Util.split_Hold',1);
1766: -- call the oe_holds_pub to split the line
1767: OE_Holds_pvt.split_hold (
1768: p_line_id => p_entity_id
1769: , p_split_from_line_id => p_split_from_line_id
1771: , x_msg_count => l_msg_count
1772: , x_msg_data => l_msg_data
1773: );
1774: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1775: OE_Debug_PUB.Add('Error in OE_Holds_PUB.split_Holds',2);
1776: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1777: RAISE FND_API.G_EXC_ERROR;
1778: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1779: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1779: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1780: END IF;
1781: END IF; -- if split hold was successful
1782:
1783: OE_Debug_PUB.Add('Exiting OE_Delayed_Requests_Util.split_Hold',2);
1784:
1785: EXCEPTION
1786:
1787: WHEN FND_API.G_EXC_ERROR THEN
1828: l_msg_data VARCHAR2(2000);
1829:
1830: BEGIN
1831:
1832: OE_Debug_PUB.Add('Entering Eval_Hold_Source', 1);
1833: Oe_debug_pub.add('Hold entity: '|| p_hold_entity_code ||' '|| p_hold_entity_id,2);
1834: x_return_status := FND_API.G_RET_STS_SUCCESS;
1835:
1836: oe_holds_pub.evaluate_holds ( p_entity_code => p_entity_code
1829:
1830: BEGIN
1831:
1832: OE_Debug_PUB.Add('Entering Eval_Hold_Source', 1);
1833: Oe_debug_pub.add('Hold entity: '|| p_hold_entity_code ||' '|| p_hold_entity_id,2);
1834: x_return_status := FND_API.G_RET_STS_SUCCESS;
1835:
1836: oe_holds_pub.evaluate_holds ( p_entity_code => p_entity_code
1837: ,p_entity_id => p_entity_id
1844:
1845:
1846:
1847: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1848: OE_Debug_PUB.Add('Error in OE_Holds_PUB.evaluate_holds',2);
1849: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1850: RAISE FND_API.G_EXC_ERROR;
1851: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: END IF;
1854: END IF;
1855:
1856: OE_Debug_PUB.Add('Exiting Eval_Hold_Source', 1);
1857:
1858: EXCEPTION
1859: WHEN FND_API.G_EXC_ERROR THEN
1860:
1896: l_msg_data VARCHAR2(2000) := NULL;
1897: l_line_rec OE_Order_PUB.Line_Rec_Type;
1898: BEGIN
1899:
1900: OE_Debug_PUB.Add('Entering OE_Delayed_Requests_Util.Apply_Hold',1);
1901:
1902: IF l_request_rec.entity_code = OE_Globals.G_ENTITY_HEADER THEN
1903: -- Indicates Header Level action
1904: --l_header_id := l_request_rec.entity_id;
1902: IF l_request_rec.entity_code = OE_Globals.G_ENTITY_HEADER THEN
1903: -- Indicates Header Level action
1904: --l_header_id := l_request_rec.entity_id;
1905: l_hold_source_rec.header_id := l_request_rec.entity_id;
1906: OE_Debug_PUB.Add('Header ID: '|| l_hold_source_rec.header_id,1);
1907:
1908: ELSIF l_request_rec.entity_code = OE_Globals.G_ENTITY_LINE THEN
1909:
1910: OE_debug_pub.add('Line ID: '|| l_request_rec.entity_id,1);
1906: OE_Debug_PUB.Add('Header ID: '|| l_hold_source_rec.header_id,1);
1907:
1908: ELSIF l_request_rec.entity_code = OE_Globals.G_ENTITY_LINE THEN
1909:
1910: OE_debug_pub.add('Line ID: '|| l_request_rec.entity_id,1);
1911: BEGIN
1912: SELECT header_id
1913: INTO l_header_id
1914: FROM oe_order_lines
1912: SELECT header_id
1913: INTO l_header_id
1914: FROM oe_order_lines
1915: WHERE line_id = l_request_rec.entity_id;
1916: OE_debug_pub.add('OEXUREQB:Header ID: '|| l_header_id);
1917:
1918:
1919: EXCEPTION
1920: WHEN OTHERS THEN
1917:
1918:
1919: EXCEPTION
1920: WHEN OTHERS THEN
1921: OE_debug_pub.add('OEXUREQB:No header ID for this line');
1922: RAISE NO_DATA_FOUND;
1923: END;
1924:
1925: l_hold_source_rec.header_id := l_header_id;
1990: );
1991:
1992:
1993: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1994: OE_Debug_PUB.Add('OEXUREQB:Error in OE_Holds_PUB.Apply_Holds',1);
1995: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1996: RAISE FND_API.G_EXC_ERROR;
1997: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1997: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1999: END IF;
2000: ELSE
2001: OE_Debug_PUB.Add('OEXUREQB:Hold applied',1);
2002: END IF;
2003:
2004: x_request_rec := l_request_rec;
2005:
2002: END IF;
2003:
2004: x_request_rec := l_request_rec;
2005:
2006: OE_Debug_PUB.Add('Exiting OE_Delayed_Requests_Util.Apply_Hold',1);
2007: EXCEPTION
2008:
2009: WHEN FND_API.G_EXC_ERROR THEN
2010:
2057: l_hold_release_rec OE_HOLDS_PVT.Hold_Release_Rec_Type;
2058: l_hold_source_rec OE_HOLDS_PVT.Hold_Source_Rec_Type;
2059: BEGIN
2060:
2061: OE_Debug_PUB.Add('Entering OE_Delayed_Requests_Util.Release_Hold',1);
2062:
2063: IF l_request_rec.entity_code = OE_Globals.G_ENTITY_HEADER THEN
2064: -- Indicates Header Level action
2065:
2064: -- Indicates Header Level action
2065:
2066: l_header_id := l_request_rec.entity_id;
2067: l_hold_source_rec.header_id := l_header_id; --Bug 5042664
2068: OE_Debug_PUB.Add('Header ID: '|| l_header_id,1);
2069:
2070: ELSIF l_request_rec.entity_code = OE_Globals.G_ENTITY_LINE THEN
2071:
2072: --l_line_id := l_request_rec.entity_id;
2069:
2070: ELSIF l_request_rec.entity_code = OE_Globals.G_ENTITY_LINE THEN
2071:
2072: --l_line_id := l_request_rec.entity_id;
2073: OE_debug_pub.add('Line ID: '|| l_request_rec.entity_id,1);
2074: BEGIN
2075: SELECT header_id
2076: INTO l_header_id
2077: FROM oe_order_lines
2075: SELECT header_id
2076: INTO l_header_id
2077: FROM oe_order_lines
2078: WHERE line_id = l_request_rec.entity_id;
2079: OE_debug_pub.add('OEXUREQB:Header ID: '|| l_header_id);
2080:
2081:
2082: EXCEPTION
2083: WHEN OTHERS THEN
2080:
2081:
2082: EXCEPTION
2083: WHEN OTHERS THEN
2084: OE_debug_pub.add('OEXUREQB:No header ID for this line');
2085: RAISE NO_DATA_FOUND;
2086: END;
2087:
2088: l_hold_source_rec.header_id := l_header_id;
2115: l_hold_source_rec.HOLD_ENTITY_CODE := l_entity_code;
2116: l_hold_source_rec.HOLD_ENTITY_ID := l_entity_id;
2117:
2118:
2119: OE_Debug_PUB.Add('Calling OE_Holds_PUB.Release_Holds',1);
2120: /*
2121: OE_Holds_PUB.Release_Holds
2122: ( p_api_version => 1.0
2123: , p_validation_level => p_validation_level
2139: ,x_return_status => l_return_status
2140: ,x_msg_count => l_msg_count
2141: ,x_msg_data => l_msg_data
2142: );
2143: OE_DEBUG_PUB.Add('x_return_status:' || l_return_status,1);
2144:
2145: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2146: OE_Debug_PUB.Add('Error in OE_Holds_PUB.Release_Holds',2);
2147: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2142: );
2143: OE_DEBUG_PUB.Add('x_return_status:' || l_return_status,1);
2144:
2145: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2146: OE_Debug_PUB.Add('Error in OE_Holds_PUB.Release_Holds',2);
2147: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2148: RAISE FND_API.G_EXC_ERROR;
2149: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2149: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2151: END IF;
2152: ELSE
2153: OE_Debug_PUB.Add('Hold released',1);
2154: END IF;
2155:
2156: x_request_rec := l_request_rec;
2157: OE_Debug_PUB.Add('Exiting OE_Delayed_Requests_Util.Release_Hold',1);
2153: OE_Debug_PUB.Add('Hold released',1);
2154: END IF;
2155:
2156: x_request_rec := l_request_rec;
2157: OE_Debug_PUB.Add('Exiting OE_Delayed_Requests_Util.Release_Hold',1);
2158: EXCEPTION
2159:
2160: WHEN FND_API.G_EXC_ERROR THEN
2161:
2405: END IF;
2406:
2407: IF l_action IN ('B', 'C', 'R') THEN
2408:
2409: oe_debug_pub.add('calling Process_FTE_Action for Order Import.', 3);
2410:
2411: -- set p_ui_flag to Y since this is called from Action
2412: -- through Order Import.
2413: OE_FTE_INTEGRATION_PVT.Process_FTE_Action
2421: ,x_msg_data => l_msg_data);
2422: ELSE
2423: fnd_message.set_name('ONT','OE_FTE_NOT_ENABLED');
2424: OE_MSG_PUB.Add;
2425: oe_debug_pub.add('Unable to process FTE integration either due to
2426: FTE is not enabled or action code is invalid.', 3);
2427: x_return_status := FND_API.G_RET_STS_ERROR;
2428: END IF;
2429:
2426: FTE is not enabled or action code is invalid.', 3);
2427: x_return_status := FND_API.G_RET_STS_ERROR;
2428: END IF;
2429:
2430: OE_DEBUG_PUB.Add('Return Status fte action: '||x_return_status);
2431:
2432: EXCEPTION
2433: WHEN OTHERS THEN
2434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2478: l_action := 'REMOVE';
2479: END IF;
2480:
2481: l_selelect_line_tbl(1).id1 := p_entity_id; --R12.MOAC
2482: OE_DEBUG_PUB.Add(' Before Calling Process Sets',1);
2483:
2484: --R12.MOAC
2485: OE_SET_UTIL.Process_Sets
2486: ( p_selected_line_tbl => l_selelect_line_tbl,
2494: x_msg_count => l_msg_count ,
2495: x_msg_data => l_msg_data);
2496:
2497:
2498: OE_DEBUG_PUB.Add('After Calling Process Sets'||x_return_status,1);
2499:
2500:
2501: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2502: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2534: l_update_lines_tbl OE_ORDER_PUB.request_tbl_type;
2535: l_update_lines_index NUMBER := 0;
2536: BEGIN
2537:
2538: oe_debug_pub.add('Entering UTIL.Update_Shipping'||p_line_id, 1);
2539: -- bug 4741573
2540: OE_MSG_PUB.set_msg_context ( p_entity_code => 'LINE'
2541: ,p_entity_id => p_line_id
2542: ,p_line_id => p_line_id );
2579: p_operation
2580: = p_update_shipping_tbl(l_update_shipping_index).request_unique_key1)
2581: THEN
2582:
2583: oe_debug_pub.add
2584: ('deleting req '|| p_update_shipping_tbl(l_update_shipping_index).entity_id);
2585:
2586: OE_Delayed_Requests_PVT.Delete_Request
2587: (p_entity_code => p_update_shipping_tbl(l_update_shipping_index).entity_code
2602:
2603: -- bug 4741573
2604: OE_MSG_PUB.reset_msg_context('LINE');
2605:
2606: OE_Debug_PUB.Add('Exiting OE_Delayed_Requests_Util.Update_Shipping',1);
2607: EXCEPTION
2608: WHEN OTHERS THEN
2609: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2610:
2633: l_process_id NUMBER;
2634: l_shipping_index NUMBER :=0 ;
2635: BEGIN
2636:
2637: OE_Debug_PUB.Add('Entering OE_Delayed_Requests_Util.Ship_Confirmation'||p_process_type||p_process_id,1);
2638:
2639: l_process_id := to_number(p_process_id);
2640: l_shipping_index := p_ship_confirmation_tbl.First;
2641: oe_debug_pub.add('P_line_id :'||to_char(p_line_id),2);
2637: OE_Debug_PUB.Add('Entering OE_Delayed_Requests_Util.Ship_Confirmation'||p_process_type||p_process_id,1);
2638:
2639: l_process_id := to_number(p_process_id);
2640: l_shipping_index := p_ship_confirmation_tbl.First;
2641: oe_debug_pub.add('P_line_id :'||to_char(p_line_id),2);
2642:
2643: WHILE l_shipping_index IS NOT NULL LOOP
2644:
2645: oe_debug_pub.add('Request Type : '||p_ship_confirmation_tbl(l_shipping_index).request_type,2);
2641: oe_debug_pub.add('P_line_id :'||to_char(p_line_id),2);
2642:
2643: WHILE l_shipping_index IS NOT NULL LOOP
2644:
2645: oe_debug_pub.add('Request Type : '||p_ship_confirmation_tbl(l_shipping_index).request_type,2);
2646: oe_debug_pub.add('Param1 : '||p_ship_confirmation_tbl(l_shipping_index).param1,2);
2647: IF p_ship_confirmation_tbl(l_shipping_index).request_type
2648: = OE_GLOBALS.G_SHIP_CONFIRMATION AND
2649: p_ship_confirmation_tbl(l_shipping_index).param1 = p_process_id THEN
2642:
2643: WHILE l_shipping_index IS NOT NULL LOOP
2644:
2645: oe_debug_pub.add('Request Type : '||p_ship_confirmation_tbl(l_shipping_index).request_type,2);
2646: oe_debug_pub.add('Param1 : '||p_ship_confirmation_tbl(l_shipping_index).param1,2);
2647: IF p_ship_confirmation_tbl(l_shipping_index).request_type
2648: = OE_GLOBALS.G_SHIP_CONFIRMATION AND
2649: p_ship_confirmation_tbl(l_shipping_index).param1 = p_process_id THEN
2650: oe_debug_pub.add('RUnique 1 : '||p_ship_confirmation_tbl(l_shipping_index).request_unique_key1,2);
2646: oe_debug_pub.add('Param1 : '||p_ship_confirmation_tbl(l_shipping_index).param1,2);
2647: IF p_ship_confirmation_tbl(l_shipping_index).request_type
2648: = OE_GLOBALS.G_SHIP_CONFIRMATION AND
2649: p_ship_confirmation_tbl(l_shipping_index).param1 = p_process_id THEN
2650: oe_debug_pub.add('RUnique 1 : '||p_ship_confirmation_tbl(l_shipping_index).request_unique_key1,2);
2651: oe_debug_pub.add('Entity Id : '||to_char(p_ship_confirmation_tbl(l_shipping_index).entity_id),2);
2652: IF p_line_id <> p_ship_confirmation_tbl(l_shipping_index).entity_id THEN
2653:
2654: OE_Delayed_Requests_PVT.Delete_Request
2647: IF p_ship_confirmation_tbl(l_shipping_index).request_type
2648: = OE_GLOBALS.G_SHIP_CONFIRMATION AND
2649: p_ship_confirmation_tbl(l_shipping_index).param1 = p_process_id THEN
2650: oe_debug_pub.add('RUnique 1 : '||p_ship_confirmation_tbl(l_shipping_index).request_unique_key1,2);
2651: oe_debug_pub.add('Entity Id : '||to_char(p_ship_confirmation_tbl(l_shipping_index).entity_id),2);
2652: IF p_line_id <> p_ship_confirmation_tbl(l_shipping_index).entity_id THEN
2653:
2654: OE_Delayed_Requests_PVT.Delete_Request
2655: (p_entity_code => p_ship_confirmation_tbl(l_shipping_index).entity_code
2670: p_process_id => l_process_id,
2671: p_process_type => p_process_type,
2672: x_return_status => x_return_status
2673: );
2674: OE_Debug_PUB.Add('Exiting OE_Delayed_Requests_Util.Ship_Confirmation',1);
2675:
2676: EXCEPTION
2677: WHEN OTHERS THEN
2678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2696: IS
2697: l_return_status VARCHAR2(1);
2698: BEGIN
2699:
2700: oe_debug_pub.add('Entering SPLIT_RESERVATIONS',1);
2701:
2702: oe_debug_pub.add('Calling OE_ORDER_SCH_UTIL.SPLIT_RESERVATIONS',1);
2703:
2704: OE_ORDER_SCH_UTIL.SPLIT_RESERVATIONS
2698: BEGIN
2699:
2700: oe_debug_pub.add('Entering SPLIT_RESERVATIONS',1);
2701:
2702: oe_debug_pub.add('Calling OE_ORDER_SCH_UTIL.SPLIT_RESERVATIONS',1);
2703:
2704: OE_ORDER_SCH_UTIL.SPLIT_RESERVATIONS
2705: (p_reserved_line_id => p_reserved_line_id,
2706: p_ordered_quantity => p_ordered_quantity,
2706: p_ordered_quantity => p_ordered_quantity,
2707: p_reserved_quantity => p_reserved_quantity,
2708: x_return_status => l_return_status);
2709:
2710: oe_debug_pub.add('After Calling OE_ORDER_SCH_UTIL.SPLIT_RESERVATIONS: '
2711: || l_return_status ,1);
2712:
2713: x_return_status := l_return_status;
2714:
2765: from oe_order_lines
2766: where line_id = p_top_model_line_id;
2767:
2768: l_complete_flag := nvl(l_complete_flag, 'N');
2769: oe_debug_pub.add('option added to a booked order? : '||l_complete_flag , 2);
2770:
2771: oe_config_util.Validate_Configuration
2772: (p_model_line_id => p_top_model_line_id,
2773: p_deleted_options_tbl => p_deleted_options_tbl,
2779: x_return_status => l_return_status);
2780:
2781: x_return_status := l_return_status;
2782:
2783: oe_debug_pub.add('leaving ureqb, validate config: '|| l_return_status, 1);
2784:
2785: EXCEPTION
2786: when no_data_found then
2787: oe_debug_pub.add
2783: oe_debug_pub.add('leaving ureqb, validate config: '|| l_return_status, 1);
2784:
2785: EXCEPTION
2786: when no_data_found then
2787: oe_debug_pub.add
2788: ('no_data_found in OE_Delayed_Req_Util.VALIDATE_CONFIGURATION', 1);
2789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2790: when others then
2791: oe_debug_pub.add
2787: oe_debug_pub.add
2788: ('no_data_found in OE_Delayed_Req_Util.VALIDATE_CONFIGURATION', 1);
2789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2790: when others then
2791: oe_debug_pub.add
2792: ('Exception in OE_Delayed_Req_Util.VALIDATE_CONFIGURATION', 1);
2793: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2794: END VALIDATE_CONFIGURATION;
2795:
2815: l_line_rec OE_ORDER_PUB.line_rec_type;
2816: l_return_status VARCHAR2(1);
2817: BEGIN
2818:
2819: oe_debug_pub.add('Entering OE_Delayed_Requests_UTIL.Group_Schedule',1);
2820:
2821: oe_debug_pub.add('Entity is :' || p_request_rec.param3,2);
2822: oe_debug_pub.add('Action is :' || p_request_rec.param4,2);
2823:
2817: BEGIN
2818:
2819: oe_debug_pub.add('Entering OE_Delayed_Requests_UTIL.Group_Schedule',1);
2820:
2821: oe_debug_pub.add('Entity is :' || p_request_rec.param3,2);
2822: oe_debug_pub.add('Action is :' || p_request_rec.param4,2);
2823:
2824: l_group_req_rec.entity_type := p_request_rec.param3;
2825: l_group_req_rec.action := p_request_rec.param4;
2818:
2819: oe_debug_pub.add('Entering OE_Delayed_Requests_UTIL.Group_Schedule',1);
2820:
2821: oe_debug_pub.add('Entity is :' || p_request_rec.param3,2);
2822: oe_debug_pub.add('Action is :' || p_request_rec.param4,2);
2823:
2824: l_group_req_rec.entity_type := p_request_rec.param3;
2825: l_group_req_rec.action := p_request_rec.param4;
2826: l_group_req_rec.line_id := p_request_rec.entity_id;
2836: ,x_line_rec => l_line_rec);
2837:
2838: IF NVL(p_request_rec.param11,'N') = 'Y' THEN
2839:
2840: oe_debug_pub.add('param 11' || p_request_rec.param11,1);
2841: l_group_req_rec.old_schedule_ship_date := l_line_rec.schedule_ship_date;
2842: l_group_req_rec.old_schedule_arrival_date := l_line_rec.schedule_arrival_date
2843: ;
2844: l_group_req_rec.old_request_date := l_line_rec.request_date;
2893:
2894:
2895: END IF;
2896:
2897: oe_debug_pub.add('*********Printing Group Request Attributes***********',2);
2898: oe_debug_pub.add('Grp Entity :' || l_group_req_rec.entity_type,2);
2899: oe_debug_pub.add('Grp Header Id :' || l_group_req_rec.header_id,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2894:
2895: END IF;
2896:
2897: oe_debug_pub.add('*********Printing Group Request Attributes***********',2);
2898: oe_debug_pub.add('Grp Entity :' || l_group_req_rec.entity_type,2);
2899: oe_debug_pub.add('Grp Header Id :' || l_group_req_rec.header_id,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2895: END IF;
2896:
2897: oe_debug_pub.add('*********Printing Group Request Attributes***********',2);
2898: oe_debug_pub.add('Grp Entity :' || l_group_req_rec.entity_type,2);
2899: oe_debug_pub.add('Grp Header Id :' || l_group_req_rec.header_id,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2896:
2897: oe_debug_pub.add('*********Printing Group Request Attributes***********',2);
2898: oe_debug_pub.add('Grp Entity :' || l_group_req_rec.entity_type,2);
2899: oe_debug_pub.add('Grp Header Id :' || l_group_req_rec.header_id,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2897: oe_debug_pub.add('*********Printing Group Request Attributes***********',2);
2898: oe_debug_pub.add('Grp Entity :' || l_group_req_rec.entity_type,2);
2899: oe_debug_pub.add('Grp Header Id :' || l_group_req_rec.header_id,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2898: oe_debug_pub.add('Grp Entity :' || l_group_req_rec.entity_type,2);
2899: oe_debug_pub.add('Grp Header Id :' || l_group_req_rec.header_id,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2899: oe_debug_pub.add('Grp Header Id :' || l_group_req_rec.header_id,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2907: oe_debug_pub.add('Grp Ship Meth :' || l_group_req_rec.freight_carrier,2);
2900: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2907: oe_debug_pub.add('Grp Ship Meth :' || l_group_req_rec.freight_carrier,2);
2908: oe_debug_pub.add('Grp Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
2901: oe_debug_pub.add('Grp Action :' || l_group_req_rec.action,2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2907: oe_debug_pub.add('Grp Ship Meth :' || l_group_req_rec.freight_carrier,2);
2908: oe_debug_pub.add('Grp Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
2909: oe_debug_pub.add('***************************************************',2);
2902: oe_debug_pub.add('Grp Warehouse :' || l_group_req_rec.ship_from_org_id,2);
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2907: oe_debug_pub.add('Grp Ship Meth :' || l_group_req_rec.freight_carrier,2);
2908: oe_debug_pub.add('Grp Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
2909: oe_debug_pub.add('***************************************************',2);
2910:
2903: oe_debug_pub.add('Grp Ship to :' || l_group_req_rec.ship_to_org_id,2);
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2907: oe_debug_pub.add('Grp Ship Meth :' || l_group_req_rec.freight_carrier,2);
2908: oe_debug_pub.add('Grp Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
2909: oe_debug_pub.add('***************************************************',2);
2910:
2911: OE_GRP_SCH_UTIL.Group_Schedule
2904: oe_debug_pub.add('Group Sh Set# :' || l_group_req_rec.ship_set_number,2);
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2907: oe_debug_pub.add('Grp Ship Meth :' || l_group_req_rec.freight_carrier,2);
2908: oe_debug_pub.add('Grp Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
2909: oe_debug_pub.add('***************************************************',2);
2910:
2911: OE_GRP_SCH_UTIL.Group_Schedule
2912: (p_group_req_rec => l_group_req_rec
2905: oe_debug_pub.add('Group Ar Set# :' || l_group_req_rec.arrival_set_number,2);
2906: oe_debug_pub.add('Grp Ship Date :' || l_group_req_rec.schedule_ship_date,2);
2907: oe_debug_pub.add('Grp Ship Meth :' || l_group_req_rec.freight_carrier,2);
2908: oe_debug_pub.add('Grp Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
2909: oe_debug_pub.add('***************************************************',2);
2910:
2911: OE_GRP_SCH_UTIL.Group_Schedule
2912: (p_group_req_rec => l_group_req_rec
2913: ,x_atp_tbl => l_atp_tbl
2915:
2916: -- Set the cascade_flag to TRUE, so that we query the block,
2917: -- since multiple lines have changed.
2918:
2919: oe_debug_pub.add('Setting G_CASCADING_REQUEST_LOGGED',2);
2920:
2921: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2922: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
2923: END IF;
3018:
3019:
3020: BEGIN
3021:
3022: OE_DEBUG_PUB.ADD('Entering INSERT_RMA_OPTIONS_INCLUDED',1);
3023:
3024: x_return_status := FND_API.G_RET_STS_SUCCESS;
3025:
3026: BEGIN
3131: l_line_tbl(l_number).calculate_price_flag :=
3132: l_orig_line_rec.calculate_price_flag;
3133: l_line_tbl(l_number).pricing_date := l_orig_line_rec.pricing_date;
3134:
3135: oe_debug_pub.add('RMA: Found options : '|| to_char(l_child.line_id), 2);
3136: END LOOP;
3137:
3138: END IF;
3139:
3137:
3138: END IF;
3139:
3140: IF l_number > 0 THEN
3141: oe_debug_pub.add('RMA: Found options and included item lines', 2);
3142:
3143: -- Set control flags.
3144: l_control_rec.controlled_operation := TRUE;
3145: l_control_rec.validate_entity := TRUE;
3220: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
3221:
3222: END IF; /* end inserting lines */
3223:
3224: OE_DEBUG_PUB.ADD(' Exiting INSERT_RMA_OPTIONS_INCLUDED',1);
3225: EXCEPTION
3226:
3227: WHEN FND_API.G_EXC_ERROR THEN
3228:
3280:
3281: l_ship_from_org_id NUMBER;
3282: /* OPM Bug 2739964 */
3283: l_item_rec OE_ORDER_CACHE.item_rec_type;
3284: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3285:
3286: CURSOR control_codes IS
3287: SELECT decode(msi.lot_control_code,2,'Y','N'),
3288: decode(msi.serial_number_control_code,2,'Y',5,'Y',6,'Y','N'),
3349: l_primary_uom VARCHAR2(3);
3350:
3351: BEGIN
3352:
3353: OE_DEBUG_PUB.ADD(' Entering INSERT_RMA_LOT_SERIAL',1);
3354:
3355: OE_DEBUG_PUB.ADD('RMA: Line Id is '||TO_CHAR(p_line_id),2);
3356:
3357: -- if lot serial numbers exist, delete first
3351: BEGIN
3352:
3353: OE_DEBUG_PUB.ADD(' Entering INSERT_RMA_LOT_SERIAL',1);
3354:
3355: OE_DEBUG_PUB.ADD('RMA: Line Id is '||TO_CHAR(p_line_id),2);
3356:
3357: -- if lot serial numbers exist, delete first
3358:
3359:
3367: Return;
3368: END;
3369:
3370:
3371: oe_debug_pub.add(l_orig_line_rec.return_context,2);
3372: -- IF l_orig_line_rec.return_context is NULL THEN
3373: -- RETURN;
3374: -- END IF;
3375: IF l_orig_line_rec.return_context = 'SERIAL' THEN
3395: END;
3396:
3397: IF (l_lot_serial_tbl.count > 0) THEN
3398:
3399: oe_debug_pub.add('RMA: rma_lot_serial.DELETE_ROW', 2);
3400:
3401: FOR I IN l_lot_serial_tbl.FIRST .. l_Lot_Serial_tbl.LAST LOOP
3402:
3403: l_x_Lot_Serial_tbl(I) := l_Lot_Serial_tbl(I);
3413: l_reference_line_id := l_orig_line_rec.reference_line_id;
3414: IF l_reference_line_id IS NOT NULL AND
3415: l_reference_line_id <> FND_API.G_MISS_NUM THEN
3416:
3417: OE_DEBUG_PUB.ADD(' There is a reference Line',1);
3418: OE_Line_Util.query_row(p_line_id => l_reference_line_id,
3419: x_line_rec => l_reference_line_rec);
3420: l_inventory_item_id := l_reference_line_rec.inventory_item_id;
3421: l_ship_from_org_id := l_reference_line_rec.ship_from_org_id;
3418: OE_Line_Util.query_row(p_line_id => l_reference_line_id,
3419: x_line_rec => l_reference_line_rec);
3420: l_inventory_item_id := l_reference_line_rec.inventory_item_id;
3421: l_ship_from_org_id := l_reference_line_rec.ship_from_org_id;
3422: oe_debug_pub.add(to_char(l_inventory_item_id)||':'||to_char(l_ship_from_org_id),2);
3423:
3424: OPEN control_codes;
3425: FETCH control_codes INTO l_lot_control_flag,
3426: l_serial_number_control_flag,
3459: ELSE
3460: l_return_qty := l_return_qty + 1;
3461: END IF;
3462:
3463: OE_DEBUG_PUB.ADD(' In LOT-SERIAL-NUMBERS cursor',1);
3464: l_number := l_number + 1;
3465: l_lot_serial_tbl(l_number) := OE_ORDER_PUB.G_MISS_LOT_SERIAL_REC;
3466: l_lot_serial_tbl(l_number).lot_number := l_lot_serial_numbers.lot_number;
3467: l_lot_serial_tbl(l_number).from_serial_number := l_lot_serial_numbers.serial_number;
3499: l_lot_trxn_qty2 := l_lot_numbers.secondary_transaction_quantity; -- INVCONV
3500: END IF;
3501:
3502: l_number := l_number + 1;
3503: OE_DEBUG_PUB.ADD(' In LOT-NUMBERS cursor',1);
3504: l_lot_serial_tbl(l_number) := OE_ORDER_PUB.G_MISS_LOT_SERIAL_REC;
3505: l_lot_serial_tbl(l_number).lot_number := l_lot_numbers.lot_number;
3506:
3507: -- transaction quantity is negative because of sales order issue
3527: l_return_qty := l_return_qty + 1;
3528: END IF;
3529:
3530: l_number := l_number + 1;
3531: OE_DEBUG_PUB.ADD(' In SERIAL-NUMBERS cursor',1);
3532: l_lot_serial_tbl(l_number) := OE_ORDER_PUB.G_MISS_LOT_SERIAL_REC;
3533: l_lot_serial_tbl(l_number).from_serial_number := l_serial_numbers.serial_number;
3534: l_lot_serial_tbl(l_number).quantity := 1;
3535: END LOOP;
3537: END IF;
3538: END IF;
3539: -- END IF;-- INVCONV
3540: IF l_number > 0 THEN
3541: oe_debug_pub.add('RMA: FOUND LOT/SERIAL NUMBERS FOR THE LINE'||to_char(l_number), 1);
3542:
3543: FOR I IN l_Lot_serial_tbl.FIRST .. l_Lot_serial_tbl.LAST LOOP
3544:
3545: l_count := l_x_lot_serial_tbl.count;
3550: END LOOP;
3551: END IF; /* end inserting lot serial numbers */
3552:
3553: IF l_x_lot_serial_tbl.count > 0 THEN
3554: OE_DEBUG_PUB.ADD(' Before calling OE_ORDER_PVT.Lot_Serials',1);
3555: -- Call OE_Order_PVT.Process_order to insert lines
3556: -- Set recursion mode.
3557: -- OE_GLOBALS.G_RECURSION_MODE := 'Y';
3558:
3563: ,p_x_old_lot_serial_tbl => l_x_old_lot_serial_tbl
3564: ,x_return_status => l_return_status);
3565: -- Reset recursion mode.
3566: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
3567: OE_DEBUG_PUB.ADD(' After calling OE_ORDER_PVT.Lot_Serials',1);
3568:
3569: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3571: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3590: END IF; /* end calling process order */
3591: -- Clear Table
3592: l_Lot_serial_tbl.DELETE;
3593:
3594: OE_DEBUG_PUB.ADD(' Exiting INSERT_RMA_LOT_SERIAL',1);
3595:
3596: EXCEPTION
3597:
3598:
3631: l_task_id NUMBER;
3632: l_lin_line_id NUMBER; -- Bug 5754554
3633:
3634: BEGIN
3635: oe_debug_pub.add('Entering oe_delayed_requests_util.Validate_Line_Set',1);
3636: oe_line_util.query_rows(p_line_set_id => p_line_set_id,
3637: x_line_tbl => l_line_tbl);
3638:
3639: -- Start for bug 5754554
3640: IF l_line_tbl.count > 0 THEN
3641: FOR I IN 1 .. l_line_tbl.count LOOP
3642: IF l_line_tbl(I).open_flag = 'N' AND l_line_tbl(I).cancelled_flag = 'Y'
3643: THEN
3644: oe_debug_pub.add(' Line_id '||l_line_tbl(I).line_id||' is canceled. Discarding it from Line Set');
3645: l_line_tbl.DELETE(I);
3646: END IF;
3647: END LOOP;
3648: END IF;
3751: END IF;
3752: END IF; -- For Bug 5754554
3753: END LOOP;
3754: END IF;
3755: oe_debug_pub.add('Exiting oe_delayed_requests_util.Validate_Line_Set',1);
3756: EXCEPTION
3757: WHEN FND_API.G_EXC_ERROR THEN
3758:
3759: OE_MSG_PUB.reset_msg_context('SPLIT');
3809: --serla end
3810: Begin
3811:
3812:
3813: oe_debug_pub.add('Entering oe_delayed_requests_util.Process_adjustments',1);
3814: FOR I IN 1..(p_adjust_tbl.COUNT) LOOP
3815:
3816: oe_debug_pub.add('I in p_adjust_tbl is : ' || I,2);
3817:
3812:
3813: oe_debug_pub.add('Entering oe_delayed_requests_util.Process_adjustments',1);
3814: FOR I IN 1..(p_adjust_tbl.COUNT) LOOP
3815:
3816: oe_debug_pub.add('I in p_adjust_tbl is : ' || I,2);
3817:
3818: oe_debug_pub.add(p_adjust_tbl(I).param3 || ' is there ',2);
3819:
3820: Select list_line_type_code
3814: FOR I IN 1..(p_adjust_tbl.COUNT) LOOP
3815:
3816: oe_debug_pub.add('I in p_adjust_tbl is : ' || I,2);
3817:
3818: oe_debug_pub.add(p_adjust_tbl(I).param3 || ' is there ',2);
3819:
3820: Select list_line_type_code
3821: Into l_list_line_type_code
3822: From qp_list_lines
3881:
3882: -- Reset recursion mode.
3883: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
3884:
3885: oe_debug_pub.add('after process order call ',2);
3886: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3887: oe_debug_pub.add('error1',2);
3888: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3889: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3883: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
3884:
3885: oe_debug_pub.add('after process order call ',2);
3886: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3887: oe_debug_pub.add('error1',2);
3888: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3889: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3890: oe_debug_pub.add('error2',2);
3891: RAISE FND_API.G_EXC_ERROR;
3886: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3887: oe_debug_pub.add('error1',2);
3888: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3889: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3890: oe_debug_pub.add('error2',2);
3891: RAISE FND_API.G_EXC_ERROR;
3892: END IF;
3893:
3894: end if; /* if l_adj_tbl.count >= 1 */
3892: END IF;
3893:
3894: end if; /* if l_adj_tbl.count >= 1 */
3895:
3896: oe_debug_pub.add('no error in process order ',2);
3897: x_return_status := l_return_status;
3898: oe_debug_pub.add('Exiting oe_delayed_requests_util.Process_adjustments',1);
3899:
3900:
3894: end if; /* if l_adj_tbl.count >= 1 */
3895:
3896: oe_debug_pub.add('no error in process order ',2);
3897: x_return_status := l_return_status;
3898: oe_debug_pub.add('Exiting oe_delayed_requests_util.Process_adjustments',1);
3899:
3900:
3901: EXCEPTION
3902:
4010: AND nvl(l.component_number,0) = nvl(l_component_number,0);
4011:
4012: BEGIN
4013:
4014: OE_DEBUG_PUB.ADD('Entering INSERT_SERVICE_FOR_OPTIONS',1);
4015:
4016: IF fnd_profile.value('ONT_CASCADE_SERVICE') = 'N' THEN
4017: /* 3128684 */
4018: oe_debug_pub.add('Do not cascade services', 2);
4014: OE_DEBUG_PUB.ADD('Entering INSERT_SERVICE_FOR_OPTIONS',1);
4015:
4016: IF fnd_profile.value('ONT_CASCADE_SERVICE') = 'N' THEN
4017: /* 3128684 */
4018: oe_debug_pub.add('Do not cascade services', 2);
4019: x_return_status := FND_API.G_RET_STS_SUCCESS;
4020: RETURN;
4021: END IF;
4022: oe_debug_pub.add('Do cascade services', 2);
4018: oe_debug_pub.add('Do not cascade services', 2);
4019: x_return_status := FND_API.G_RET_STS_SUCCESS;
4020: RETURN;
4021: END IF;
4022: oe_debug_pub.add('Do cascade services', 2);
4023:
4024: -- query the service line and to see if it's a referenced line
4025: OE_Line_Util.query_row(p_line_id => p_serviced_line_id,
4026: x_line_rec => l_orig_line_rec);
4037: IF l_orig_line_rec.service_reference_type_code is NOT NULL THEN
4038: OE_Line_Util.query_row(p_line_id => l_orig_line_rec.service_reference_line_id,
4039: x_line_rec => l_reference_line_rec);
4040: l_service_reference_line_id := l_orig_line_rec.service_reference_line_id;
4041: oe_debug_pub.add('JPN: Service Reference Line is' || l_service_reference_line_id,2);
4042:
4043: -- For bug 2372098, the cursor variable srv_children would be associated
4044: -- with different queries based on source_type_document_id.
4045:
4153: l_header_id := l_child.header_id;
4154: l_line_number := l_child.line_number;
4155: l_shipment_number := l_child.shipment_number;
4156: l_option_number := l_child.option_number;
4157: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4158: oe_debug_pub.add('l_child.header_id=> ' || to_char(l_child.header_id),2);
4159: -- oe_debug_pub.add('item_type_code => ' || to_char(l_child.item_type_code),2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4154: l_line_number := l_child.line_number;
4155: l_shipment_number := l_child.shipment_number;
4156: l_option_number := l_child.option_number;
4157: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4158: oe_debug_pub.add('l_child.header_id=> ' || to_char(l_child.header_id),2);
4159: -- oe_debug_pub.add('item_type_code => ' || to_char(l_child.item_type_code),2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4155: l_shipment_number := l_child.shipment_number;
4156: l_option_number := l_child.option_number;
4157: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4158: oe_debug_pub.add('l_child.header_id=> ' || to_char(l_child.header_id),2);
4159: -- oe_debug_pub.add('item_type_code => ' || to_char(l_child.item_type_code),2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4156: l_option_number := l_child.option_number;
4157: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4158: oe_debug_pub.add('l_child.header_id=> ' || to_char(l_child.header_id),2);
4159: -- oe_debug_pub.add('item_type_code => ' || to_char(l_child.item_type_code),2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4157: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4158: oe_debug_pub.add('l_child.header_id=> ' || to_char(l_child.header_id),2);
4159: -- oe_debug_pub.add('item_type_code => ' || to_char(l_child.item_type_code),2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4158: oe_debug_pub.add('l_child.header_id=> ' || to_char(l_child.header_id),2);
4159: -- oe_debug_pub.add('item_type_code => ' || to_char(l_child.item_type_code),2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4166: oe_debug_pub.add('l_orig_line_rec.service_period=> ' || l_orig_line_rec.service_period ,2);
4159: -- oe_debug_pub.add('item_type_code => ' || to_char(l_child.item_type_code),2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4166: oe_debug_pub.add('l_orig_line_rec.service_period=> ' || l_orig_line_rec.service_period ,2);
4167: oe_debug_pub.add('l_orig_line_rec.service_start_date=> ' || l_orig_line_rec.service_start_date,2);
4160: oe_debug_pub.add('l_child.line_id=> ' || to_char(l_child.line_id),2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4166: oe_debug_pub.add('l_orig_line_rec.service_period=> ' || l_orig_line_rec.service_period ,2);
4167: oe_debug_pub.add('l_orig_line_rec.service_start_date=> ' || l_orig_line_rec.service_start_date,2);
4168: oe_debug_pub.add('l_orig_line_rec.service_end_date=> ' ||l_orig_line_rec.service_end_date ,2);
4161: oe_debug_pub.add('l_child.shipment_number=> ' || to_char(l_child.shipment_number),2);
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4166: oe_debug_pub.add('l_orig_line_rec.service_period=> ' || l_orig_line_rec.service_period ,2);
4167: oe_debug_pub.add('l_orig_line_rec.service_start_date=> ' || l_orig_line_rec.service_start_date,2);
4168: oe_debug_pub.add('l_orig_line_rec.service_end_date=> ' ||l_orig_line_rec.service_end_date ,2);
4169:
4162: oe_debug_pub.add('l_child.option_number=> ' || to_char(l_child.option_number),2);
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4166: oe_debug_pub.add('l_orig_line_rec.service_period=> ' || l_orig_line_rec.service_period ,2);
4167: oe_debug_pub.add('l_orig_line_rec.service_start_date=> ' || l_orig_line_rec.service_start_date,2);
4168: oe_debug_pub.add('l_orig_line_rec.service_end_date=> ' ||l_orig_line_rec.service_end_date ,2);
4169:
4170: -- l_line_tbl(l_number).line_number := l_child.line_number;
4163: oe_debug_pub.add('l_child.component_number=> ' || to_char(l_child.component_number),2);
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4166: oe_debug_pub.add('l_orig_line_rec.service_period=> ' || l_orig_line_rec.service_period ,2);
4167: oe_debug_pub.add('l_orig_line_rec.service_start_date=> ' || l_orig_line_rec.service_start_date,2);
4168: oe_debug_pub.add('l_orig_line_rec.service_end_date=> ' ||l_orig_line_rec.service_end_date ,2);
4169:
4170: -- l_line_tbl(l_number).line_number := l_child.line_number;
4171: -- l_line_tbl(l_number).shipment_number := l_child.shipment_number;
4164: oe_debug_pub.add('l_child.service_txn_reason_code=> ' || l_child.service_txn_reason_code,2);
4165: oe_debug_pub.add('l_orig_line_rec.service_duration => ' || l_orig_line_rec.service_duration,2);
4166: oe_debug_pub.add('l_orig_line_rec.service_period=> ' || l_orig_line_rec.service_period ,2);
4167: oe_debug_pub.add('l_orig_line_rec.service_start_date=> ' || l_orig_line_rec.service_start_date,2);
4168: oe_debug_pub.add('l_orig_line_rec.service_end_date=> ' ||l_orig_line_rec.service_end_date ,2);
4169:
4170: -- l_line_tbl(l_number).line_number := l_child.line_number;
4171: -- l_line_tbl(l_number).shipment_number := l_child.shipment_number;
4172: l_line_tbl(l_number).line_number := l_orig_line_rec.line_number; -- For bug 2924241
4174: l_line_tbl(l_number).option_number := l_child.option_number;
4175: l_line_tbl(l_number).component_number := l_child.component_number;
4176:
4177: FOR l_srv_number IN srv_number LOOP
4178: oe_debug_pub.add('Inside l_srv_number loop ',2);
4179: l_line_tbl(l_number).service_number := l_srv_number.service_number + 1;
4180: END LOOP;
4181: END LOOP;
4182:
4188:
4189: END IF;
4190:
4191: IF l_number > 0 THEN
4192: oe_debug_pub.add('SRV: Found options and included item lines', 1);
4193:
4194: -- Set control flags.
4195: l_control_rec.controlled_operation := TRUE;
4196: l_control_rec.validate_entity := TRUE;
4220: -- Reset recursion mode.
4221: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
4222:
4223: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4224: oe_debug_pub.add('Inside unexpected error ',2);
4225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4226: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4227: oe_debug_pub.add('Inside error ',2);
4228: RAISE FND_API.G_EXC_ERROR;
4223: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4224: oe_debug_pub.add('Inside unexpected error ',2);
4225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4226: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4227: oe_debug_pub.add('Inside error ',2);
4228: RAISE FND_API.G_EXC_ERROR;
4229: END IF;
4230:
4231: --comment out for notification project
4244: */
4245: -- Clear Table
4246: l_line_tbl.DELETE;
4247: END IF; /* End inserting lines */
4248: OE_DEBUG_PUB.ADD('Exiting INSERT_SERVICE_FOR_OPTIONS',1);
4249:
4250: EXCEPTION
4251:
4252: WHEN FND_API.G_EXC_ERROR THEN
4249:
4250: EXCEPTION
4251:
4252: WHEN FND_API.G_EXC_ERROR THEN
4253: oe_debug_pub.add('Inside exception exe error ',1);
4254: x_return_status := FND_API.G_RET_STS_ERROR;
4255:
4256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4257: oe_debug_pub.add('Inside exception unexp error ',1);
4253: oe_debug_pub.add('Inside exception exe error ',1);
4254: x_return_status := FND_API.G_RET_STS_ERROR;
4255:
4256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4257: oe_debug_pub.add('Inside exception unexp error ',1);
4258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4259:
4260: WHEN OTHERS THEN
4261:
4259:
4260: WHEN OTHERS THEN
4261:
4262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4263: oe_debug_pub.add('Inside exception other error ',1);
4264:
4265: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4266: THEN
4267: OE_MSG_PUB.Add_Exc_Msg
4327: AND nvl(l.option_number,0) = nvl(l_option_number,0)
4328: AND nvl(l.component_number,0) = nvl(l_component_number,0); --bug 2447402
4329: BEGIN
4330:
4331: OE_DEBUG_PUB.ADD('Entering CASCADE_SERVICE_FOR_OPTIONS',1);
4332:
4333: IF fnd_profile.value('ONT_CASCADE_SERVICE') = 'N' THEN
4334: /* 3128684 */
4335: oe_debug_pub.add('Do not cascade services', 2);
4331: OE_DEBUG_PUB.ADD('Entering CASCADE_SERVICE_FOR_OPTIONS',1);
4332:
4333: IF fnd_profile.value('ONT_CASCADE_SERVICE') = 'N' THEN
4334: /* 3128684 */
4335: oe_debug_pub.add('Do not cascade services', 2);
4336: x_return_status := FND_API.G_RET_STS_SUCCESS;
4337: RETURN;
4338: END IF;
4339: oe_debug_pub.add('Do cascade services', 2);
4335: oe_debug_pub.add('Do not cascade services', 2);
4336: x_return_status := FND_API.G_RET_STS_SUCCESS;
4337: RETURN;
4338: END IF;
4339: oe_debug_pub.add('Do cascade services', 2);
4340:
4341: -- query the option line
4342: OE_Line_Util.query_row(p_line_id => p_option_line_id,
4343: x_line_rec => l_orig_line_rec);
4350: AND rownum = 1;
4351:
4352:
4353: l_top_model_line_id := l_orig_line_rec.top_model_line_id;
4354: oe_debug_pub.add('Top Model Line is' || l_top_model_line_id,2);
4355:
4356:
4357: FOR l_child IN srv_line LOOP
4358: l_number := l_number + 1;
4380: l_shipment_number := l_orig_line_rec.shipment_number;
4381: l_option_number := l_orig_line_rec.option_number;
4382: l_component_number := l_orig_line_rec.component_number; --bug 2447402
4383:
4384: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4385: oe_debug_pub.add('l_orig_line_rec.header_id=> ' || to_char(l_orig_line_rec.header_id),2);
4386: -- oe_debug_pub.add('item_type_code => ' || to_char(l_orig_line_rec.item_type_code),2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4381: l_option_number := l_orig_line_rec.option_number;
4382: l_component_number := l_orig_line_rec.component_number; --bug 2447402
4383:
4384: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4385: oe_debug_pub.add('l_orig_line_rec.header_id=> ' || to_char(l_orig_line_rec.header_id),2);
4386: -- oe_debug_pub.add('item_type_code => ' || to_char(l_orig_line_rec.item_type_code),2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4382: l_component_number := l_orig_line_rec.component_number; --bug 2447402
4383:
4384: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4385: oe_debug_pub.add('l_orig_line_rec.header_id=> ' || to_char(l_orig_line_rec.header_id),2);
4386: -- oe_debug_pub.add('item_type_code => ' || to_char(l_orig_line_rec.item_type_code),2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4383:
4384: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4385: oe_debug_pub.add('l_orig_line_rec.header_id=> ' || to_char(l_orig_line_rec.header_id),2);
4386: -- oe_debug_pub.add('item_type_code => ' || to_char(l_orig_line_rec.item_type_code),2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4384: oe_debug_pub.add('l_number => ' || to_char(l_number),2);
4385: oe_debug_pub.add('l_orig_line_rec.header_id=> ' || to_char(l_orig_line_rec.header_id),2);
4386: -- oe_debug_pub.add('item_type_code => ' || to_char(l_orig_line_rec.item_type_code),2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4392: oe_debug_pub.add('l_child.service_period=> ' || l_child.service_period ,2);
4385: oe_debug_pub.add('l_orig_line_rec.header_id=> ' || to_char(l_orig_line_rec.header_id),2);
4386: -- oe_debug_pub.add('item_type_code => ' || to_char(l_orig_line_rec.item_type_code),2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4392: oe_debug_pub.add('l_child.service_period=> ' || l_child.service_period ,2);
4393: oe_debug_pub.add('l_child.service_start_date=> ' || l_child.service_start_date,2);
4386: -- oe_debug_pub.add('item_type_code => ' || to_char(l_orig_line_rec.item_type_code),2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4392: oe_debug_pub.add('l_child.service_period=> ' || l_child.service_period ,2);
4393: oe_debug_pub.add('l_child.service_start_date=> ' || l_child.service_start_date,2);
4394: oe_debug_pub.add('l_child.service_end_date=> ' ||l_child.service_end_date ,2);
4387: oe_debug_pub.add('l_orig_line_rec.line_id=> ' || to_char(l_orig_line_rec.line_id),2);
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4392: oe_debug_pub.add('l_child.service_period=> ' || l_child.service_period ,2);
4393: oe_debug_pub.add('l_child.service_start_date=> ' || l_child.service_start_date,2);
4394: oe_debug_pub.add('l_child.service_end_date=> ' ||l_child.service_end_date ,2);
4395:
4388: oe_debug_pub.add('l_orig_line_rec.shipment_number=> ' || to_char(l_orig_line_rec.shipment_number),2);
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4392: oe_debug_pub.add('l_child.service_period=> ' || l_child.service_period ,2);
4393: oe_debug_pub.add('l_child.service_start_date=> ' || l_child.service_start_date,2);
4394: oe_debug_pub.add('l_child.service_end_date=> ' ||l_child.service_end_date ,2);
4395:
4396: l_line_tbl(l_number).shipment_number := l_orig_line_rec.shipment_number;
4389: oe_debug_pub.add('l_orig_line_rec.option_number=> ' || to_char(l_orig_line_rec.option_number),2);
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4392: oe_debug_pub.add('l_child.service_period=> ' || l_child.service_period ,2);
4393: oe_debug_pub.add('l_child.service_start_date=> ' || l_child.service_start_date,2);
4394: oe_debug_pub.add('l_child.service_end_date=> ' ||l_child.service_end_date ,2);
4395:
4396: l_line_tbl(l_number).shipment_number := l_orig_line_rec.shipment_number;
4397: l_line_tbl(l_number).option_number := l_orig_line_rec.option_number;
4390: oe_debug_pub.add('l_orig_line_rec.service_txn_reason_code=> ' || l_orig_line_rec.service_txn_reason_code,2);
4391: oe_debug_pub.add('l_child.service_duration => ' || l_child.service_duration,2);
4392: oe_debug_pub.add('l_child.service_period=> ' || l_child.service_period ,2);
4393: oe_debug_pub.add('l_child.service_start_date=> ' || l_child.service_start_date,2);
4394: oe_debug_pub.add('l_child.service_end_date=> ' ||l_child.service_end_date ,2);
4395:
4396: l_line_tbl(l_number).shipment_number := l_orig_line_rec.shipment_number;
4397: l_line_tbl(l_number).option_number := l_orig_line_rec.option_number;
4398: l_line_tbl(l_number).line_number := l_orig_line_rec.line_number;
4398: l_line_tbl(l_number).line_number := l_orig_line_rec.line_number;
4399: l_line_tbl(l_number).component_number := l_orig_line_rec.component_number; --bug 2447402
4400:
4401: FOR l_srv_number IN srv_number LOOP
4402: oe_debug_pub.add('Inside l_srv_number loop ',2);
4403: l_line_tbl(l_number).service_number := l_srv_number.service_number + 1;
4404: END LOOP;
4405: END LOOP;
4406:
4405: END LOOP;
4406:
4407:
4408: IF l_number > 0 THEN
4409: oe_debug_pub.add('Inside cascade_service_for_options, Found top model service and options lines', 1);
4410:
4411: -- Set control flags.
4412: l_control_rec.controlled_operation := TRUE;
4413: l_control_rec.validate_entity := TRUE;
4437: -- Reset recursion mode.
4438: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
4439:
4440: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4441: oe_debug_pub.add('Inside unexpected error ',2);
4442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4443: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4444: oe_debug_pub.add('Inside error ',2);
4445: RAISE FND_API.G_EXC_ERROR;
4440: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4441: oe_debug_pub.add('Inside unexpected error ',2);
4442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4443: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4444: oe_debug_pub.add('Inside error ',2);
4445: RAISE FND_API.G_EXC_ERROR;
4446: END IF;
4447:
4448: --comment out for notification project
4461: */
4462: -- Clear Table
4463: l_line_tbl.DELETE;
4464: END IF; /* End inserting lines */
4465: OE_DEBUG_PUB.ADD('Exiting CASCADE_SERVICE_FOR_OPTIONS',1);
4466:
4467: EXCEPTION
4468:
4469: WHEN FND_API.G_EXC_ERROR THEN
4466:
4467: EXCEPTION
4468:
4469: WHEN FND_API.G_EXC_ERROR THEN
4470: oe_debug_pub.add('Inside exception exe error ',1);
4471: x_return_status := FND_API.G_RET_STS_ERROR;
4472:
4473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4474: oe_debug_pub.add('Inside exception unexp error ',1);
4470: oe_debug_pub.add('Inside exception exe error ',1);
4471: x_return_status := FND_API.G_RET_STS_ERROR;
4472:
4473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4474: oe_debug_pub.add('Inside exception unexp error ',1);
4475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4476:
4477: WHEN OTHERS THEN
4478:
4476:
4477: WHEN OTHERS THEN
4478:
4479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4480: oe_debug_pub.add('Inside exception other error ',1);
4481:
4482: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4483: THEN
4484: OE_MSG_PUB.Add_Exc_Msg
4502: l_msg_count NUMBER;
4503: l_msg_data VARCHAR2(2000);
4504: BEGIN
4505:
4506: OE_DEBUG_PUB.Add('Enter OE_DELAYED_REQUESTS_UTIL.Apply_Automatic_Attachments', 1);
4507:
4508: x_return_status := FND_API.G_RET_STS_SUCCESS;
4509:
4510: OE_Atchmt_Util.Apply_Automatic_Attachments
4521: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
4522: RAISE FND_API.G_EXC_ERROR;
4523: END IF;
4524:
4525: OE_DEBUG_PUB.Add('Exit OE_DELAYED_REQUESTS_UTIL.Apply_Automatic_Attachments', 1);
4526:
4527: EXCEPTION
4528: WHEN FND_API.G_EXC_ERROR THEN
4529: x_return_status := FND_API.G_RET_STS_ERROR;
4550: )
4551: IS
4552: BEGIN
4553:
4554: OE_DEBUG_PUB.Add('Enter OE_DELAYED_REQUESTS_UTIL.Copy_Attachments, manual only'||
4555: p_manual_attachments_only, 1);
4556:
4557: x_return_status := FND_API.G_RET_STS_SUCCESS;
4558:
4568: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
4569: RAISE FND_API.G_EXC_ERROR;
4570: END IF;
4571:
4572: OE_DEBUG_PUB.Add('Exit OE_DELAYED_REQUESTS_UTIL.Copy_Attachments', 1);
4573:
4574: EXCEPTION
4575: WHEN FND_API.G_EXC_ERROR THEN
4576: x_return_status := FND_API.G_RET_STS_ERROR;
4612: l_group_req_rec OE_GRP_SCH_UTIL.Sch_Group_Rec_Type;
4613: l_group_sch_required BOOLEAN := TRUE;
4614: BEGIN
4615:
4616: oe_debug_pub.add('Entering OE_Delayed_Requests_UTIL.Schedule_Line',1);
4617:
4618: OE_ORDER_SCH_UTIL.OESCH_PERFORM_GRP_SCHEDULING := 'N';
4619:
4620: FOR I in 1..p_sch_set_tbl.count LOOP
4747: OE_ORDER_SCH_UTIL.OESCH_ENTITY_SMC;
4748: l_group_req_rec.ship_set_number := l_line_rec.top_model_line_id;
4749: END IF;
4750:
4751: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4752: oe_debug_pub.add('Entity :' || l_group_req_rec.entity_type,2);
4753: oe_debug_pub.add('Header Id :' || l_group_req_rec.header_id,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4748: l_group_req_rec.ship_set_number := l_line_rec.top_model_line_id;
4749: END IF;
4750:
4751: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4752: oe_debug_pub.add('Entity :' || l_group_req_rec.entity_type,2);
4753: oe_debug_pub.add('Header Id :' || l_group_req_rec.header_id,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4749: END IF;
4750:
4751: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4752: oe_debug_pub.add('Entity :' || l_group_req_rec.entity_type,2);
4753: oe_debug_pub.add('Header Id :' || l_group_req_rec.header_id,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4750:
4751: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4752: oe_debug_pub.add('Entity :' || l_group_req_rec.entity_type,2);
4753: oe_debug_pub.add('Header Id :' || l_group_req_rec.header_id,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4751: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4752: oe_debug_pub.add('Entity :' || l_group_req_rec.entity_type,2);
4753: oe_debug_pub.add('Header Id :' || l_group_req_rec.header_id,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4752: oe_debug_pub.add('Entity :' || l_group_req_rec.entity_type,2);
4753: oe_debug_pub.add('Header Id :' || l_group_req_rec.header_id,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4753: oe_debug_pub.add('Header Id :' || l_group_req_rec.header_id,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4761: oe_debug_pub.add('Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
4754: oe_debug_pub.add('Line Id :' || l_group_req_rec.line_id,2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4761: oe_debug_pub.add('Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
4762: oe_debug_pub.add('*******************************************',2);
4755: oe_debug_pub.add('Action :' || l_group_req_rec.action,2);
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4761: oe_debug_pub.add('Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
4762: oe_debug_pub.add('*******************************************',2);
4763:
4756: oe_debug_pub.add('Warehouse :' || l_group_req_rec.ship_from_org_id,2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4761: oe_debug_pub.add('Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
4762: oe_debug_pub.add('*******************************************',2);
4763:
4764: oe_debug_pub.add('Calling Grp Schedule : ',2);
4757: oe_debug_pub.add('Ship to :' || l_group_req_rec.ship_to_org_id,2);
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4761: oe_debug_pub.add('Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
4762: oe_debug_pub.add('*******************************************',2);
4763:
4764: oe_debug_pub.add('Calling Grp Schedule : ',2);
4765: OE_GRP_SCH_UTIL.Group_Schedule
4758: oe_debug_pub.add('Sh Set# :' || l_group_req_rec.ship_set_number,2);
4759: oe_debug_pub.add('Ar Set# :' || l_group_req_rec.arrival_set_number,2);
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4761: oe_debug_pub.add('Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
4762: oe_debug_pub.add('*******************************************',2);
4763:
4764: oe_debug_pub.add('Calling Grp Schedule : ',2);
4765: OE_GRP_SCH_UTIL.Group_Schedule
4766: (p_group_req_rec => l_group_req_rec
4760: oe_debug_pub.add('Ship Date :' || l_group_req_rec.schedule_ship_date,2);
4761: oe_debug_pub.add('Arr Date :' || l_group_req_rec.schedule_arrival_date,2);
4762: oe_debug_pub.add('*******************************************',2);
4763:
4764: oe_debug_pub.add('Calling Grp Schedule : ',2);
4765: OE_GRP_SCH_UTIL.Group_Schedule
4766: (p_group_req_rec => l_group_req_rec
4767: ,x_atp_tbl => l_atp_tbl
4768: ,x_return_status => l_return_status);
4766: (p_group_req_rec => l_group_req_rec
4767: ,x_atp_tbl => l_atp_tbl
4768: ,x_return_status => l_return_status);
4769:
4770: oe_debug_pub.add('After Calling Grp Schedule : || l_return_status',2);
4771:
4772: oe_debug_pub.add('Setting G_CASCADING_REQUEST_LOGGED to TRUE',2);
4773:
4774: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
4768: ,x_return_status => l_return_status);
4769:
4770: oe_debug_pub.add('After Calling Grp Schedule : || l_return_status',2);
4771:
4772: oe_debug_pub.add('Setting G_CASCADING_REQUEST_LOGGED to TRUE',2);
4773:
4774: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
4775: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
4776: END IF;
4776: END IF;
4777:
4778: ELSE
4779:
4780: oe_debug_pub.add('Sch_Line for line : '|| l_line_rec.line_id,2);
4781:
4782: oe_debug_pub.add('Sch_Line for line : '|| l_line_rec.line_id,2);
4783:
4784: -- We are doing this to retain the copy of l_line_rec.
4778: ELSE
4779:
4780: oe_debug_pub.add('Sch_Line for line : '|| l_line_rec.line_id,2);
4781:
4782: oe_debug_pub.add('Sch_Line for line : '|| l_line_rec.line_id,2);
4783:
4784: -- We are doing this to retain the copy of l_line_rec.
4785: l_out_line_rec := l_line_rec;
4786:
4791: , x_atp_tbl => l_atp_tbl
4792: , x_return_status => l_return_status);
4793:
4794:
4795: oe_debug_pub.add('After Calling Sch_Line : '|| l_return_status,2);
4796:
4797: END IF;
4798:
4799: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
4797: END IF;
4798:
4799: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
4800:
4801: oe_debug_pub.add('Line Id error out nocopy : ' || l_line_rec.line_id,2);
4802:
4803:
4804: IF l_request_rec.param3 =
4805: OE_ORDER_SCH_UTIL.OESCH_ENTITY_ARRIVAL_SET OR
4811: -- set.
4812:
4813: IF fnd_profile.value('ONT_AUTO_PUSH_GRP_DATE') = 'Y' THEN
4814:
4815: oe_debug_pub.add('Auto Push Group Date is Yes',2);
4816:
4817: -- Added this stmt to fix big 1899651.
4818: l_line_rec.schedule_action_code :=
4819: OE_ORDER_SCH_UTIL.OESCH_ACT_RESCHEDULE;
4824: , x_group_req_rec => l_group_req_rec
4825: , x_return_status => l_return_status
4826: );
4827:
4828: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4829: oe_debug_pub.add('Entity :' ||
4830: l_group_req_rec.entity_type,20);
4831: oe_debug_pub.add('Header Id :' ||
4832: l_group_req_rec.header_id,2);
4825: , x_return_status => l_return_status
4826: );
4827:
4828: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4829: oe_debug_pub.add('Entity :' ||
4830: l_group_req_rec.entity_type,20);
4831: oe_debug_pub.add('Header Id :' ||
4832: l_group_req_rec.header_id,2);
4833: oe_debug_pub.add('Line Id :' ||
4827:
4828: oe_debug_pub.add('****Printing Group Request Attributes****',2);
4829: oe_debug_pub.add('Entity :' ||
4830: l_group_req_rec.entity_type,20);
4831: oe_debug_pub.add('Header Id :' ||
4832: l_group_req_rec.header_id,2);
4833: oe_debug_pub.add('Line Id :' ||
4834: l_group_req_rec.line_id,2);
4835: oe_debug_pub.add('Action :' ||
4829: oe_debug_pub.add('Entity :' ||
4830: l_group_req_rec.entity_type,20);
4831: oe_debug_pub.add('Header Id :' ||
4832: l_group_req_rec.header_id,2);
4833: oe_debug_pub.add('Line Id :' ||
4834: l_group_req_rec.line_id,2);
4835: oe_debug_pub.add('Action :' ||
4836: l_group_req_rec.action,2);
4837: oe_debug_pub.add('Warehouse :' ||
4831: oe_debug_pub.add('Header Id :' ||
4832: l_group_req_rec.header_id,2);
4833: oe_debug_pub.add('Line Id :' ||
4834: l_group_req_rec.line_id,2);
4835: oe_debug_pub.add('Action :' ||
4836: l_group_req_rec.action,2);
4837: oe_debug_pub.add('Warehouse :' ||
4838: l_group_req_rec.ship_from_org_id,2);
4839: oe_debug_pub.add('Ship to :' ||
4833: oe_debug_pub.add('Line Id :' ||
4834: l_group_req_rec.line_id,2);
4835: oe_debug_pub.add('Action :' ||
4836: l_group_req_rec.action,2);
4837: oe_debug_pub.add('Warehouse :' ||
4838: l_group_req_rec.ship_from_org_id,2);
4839: oe_debug_pub.add('Ship to :' ||
4840: l_group_req_rec.ship_to_org_id,2);
4841: oe_debug_pub.add('Sh Set# :' ||
4835: oe_debug_pub.add('Action :' ||
4836: l_group_req_rec.action,2);
4837: oe_debug_pub.add('Warehouse :' ||
4838: l_group_req_rec.ship_from_org_id,2);
4839: oe_debug_pub.add('Ship to :' ||
4840: l_group_req_rec.ship_to_org_id,2);
4841: oe_debug_pub.add('Sh Set# :' ||
4842: l_group_req_rec.ship_set_number,2);
4843: oe_debug_pub.add('Ar Set# :' ||
4837: oe_debug_pub.add('Warehouse :' ||
4838: l_group_req_rec.ship_from_org_id,2);
4839: oe_debug_pub.add('Ship to :' ||
4840: l_group_req_rec.ship_to_org_id,2);
4841: oe_debug_pub.add('Sh Set# :' ||
4842: l_group_req_rec.ship_set_number,2);
4843: oe_debug_pub.add('Ar Set# :' ||
4844: l_group_req_rec.arrival_set_number,2);
4845: oe_debug_pub.add('Ship Date :' ||
4839: oe_debug_pub.add('Ship to :' ||
4840: l_group_req_rec.ship_to_org_id,2);
4841: oe_debug_pub.add('Sh Set# :' ||
4842: l_group_req_rec.ship_set_number,2);
4843: oe_debug_pub.add('Ar Set# :' ||
4844: l_group_req_rec.arrival_set_number,2);
4845: oe_debug_pub.add('Ship Date :' ||
4846: l_group_req_rec.schedule_ship_date,2);
4847: oe_debug_pub.add('Arr Date :' ||
4841: oe_debug_pub.add('Sh Set# :' ||
4842: l_group_req_rec.ship_set_number,2);
4843: oe_debug_pub.add('Ar Set# :' ||
4844: l_group_req_rec.arrival_set_number,2);
4845: oe_debug_pub.add('Ship Date :' ||
4846: l_group_req_rec.schedule_ship_date,2);
4847: oe_debug_pub.add('Arr Date :' ||
4848: l_group_req_rec.schedule_arrival_date,2);
4849: oe_debug_pub.add('****************************************',2);
4843: oe_debug_pub.add('Ar Set# :' ||
4844: l_group_req_rec.arrival_set_number,2);
4845: oe_debug_pub.add('Ship Date :' ||
4846: l_group_req_rec.schedule_ship_date,2);
4847: oe_debug_pub.add('Arr Date :' ||
4848: l_group_req_rec.schedule_arrival_date,2);
4849: oe_debug_pub.add('****************************************',2);
4850:
4851: OE_ORDER_SCH_UTIL.OESCH_PERFORM_GRP_SCHEDULING := 'Y';
4845: oe_debug_pub.add('Ship Date :' ||
4846: l_group_req_rec.schedule_ship_date,2);
4847: oe_debug_pub.add('Arr Date :' ||
4848: l_group_req_rec.schedule_arrival_date,2);
4849: oe_debug_pub.add('****************************************',2);
4850:
4851: OE_ORDER_SCH_UTIL.OESCH_PERFORM_GRP_SCHEDULING := 'Y';
4852:
4853: oe_debug_pub.add('Calling Grp Schedule : ',2);
4849: oe_debug_pub.add('****************************************',2);
4850:
4851: OE_ORDER_SCH_UTIL.OESCH_PERFORM_GRP_SCHEDULING := 'Y';
4852:
4853: oe_debug_pub.add('Calling Grp Schedule : ',2);
4854:
4855: OE_GRP_SCH_UTIL.Group_Schedule
4856: (p_group_req_rec => l_group_req_rec
4857: ,x_atp_tbl => l_atp_tbl
4856: (p_group_req_rec => l_group_req_rec
4857: ,x_atp_tbl => l_atp_tbl
4858: ,x_return_status => l_return_status);
4859:
4860: oe_debug_pub.add('After Calling Grp Schedule : ||
4861: l_return_status',1);
4862:
4863: oe_debug_pub.add('Stng G_CASCADING_REQUEST_LOGGED to TRUE',2);
4864:
4859:
4860: oe_debug_pub.add('After Calling Grp Schedule : ||
4861: l_return_status',1);
4862:
4863: oe_debug_pub.add('Stng G_CASCADING_REQUEST_LOGGED to TRUE',2);
4864:
4865: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
4866: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
4867: END IF;
4918: -- line without scheduling the same when parent is
4919: -- scheduled.
4920:
4921: -- Bug 2185769
4922: oe_debug_pub.add('Before failing the line',1);
4923: fnd_message.set_name('ONT','OE_SCH_SET_INS_FAILED');
4924: OE_MSG_PUB.Add;
4925:
4926: END IF;
4946:
4947: END LOOP;
4948: OE_ORDER_SCH_UTIL.OESCH_PERFORM_GRP_SCHEDULING := 'Y';
4949:
4950: oe_debug_pub.add('Exiting OE_Delayed_Requests_UTIL.Schedule_Line');
4951: EXCEPTION
4952:
4953: WHEN FND_API.G_EXC_ERROR THEN
4954: x_return_status := FND_API.G_RET_STS_ERROR;
5050: l_user_item_description oe_order_lines.user_item_description%TYPE;
5051: l_global_attribute_category VARCHAR2(30);
5052: l_line_rec OE_Order_PUB.Line_Rec_Type;
5053: l_header_rec OE_Order_PUB.Header_Rec_Type;
5054: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5055: -- bug 4378531
5056: l_hold_result VARCHAR2(30);
5057:
5058: BEGIN
5058: BEGIN
5059:
5060: IF l_debug_level > 0 THEN
5061: v_start := DBMS_UTILITY.GET_TIME;
5062: oe_debug_pub.add('Entering Process_Tax ',1);
5063: END IF;
5064: x_return_status := l_return_status;
5065:
5066: -- Get All Line records
5220: -- l_inventory_org_id := oe_sys_parameters.value('MASTER_ORGANIZATION_ID',l_org_id);
5221:
5222: l_request_ind := p_entity_id_tbl(l_index).request_ind;
5223: IF l_debug_level > 0 THEN
5224: oe_debug_pub.add( 'value count '|| OE_Delayed_Requests_PVT.G_Delayed_Requests.count);
5225: END IF;
5226:
5227: /* Bug # 3337661: Corrected IF stmt by using OE_GLOBALS.G_TAX_LINE */
5228: -- Front Ported for bug 3397062
5232:
5233: end if;
5234:
5235: IF l_debug_level > 0 THEN
5236: oe_debug_pub.add('OEXUREQB: call_credit_checking is: '||l_call_credit_checking,1);
5237: END IF;
5238:
5239: l_tax_rec_out_tbl.delete; /* initializing the l_tax_rec_out_tbl */
5240:
5251: RAISE FND_API.G_EXC_ERROR;
5252: END IF;
5253:
5254: IF l_debug_level > 0 THEN
5255: oe_debug_pub.add('After Successfully calculating Tax',2);
5256: oe_debug_pub.add('Old tax value :'||to_char(l_tax_value),2);
5257: oe_debug_pub.add('New tax value :'||to_char(new_tax_value),2);
5258: oe_debug_pub.add('return status : ' || l_return_status, 1);
5259: oe_debug_pub.add('Tax classification code : '||l_tax_classification_code,1);
5252: END IF;
5253:
5254: IF l_debug_level > 0 THEN
5255: oe_debug_pub.add('After Successfully calculating Tax',2);
5256: oe_debug_pub.add('Old tax value :'||to_char(l_tax_value),2);
5257: oe_debug_pub.add('New tax value :'||to_char(new_tax_value),2);
5258: oe_debug_pub.add('return status : ' || l_return_status, 1);
5259: oe_debug_pub.add('Tax classification code : '||l_tax_classification_code,1);
5260: END IF;
5253:
5254: IF l_debug_level > 0 THEN
5255: oe_debug_pub.add('After Successfully calculating Tax',2);
5256: oe_debug_pub.add('Old tax value :'||to_char(l_tax_value),2);
5257: oe_debug_pub.add('New tax value :'||to_char(new_tax_value),2);
5258: oe_debug_pub.add('return status : ' || l_return_status, 1);
5259: oe_debug_pub.add('Tax classification code : '||l_tax_classification_code,1);
5260: END IF;
5261:
5254: IF l_debug_level > 0 THEN
5255: oe_debug_pub.add('After Successfully calculating Tax',2);
5256: oe_debug_pub.add('Old tax value :'||to_char(l_tax_value),2);
5257: oe_debug_pub.add('New tax value :'||to_char(new_tax_value),2);
5258: oe_debug_pub.add('return status : ' || l_return_status, 1);
5259: oe_debug_pub.add('Tax classification code : '||l_tax_classification_code,1);
5260: END IF;
5261:
5262: -- IF NVL(new_tax_value,0) <> NVL(l_tax_value,0) THEN
5255: oe_debug_pub.add('After Successfully calculating Tax',2);
5256: oe_debug_pub.add('Old tax value :'||to_char(l_tax_value),2);
5257: oe_debug_pub.add('New tax value :'||to_char(new_tax_value),2);
5258: oe_debug_pub.add('return status : ' || l_return_status, 1);
5259: oe_debug_pub.add('Tax classification code : '||l_tax_classification_code,1);
5260: END IF;
5261:
5262: -- IF NVL(new_tax_value,0) <> NVL(l_tax_value,0) THEN
5263: --changed if condition to fix bug 2198380
5274: ) then
5275: null;
5276: else
5277: IF l_debug_level > 0 THEN
5278: oe_debug_pub.add('Updateing tax value from '||to_char(l_tax_value)|| ' To ' ||to_char(new_tax_value) ,2);
5279: END IF;
5280: UPDATE OE_ORDER_LINES_ALL
5281: SET TAX_VALUE = new_tax_value
5282: WHERE line_id = l_line_id;
5285: -- bug 1768906
5286: IF OE_Commitment_Pvt.Do_Commitment_Sequencing
5287: AND l_commitment_id IS NOT NULL THEN
5288: IF l_debug_level > 0 THEN
5289: oe_debug_pub.add('Logging delayed request for Commitment when tax value changes.', 2);
5290: END IF;
5291: OE_Delayed_Requests_Pvt.Log_Request(
5292: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
5293: p_entity_id => l_line_id,
5313: OR (OE_PrePayment_UTIL.is_prepaid_order(l_header_id) = 'Y'
5314: AND l_booked_flag ='Y'
5315: AND l_shipped_quantity IS NULL) THEN
5316: IF l_debug_level > 0 THEN
5317: oe_debug_pub.ADD('Logging delayed request for Verify Payment for change in tax value',2);
5318: END IF;
5319: OE_delayed_requests_Pvt.log_request
5320: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
5321: p_entity_id => l_header_id,
5334: AND l_booked_flag ='Y'
5335: AND l_payment_type_code = 'CREDIT_CARD'
5336: AND l_shipped_quantity IS NULL THEN
5337: IF l_debug_level > 0 THEN
5338: oe_debug_pub.ADD('Logging delayed request for Verify Payment for change in tax value for prepaid order',2);
5339: END IF;
5340: OE_delayed_requests_Pvt.log_request
5341: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
5342: p_entity_id => l_header_id,
5357: AND nvl(l_call_credit_checking, 'Y') <> 'No_Credit_Checking' THEN
5358:
5359: IF NVL(new_tax_value, 0) > NVL(l_tax_value, 0) THEN
5360:
5361: oe_debug_pub.ADD('Logging delayed request for Verify Payment for change in tax value',2);
5362:
5363: OE_delayed_requests_Pvt.log_request
5364: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
5365: p_entity_id => l_header_id,
5369: x_return_status => l_return_status);
5370:
5371: ELSIF NVL(new_tax_value,0) < NVL(l_tax_value,0) THEN
5372:
5373: oe_debug_pub.add('CHECKING CREDIT CHECK HOLD FOR HEADER/LINE ID : ' || TO_CHAR (l_header_id) || '/' || TO_CHAR (l_line_id) ) ;
5374:
5375: OE_HOLDS_PUB.Check_Holds
5376: ( p_api_version => 1.0
5377: , p_header_id => l_header_id
5386: );
5387:
5388: IF ( l_hold_result = FND_API.G_TRUE ) THEN
5389:
5390: oe_debug_pub.add('Logging delayed request for verify payment for change in tax value and hold exist') ;
5391:
5392: OE_delayed_requests_Pvt.log_request
5393: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
5394: p_entity_id => l_header_id,
5430:
5431: IF l_tax_rec_out_tbl.count > 0
5432: THEN
5433: IF l_debug_level > 0 THEN
5434: oe_debug_pub.add('Processing the Tax for the Line '||
5435: to_char(l_line_id),2);
5436: END IF;
5437: -- If any TAX records exists, mark them for delete
5438:
5450: l_match_flag := 'N';
5451: IF l_l_line_adj_tbl.COUNT > 0 THEN
5452: FOR J IN 1..l_l_line_adj_tbl.COUNT LOOP
5453: IF l_debug_level > 0 THEN
5454: oe_debug_pub.add('Price adj Id is '||
5455: to_char(l_l_line_adj_tbl(J).price_adjustment_id),2);
5456: END IF;
5457: -- Check if there are existing TAX records in adjustments
5458:
5472: l_l_line_adj_tbl(J).adjusted_amount) OR
5473: NOT OE_GLOBALS.Equal(l_tax_rec_out_tbl(I).tax_rate,
5474: l_l_line_adj_tbl(J).operand) THEN
5475: IF l_debug_level > 0 THEN
5476: oe_debug_pub.add('Updating the Adj record '||
5477: to_char(l_l_line_adj_tbl(J).price_adjustment_id),2);
5478: END IF;
5479: UPDATE OE_PRICE_ADJUSTMENTS
5480: SET ADJUSTED_AMOUNT =
5512: l_Line_adj_rec.line_id := l_line_id;
5513: --l_Line_adj_rec.tax_code := l_tax_rate_code;
5514: l_Line_adj_rec.tax_rate_id := l_tax_rec_out_tbl(I).tax_rate_id;
5515: IF l_debug_level > 0 THEN
5516: oe_debug_pub.add('Inserting the Adj record '||
5517: to_char(l_line_adj_rec.price_adjustment_id),2);
5518: END IF;
5519: l_Line_Adj_rec.operand := l_tax_rec_out_tbl(I).tax_rate;
5520: l_Line_Adj_rec.adjusted_amount :=
5546: (l_l_line_adj_tbl(J).operation IS NULL
5547: OR l_l_line_adj_tbl(J).operation = FND_API.G_MISS_CHAR)
5548: THEN
5549: IF l_debug_level > 0 THEN
5550: oe_debug_pub.add('Deleting adj Id '||
5551: to_char(l_l_line_adj_tbl(J).price_adjustment_id),2);
5552: END IF;
5553: DELETE FROM OE_PRICE_ADJUSTMENTS
5554: WHERE PRICE_ADJUSTMENT_ID =
5565: l_l_line_adj_tbl.delete;
5566: exception --bug 2173168
5567: when no_data_found then
5568: IF l_debug_level > 0 THEN
5569: oe_debug_pub.add('In No data found for line id:'||to_char(l_line_id),2);
5570: END IF;
5571: x_return_status := FND_API.G_RET_STS_SUCCESS;
5572: end ; -- bug 2173168
5573: l_index := p_entity_id_tbl.NEXT(l_index);
5576:
5577: x_return_status := l_return_status;
5578: IF l_debug_level > 0 THEN
5579: v_end := DBMS_UTILITY.GET_TIME;
5580: oe_debug_pub.add('Time Of execution for Process_Tax '||
5581: to_char((v_end-v_start)/100),1);
5582: END IF;
5583: l_tax_rec_out_tbl.delete;
5584: l_l_line_adj_tbl.delete;
5585:
5586: OE_MSG_PUB.reset_msg_context('LINE');
5587:
5588: IF l_debug_level > 0 THEN
5589: oe_debug_pub.add('Exiting Process_Tax ',1);
5590: END IF;
5591: EXCEPTION
5592: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5593: l_tax_rec_out_tbl.delete;
5602: WHEN NO_DATA_FOUND THEN
5603: l_tax_rec_out_tbl.delete;
5604: l_l_line_adj_tbl.delete;
5605: IF l_debug_level > 0 THEN
5606: oe_debug_pub.add('Tax_Order: In No DATA Found',2);
5607: END IF;
5608: x_return_status := FND_API.G_RET_STS_SUCCESS;
5609:
5610: WHEN OTHERS THEN
5693: and site_use_type = 'SHIP_TO';
5694:
5695: BEGIN
5696:
5697: oe_debug_pub.add(' Entering procedure auto_create_internal_req ',2);
5698: x_return_status := FND_API.G_RET_STS_SUCCESS;
5699: --Query Order Header
5700: OPEN ord_hdr_cur(p_ord_header_id);
5701: FETCH ord_hdr_cur into l_created_by,l_org_id;
5699: --Query Order Header
5700: OPEN ord_hdr_cur(p_ord_header_id);
5701: FETCH ord_hdr_cur into l_created_by,l_org_id;
5702: CLOSE ord_hdr_cur;
5703: oe_debug_pub.add('auto_create_internal_req after hdr query ',2);
5704: --Derive Values not available on the Internal Sales Order
5705: --Derive the Preparer_id
5706: BEGIN
5707: OPEN employee_id_cur(l_created_by);
5764: l_req_line_tbl(j).source_organization_id := Cur_Ord_line.ship_from_org_id;
5765: l_req_line_tbl(j).source_subinventory := Cur_Ord_line.subinventory;
5766: l_req_line_tbl(j).org_id := Cur_Ord_line.org_id;
5767: END LOOP;
5768: oe_debug_pub.add(' auto_create_internal_req before PO API call ',2);
5769:
5770: --Call the PO API and pass the internal req header record and line tables to Create the Internal Req
5771: BEGIN /* Call to the Purchasing API*/
5772:
5776: ,x_msg_count => l_msg_count
5777: ,x_msg_data => l_msg_data );
5778: --Check return status of the Purchasing API
5779: IF l_int_req_Ret_sts = FND_API.G_RET_STS_UNEXP_ERROR THEN
5780: oe_debug_pub.add(' PO API call returned unexpected error '||l_msg_data,2);
5781: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5782:
5783: ELSIF l_int_req_Ret_sts = FND_API.G_RET_STS_ERROR THEN
5784: oe_debug_pub.add(' PO API call returned error '||l_msg_data,2);
5780: oe_debug_pub.add(' PO API call returned unexpected error '||l_msg_data,2);
5781: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5782:
5783: ELSIF l_int_req_Ret_sts = FND_API.G_RET_STS_ERROR THEN
5784: oe_debug_pub.add(' PO API call returned error '||l_msg_data,2);
5785: RAISE FND_API.G_EXC_ERROR;
5786: END IF;
5787:
5788: END;/* Call to the Purchasing API*/
5796: ,orig_sys_document_ref = l_req_header_rec.segment1
5797: ,source_document_type_id = OE_GLOBALS.G_ORDER_SOURCE_INTERNAL -- i.e 10 for internal
5798: ,order_source_id = OE_GLOBALS.G_ORDER_SOURCE_INTERNAL --i.e 10 for internal
5799: Where header_id = p_ord_header_id;
5800: oe_debug_pub.add('auto_create_internal_req after hdr update ',2);
5801: -- Update the lines with the requisition header and requisition line ids, requisition number and line number
5802:
5803: FOR k in 1..l_req_line_tbl.count
5804: LOOP
5813: where oe_order_lines.line_id = l_req_line_tbl(k).source_doc_line_reference;
5814: END;
5815: END IF;
5816: END LOOP;
5817: oe_debug_pub.add('auto_create_internal_req after line update ',2);
5818: END IF;
5819: --Handle Exceptions
5820: EXCEPTION
5821:
5820: EXCEPTION
5821:
5822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5824: oe_debug_pub.add('auto_create_internal_req: In Unexpected error',2);
5825:
5826: WHEN FND_API.G_EXC_ERROR THEN
5827: x_return_status := FND_API.G_RET_STS_ERROR;
5828: oe_debug_pub.add('auto_create_internal_req: In execution error',2);
5824: oe_debug_pub.add('auto_create_internal_req: In Unexpected error',2);
5825:
5826: WHEN FND_API.G_EXC_ERROR THEN
5827: x_return_status := FND_API.G_RET_STS_ERROR;
5828: oe_debug_pub.add('auto_create_internal_req: In execution error',2);
5829:
5830: --WHEN NO_DATA_FOUND THEN
5831: --x_return_status := FND_API.G_RET_STS_SUCCESS;
5832: --oe_debug_pub.add('auto_create_internal_req: In No DATA Found',2);
5828: oe_debug_pub.add('auto_create_internal_req: In execution error',2);
5829:
5830: --WHEN NO_DATA_FOUND THEN
5831: --x_return_status := FND_API.G_RET_STS_SUCCESS;
5832: --oe_debug_pub.add('auto_create_internal_req: In No DATA Found',2);
5833:
5834: WHEN OTHERS THEN
5835: oe_debug_pub.add('auto_create_internal_req: In Other error',2);
5836: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5831: --x_return_status := FND_API.G_RET_STS_SUCCESS;
5832: --oe_debug_pub.add('auto_create_internal_req: In No DATA Found',2);
5833:
5834: WHEN OTHERS THEN
5835: oe_debug_pub.add('auto_create_internal_req: In Other error',2);
5836: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5837: THEN
5838: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,'auto_create_internal_req');
5839: END IF;
5889: --bug #7491829
5890:
5891: BEGIN
5892:
5893: OE_Debug_PUB.Add('Entering OE_Delayed_Requests_Util.Reverse_Limits', 1);
5894: OE_Debug_PUB.Add('BOTTOM LEVEL before QP call', 1);
5895: x_return_status := FND_API.G_RET_STS_SUCCESS;
5896:
5897: -- BUG 2670775 Reverse Limits Begin
5890:
5891: BEGIN
5892:
5893: OE_Debug_PUB.Add('Entering OE_Delayed_Requests_Util.Reverse_Limits', 1);
5894: OE_Debug_PUB.Add('BOTTOM LEVEL before QP call', 1);
5895: x_return_status := FND_API.G_RET_STS_SUCCESS;
5896:
5897: -- BUG 2670775 Reverse Limits Begin
5898: -- If Limits processing is not installed, no need to proceed further
5896:
5897: -- BUG 2670775 Reverse Limits Begin
5898: -- If Limits processing is not installed, no need to proceed further
5899: IF NVL(FND_PROFILE.VALUE('QP_LIMITS_INSTALLED'),'N') = 'N' THEN
5900: oe_debug_pub.add('QP LIMITS NOT installed so no call to QP_UTIL_PUB.Reverse_Limits',1);
5901: RETURN;
5902: END IF;
5903: -- BUG 2670775 Reverse Limits End
5904:
5915:
5916: --bug #7491829
5917: IF p_action_code = 'SPLIT_NEW' THEN
5918: -- Retrieve price_request_code for the current child split line and its parent
5919: oe_debug_pub.add('Action code : ' || p_action_code);
5920: OPEN SPLIT_LINE;
5921: FETCH SPLIT_LINE INTO
5922: l_header_id, l_orig_ordered_qty, l_parent_line_id;
5923: CLOSE SPLIT_LINE;
5920: OPEN SPLIT_LINE;
5921: FETCH SPLIT_LINE INTO
5922: l_header_id, l_orig_ordered_qty, l_parent_line_id;
5923: CLOSE SPLIT_LINE;
5924: oe_Debug_pub.add('l_header_id : ' || l_header_id);
5925: oe_Debug_pub.add('l_orig_ordered_qty : ' || l_orig_ordered_qty);
5926: oe_Debug_pub.add('l_parent_line_id : ' || l_parent_line_id);
5927:
5928: l_ret_price_request_code := 'ONT-' || l_header_id || '-' || p_line_id;
5921: FETCH SPLIT_LINE INTO
5922: l_header_id, l_orig_ordered_qty, l_parent_line_id;
5923: CLOSE SPLIT_LINE;
5924: oe_Debug_pub.add('l_header_id : ' || l_header_id);
5925: oe_Debug_pub.add('l_orig_ordered_qty : ' || l_orig_ordered_qty);
5926: oe_Debug_pub.add('l_parent_line_id : ' || l_parent_line_id);
5927:
5928: l_ret_price_request_code := 'ONT-' || l_header_id || '-' || p_line_id;
5929: l_cons_price_request_code := 'ONT-' || l_header_id || '-' || l_parent_line_id;
5922: l_header_id, l_orig_ordered_qty, l_parent_line_id;
5923: CLOSE SPLIT_LINE;
5924: oe_Debug_pub.add('l_header_id : ' || l_header_id);
5925: oe_Debug_pub.add('l_orig_ordered_qty : ' || l_orig_ordered_qty);
5926: oe_Debug_pub.add('l_parent_line_id : ' || l_parent_line_id);
5927:
5928: l_ret_price_request_code := 'ONT-' || l_header_id || '-' || p_line_id;
5929: l_cons_price_request_code := 'ONT-' || l_header_id || '-' || l_parent_line_id;
5930: oe_Debug_pub.add('l_ret_price_request_code : ' || l_ret_price_request_code);
5926: oe_Debug_pub.add('l_parent_line_id : ' || l_parent_line_id);
5927:
5928: l_ret_price_request_code := 'ONT-' || l_header_id || '-' || p_line_id;
5929: l_cons_price_request_code := 'ONT-' || l_header_id || '-' || l_parent_line_id;
5930: oe_Debug_pub.add('l_ret_price_request_code : ' || l_ret_price_request_code);
5931: oe_Debug_pub.add('l_cons_price_request_code : ' || l_cons_price_request_code);
5932: END IF;
5933: --bug #7491829
5934:
5927:
5928: l_ret_price_request_code := 'ONT-' || l_header_id || '-' || p_line_id;
5929: l_cons_price_request_code := 'ONT-' || l_header_id || '-' || l_parent_line_id;
5930: oe_Debug_pub.add('l_ret_price_request_code : ' || l_ret_price_request_code);
5931: oe_Debug_pub.add('l_cons_price_request_code : ' || l_cons_price_request_code);
5932: END IF;
5933: --bug #7491829
5934:
5935: IF p_action_code = 'RETURN' and l_ret_price_request_code is NULL THEN
5932: END IF;
5933: --bug #7491829
5934:
5935: IF p_action_code = 'RETURN' and l_ret_price_request_code is NULL THEN
5936: OE_Debug_PUB.Add('NO CALL made to QP_UTIL_PUB.Reverse_Limits ', 1);
5937: OE_DEBUG_PUB.Add('return price_request_code is null so block limits call', 1);
5938: RETURN;
5939: END IF;
5940:
5933: --bug #7491829
5934:
5935: IF p_action_code = 'RETURN' and l_ret_price_request_code is NULL THEN
5936: OE_Debug_PUB.Add('NO CALL made to QP_UTIL_PUB.Reverse_Limits ', 1);
5937: OE_DEBUG_PUB.Add('return price_request_code is null so block limits call', 1);
5938: RETURN;
5939: END IF;
5940:
5941: --bug#7491829
5939: END IF;
5940:
5941: --bug#7491829
5942: IF p_action_code = 'SPLIT_NEW' and l_ret_price_request_code is NULL THEN
5943: OE_Debug_PUB.Add('NO CALL made to QP_UTIL_PUB.Reverse_Limits ', 1);
5944: OE_DEBUG_PUB.Add('split line price_request_code is null so block limits call', 1);
5945: END IF;
5946: --bug#7491829
5947:
5940:
5941: --bug#7491829
5942: IF p_action_code = 'SPLIT_NEW' and l_ret_price_request_code is NULL THEN
5943: OE_Debug_PUB.Add('NO CALL made to QP_UTIL_PUB.Reverse_Limits ', 1);
5944: OE_DEBUG_PUB.Add('split line price_request_code is null so block limits call', 1);
5945: END IF;
5946: --bug#7491829
5947:
5948: IF l_cons_price_request_code is NULL THEN
5945: END IF;
5946: --bug#7491829
5947:
5948: IF l_cons_price_request_code is NULL THEN
5949: OE_Debug_PUB.Add('NO CALL made to QP_UTIL_PUB.Reverse_Limits ', 1);
5950: OE_DEBUG_PUB.Add('consuming price_request_code is null so no limit for reversal', 1);
5951: RETURN;
5952: END IF;
5953:
5946: --bug#7491829
5947:
5948: IF l_cons_price_request_code is NULL THEN
5949: OE_Debug_PUB.Add('NO CALL made to QP_UTIL_PUB.Reverse_Limits ', 1);
5950: OE_DEBUG_PUB.Add('consuming price_request_code is null so no limit for reversal', 1);
5951: RETURN;
5952: END IF;
5953:
5954: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: action_code is '||p_action_code, 1);
5950: OE_DEBUG_PUB.Add('consuming price_request_code is null so no limit for reversal', 1);
5951: RETURN;
5952: END IF;
5953:
5954: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: action_code is '||p_action_code, 1);
5955: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: price_request_code is '||l_cons_price_request_code, 1);
5956: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: orig_ordered_qty is '||l_orig_ordered_qty, 1);
5957: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return request code '||l_ret_price_request_code, 1);
5958: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return qty '||p_returned_qty, 1);
5951: RETURN;
5952: END IF;
5953:
5954: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: action_code is '||p_action_code, 1);
5955: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: price_request_code is '||l_cons_price_request_code, 1);
5956: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: orig_ordered_qty is '||l_orig_ordered_qty, 1);
5957: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return request code '||l_ret_price_request_code, 1);
5958: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return qty '||p_returned_qty, 1);
5959:
5952: END IF;
5953:
5954: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: action_code is '||p_action_code, 1);
5955: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: price_request_code is '||l_cons_price_request_code, 1);
5956: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: orig_ordered_qty is '||l_orig_ordered_qty, 1);
5957: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return request code '||l_ret_price_request_code, 1);
5958: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return qty '||p_returned_qty, 1);
5959:
5960: QP_UTIL_PUB.Reverse_Limits (p_action_code => p_action_code,
5953:
5954: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: action_code is '||p_action_code, 1);
5955: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: price_request_code is '||l_cons_price_request_code, 1);
5956: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: orig_ordered_qty is '||l_orig_ordered_qty, 1);
5957: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return request code '||l_ret_price_request_code, 1);
5958: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return qty '||p_returned_qty, 1);
5959:
5960: QP_UTIL_PUB.Reverse_Limits (p_action_code => p_action_code,
5961: p_cons_price_request_code => l_cons_price_request_code,
5954: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: action_code is '||p_action_code, 1);
5955: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: price_request_code is '||l_cons_price_request_code, 1);
5956: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: orig_ordered_qty is '||l_orig_ordered_qty, 1);
5957: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return request code '||l_ret_price_request_code, 1);
5958: OE_Debug_PUB.Add('Call to QP_UTIL_PUB.Reverse_Limits: return qty '||p_returned_qty, 1);
5959:
5960: QP_UTIL_PUB.Reverse_Limits (p_action_code => p_action_code,
5961: p_cons_price_request_code => l_cons_price_request_code,
5962: p_orig_ordered_qty => l_orig_ordered_qty,
5967: x_return_message => l_return_message
5968: );
5969:
5970:
5971: OE_Debug_PUB.Add('QP_UTIL_PUB.Reverse_Limits returns status of '|| l_return_status, 1);
5972: OE_Debug_PUB.Add('QP_UTIL_PUB.Reverse_Limits returns message of '|| l_return_message , 1);
5973: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5974: OE_Debug_PUB.Add('Error returned by QP_UTIL_PUB.Reverse_Limits',1);
5975: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5968: );
5969:
5970:
5971: OE_Debug_PUB.Add('QP_UTIL_PUB.Reverse_Limits returns status of '|| l_return_status, 1);
5972: OE_Debug_PUB.Add('QP_UTIL_PUB.Reverse_Limits returns message of '|| l_return_message , 1);
5973: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5974: OE_Debug_PUB.Add('Error returned by QP_UTIL_PUB.Reverse_Limits',1);
5975: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5976: RAISE FND_API.G_EXC_ERROR;
5970:
5971: OE_Debug_PUB.Add('QP_UTIL_PUB.Reverse_Limits returns status of '|| l_return_status, 1);
5972: OE_Debug_PUB.Add('QP_UTIL_PUB.Reverse_Limits returns message of '|| l_return_message , 1);
5973: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5974: OE_Debug_PUB.Add('Error returned by QP_UTIL_PUB.Reverse_Limits',1);
5975: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5976: RAISE FND_API.G_EXC_ERROR;
5977: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5978: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5986: where line_id = p_line_id;
5987: END IF;
5988: --bug 7491829
5989:
5990: OE_Debug_PUB.Add('Exiting OE_Delayed_Requests_Util.Reverse_Limits with status of '|| x_return_status, 1);
5991:
5992: EXCEPTION
5993: WHEN FND_API.G_EXC_ERROR THEN
5994:
6041: l_reciever_code VARCHAR2(1);
6042: l_line_id_tbl Line_ID_List;
6043: Raise_Event_XML BOOLEAN := FALSE;
6044:
6045: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6046:
6047: Begin
6048:
6049:
6050: l_request_rec := OE_Delayed_Requests_PVT.G_Delayed_Requests(p_request_ind);
6051: l_header_id := l_request_rec.entity_id;
6052:
6053: IF l_debug_level > 0 THEN
6054: oe_debug_pub.add( 'retrieving key information from base table') ;
6055: END IF;
6056:
6057:
6058: SELECT order_source_id, orig_sys_document_ref, sold_to_org_id, change_sequence
6077: l_order_number := to_number(l_request_rec.param13);
6078:
6079:
6080: IF l_debug_level > 0 THEN
6081: oe_debug_pub.add( 'l_reciever_code before:' || l_reciever_code ) ;
6082: END IF;
6083:
6084:
6085: IF l_reciever_code = FND_API.G_MISS_CHAR OR
6097: l_reciever_code := 'P';
6098: END IF;
6099:
6100: IF l_debug_level > 0 THEN
6101: oe_debug_pub.add( 'l_reciever_code after:' || l_reciever_code ) ;
6102: END IF;
6103:
6104: IF l_request_rec.param1 IS NULL THEN
6105: -- header level request that should acknowledge all lines
6103:
6104: IF l_request_rec.param1 IS NULL THEN
6105: -- header level request that should acknowledge all lines
6106: IF l_debug_level > 0 THEN
6107: oe_debug_pub.add( 'RAISING HEADER-LEVEL EVENT TO ACK ALL LINES') ;
6108: END IF;
6109:
6110:
6111: IF l_reciever_code IN ('C', 'B') THEN
6111: IF l_reciever_code IN ('C', 'B') THEN
6112: IF l_acknowledgment_type in (OE_ACKNOWLEDGMENT_PUB.G_TRANSACTION_SSO, OE_ACKNOWLEDGMENT_PUB.G_TRANSACTION_CSO) THEN
6113:
6114: IF l_debug_level > 0 THEN
6115: oe_debug_pub.add( 'SSO or CSO request' ) ;
6116: END IF;
6117: OE_Acknowledgment_Pub.Raise_Event_Showso
6118: (
6119: p_header_id => l_header_id,
6131:
6132: ELSIF l_acknowledgment_type = OE_ACKNOWLEDGMENT_PUB.G_TRANSACTION_POI THEN
6133:
6134: IF l_debug_level > 0 THEN
6135: oe_debug_pub.add( '3A4 ACK request' ) ;
6136: END IF;
6137: Oe_Acknowledgment_Pub.Raise_Event_From_Oeoi(
6138: p_transaction_type => l_acknowledgment_type,
6139: p_orig_sys_document_ref => l_orig_sys_document_ref,
6153:
6154: IF l_reciever_code IN ('P', 'B') THEN
6155: -- raise integration event
6156: IF l_debug_level > 0 THEN
6157: oe_debug_pub.add( 'RAISING INTEGRATION EVENT' ) ;
6158: END IF;
6159: OE_Acknowledgment_Pub.Raise_Event_XMLInt (
6160: p_order_source_id => l_order_source_id,
6161: p_partner_document_num => l_orig_sys_document_ref,
6183: into l_itemkey
6184: from dual;
6185:
6186: IF l_debug_level > 0 THEN
6187: oe_debug_pub.add( 'sequence value: ' || l_itemkey) ;
6188: end if;
6189:
6190:
6191: --insert provided header information into table
6189:
6190:
6191: --insert provided header information into table
6192: IF l_debug_level > 0 THEN
6193: oe_debug_pub.add( 'SEEDEDING HEADER_ID FOR ACKNOWLEDGMENT => ' || l_header_id ) ;
6194: END IF;
6195:
6196:
6197: Insert Into OE_HEADER_ACKS (header_id, acknowledgment_type, last_ack_code, request_id, sold_to_org_id, change_sequence)
6198: Values (l_header_id, l_acknowledgment_type, l_flow_status_code, l_itemkey,
6199: l_sold_to_org_id, l_change_sequence);
6200:
6201: IF l_debug_level > 0 THEN
6202: oe_debug_pub.add( 'AFTER HEADER INSERT') ;
6203: END IF;
6204: END IF; -- end of check for customer ack request
6205:
6206:
6215: AND nvl(OE_Delayed_Requests_PVT.G_Delayed_Requests(l_count).param7, 'INT') = nvl(l_acknowledgment_type, 'INT') THEN
6216:
6217: -- add this line to the lines table for insertion
6218: IF l_debug_level > 0 THEN
6219: oe_debug_pub.add( 'LINE_ID FOR ACKNOWLEDGMENT => ' || OE_Delayed_Requests_PVT.G_Delayed_Requests(l_count).entity_id ) ;
6220: END IF;
6221:
6222: If l_line_found = 'N' then
6223: --set flag to show that a line has been found
6244: l_bulk_line_rec.sold_to_org_id(i) := to_number(OE_Delayed_Requests_PVT.G_Delayed_Requests(l_count).param4);
6245: l_bulk_line_rec.change_sequence(i) :=OE_Delayed_Requests_PVT. G_Delayed_Requests(l_count).param5;
6246:
6247: IF l_debug_level > 0 THEN
6248: oe_debug_pub.add( 'after assignment to bulk record') ;
6249: end if;
6250:
6251: END IF;
6252:
6252:
6253: IF l_reciever_code IN ('P', 'B') THEN
6254: -- 5738023
6255: IF l_debug_level > 0 THEN
6256: oe_debug_pub.add( 'Assigning entity id to line table', 3);
6257: END IF;
6258: l_line_id_tbl(i).line_id := OE_Delayed_Requests_PVT.G_Delayed_Requests(l_count).entity_id;
6259: END IF;
6260:
6281: ctr := l_bulk_line_rec.line_id.count;
6282:
6283:
6284: IF l_debug_level > 0 THEN
6285: oe_debug_pub.add( 'LINE COUNT:' || ctr) ;
6286: oe_debug_pub.add( 'BEFORE BULK INSERT OF LINES') ;
6287: END IF;
6288:
6289: FORALL j IN 1..ctr
6282:
6283:
6284: IF l_debug_level > 0 THEN
6285: oe_debug_pub.add( 'LINE COUNT:' || ctr) ;
6286: oe_debug_pub.add( 'BEFORE BULK INSERT OF LINES') ;
6287: END IF;
6288:
6289: FORALL j IN 1..ctr
6290: INSERT INTO OE_LINE_ACKS
6305: ,l_bulk_line_rec.change_sequence(j)
6306: );
6307:
6308: IF l_debug_level > 0 THEN
6309: oe_debug_pub.add( 'AFTER BULK INSERT OF LINES') ;
6310: END IF;
6311:
6312: END IF; --end of l_line_found conditional
6313: END IF;
6315: IF l_reciever_code IN ('C', 'B') THEN
6316: IF l_acknowledgment_type IN (OE_ACKNOWLEDGMENT_PUB.G_TRANSACTION_SSO, OE_ACKNOWLEDGMENT_PUB.G_TRANSACTION_CSO) THEN
6317:
6318: IF l_debug_level > 0 THEN
6319: oe_debug_pub.add( 'SSO or CSO request' ) ;
6320: END IF;
6321:
6322: OE_Acknowledgment_Pub.Raise_Event_Showso
6323: (
6337:
6338: ELSIF l_acknowledgment_type = OE_ACKNOWLEDGMENT_PUB.G_TRANSACTION_POI THEN
6339:
6340: IF l_debug_level > 0 THEN
6341: oe_debug_pub.add( '3A4 ACK request' ) ;
6342: END IF;
6343: Oe_Acknowledgment_Pub.Raise_Event_From_Oeoi(
6344: p_transaction_type => l_acknowledgment_type,
6345: p_orig_sys_document_ref => l_orig_sys_document_ref,
6375: END IF;
6376: END IF;
6377: IF Raise_Event_XML THEN
6378: IF l_debug_level > 0 THEN
6379: oe_debug_pub.add( 'Raising Event with line id '|| l_line_id_tbl(i).line_id, 3);
6380: oe_debug_pub.add( 'Line_ids:' || l_line_ids, 3);
6381: END IF;
6382:
6383: -- raise integration event
6376: END IF;
6377: IF Raise_Event_XML THEN
6378: IF l_debug_level > 0 THEN
6379: oe_debug_pub.add( 'Raising Event with line id '|| l_line_id_tbl(i).line_id, 3);
6380: oe_debug_pub.add( 'Line_ids:' || l_line_ids, 3);
6381: END IF;
6382:
6383: -- raise integration event
6384: OE_Acknowledgment_Pub.Raise_Event_XMLInt (
6398: x_return_status => l_return_status);
6399:
6400:
6401: IF l_debug_level > 0 THEN
6402: oe_debug_pub.add( 'line ids: ' || l_line_ids ) ;
6403: END IF;
6404: l_line_ids := NULL;
6405: Raise_Event_XML := FALSE;
6406:
6412: /* Below code is needed for this new regression bug
6413: ------------------------------------------------ */
6414: ELSE -- l_line_id_tbl.COUNT is 0
6415: IF l_debug_level > 0 THEN
6416: oe_debug_pub.add(' Raising XML Event for Order Header');
6417: END IF;
6418: l_line_ids := NULL;
6419: OE_Acknowledgment_Pub.Raise_Event_XMLInt (
6420: p_order_source_id => l_order_source_id,
6439: END IF;
6440:
6441: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6442: IF l_debug_level > 0 THEN
6443: OE_Debug_PUB.Add('ERROR RETURNED BY RAISE_EVENT FOR: ' || l_acknowledgment_type);
6444: END IF;
6445: END IF;
6446:
6447:
6454:
6455: Exception
6456: When others then
6457: IF l_debug_level > 0 THEN
6458: oe_debug_pub.add( 'IN OTHERS EXCEPTION:' || SQLERRM) ;
6459: END IF;
6460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6462: End Process_XML_Delayed_Request;
6533: l_new_ord_quantity NUMBER;
6534: l_cancel_line BOOLEAN := FALSE;
6535: l_New_Schedule_Ship_Date DATE;
6536: --
6537: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6538: --
6539: BEGIN
6540: IF l_debug_level > 0 THEN
6541: oe_debug_pub.ADD('Entering delayed request utility for Update_Requisition_Info',1);
6537: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6538: --
6539: BEGIN
6540: IF l_debug_level > 0 THEN
6541: oe_debug_pub.ADD('Entering delayed request utility for Update_Requisition_Info',1);
6542: oe_debug_pub.ADD(' Header id '||p_header_id,5);
6543: oe_debug_pub.ADD(' Line id '||p_line_id,5);
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6538: --
6539: BEGIN
6540: IF l_debug_level > 0 THEN
6541: oe_debug_pub.ADD('Entering delayed request utility for Update_Requisition_Info',1);
6542: oe_debug_pub.ADD(' Header id '||p_header_id,5);
6543: oe_debug_pub.ADD(' Line id '||p_line_id,5);
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6539: BEGIN
6540: IF l_debug_level > 0 THEN
6541: oe_debug_pub.ADD('Entering delayed request utility for Update_Requisition_Info',1);
6542: oe_debug_pub.ADD(' Header id '||p_header_id,5);
6543: oe_debug_pub.ADD(' Line id '||p_line_id,5);
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6547: oe_debug_pub.ADD(' Quantity Change '||p_quantity_change,5);
6540: IF l_debug_level > 0 THEN
6541: oe_debug_pub.ADD('Entering delayed request utility for Update_Requisition_Info',1);
6542: oe_debug_pub.ADD(' Header id '||p_header_id,5);
6543: oe_debug_pub.ADD(' Line id '||p_line_id,5);
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6547: oe_debug_pub.ADD(' Quantity Change '||p_quantity_change,5);
6548: oe_debug_pub.ADD(' New Schedule Ship Date '||p_new_schedule_ship_date,5);
6541: oe_debug_pub.ADD('Entering delayed request utility for Update_Requisition_Info',1);
6542: oe_debug_pub.ADD(' Header id '||p_header_id,5);
6543: oe_debug_pub.ADD(' Line id '||p_line_id,5);
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6547: oe_debug_pub.ADD(' Quantity Change '||p_quantity_change,5);
6548: oe_debug_pub.ADD(' New Schedule Ship Date '||p_new_schedule_ship_date,5);
6549: IF p_cancel_order THEN
6542: oe_debug_pub.ADD(' Header id '||p_header_id,5);
6543: oe_debug_pub.ADD(' Line id '||p_line_id,5);
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6547: oe_debug_pub.ADD(' Quantity Change '||p_quantity_change,5);
6548: oe_debug_pub.ADD(' New Schedule Ship Date '||p_new_schedule_ship_date,5);
6549: IF p_cancel_order THEN
6550: oe_debug_pub.ADD(' Order Level Cancellation',5);
6543: oe_debug_pub.ADD(' Line id '||p_line_id,5);
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6547: oe_debug_pub.ADD(' Quantity Change '||p_quantity_change,5);
6548: oe_debug_pub.ADD(' New Schedule Ship Date '||p_new_schedule_ship_date,5);
6549: IF p_cancel_order THEN
6550: oe_debug_pub.ADD(' Order Level Cancellation',5);
6551: ELSE
6544: oe_debug_pub.ADD(' Number of shipment Lines updated '||p_num_records,5);
6545: oe_debug_pub.ADD(' Req Header id '||p_requisition_header_id,5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6547: oe_debug_pub.ADD(' Quantity Change '||p_quantity_change,5);
6548: oe_debug_pub.ADD(' New Schedule Ship Date '||p_new_schedule_ship_date,5);
6549: IF p_cancel_order THEN
6550: oe_debug_pub.ADD(' Order Level Cancellation',5);
6551: ELSE
6552: oe_debug_pub.ADD(' Not an Order Level Cancellation',5);
6546: oe_debug_pub.ADD(' Req Line id '||p_requisition_line_id,5);
6547: oe_debug_pub.ADD(' Quantity Change '||p_quantity_change,5);
6548: oe_debug_pub.ADD(' New Schedule Ship Date '||p_new_schedule_ship_date,5);
6549: IF p_cancel_order THEN
6550: oe_debug_pub.ADD(' Order Level Cancellation',5);
6551: ELSE
6552: oe_debug_pub.ADD(' Not an Order Level Cancellation',5);
6553: END IF;
6554: END IF;
6548: oe_debug_pub.ADD(' New Schedule Ship Date '||p_new_schedule_ship_date,5);
6549: IF p_cancel_order THEN
6550: oe_debug_pub.ADD(' Order Level Cancellation',5);
6551: ELSE
6552: oe_debug_pub.ADD(' Not an Order Level Cancellation',5);
6553: END IF;
6554: END IF;
6555:
6556: x_return_status := FND_API.G_RET_STS_SUCCESS;
6558:
6559: IF NOT p_Cancel_Order THEN
6560: IF p_line_id IS NULL THEN
6561: IF l_debug_level > 0 THEN
6562: oe_debug_pub.add(' Invalid processing since Line_id is null for non-order header cancellation',1);
6563: END IF;
6564: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6565: END IF;
6566: Begin
6570: where line_id = p_line_id;
6571: End;
6572: IF l_new_ord_quantity = 0 THEN
6573: IF l_debug_level > 0 THEN
6574: oe_debug_pub.ADD(' Line is cancelled, cancel the Requisition Line',5);
6575: END IF;
6576: l_cancel_line := TRUE;
6577: END IF;
6578: END IF; -- Not P_Cancel_Order
6601:
6602: X_return_status := l_return_status;
6603:
6604: IF l_debug_level > 0 THEN
6605: oe_debug_pub.ADD('Exiting delayed request utility for Update_Requisition_Info',1);
6606: END IF;
6607: EXCEPTION
6608: WHEN FND_API.G_EXC_ERROR THEN
6609: x_return_status := FND_API.G_RET_STS_ERROR;