56: lx_index_counter Number;
57: lx_order_status_rec QP_UTIL_PUB.ORDER_LINES_STATUS_REC_TYPE;
58: l_adj_id_tbl Index_Link_Tbl_Type;
59: l_price_index Number;
60: px_line_index_search_tbl ASO_PRICING_CORE_PVT.Index_Link_Tbl_Type;
61: l_global_pls_tbl QP_PREQ_GRP.pls_integer_type;
62: l_global_num_tbl QP_PREQ_GRP.NUMBER_TYPE;
63: l_pricing_start_time NUMBER;
64: l_pricing_end_time NUMBER;
101: If p_internal_call_flag = 'N' then
102: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
103: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Set_Global_Rec - Header Level... ',1,'Y');
104: END IF;
105: ASO_PRICING_INT.G_HEADER_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
106: p_qte_header_rec => p_qte_header_rec,
107: p_shipment_rec => p_hd_shipment_rec);
108: end If;--If p_internal_call_flag = 'N' then
109:
106: p_qte_header_rec => p_qte_header_rec,
107: p_shipment_rec => p_hd_shipment_rec);
108: end If;--If p_internal_call_flag = 'N' then
109:
110: ASO_PRICING_CORE_PVT.Print_G_Header_Rec;
111: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
112: l_pricing_end_time := dbms_utility.get_time;
113: l_accum_aso_time := l_pricing_end_time - l_pricing_start_time;
114: END IF;
131: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Header_To_Request...',1,'Y');
132: END IF;
133:
134:
135: ASO_PRICING_CORE_PVT.Copy_Header_To_Request(
136: p_Request_Type => p_control_rec.request_type,
137: p_price_line_index => l_price_index,
138: px_index_counter => 1);
139:
141: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Append_asked_for...',1,'Y');
142: END IF;
143:
144: lx_index_counter:= 1;
145: ASO_PRICING_CORE_PVT.Append_asked_for(
146: p_pricing_event => p_control_rec.pricing_event,
147: p_price_line_index => l_price_index,
148: p_header_id => p_qte_header_rec.quote_header_id,
149: px_index_counter => lx_index_counter);
300: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT:l_shipment_rec.REQUEST_DATE:'
301: ||NVL(to_char(l_shipment_rec.REQUEST_DATE),'NULL'),1,'Y');
302: END IF;
303:
304: ASO_PRICING_INT.G_LINE_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
305: p_qte_line_rec => l_qte_line_tbl(i),
306: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
307: p_shipment_rec => l_shipment_rec);
308:
305: p_qte_line_rec => l_qte_line_tbl(i),
306: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
307: p_shipment_rec => l_shipment_rec);
308:
309: ASO_PRICING_CORE_PVT.Print_G_Line_Rec;
310:
311: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
312: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of QP Build_Contexts - Line Level...',1,'Y');
313: l_pricing_end_time := dbms_utility.get_time;
327: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: x_pass_line: '||nvl(x_pass_line,'null'),1,'Y');
328: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Line_To_Request...',1,'Y');
329: END IF;
330:
331: ASO_PRICING_CORE_PVT.Copy_Line_To_Request(
332: p_Request_Type => p_control_rec.request_type,
333: p_price_line_index => l_price_index,
334: px_index_counter => i+1);
335:
339: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT:Before Append Ask for lx_index_counter:'
340: ||lx_index_counter,1,'Y');
341: END IF;
342: l_index_counter := lx_index_counter;
343: ASO_PRICING_CORE_PVT.Append_asked_for(
344: p_pricing_event => p_control_rec.pricing_event,
345: p_price_line_index => l_price_index,
346: p_header_id => p_qte_header_rec.quote_header_id,
347: p_line_id => l_qte_line_tbl(i).quote_line_id,
402: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Query_Price_Adjustments...',1,'Y');
403: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: l_qte_line_id_tbl.count :'
404: ||NVL(l_qte_line_id_tbl.count,0),1,'Y');
405: END IF;
406: ASO_PRICING_CORE_PVT.Query_Price_Adjustments
407: (p_quote_header_id => p_qte_header_rec.quote_header_id,
408: p_qte_line_id_tbl => l_qte_line_id_tbl,
409: x_adj_id_tbl => l_qte_adj_id_tbl);
410:
420: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: l_service_qte_line_id_tbl.count :'
421: ||NVL(l_service_qte_line_id_tbl.count,0),1,'Y');
422: end if;
423: END IF;
424: ASO_PRICING_CORE_PVT.Query_relationships
425: (p_qte_adj_id_tbl => l_qte_adj_id_tbl,
426: p_service_qte_line_id_tbl => l_service_qte_line_id_tbl);
427: else
428: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
509: If (l_qte_line_tbl.count <> 0 ) OR (p_control_rec.pricing_event = 'ORDER') then
510: --Condition was placed because engine call was not necessary if the event is price and there are no lines
511:
512: --Need to modify the global index table of pls integer types
513: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
514: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
515: p_global_tbl => l_global_pls_tbl,
516: p_search_tbl => px_line_index_search_tbl);
517: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
510: --Condition was placed because engine call was not necessary if the event is price and there are no lines
511:
512: --Need to modify the global index table of pls integer types
513: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
514: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
515: p_global_tbl => l_global_pls_tbl,
516: p_search_tbl => px_line_index_search_tbl);
517: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
518: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
513: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
514: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
515: p_global_tbl => l_global_pls_tbl,
516: p_search_tbl => px_line_index_search_tbl);
517: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
518: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
519: p_global_tbl => l_global_num_tbl,
520: p_search_tbl => px_line_index_search_tbl);
521: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
514: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
515: p_global_tbl => l_global_pls_tbl,
516: p_search_tbl => px_line_index_search_tbl);
517: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
518: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
519: p_global_tbl => l_global_num_tbl,
520: p_search_tbl => px_line_index_search_tbl);
521: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
522: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
517: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
518: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
519: p_global_tbl => l_global_num_tbl,
520: p_search_tbl => px_line_index_search_tbl);
521: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
522: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
523: p_global_tbl => l_global_num_tbl,
524: p_search_tbl => px_line_index_search_tbl);
525:
518: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
519: p_global_tbl => l_global_num_tbl,
520: p_search_tbl => px_line_index_search_tbl);
521: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
522: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
523: p_global_tbl => l_global_num_tbl,
524: p_search_tbl => px_line_index_search_tbl);
525:
526: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
528: l_pricing_end_time := dbms_utility.get_time;
529: l_accum_aso_time := l_accum_aso_time + (l_pricing_end_time - l_pricing_start_time);
530: END IF;
531:
532: ASO_PRICING_CORE_PVT.populate_qp_temp_tables;
533:
534: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
535: l_pricing_start_time := dbms_utility.get_time;
536: l_accum_qp_time := l_accum_qp_time + (l_pricing_start_time - l_pricing_end_time);
592: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Post_Price_Request...',1,'Y');
593: END IF;
594:
595:
596: ASO_PRICING_CORE_PVT.Copy_Price_To_Quote(
597: P_Api_Version_Number => 1.0,
598: P_Init_Msg_List => FND_API.G_FALSE,
599: P_Commit => FND_API.G_FALSE,
600: p_control_rec => l_prc_control_rec,
608: END IF;
609:
610: If p_internal_call_flag = 'N' then
611: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
612: ASO_PRICING_CORE_PVT.Process_PRG(
613: P_Api_Version_Number => 1.0,
614: P_Init_Msg_List => FND_API.G_FALSE,
615: P_Commit => FND_API.G_FALSE,
616: p_control_rec => l_prc_control_rec,
632: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: After Process_PRG : x_qte_line_tbl.count: '
633: ||x_qte_line_tbl.count,1,'Y');
634: END IF;
635:
636: ASO_PRICING_CORE_PVT.Process_Charges(
637: P_Api_Version_Number => 1.0,
638: P_Init_Msg_List => FND_API.G_FALSE,
639: P_Commit => FND_API.G_FALSE,
640: p_control_rec => l_prc_control_rec,
729: l_service_id_tbl Index_Link_Tbl_Type;
730: lx_index_counter Number;
731: l_index_counter Number; -- This is used to keep track of lx_index_counter
732: l_price_index Number;
733: px_line_index_search_tbl ASO_PRICING_CORE_PVT.Index_Link_Tbl_Type;
734: l_global_pls_tbl QP_PREQ_GRP.pls_integer_type;
735: l_global_num_tbl QP_PREQ_GRP.NUMBER_TYPE;
736:
737: -- The following three cursors are needed for service lines processing.
790:
791: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
792: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Set_Global_Rec - Header Level... ',1,'Y');
793: END IF;
794: ASO_PRICING_INT.G_HEADER_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
795: p_qte_header_rec => p_qte_header_rec,
796: p_shipment_rec => p_hd_shipment_rec);
797:
798: ASO_PRICING_CORE_PVT.Print_G_Header_Rec;
794: ASO_PRICING_INT.G_HEADER_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
795: p_qte_header_rec => p_qte_header_rec,
796: p_shipment_rec => p_hd_shipment_rec);
797:
798: ASO_PRICING_CORE_PVT.Print_G_Header_Rec;
799:
800: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
801: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of QP Build Contexts - Header Level ... ',1,'Y');
802: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: p_qte_header_rec.quote_header_id: '
818: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Header_To_Request...',1,'Y');
819: END IF;
820:
821:
822: ASO_PRICING_CORE_PVT.Copy_Header_To_Request(
823: p_Request_Type => p_control_rec.request_type,
824: p_price_line_index => l_price_index,
825: px_index_counter => 1);
826:
828: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Append_asked_for...',1,'Y');
829: END IF;
830:
831: lx_index_counter := 1;
832: ASO_PRICING_CORE_PVT.Append_asked_for(
833: p_pricing_event => p_control_rec.pricing_event,
834: p_price_line_index => l_price_index,
835: p_header_id => p_qte_header_rec.quote_header_id,
836: px_index_counter => lx_index_counter);
842: IF ( p_control_rec.pricing_event = 'BATCH' ) THEN
843: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
844: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Query_Price_Adj_Header...',1,'Y');
845: END IF;
846: ASO_PRICING_CORE_PVT.Query_Price_Adj_Header(
847: p_quote_header_id => p_qte_header_rec.quote_header_id) ;
848: END IF;
849: --increment the line index
850: l_price_index:= l_price_index+1;
959: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Service Line collection to pass for Query Relationships procedure... ',1,'Y');
960: END IF;
961:
962: -- l_service_qte_line_id_tbl is used to collect all quote line id(s) of service lines only.
963: -- l_service_qte_line_id_tbl is one of the parameter for ASO_PRICING_CORE_PVT.Query_Relationships procedure.
964: IF l_service_qte_line_id_tbl.exists(1) THEN
965: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
966: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Service Qte Line ID Tbl already exists... ',1,'Y');
967: END IF;
1161:
1162: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1163: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Set_Global_Rec - Line Level...', 1, 'Y');
1164: END IF;
1165: ASO_PRICING_INT.G_LINE_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
1166: p_qte_line_rec => l_qte_line_tbl(i),
1167: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
1168: p_shipment_rec => l_shipment_rec);
1169:
1166: p_qte_line_rec => l_qte_line_tbl(i),
1167: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
1168: p_shipment_rec => l_shipment_rec);
1169:
1170: ASO_PRICING_CORE_PVT.Print_G_Line_Rec;
1171:
1172:
1173: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1174: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of QP Build_Contexts - Line Level...',1,'Y');
1208: END IF;
1209:
1210: -- End fix for bug 5951790.
1211:
1212: ASO_PRICING_CORE_PVT.Copy_Line_To_Request(
1213: p_Request_Type => p_control_rec.request_type,
1214: p_price_line_index => l_price_index,
1215: px_index_counter => i+1);
1216:
1219: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Append_asked_for...',1,'Y');
1220: END IF;
1221:
1222: l_index_counter := lx_index_counter;
1223: ASO_PRICING_CORE_PVT.Append_asked_for(
1224: p_pricing_event => p_control_rec.pricing_event
1225: ,p_price_line_index => l_price_index
1226: ,p_header_id => p_qte_header_rec.quote_header_id
1227: ,p_line_id => l_qte_line_tbl(i).quote_line_id
1255: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: l_qte_line_id_tbl.count : '||NVL(l_qte_line_id_tbl.count,0),1,'Y');
1256: END IF;
1257:
1258: IF p_control_rec.pricing_event = 'BATCH' THEN
1259: ASO_PRICING_CORE_PVT.Query_Price_Adjustments(
1260: p_quote_header_id => p_qte_header_rec.quote_header_id,
1261: p_qte_line_id_tbl => l_qte_line_id_tbl,
1262: x_adj_id_tbl => l_qte_adj_id_tbl);
1263: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1268: -- Adjustment,line,Services Relationships.
1269: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1270: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Query_Relationships...',1,'Y');
1271: END IF;
1272: ASO_PRICING_CORE_PVT.Query_Relationships(
1273: p_qte_adj_id_tbl => l_qte_adj_id_tbl,
1274: p_service_qte_line_id_tbl => l_service_qte_line_id_tbl);
1275:
1276: FOR i IN 1..l_qte_line_tbl.count LOOP
1307:
1308: If l_qte_line_tbl.count >0 then
1309:
1310: --Need to modify the global index table of pls integer types
1311: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
1312: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
1313: p_global_tbl => l_global_pls_tbl,
1314: p_search_tbl => px_line_index_search_tbl);
1315: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
1308: If l_qte_line_tbl.count >0 then
1309:
1310: --Need to modify the global index table of pls integer types
1311: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
1312: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
1313: p_global_tbl => l_global_pls_tbl,
1314: p_search_tbl => px_line_index_search_tbl);
1315: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
1316: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1311: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
1312: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
1313: p_global_tbl => l_global_pls_tbl,
1314: p_search_tbl => px_line_index_search_tbl);
1315: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
1316: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1317: p_global_tbl => l_global_num_tbl,
1318: p_search_tbl => px_line_index_search_tbl);
1319: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
1312: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
1313: p_global_tbl => l_global_pls_tbl,
1314: p_search_tbl => px_line_index_search_tbl);
1315: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
1316: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1317: p_global_tbl => l_global_num_tbl,
1318: p_search_tbl => px_line_index_search_tbl);
1319: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
1320: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1315: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
1316: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1317: p_global_tbl => l_global_num_tbl,
1318: p_search_tbl => px_line_index_search_tbl);
1319: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
1320: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1321: p_global_tbl => l_global_num_tbl,
1322: p_search_tbl => px_line_index_search_tbl);
1323:
1316: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1317: p_global_tbl => l_global_num_tbl,
1318: p_search_tbl => px_line_index_search_tbl);
1319: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
1320: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
1321: p_global_tbl => l_global_num_tbl,
1322: p_search_tbl => px_line_index_search_tbl);
1323:
1324: End If; -- l_qte_line_tbl.count >0
1326: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1327: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Populate_QP_Temp_tables...',1,'Y');
1328: END IF;
1329:
1330: ASO_PRICING_CORE_PVT.populate_qp_temp_tables;
1331:
1332: -- Set the control rec for QP
1333:
1334: l_req_control_rec.pricing_event := p_control_rec.pricing_event;
1378: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Price_To_Quote...',1,'Y');
1379: END IF;
1380:
1381:
1382: ASO_PRICING_CORE_PVT.Copy_Price_To_Quote(
1383: P_Api_Version_Number => 1.0,
1384: P_Init_Msg_List => FND_API.G_FALSE,
1385: P_Commit => p_commit,
1386: p_control_rec => p_control_rec,
1398: END IF;
1399:
1400: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1401:
1402: ASO_PRICING_CORE_PVT.Process_Charges(
1403: P_Api_Version_Number => 1.0,
1404: P_Init_Msg_List => FND_API.G_FALSE,
1405: P_Commit => p_commit,
1406: p_control_rec => p_control_rec,
1516: lx_index_counter Number;
1517: lx_order_status_rec QP_UTIL_PUB.ORDER_LINES_STATUS_REC_TYPE;
1518: l_adj_id_tbl Index_Link_Tbl_Type;
1519: l_price_index Number;
1520: px_line_index_search_tbl ASO_PRICING_CORE_PVT.Index_Link_Tbl_Type;
1521: l_global_pls_tbl QP_PREQ_GRP.pls_integer_type;
1522: l_global_num_tbl QP_PREQ_GRP.NUMBER_TYPE;
1523:
1524: l_changed_qte_line_tbl ASO_QUOTE_PUB.Qte_Line_Tbl_Type;
1576: If p_internal_call_flag = 'N' then
1577: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1578: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Set_Global_Rec - Header Level... ',1,'Y');
1579: END IF;
1580: ASO_PRICING_INT.G_HEADER_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
1581: p_qte_header_rec => p_qte_header_rec,
1582: p_shipment_rec => p_hd_shipment_rec);
1583: end If;--If p_internal_call_flag = 'N' then
1584:
1581: p_qte_header_rec => p_qte_header_rec,
1582: p_shipment_rec => p_hd_shipment_rec);
1583: end If;--If p_internal_call_flag = 'N' then
1584:
1585: ASO_PRICING_CORE_PVT.Print_G_Header_Rec;
1586:
1587: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1588: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Build_Context - Header Level... ',1,'Y');
1589: l_pricing_end_time := dbms_utility.get_time;
1608: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Header_To_Request...',1,'Y');
1609: END IF;
1610:
1611:
1612: ASO_PRICING_CORE_PVT.Copy_Header_To_Request(
1613: p_Request_Type => p_control_rec.request_type,
1614: p_price_line_index => l_price_index,
1615: px_index_counter => 1);
1616:
1618: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Append_asked_for...',1,'Y');
1619: END IF;
1620:
1621: lx_index_counter:= 1;
1622: ASO_PRICING_CORE_PVT.Append_asked_for(
1623: p_pricing_event => p_control_rec.pricing_event,
1624: p_price_line_index => l_price_index,
1625: p_header_id => p_qte_header_rec.quote_header_id,
1626: px_index_counter => lx_index_counter);
1833: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT:l_shipment_rec.REQUEST_DATE:'
1834: ||NVL(to_char(l_shipment_rec.REQUEST_DATE),'NULL'),1,'Y');
1835: END IF;
1836:
1837: ASO_PRICING_INT.G_LINE_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
1838: p_qte_line_rec => l_qte_line_tbl(i),
1839: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
1840: p_shipment_rec => l_shipment_rec);
1841:
1838: p_qte_line_rec => l_qte_line_tbl(i),
1839: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
1840: p_shipment_rec => l_shipment_rec);
1841:
1842: ASO_PRICING_CORE_PVT.Print_G_Line_Rec;
1843:
1844: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1845: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of QP Build_Contexts - Line Level...',1,'Y');
1846: l_pricing_end_time := dbms_utility.get_time;
1902:
1903: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1904: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Line_To_Request...',1,'Y');
1905: END IF;
1906: ASO_PRICING_CORE_PVT.Copy_Line_To_Request(
1907: p_Request_Type => p_control_rec.request_type,
1908: p_price_line_index => l_price_index,
1909: px_index_counter => l_price_index);
1910:
1913: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT:Before Append Ask for lx_index_counter:'
1914: ||lx_index_counter,1,'Y');
1915: END IF;
1916: l_index_counter := lx_index_counter;
1917: ASO_PRICING_CORE_PVT.Append_asked_for(
1918: p_pricing_event => p_control_rec.pricing_event,
1919: p_price_line_index => l_price_index,
1920: p_header_id => p_qte_header_rec.quote_header_id,
1921: p_line_id => l_qte_line_tbl(i).quote_line_id,
1994: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Query_Price_Adjustments...',1,'Y');
1995: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: l_qte_line_id_tbl.count :'
1996: ||NVL(l_qte_line_id_tbl.count,0),1,'Y');
1997: END IF;
1998: ASO_PRICING_CORE_PVT.Query_Price_Adjustments
1999: (p_quote_header_id => p_qte_header_rec.quote_header_id,
2000: p_qte_line_id_tbl => l_qte_line_id_tbl,
2001: x_adj_id_tbl => l_qte_adj_id_tbl);
2002:
2012: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: l_service_qte_line_id_tbl.count :'
2013: ||NVL(l_service_qte_line_id_tbl.count,0),1,'Y');
2014: end if;
2015: END IF;
2016: ASO_PRICING_CORE_PVT.Query_relationships
2017: (p_qte_adj_id_tbl => l_qte_adj_id_tbl,
2018: p_service_qte_line_id_tbl => l_service_qte_line_id_tbl);
2019: else
2020: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2025: --Just send the header level manual adjustments
2026: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2027: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Query_Price_Adj_Header...',1,'Y');
2028: END IF;
2029: ASO_PRICING_CORE_PVT.Query_Price_Adj_Header
2030: (p_quote_header_id => p_qte_header_rec.quote_header_id);
2031:
2032: END IF; -- l_Qte_Line_id_tbl.EXISTS(1) check.
2033:
2184: OR (lx_order_status_rec.summary_line_flag = 'Y') then
2185: --Condition was placed because engine call was not necessary if the event is price and there are no lines
2186:
2187: --Need to modify the global index table of pls integer types
2188: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
2189: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2190: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Modifying G_LDET_LINE_INDEX_TBL',1,'Y');
2191: END IF;
2192: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
2188: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
2189: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2190: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Modifying G_LDET_LINE_INDEX_TBL',1,'Y');
2191: END IF;
2192: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
2193: p_global_tbl => l_global_pls_tbl,
2194: p_search_tbl => px_line_index_search_tbl);
2195: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2196: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2191: END IF;
2192: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
2193: p_global_tbl => l_global_pls_tbl,
2194: p_search_tbl => px_line_index_search_tbl);
2195: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2196: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2197: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Modifying G_RLTD_LINE_INDEX_TBL',1,'Y');
2198: END IF;
2199: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2195: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2196: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2197: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Modifying G_RLTD_LINE_INDEX_TBL',1,'Y');
2198: END IF;
2199: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2200: p_global_tbl => l_global_num_tbl,
2201: p_search_tbl => px_line_index_search_tbl);
2202: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
2203: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2198: END IF;
2199: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2200: p_global_tbl => l_global_num_tbl,
2201: p_search_tbl => px_line_index_search_tbl);
2202: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
2203: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2204: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Modifying G_RLTD_RELATED_LINE_IND_TBL',1,'Y');
2205: END IF;
2206: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2202: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
2203: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2204: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Modifying G_RLTD_RELATED_LINE_IND_TBL',1,'Y');
2205: END IF;
2206: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2207: p_global_tbl => l_global_num_tbl,
2208: p_search_tbl => px_line_index_search_tbl);
2209:
2210: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2212: l_pricing_end_time := dbms_utility.get_time;
2213: l_accum_aso_time := l_accum_aso_time + (l_pricing_end_time - l_pricing_start_time);
2214: END IF;
2215:
2216: ASO_PRICING_CORE_PVT.populate_qp_temp_tables;
2217:
2218: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2219: l_pricing_start_time := dbms_utility.get_time;
2220: l_accum_qp_time := l_accum_qp_time + (l_pricing_start_time - l_pricing_end_time);
2273: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Post_Price_Request...',1,'Y');
2274: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: l_complete_qte_flag:'||l_complete_qte_flag,1,'Y');
2275: END IF;
2276: /*Insert all the applied adjustments and the nonapplied manual adjustments*/
2277: ASO_PRICING_CORE_PVT.Copy_Price_To_Quote(
2278: P_Api_Version_Number => 1.0,
2279: P_Init_Msg_List => FND_API.G_FALSE,
2280: P_Commit => FND_API.G_FALSE,
2281: p_control_rec => l_prc_control_rec,
2290: END IF;
2291:
2292: If p_internal_call_flag = 'N' then
2293: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
2294: ASO_PRICING_CORE_PVT.Process_PRG(
2295: P_Api_Version_Number => 1.0,
2296: P_Init_Msg_List => FND_API.G_FALSE,
2297: P_Commit => FND_API.G_FALSE,
2298: p_control_rec => l_prc_control_rec,
2314: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: After Process_PRG : x_qte_line_tbl.count: '
2315: ||x_qte_line_tbl.count,1,'Y');
2316: END IF;
2317:
2318: ASO_PRICING_CORE_PVT.Process_Charges(
2319: P_Api_Version_Number => 1.0,
2320: P_Init_Msg_List => FND_API.G_FALSE,
2321: P_Commit => FND_API.G_FALSE,
2322: p_control_rec => l_prc_control_rec,
2437:
2438: l_service_qte_line_id_tbl JTF_NUMBER_TABLE;
2439: l_qte_line_id_tbl JTF_NUMBER_TABLE;
2440: l_qte_adj_id_tbl JTF_NUMBER_TABLE;
2441: px_line_index_search_tbl ASO_PRICING_CORE_PVT.Index_Link_Tbl_Type;
2442: l_global_pls_tbl QP_PREQ_GRP.pls_integer_type;
2443: l_global_num_tbl QP_PREQ_GRP.NUMBER_TYPE;
2444:
2445: l_pricing_start_time NUMBER;
2480:
2481: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2482: aso_debug_pub.add('********************* PROCESSING HEADER STARTS *******************************',1,'Y');
2483: END IF;
2484: ASO_PRICING_CORE_PVT.Print_G_Header_Rec;
2485: /*Initialize the global tables*/
2486: ASO_PRICING_CORE_PVT.Initialize_Global_Tables;
2487:
2488: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2482: aso_debug_pub.add('********************* PROCESSING HEADER STARTS *******************************',1,'Y');
2483: END IF;
2484: ASO_PRICING_CORE_PVT.Print_G_Header_Rec;
2485: /*Initialize the global tables*/
2486: ASO_PRICING_CORE_PVT.Initialize_Global_Tables;
2487:
2488: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2489: l_pricing_end_time := dbms_utility.get_time;
2490: l_accum_aso_time := l_pricing_end_time - l_pricing_start_time;
2506: l_accum_qp_time := l_pricing_start_time - l_pricing_end_time;
2507: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: x_pass_line: '||nvl(x_pass_line,'null'),1,'Y');
2508: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Header_To_Request...',1,'Y');
2509: END IF;
2510: ASO_PRICING_CORE_PVT.Copy_Header_To_Request(
2511: p_Request_Type => p_control_rec.request_type,
2512: p_price_line_index => l_price_index,
2513: px_index_counter => 1);
2514:
2630: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT:l_shipment_rec.REQUEST_DATE:'
2631: ||NVL(to_char(l_shipment_rec.REQUEST_DATE),'NULL'),1,'Y');
2632: END IF;
2633:
2634: ASO_PRICING_INT.G_LINE_REC := ASO_PRICING_CORE_PVT.Set_Global_Rec (
2635: p_qte_line_rec => l_qte_line_tbl(i),
2636: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
2637: p_shipment_rec => l_shipment_rec);
2638:
2635: p_qte_line_rec => l_qte_line_tbl(i),
2636: p_qte_line_dtl_rec => l_qte_line_dtl_rec,
2637: p_shipment_rec => l_shipment_rec);
2638:
2639: ASO_PRICING_CORE_PVT.Print_G_Line_Rec;
2640:
2641: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2642: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of QP Build_Contexts - Line Level...',1,'Y');
2643: l_pricing_end_time := dbms_utility.get_time;
2658: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: x_pass_line: '||nvl(x_pass_line,'null'),1,'Y');
2659: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Copy_Line_To_Request...',1,'Y');
2660: END IF;
2661:
2662: ASO_PRICING_CORE_PVT.Copy_Line_To_Request(
2663: p_Request_Type => p_control_rec.request_type,
2664: p_price_line_index => l_price_index,
2665: px_index_counter => i+1);
2666:
2719: l_pricing_start_time := dbms_utility.get_time;
2720: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Query_Price_Adj_All...',1,'Y');
2721: END IF;
2722:
2723: ASO_PRICING_CORE_PVT.Query_Price_Adj_All
2724: (p_quote_header_id => p_qte_header_rec.quote_header_id,
2725: x_adj_id_tbl => l_qte_adj_id_tbl);
2726:
2727:
2728: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2729: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Query_Relationships...',1,'Y');
2730: END IF;
2731:
2732: ASO_PRICING_CORE_PVT.Query_Relationships(
2733: p_qte_adj_id_tbl => l_qte_adj_id_tbl,
2734: p_service_qte_line_id_tbl => l_service_qte_line_id_tbl);
2735:
2736:
2755: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Hdr Adjustment Attributes deleted '||sql%ROWCOUNT,1,'Y');
2756: END IF;
2757:
2758: --Need to modify the global index table of pls integer types
2759: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
2760: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
2761: p_global_tbl => l_global_pls_tbl,
2762: p_search_tbl => px_line_index_search_tbl);
2763: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2756: END IF;
2757:
2758: --Need to modify the global index table of pls integer types
2759: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
2760: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
2761: p_global_tbl => l_global_pls_tbl,
2762: p_search_tbl => px_line_index_search_tbl);
2763: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2764: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2759: l_global_pls_tbl := ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL;
2760: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
2761: p_global_tbl => l_global_pls_tbl,
2762: p_search_tbl => px_line_index_search_tbl);
2763: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2764: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2765: p_global_tbl => l_global_num_tbl,
2766: p_search_tbl => px_line_index_search_tbl);
2767: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
2760: ASO_PRICING_CORE_PVT.G_LDET_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_PlsIndex_Table(
2761: p_global_tbl => l_global_pls_tbl,
2762: p_search_tbl => px_line_index_search_tbl);
2763: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2764: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2765: p_global_tbl => l_global_num_tbl,
2766: p_search_tbl => px_line_index_search_tbl);
2767: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
2768: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2763: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL;
2764: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2765: p_global_tbl => l_global_num_tbl,
2766: p_search_tbl => px_line_index_search_tbl);
2767: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
2768: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2769: p_global_tbl => l_global_num_tbl,
2770: p_search_tbl => px_line_index_search_tbl);
2771:
2764: ASO_PRICING_CORE_PVT.G_RLTD_LINE_INDEX_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2765: p_global_tbl => l_global_num_tbl,
2766: p_search_tbl => px_line_index_search_tbl);
2767: l_global_num_tbl := ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL;
2768: ASO_PRICING_CORE_PVT.G_RLTD_RELATED_LINE_IND_TBL:= ASO_PRICING_CORE_PVT.Modify_Global_NumIndex_Table(
2769: p_global_tbl => l_global_num_tbl,
2770: p_search_tbl => px_line_index_search_tbl);
2771:
2772: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2774: l_pricing_end_time := dbms_utility.get_time;
2775: l_accum_aso_time := l_accum_aso_time + (l_pricing_end_time - l_pricing_start_time);
2776: END IF;
2777:
2778: ASO_PRICING_CORE_PVT.populate_qp_temp_tables;
2779:
2780: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
2781: l_pricing_start_time := dbms_utility.get_time;
2782: l_accum_qp_time := l_accum_qp_time + (l_pricing_start_time - l_pricing_end_time);
2833: ||l_return_status_text,1,'Y');
2834: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Start of Post_Price_Request...',1,'Y');
2835: END IF;
2836:
2837: ASO_PRICING_CORE_PVT.Copy_Price_To_Quote(
2838: P_Api_Version_Number => 1.0,
2839: P_Init_Msg_List => FND_API.G_FALSE,
2840: P_Commit => FND_API.G_FALSE,
2841: p_control_rec => l_prc_control_rec,
2848: aso_debug_pub.add('ASO_PRICING_FLOWS_PVT: Copy_Price_To_Quote : x_return_status: '
2849: ||nvl(x_return_status,'NULL'),1,'Y');
2850: END IF;
2851: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
2852: ASO_PRICING_CORE_PVT.Process_Charges(
2853: P_Api_Version_Number => 1.0,
2854: P_Init_Msg_List => FND_API.G_FALSE,
2855: P_Commit => FND_API.G_FALSE,
2856: p_control_rec => l_prc_control_rec,