4: G_min_model NUMBER;
5: G_max_model NUMBER;
6: g_over_shipment boolean := false;
7: g_remnant_only Boolean := FALSE;
8: g_qry_out_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
9: G_BINARY_LIMIT CONSTANT NUMBER := OE_GLOBALS.G_BINARY_LIMIT; -- 8706868
10: Procedure Create_Line_Set_For_Options(p_x_line_tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type ) IS
11: --
12: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6: g_over_shipment boolean := false;
7: g_remnant_only Boolean := FALSE;
8: g_qry_out_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
9: G_BINARY_LIMIT CONSTANT NUMBER := OE_GLOBALS.G_BINARY_LIMIT; -- 8706868
10: Procedure Create_Line_Set_For_Options(p_x_line_tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type ) IS
11: --
12: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
13: --
14: BEGIN
44: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
45: END Create_Line_Set_For_Options;
46:
47:
48: Procedure Update_Drop_Ship_Source(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type) IS
49: --
50: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
51: --
52: BEGIN
67: END;
68: END LOOP;
69: End Update_Drop_Ship_Source;
70:
71: Procedure Get_Nonprop_Service_lines(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type,
72: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_Tbl_Type)
73: IS
74: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
75: l_ser_line_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_rec;
68: END LOOP;
69: End Update_Drop_Ship_Source;
70:
71: Procedure Get_Nonprop_Service_lines(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type,
72: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_Tbl_Type)
73: IS
74: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
75: l_ser_line_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_rec;
76: l_line_id NUMBER;
70:
71: Procedure Get_Nonprop_Service_lines(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type,
72: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_Tbl_Type)
73: IS
74: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
75: l_ser_line_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_rec;
76: l_line_id NUMBER;
77: l_service_count NUMBER := 0;
78: Cursor Sertbl IS
71: Procedure Get_Nonprop_Service_lines(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type,
72: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_Tbl_Type)
73: IS
74: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
75: l_ser_line_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_rec;
76: l_line_id NUMBER;
77: l_service_count NUMBER := 0;
78: Cursor Sertbl IS
79: SELECT ORDERED_QUANTITY
151:
152: /* This is duplicated here since defaulting goes by g_line_rec%view and
153: has technical dificulties to get the currect shipment number */
154:
155: FUNCTION Get_Shipment_Number(p_line_rec oe_order_pub.line_rec_type) RETURN NUMBER IS
156: l_ship_number NUMBER := NULL;
157: l_config_rec OE_ORDER_PUB.line_rec_type;
158: --
159: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
153: has technical dificulties to get the currect shipment number */
154:
155: FUNCTION Get_Shipment_Number(p_line_rec oe_order_pub.line_rec_type) RETURN NUMBER IS
156: l_ship_number NUMBER := NULL;
157: l_config_rec OE_ORDER_PUB.line_rec_type;
158: --
159: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
160: --
161:
263: END IF;
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END Get_Shipment_Number;
266:
267: FUNCTION Check_Complete_Shipment(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
268: p_line_id IN number) RETURN VARCHAR2 IS
269: l_line_id number;
270: CURSOR OPTIONTBL IS
271: SELECT ORDERED_QUANTITY
274: FROM OE_ORDER_LINES_ALL
275: WHERE TOP_MODEL_LINE_ID = l_line_id
276: AND LINE_ID <> l_line_id
277: AND NVL(SHIPPABLE_FLAG,'N')='Y';
278: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
279: l_exist varchar2(1) := 'N';
280: --
281: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
282: --
313: END IF;
314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
315: END Check_Complete_Shipment;
316:
317: Procedure Get_Service_lines(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type,
318: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_Tbl_Type,
319: g_split_line_tbl oe_split_util.split_line_tbl) IS
320: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
321: l_line_id NUMBER;
314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
315: END Check_Complete_Shipment;
316:
317: Procedure Get_Service_lines(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type,
318: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_Tbl_Type,
319: g_split_line_tbl oe_split_util.split_line_tbl) IS
320: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
321: l_line_id NUMBER;
322: l_service_count NUMBER := 1;
316:
317: Procedure Get_Service_lines(p_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type,
318: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_Tbl_Type,
319: g_split_line_tbl oe_split_util.split_line_tbl) IS
320: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
321: l_line_id NUMBER;
322: l_service_count NUMBER := 1;
323: l_ser_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
324: l_query_out_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
319: g_split_line_tbl oe_split_util.split_line_tbl) IS
320: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
321: l_line_id NUMBER;
322: l_service_count NUMBER := 1;
323: l_ser_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
324: l_query_out_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
325:
326: CURSOR Sertbl IS
327: SELECT ORDERED_QUANTITY
320: l_ser_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
321: l_line_id NUMBER;
322: l_service_count NUMBER := 1;
323: l_ser_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
324: l_query_out_rec OE_ORDER_PUB.Line_rec_Type := OE_ORDER_PUB.G_MISS_LINE_REC;
325:
326: CURSOR Sertbl IS
327: SELECT ORDERED_QUANTITY
328: , HEADER_ID
410: END IF;
411: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
412: END Get_Service_lines;
413:
414: Procedure Get_non_Model_Configuration(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
415: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
416: l_line_id NUMBER;
417: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
418: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
411: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
412: END Get_Service_lines;
413:
414: Procedure Get_non_Model_Configuration(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
415: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
416: l_line_id NUMBER;
417: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
418: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
419: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
413:
414: Procedure Get_non_Model_Configuration(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
415: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
416: l_line_id NUMBER;
417: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
418: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
419: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
420: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
421: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
414: Procedure Get_non_Model_Configuration(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
415: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
416: l_line_id NUMBER;
417: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
418: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
419: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
420: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
421: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
422: l_ratio NUMBER;
415: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
416: l_line_id NUMBER;
417: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
418: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
419: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
420: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
421: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
422: l_ratio NUMBER;
423: l_model_ratio NUMBER;
416: l_line_id NUMBER;
417: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
418: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
419: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
420: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
421: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
422: l_ratio NUMBER;
423: l_model_ratio NUMBER;
424: l_line_rec OE_ORDER_PUB.line_rec_type;
417: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
418: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
419: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
420: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
421: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
422: l_ratio NUMBER;
423: l_model_ratio NUMBER;
424: l_line_rec OE_ORDER_PUB.line_rec_type;
425: l_model_rec OE_ORDER_PUB.line_rec_type;
420: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
421: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
422: l_ratio NUMBER;
423: l_model_ratio NUMBER;
424: l_line_rec OE_ORDER_PUB.line_rec_type;
425: l_model_rec OE_ORDER_PUB.line_rec_type;
426: l_option_line OE_ORDER_PUB.line_rec_type;
427: l_parent_line OE_ORDER_PUB.line_rec_type;
428: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
421: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
422: l_ratio NUMBER;
423: l_model_ratio NUMBER;
424: l_line_rec OE_ORDER_PUB.line_rec_type;
425: l_model_rec OE_ORDER_PUB.line_rec_type;
426: l_option_line OE_ORDER_PUB.line_rec_type;
427: l_parent_line OE_ORDER_PUB.line_rec_type;
428: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
429: l_tbl_count NUMBER := 0;
422: l_ratio NUMBER;
423: l_model_ratio NUMBER;
424: l_line_rec OE_ORDER_PUB.line_rec_type;
425: l_model_rec OE_ORDER_PUB.line_rec_type;
426: l_option_line OE_ORDER_PUB.line_rec_type;
427: l_parent_line OE_ORDER_PUB.line_rec_type;
428: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
429: l_tbl_count NUMBER := 0;
430: l_option_count NUMBER := 0;
423: l_model_ratio NUMBER;
424: l_line_rec OE_ORDER_PUB.line_rec_type;
425: l_model_rec OE_ORDER_PUB.line_rec_type;
426: l_option_line OE_ORDER_PUB.line_rec_type;
427: l_parent_line OE_ORDER_PUB.line_rec_type;
428: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
429: l_tbl_count NUMBER := 0;
430: l_option_count NUMBER := 0;
431: l_original_qty NUMBER := 0;
424: l_line_rec OE_ORDER_PUB.line_rec_type;
425: l_model_rec OE_ORDER_PUB.line_rec_type;
426: l_option_line OE_ORDER_PUB.line_rec_type;
427: l_parent_line OE_ORDER_PUB.line_rec_type;
428: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
429: l_tbl_count NUMBER := 0;
430: l_option_count NUMBER := 0;
431: l_original_qty NUMBER := 0;
432: l_min_model NUMBER := 0;
452: AND NVL(CANCELLED_FLAG,'N')<> 'Y'
453: ORDER BY LINE_ID;
454: -- added for bug 12758138
455: l_config_ato_line_id NUMBER := 0;
456: l_config_ato_line_id2 OE_ORDER_PUB.line_tbl_type ;
457: l_config_ato_count NUMBER := 0;
458:
459: CURSOR CONFIGTBL IS
460: SELECT ORDERED_QUANTITY,
980: END IF;
981: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
982: END Get_Non_Model_Configuration;
983:
984: Procedure Get_Model_Configuration(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
985: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
986: l_line_id number;
987:
988: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
981: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
982: END Get_Non_Model_Configuration;
983:
984: Procedure Get_Model_Configuration(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
985: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
986: l_line_id number;
987:
988: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
989: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
984: Procedure Get_Model_Configuration(p_line_tbl IN OE_ORDER_PUB.line_tbl_type,
985: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
986: l_line_id number;
987:
988: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
989: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
990: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
991: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
992: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
985: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.line_tbl_type) IS
986: l_line_id number;
987:
988: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
989: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
990: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
991: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
992: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
993: l_ratio number;
986: l_line_id number;
987:
988: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
989: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
990: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
991: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
992: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
993: l_ratio number;
994: l_model_ratio number;
987:
988: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
989: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
990: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
991: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
992: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
993: l_ratio number;
994: l_model_ratio number;
995: l_line_rec OE_ORDER_PUB.line_rec_type;
988: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_line_tbl;
989: l_reminant_tbl OE_ORDER_PUB.line_tbl_type;
990: l_shippable_tbl OE_ORDER_PUB.line_tbl_type;
991: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
992: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
993: l_ratio number;
994: l_model_ratio number;
995: l_line_rec OE_ORDER_PUB.line_rec_type;
996: l_model_rec OE_ORDER_PUB.line_rec_type;
991: l_shipped_tbl OE_ORDER_PUB.line_tbl_type;
992: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
993: l_ratio number;
994: l_model_ratio number;
995: l_line_rec OE_ORDER_PUB.line_rec_type;
996: l_model_rec OE_ORDER_PUB.line_rec_type;
997: l_option_line OE_ORDER_PUB.line_rec_type;
998: l_parent_line OE_ORDER_PUB.line_rec_type;
999: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
992: l_temp_tbl OE_ORDER_PUB.line_tbl_type;
993: l_ratio number;
994: l_model_ratio number;
995: l_line_rec OE_ORDER_PUB.line_rec_type;
996: l_model_rec OE_ORDER_PUB.line_rec_type;
997: l_option_line OE_ORDER_PUB.line_rec_type;
998: l_parent_line OE_ORDER_PUB.line_rec_type;
999: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
1000: l_tbl_count number := 0;
993: l_ratio number;
994: l_model_ratio number;
995: l_line_rec OE_ORDER_PUB.line_rec_type;
996: l_model_rec OE_ORDER_PUB.line_rec_type;
997: l_option_line OE_ORDER_PUB.line_rec_type;
998: l_parent_line OE_ORDER_PUB.line_rec_type;
999: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
1000: l_tbl_count number := 0;
1001: l_option_count number := 0;
994: l_model_ratio number;
995: l_line_rec OE_ORDER_PUB.line_rec_type;
996: l_model_rec OE_ORDER_PUB.line_rec_type;
997: l_option_line OE_ORDER_PUB.line_rec_type;
998: l_parent_line OE_ORDER_PUB.line_rec_type;
999: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
1000: l_tbl_count number := 0;
1001: l_option_count number := 0;
1002: l_original_qty number := 0;
995: l_line_rec OE_ORDER_PUB.line_rec_type;
996: l_model_rec OE_ORDER_PUB.line_rec_type;
997: l_option_line OE_ORDER_PUB.line_rec_type;
998: l_parent_line OE_ORDER_PUB.line_rec_type;
999: l_option_line_tbl OE_ORDER_PUB.line_tbl_type;
1000: l_tbl_count number := 0;
1001: l_option_count number := 0;
1002: l_original_qty number := 0;
1003: l_min_model number := 0;
1381: END IF;
1382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1383: END Get_Model_Configuration;
1384:
1385: Procedure Cascade_Proportional_Split(p_line_tbl IN OE_ORDER_PUB.Line_tbl_type,
1386: Parent_ordered_quantity NUMBER,
1387: p_Index NUMBER,
1388: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_tbl_type,
1389: x_line_adj_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_adj_tbl_type,
1384:
1385: Procedure Cascade_Proportional_Split(p_line_tbl IN OE_ORDER_PUB.Line_tbl_type,
1386: Parent_ordered_quantity NUMBER,
1387: p_Index NUMBER,
1388: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_tbl_type,
1389: x_line_adj_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_adj_tbl_type,
1390: x_line_scredit_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_scredit_tbl_type)
1391: IS
1392: l_option_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1385: Procedure Cascade_Proportional_Split(p_line_tbl IN OE_ORDER_PUB.Line_tbl_type,
1386: Parent_ordered_quantity NUMBER,
1387: p_Index NUMBER,
1388: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_tbl_type,
1389: x_line_adj_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_adj_tbl_type,
1390: x_line_scredit_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_scredit_tbl_type)
1391: IS
1392: l_option_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1393: l_line_out_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1386: Parent_ordered_quantity NUMBER,
1387: p_Index NUMBER,
1388: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_tbl_type,
1389: x_line_adj_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_adj_tbl_type,
1390: x_line_scredit_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_scredit_tbl_type)
1391: IS
1392: l_option_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1393: l_line_out_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1394: l_line_id NUMBER;
1388: x_line_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_tbl_type,
1389: x_line_adj_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_adj_tbl_type,
1390: x_line_scredit_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_scredit_tbl_type)
1391: IS
1392: l_option_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1393: l_line_out_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1394: l_line_id NUMBER;
1395: l_top_model_line_id NUMBER;
1396: l_set_id NUMBER;
1389: x_line_adj_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_adj_tbl_type,
1390: x_line_scredit_tbl OUT NOCOPY /* file.sql.39 change */ OE_ORDER_PUB.Line_scredit_tbl_type)
1391: IS
1392: l_option_line_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1393: l_line_out_tbl OE_ORDER_PUB.Line_Tbl_Type := OE_ORDER_PUB.G_MISS_LINE_TBL;
1394: l_line_id NUMBER;
1395: l_top_model_line_id NUMBER;
1396: l_set_id NUMBER;
1397: TYPE optrec_type is RECORD (
1400: Line_id NUMBER);
1401: optionrec optrec_type;
1402: l_option_count NUMBER := 1;
1403: l_model_ratio NUMBER;
1404: l_option_line OE_ORDER_PUB.line_rec_type;
1405: l_line_adj_tbl OE_Order_Pub.Line_Adj_tbl_type;
1406: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1407: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1408: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1401: optionrec optrec_type;
1402: l_option_count NUMBER := 1;
1403: l_model_ratio NUMBER;
1404: l_option_line OE_ORDER_PUB.line_rec_type;
1405: l_line_adj_tbl OE_Order_Pub.Line_Adj_tbl_type;
1406: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1407: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1408: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1409: l_adjustment_count NUMBER := 0;
1402: l_option_count NUMBER := 1;
1403: l_model_ratio NUMBER;
1404: l_option_line OE_ORDER_PUB.line_rec_type;
1405: l_line_adj_tbl OE_Order_Pub.Line_Adj_tbl_type;
1406: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1407: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1408: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1409: l_adjustment_count NUMBER := 0;
1410: l_scredit_count NUMBER := 0;
1403: l_model_ratio NUMBER;
1404: l_option_line OE_ORDER_PUB.line_rec_type;
1405: l_line_adj_tbl OE_Order_Pub.Line_Adj_tbl_type;
1406: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1407: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1408: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1409: l_adjustment_count NUMBER := 0;
1410: l_scredit_count NUMBER := 0;
1411: l_split_line_tbl oe_split_util.split_line_tbl;
1404: l_option_line OE_ORDER_PUB.line_rec_type;
1405: l_line_adj_tbl OE_Order_Pub.Line_Adj_tbl_type;
1406: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1407: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1408: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1409: l_adjustment_count NUMBER := 0;
1410: l_scredit_count NUMBER := 0;
1411: l_split_line_tbl oe_split_util.split_line_tbl;
1412: l_split_count NUMBER := 0;
1664:
1665: End Cascade_Proportional_Split;
1666:
1667: Procedure Default_Attributes
1668: (p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
1669: ,p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
1670: )
1671: IS
1672: l_line_rec OE_Order_PUB.Line_Rec_Type := p_x_line_rec;
1665: End Cascade_Proportional_Split;
1666:
1667: Procedure Default_Attributes
1668: (p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
1669: ,p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
1670: )
1671: IS
1672: l_line_rec OE_Order_PUB.Line_Rec_Type := p_x_line_rec;
1673: g_multiple_shipments VARCHAR2(3);
1668: (p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
1669: ,p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
1670: )
1671: IS
1672: l_line_rec OE_Order_PUB.Line_Rec_Type := p_x_line_rec;
1673: g_multiple_shipments VARCHAR2(3);
1674: l_code_level VARCHAR2(30);
1675: l_shipment_number NUMBER;
1676: l_order_date_type_code VARCHAR2(20); -- 8706868
1907: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1908: END Default_Attributes;
1909:
1910: PROCEDURE Split_Line
1911: (p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
1912: ,p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
1913: ) IS
1914: --
1915: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1908: END Default_Attributes;
1909:
1910: PROCEDURE Split_Line
1911: (p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
1912: ,p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
1913: ) IS
1914: --
1915: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1916: --
1923: END IF;
1924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1925: END Split_Line;
1926:
1927: Procedure Check_split_Course(p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_type,
1928: p_x_line_adj_tbl IN OUT NOCOPY OE_Order_Pub.Line_Adj_tbl_type,
1929: p_x_line_scredit_tbl IN OUT NOCOPY OE_Order_Pub.Line_scredit_Tbl_type)
1930: IS
1931: l_parent_ordered_quantity NUMBER;
1924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1925: END Split_Line;
1926:
1927: Procedure Check_split_Course(p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_type,
1928: p_x_line_adj_tbl IN OUT NOCOPY OE_Order_Pub.Line_Adj_tbl_type,
1929: p_x_line_scredit_tbl IN OUT NOCOPY OE_Order_Pub.Line_scredit_Tbl_type)
1930: IS
1931: l_parent_ordered_quantity NUMBER;
1932: l_child_quantity NUMBER := 0;
1925: END Split_Line;
1926:
1927: Procedure Check_split_Course(p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_type,
1928: p_x_line_adj_tbl IN OUT NOCOPY OE_Order_Pub.Line_Adj_tbl_type,
1929: p_x_line_scredit_tbl IN OUT NOCOPY OE_Order_Pub.Line_scredit_Tbl_type)
1930: IS
1931: l_parent_ordered_quantity NUMBER;
1932: l_child_quantity NUMBER := 0;
1933: l_line_adj_tbl OE_ORDER_PUB.Line_Adj_tbl_type;
1929: p_x_line_scredit_tbl IN OUT NOCOPY OE_Order_Pub.Line_scredit_Tbl_type)
1930: IS
1931: l_parent_ordered_quantity NUMBER;
1932: l_child_quantity NUMBER := 0;
1933: l_line_adj_tbl OE_ORDER_PUB.Line_Adj_tbl_type;
1934: l_line_tbl OE_Order_Pub.Line_tbl_type;
1935: l_line_out_tbl OE_Order_Pub.Line_tbl_type;
1936: l_line_rec OE_Order_Pub.Line_rec_type;
1937: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1930: IS
1931: l_parent_ordered_quantity NUMBER;
1932: l_child_quantity NUMBER := 0;
1933: l_line_adj_tbl OE_ORDER_PUB.Line_Adj_tbl_type;
1934: l_line_tbl OE_Order_Pub.Line_tbl_type;
1935: l_line_out_tbl OE_Order_Pub.Line_tbl_type;
1936: l_line_rec OE_Order_Pub.Line_rec_type;
1937: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1938: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1931: l_parent_ordered_quantity NUMBER;
1932: l_child_quantity NUMBER := 0;
1933: l_line_adj_tbl OE_ORDER_PUB.Line_Adj_tbl_type;
1934: l_line_tbl OE_Order_Pub.Line_tbl_type;
1935: l_line_out_tbl OE_Order_Pub.Line_tbl_type;
1936: l_line_rec OE_Order_Pub.Line_rec_type;
1937: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1938: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1939: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1932: l_child_quantity NUMBER := 0;
1933: l_line_adj_tbl OE_ORDER_PUB.Line_Adj_tbl_type;
1934: l_line_tbl OE_Order_Pub.Line_tbl_type;
1935: l_line_out_tbl OE_Order_Pub.Line_tbl_type;
1936: l_line_rec OE_Order_Pub.Line_rec_type;
1937: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1938: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1939: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1940: l_adjustment_count NUMBER := 0;
1933: l_line_adj_tbl OE_ORDER_PUB.Line_Adj_tbl_type;
1934: l_line_tbl OE_Order_Pub.Line_tbl_type;
1935: l_line_out_tbl OE_Order_Pub.Line_tbl_type;
1936: l_line_rec OE_Order_Pub.Line_rec_type;
1937: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1938: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1939: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1940: l_adjustment_count NUMBER := 0;
1941: l_scredit_count NUMBER := 0;
1934: l_line_tbl OE_Order_Pub.Line_tbl_type;
1935: l_line_out_tbl OE_Order_Pub.Line_tbl_type;
1936: l_line_rec OE_Order_Pub.Line_rec_type;
1937: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1938: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1939: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1940: l_adjustment_count NUMBER := 0;
1941: l_scredit_count NUMBER := 0;
1942: l_Split_line_Tbl OE_SPLIT_UTIL.Split_line_Tbl;
1935: l_line_out_tbl OE_Order_Pub.Line_tbl_type;
1936: l_line_rec OE_Order_Pub.Line_rec_type;
1937: l_line_adj_temp_tbl OE_Order_Pub.Line_Adj_tbl_type;
1938: l_line_scredit_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1939: l_line_scredit_temp_tbl OE_Order_Pub.Line_scredit_Tbl_type;
1940: l_adjustment_count NUMBER := 0;
1941: l_scredit_count NUMBER := 0;
1942: l_Split_line_Tbl OE_SPLIT_UTIL.Split_line_Tbl;
1943: l_split_count NUMBER := 0;
1940: l_adjustment_count NUMBER := 0;
1941: l_scredit_count NUMBER := 0;
1942: l_Split_line_Tbl OE_SPLIT_UTIL.Split_line_Tbl;
1943: l_split_count NUMBER := 0;
1944: l_miss_rec OE_Order_Pub.Line_rec_type := oe_order_pub.g_miss_line_rec;
1945: l_sch_tbl OE_Order_Pub.Line_tbl_type;
1946: l_sch_count NUMBER := 0;
1947: last_count NUMBER := 0;
1948: l_return_status VARCHAR2(30);
1941: l_scredit_count NUMBER := 0;
1942: l_Split_line_Tbl OE_SPLIT_UTIL.Split_line_Tbl;
1943: l_split_count NUMBER := 0;
1944: l_miss_rec OE_Order_Pub.Line_rec_type := oe_order_pub.g_miss_line_rec;
1945: l_sch_tbl OE_Order_Pub.Line_tbl_type;
1946: l_sch_count NUMBER := 0;
1947: last_count NUMBER := 0;
1948: l_return_status VARCHAR2(30);
1949: lfirst PLS_INTEGER;
2286: END IF;
2287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2288: END Check_Split_Course;
2289:
2290: Procedure Cascade_non_proportional_Split(p_x_line_tbl IN OUT NOCOPY OE_ORDER_PUB.line_tbl_type,
2291: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2) IS
2292: l_line_id NUMBER;
2293: l_control_rec OE_GLOBALS.Control_Rec_Type;
2294: l_api_name CONSTANT VARCHAR2(30) := 'Cascade Non Proportonal splits';
2292: l_line_id NUMBER;
2293: l_control_rec OE_GLOBALS.Control_Rec_Type;
2294: l_api_name CONSTANT VARCHAR2(30) := 'Cascade Non Proportonal splits';
2295: l_return_status VARCHAR2(30);
2296: l_old_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
2297: l_old_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2298: l_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2299: l_Line_Scredit_temp_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2293: l_control_rec OE_GLOBALS.Control_Rec_Type;
2294: l_api_name CONSTANT VARCHAR2(30) := 'Cascade Non Proportonal splits';
2295: l_return_status VARCHAR2(30);
2296: l_old_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
2297: l_old_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2298: l_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2299: l_Line_Scredit_temp_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2301: l_line_out_tbl OE_ORDER_PUB.line_tbl_type;
2294: l_api_name CONSTANT VARCHAR2(30) := 'Cascade Non Proportonal splits';
2295: l_return_status VARCHAR2(30);
2296: l_old_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
2297: l_old_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2298: l_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2299: l_Line_Scredit_temp_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2301: l_line_out_tbl OE_ORDER_PUB.line_tbl_type;
2302: l_model_ratio NUMBER;
2295: l_return_status VARCHAR2(30);
2296: l_old_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
2297: l_old_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2298: l_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2299: l_Line_Scredit_temp_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2301: l_line_out_tbl OE_ORDER_PUB.line_tbl_type;
2302: l_model_ratio NUMBER;
2303: l_line_rec OE_ORDER_PUB.line_rec_type;
2296: l_old_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
2297: l_old_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2298: l_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2299: l_Line_Scredit_temp_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2301: l_line_out_tbl OE_ORDER_PUB.line_tbl_type;
2302: l_model_ratio NUMBER;
2303: l_line_rec OE_ORDER_PUB.line_rec_type;
2304: l_option_line OE_ORDER_PUB.line_rec_type;
2297: l_old_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2298: l_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2299: l_Line_Scredit_temp_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2301: l_line_out_tbl OE_ORDER_PUB.line_tbl_type;
2302: l_model_ratio NUMBER;
2303: l_line_rec OE_ORDER_PUB.line_rec_type;
2304: l_option_line OE_ORDER_PUB.line_rec_type;
2305: l_tbl_count NUMBER := 0;
2299: l_Line_Scredit_temp_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2301: l_line_out_tbl OE_ORDER_PUB.line_tbl_type;
2302: l_model_ratio NUMBER;
2303: l_line_rec OE_ORDER_PUB.line_rec_type;
2304: l_option_line OE_ORDER_PUB.line_rec_type;
2305: l_tbl_count NUMBER := 0;
2306: l_min_model NUMBER := 0;
2307: l_max_ship_model NUMBER := 0;
2300: l_line_tbl OE_ORDER_PUB.line_tbl_type := p_x_line_tbl;
2301: l_line_out_tbl OE_ORDER_PUB.line_tbl_type;
2302: l_model_ratio NUMBER;
2303: l_line_rec OE_ORDER_PUB.line_rec_type;
2304: l_option_line OE_ORDER_PUB.line_rec_type;
2305: l_tbl_count NUMBER := 0;
2306: l_min_model NUMBER := 0;
2307: l_max_ship_model NUMBER := 0;
2308: l_temp_min_model NUMBER := 0;
2545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2546: END Cascade_Non_Proportional_Split;
2547:
2548: PROCEDURE Record_line_History
2549: ( p_line_rec IN OE_Order_PUB.Line_Rec_Type
2550: )IS
2551: l_return_status varchar2(30);
2552: --
2553: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2578: End Record_line_History;
2579:
2580:
2581: Procedure Add_To_Fulfillment_Set(p_line_rec IN oe_order_pub.line_rec_type) IS
2582: -- 4925992
2583: l_top_model_line_id NUMBER;
2584: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2585:
2620: IS
2621:
2622: -- Cursor Decleration
2623:
2624: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2625: l_x_line_tbl OE_Order_PUB.Line_Tbl_Type;
2626: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2621:
2622: -- Cursor Decleration
2623:
2624: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2625: l_x_line_tbl OE_Order_PUB.Line_Tbl_Type;
2626: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2622: -- Cursor Decleration
2623:
2624: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2625: l_x_line_tbl OE_Order_PUB.Line_Tbl_Type;
2626: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2623:
2624: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2625: l_x_line_tbl OE_Order_PUB.Line_Tbl_Type;
2626: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2624: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2625: l_x_line_tbl OE_Order_PUB.Line_Tbl_Type;
2626: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2625: l_x_line_tbl OE_Order_PUB.Line_Tbl_Type;
2626: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2626: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2627: l_x_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2628: l_x_Header_Scredit_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2629: l_x_Line_Adj_tbl OE_Order_PUB.Line_Adj_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2630: l_x_Line_Scredit_tbl OE_Order_PUB.Line_Scredit_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2638: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2631: l_x_Action_Request_tbl OE_Order_PUB.Request_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2638: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2639: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2632: l_x_Lot_Serial_Tbl OE_Order_PUB.Lot_Serial_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2638: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2639: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2640: l_x_Line_Payment_tbl OE_Order_PUB.Line_Payment_Tbl_Type;
2633: l_x_Header_price_Att_tbl OE_Order_PUB.Header_Price_Att_Tbl_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2638: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2639: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2640: l_x_Line_Payment_tbl OE_Order_PUB.Line_Payment_Tbl_Type;
2641: l_control_rec OE_GLOBALS.Control_Rec_Type;
2634: l_x_Header_Adj_Att_tbl OE_Order_PUB.Header_Adj_Att_Tbl_Type;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2638: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2639: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2640: l_x_Line_Payment_tbl OE_Order_PUB.Line_Payment_Tbl_Type;
2641: l_control_rec OE_GLOBALS.Control_Rec_Type;
2642: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2635: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2638: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2639: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2640: l_x_Line_Payment_tbl OE_Order_PUB.Line_Payment_Tbl_Type;
2641: l_control_rec OE_GLOBALS.Control_Rec_Type;
2642: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2643: l_line_conc_rec OE_Split_Util.Split_Line_Rec_Type;
2636: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2637: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2638: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2639: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2640: l_x_Line_Payment_tbl OE_Order_PUB.Line_Payment_Tbl_Type;
2641: l_control_rec OE_GLOBALS.Control_Rec_Type;
2642: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2643: l_line_conc_rec OE_Split_Util.Split_Line_Rec_Type;
2644: l_line_conc_tbl OE_Split_Util.Split_Line_Tbl_Type;
2884: IF l_x_line_tbl.count > 0 THEN
2885: l_line_tbl.delete;
2886: /* 8706868
2887: FOR i IN l_line_conc_tbl.FIRST .. l_line_conc_tbl.LAST LOOP
2888: l_line_tbl(i):= OE_ORDER_PUB.G_MISS_LINE_REC;
2889: IF l_line_conc_tbl(i).ship_to_org_id IS NOT NULL THEN
2890: IF NVL(l_x_line_tbl(i).ship_to_org_id,-1) <>
2891: NVL(l_line_conc_tbl(i).ship_to_org_id,-1) THEN
2892: l_line_tbl(i).ship_to_org_id := l_line_conc_tbl(i).ship_to_org_id;
2946: l_rec_count := 1;
2947:
2948: FOR i IN l_x_line_tbl.FIRST .. l_x_line_tbl.LAST LOOP
2949: IF l_x_line_tbl(i).item_type_code = 'SERVICE' THEN
2950: l_line_tbl(l_rec_count) := OE_ORDER_PUB.G_MISS_LINE_REC;
2951: FOR j IN l_x_line_tbl.FIRST .. l_x_line_tbl.LAST LOOP
2952: IF l_x_line_tbl(i).service_reference_line_id = l_x_line_tbl(j).line_id THEN
2953: l_line_id := NVL(l_x_line_tbl(j).top_model_line_id,
2954: l_x_line_tbl(j).line_id);