25: ,x_cancellation OUT NOCOPY /* file.sql.39 change */ BOOLEAN
26: ,x_current_quantity OUT NOCOPY /* file.sql.39 change */ NUMBER);
27:
28: PROCEDURE Handle_Inserts
29: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
30: ,p_config_hdr_id IN NUMBER
31: ,p_config_rev_nbr IN NUMBER
32: ,p_config_instance_tbl IN csi_datastructures_pub.instance_cz_tbl
33: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
29: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
30: ,p_config_hdr_id IN NUMBER
31: ,p_config_rev_nbr IN NUMBER
32: ,p_config_instance_tbl IN csi_datastructures_pub.instance_cz_tbl
33: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
34: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
35: ,p_direct_save IN BOOLEAN := FALSE
36: ,p_ui_flag IN VARCHAR2 := 'Y');
37:
30: ,p_config_hdr_id IN NUMBER
31: ,p_config_rev_nbr IN NUMBER
32: ,p_config_instance_tbl IN csi_datastructures_pub.instance_cz_tbl
33: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
34: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
35: ,p_direct_save IN BOOLEAN := FALSE
36: ,p_ui_flag IN VARCHAR2 := 'Y');
37:
38: PROCEDURE Handle_Inserts_Old
35: ,p_direct_save IN BOOLEAN := FALSE
36: ,p_ui_flag IN VARCHAR2 := 'Y');
37:
38: PROCEDURE Handle_Inserts_Old
39: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
40: ,p_config_hdr_id IN NUMBER
41: ,p_config_rev_nbr IN NUMBER
42: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
43: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
38: PROCEDURE Handle_Inserts_Old
39: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
40: ,p_config_hdr_id IN NUMBER
41: ,p_config_rev_nbr IN NUMBER
42: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
43: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
44: ,p_direct_save IN BOOLEAN := FALSE);
45:
46: PROCEDURE Handle_Updates
39: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
40: ,p_config_hdr_id IN NUMBER
41: ,p_config_rev_nbr IN NUMBER
42: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
43: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
44: ,p_direct_save IN BOOLEAN := FALSE);
45:
46: PROCEDURE Handle_Updates
47: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
43: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
44: ,p_direct_save IN BOOLEAN := FALSE);
45:
46: PROCEDURE Handle_Updates
47: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
48: ,p_config_hdr_id IN NUMBER
49: ,p_config_rev_nbr IN NUMBER
50: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
51: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
46: PROCEDURE Handle_Updates
47: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
48: ,p_config_hdr_id IN NUMBER
49: ,p_config_rev_nbr IN NUMBER
50: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
51: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
52: ,p_direct_save IN BOOLEAN := FALSE
53: ,p_ui_flag IN VARCHAR2);
54:
47: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
48: ,p_config_hdr_id IN NUMBER
49: ,p_config_rev_nbr IN NUMBER
50: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
51: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
52: ,p_direct_save IN BOOLEAN := FALSE
53: ,p_ui_flag IN VARCHAR2);
54:
55: PROCEDURE Handle_Updates_old
52: ,p_direct_save IN BOOLEAN := FALSE
53: ,p_ui_flag IN VARCHAR2);
54:
55: PROCEDURE Handle_Updates_old
56: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
57: ,p_config_hdr_id IN NUMBER
58: ,p_config_rev_nbr IN NUMBER
59: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
60: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
55: PROCEDURE Handle_Updates_old
56: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
57: ,p_config_hdr_id IN NUMBER
58: ,p_config_rev_nbr IN NUMBER
59: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
60: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
61: ,p_direct_save IN BOOLEAN := FALSE
62: ,p_ui_flag IN VARCHAR2);
63:
56: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
57: ,p_config_hdr_id IN NUMBER
58: ,p_config_rev_nbr IN NUMBER
59: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
60: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
61: ,p_direct_save IN BOOLEAN := FALSE
62: ,p_ui_flag IN VARCHAR2);
63:
64: PROCEDURE Handle_Deletes
61: ,p_direct_save IN BOOLEAN := FALSE
62: ,p_ui_flag IN VARCHAR2);
63:
64: PROCEDURE Handle_Deletes
65: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
66: ,p_config_hdr_id IN NUMBER
67: ,p_config_rev_nbr IN NUMBER
68: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
69: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
64: PROCEDURE Handle_Deletes
65: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
66: ,p_config_hdr_id IN NUMBER
67: ,p_config_rev_nbr IN NUMBER
68: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
69: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
70: ,p_direct_save IN BOOLEAN := FALSE
71: ,p_ui_flag IN VARCHAR2);
72:
65: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
66: ,p_config_hdr_id IN NUMBER
67: ,p_config_rev_nbr IN NUMBER
68: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
69: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
70: ,p_direct_save IN BOOLEAN := FALSE
71: ,p_ui_flag IN VARCHAR2);
72:
73: PROCEDURE Handle_Deletes_Old
70: ,p_direct_save IN BOOLEAN := FALSE
71: ,p_ui_flag IN VARCHAR2);
72:
73: PROCEDURE Handle_Deletes_Old
74: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
75: ,p_config_hdr_id IN NUMBER
76: ,p_config_rev_nbr IN NUMBER
77: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
78: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
73: PROCEDURE Handle_Deletes_Old
74: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
75: ,p_config_hdr_id IN NUMBER
76: ,p_config_rev_nbr IN NUMBER
77: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
78: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
79: ,p_direct_save IN BOOLEAN := FALSE
80: ,p_ui_flag IN VARCHAR2);
81:
74: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
75: ,p_config_hdr_id IN NUMBER
76: ,p_config_rev_nbr IN NUMBER
77: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
78: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
79: ,p_direct_save IN BOOLEAN := FALSE
80: ,p_ui_flag IN VARCHAR2);
81:
82: PROCEDURE Print_Time(p_msg IN VARCHAR2);
141:
142: -- general, column_changes and and cz's delete api stuff
143: l_direct_save BOOLEAN;
144: l_return_status_del VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
145: l_model_line_rec OE_ORDER_PUB.Line_Rec_Type;
146: l_profile_value VARCHAR2(1) :=
147: upper(FND_PROFILE.VALUE('ONT_CONFIG_QUICK_SAVE'));
148:
149: -- process_order in params
147: upper(FND_PROFILE.VALUE('ONT_CONFIG_QUICK_SAVE'));
148:
149: -- process_order in params
150: l_control_rec OE_GLOBALS.Control_Rec_Type;
151: l_header_rec OE_Order_PUB.Header_Rec_Type;
152: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
153: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
154: l_class_line_tbl OE_Order_PUB.Line_Tbl_Type;
155: l_operation VARCHAR2(1) := 'A';
148:
149: -- process_order in params
150: l_control_rec OE_GLOBALS.Control_Rec_Type;
151: l_header_rec OE_Order_PUB.Header_Rec_Type;
152: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
153: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
154: l_class_line_tbl OE_Order_PUB.Line_Tbl_Type;
155: l_operation VARCHAR2(1) := 'A';
156: l_msg_count NUMBER;
149: -- process_order in params
150: l_control_rec OE_GLOBALS.Control_Rec_Type;
151: l_header_rec OE_Order_PUB.Header_Rec_Type;
152: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
153: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
154: l_class_line_tbl OE_Order_PUB.Line_Tbl_Type;
155: l_operation VARCHAR2(1) := 'A';
156: l_msg_count NUMBER;
157: l_msg_data VARCHAR2(2000);
150: l_control_rec OE_GLOBALS.Control_Rec_Type;
151: l_header_rec OE_Order_PUB.Header_Rec_Type;
152: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
153: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
154: l_class_line_tbl OE_Order_PUB.Line_Tbl_Type;
155: l_operation VARCHAR2(1) := 'A';
156: l_msg_count NUMBER;
157: l_msg_data VARCHAR2(2000);
158: l_return_status VARCHAR2(1);
448: top model and child lines
449: -------------------------------------------------------------------*/
450:
451: PROCEDURE Handle_Inserts
452: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
453: ,p_config_hdr_id IN NUMBER
454: ,p_config_rev_nbr IN NUMBER
455: ,p_config_instance_tbl IN csi_datastructures_pub.instance_cz_tbl
456: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
452: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
453: ,p_config_hdr_id IN NUMBER
454: ,p_config_rev_nbr IN NUMBER
455: ,p_config_instance_tbl IN csi_datastructures_pub.instance_cz_tbl
456: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
457: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
458: ,p_direct_save IN BOOLEAN := FALSE
459: ,p_ui_flag IN VARCHAR2 := 'Y')
460: IS
453: ,p_config_hdr_id IN NUMBER
454: ,p_config_rev_nbr IN NUMBER
455: ,p_config_instance_tbl IN csi_datastructures_pub.instance_cz_tbl
456: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
457: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
458: ,p_direct_save IN BOOLEAN := FALSE
459: ,p_ui_flag IN VARCHAR2 := 'Y')
460: IS
461:
478: AND l.open_flag = 'Y')
479: ORDER BY c.component_code;
480:
481:
482: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
483: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
484: l_line_count NUMBER;
485: l_class_line_count NUMBER;
486: l_return_status VARCHAR2(1);
479: ORDER BY c.component_code;
480:
481:
482: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
483: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
484: l_line_count NUMBER;
485: l_class_line_count NUMBER;
486: l_return_status VARCHAR2(1);
487: l_concatenated_segments VARCHAR2(163);
584:
585: l_line_count := nvl(p_x_line_tbl.LAST, 0);
586: l_class_line_count := nvl(p_x_class_line_tbl.LAST, 0);
587:
588: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
589: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;
590: l_line_rec.header_id := p_model_line_rec.header_id;
591: l_line_rec.item_identifier_type := 'INT';
592: l_line_rec.config_header_id := p_config_hdr_id;
820: variable l_default_child_line has been created.
821: -------------------------------------------------------------*/
822:
823: PROCEDURE Handle_Inserts_Old
824: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
825: ,p_config_hdr_id IN NUMBER
826: ,p_config_rev_nbr IN NUMBER
827: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
828: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
823: PROCEDURE Handle_Inserts_Old
824: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
825: ,p_config_hdr_id IN NUMBER
826: ,p_config_rev_nbr IN NUMBER
827: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
828: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
829: ,p_direct_save IN BOOLEAN := FALSE)
830: IS
831:
824: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
825: ,p_config_hdr_id IN NUMBER
826: ,p_config_rev_nbr IN NUMBER
827: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
828: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
829: ,p_direct_save IN BOOLEAN := FALSE)
830: IS
831:
832: CURSOR config_ins_cursor IS
844: AND l.component_code = c.component_code
845: AND l.open_flag = 'Y')
846: ORDER BY c.component_code;
847:
848: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
849: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
850: l_line_count NUMBER;
851: l_class_line_count NUMBER;
852: l_return_status VARCHAR2(1);
845: AND l.open_flag = 'Y')
846: ORDER BY c.component_code;
847:
848: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
849: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
850: l_line_count NUMBER;
851: l_class_line_count NUMBER;
852: l_return_status VARCHAR2(1);
853: l_concatenated_segments VARCHAR2(163);
860:
861: l_line_count := nvl(p_x_line_tbl.LAST, 0);
862: l_class_line_count := nvl(p_x_class_line_tbl.LAST, 0);
863:
864: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
865: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;
866: l_line_rec.header_id := p_model_line_rec.header_id;
867: l_line_rec.item_identifier_type := 'INT';
868:
983: the selected value from cz
984: ------------------------------------------------------------*/
985:
986: PROCEDURE Handle_Updates
987: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
988: ,p_config_hdr_id IN NUMBER
989: ,p_config_rev_nbr IN NUMBER
990: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
991: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
986: PROCEDURE Handle_Updates
987: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
988: ,p_config_hdr_id IN NUMBER
989: ,p_config_rev_nbr IN NUMBER
990: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
991: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
992: ,p_direct_save IN BOOLEAN := FALSE
993: ,p_ui_flag IN VARCHAR2)
994: IS
987: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
988: ,p_config_hdr_id IN NUMBER
989: ,p_config_rev_nbr IN NUMBER
990: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
991: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
992: ,p_direct_save IN BOOLEAN := FALSE
993: ,p_ui_flag IN VARCHAR2)
994: IS
995: CURSOR config_upd_cursor IS
1012: AND l.component_code = c.component_code
1013: AND l.configuration_id = c.config_item_id
1014: AND l.open_flag = 'Y';
1015:
1016: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1017: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1018: l_line_count NUMBER;
1019: l_class_line_count NUMBER;
1020: --
1013: AND l.configuration_id = c.config_item_id
1014: AND l.open_flag = 'Y';
1015:
1016: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1017: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1018: l_line_count NUMBER;
1019: l_class_line_count NUMBER;
1020: --
1021: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1047:
1048: l_line_count := nvl(p_x_line_tbl.LAST, 0);
1049: l_class_line_count := nvl(p_x_class_line_tbl.LAST, 0);
1050:
1051: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
1052: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1053: l_line_rec.top_model_line_id := p_model_line_rec.line_id;
1054:
1055:
1141: we should fail.
1142: ------------------------------------------------------------*/
1143:
1144: PROCEDURE Handle_Updates_Old
1145: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1146: ,p_config_hdr_id IN NUMBER
1147: ,p_config_rev_nbr IN NUMBER
1148: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1149: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1144: PROCEDURE Handle_Updates_Old
1145: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1146: ,p_config_hdr_id IN NUMBER
1147: ,p_config_rev_nbr IN NUMBER
1148: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1149: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1150: ,p_direct_save IN BOOLEAN := FALSE
1151: ,p_ui_flag IN VARCHAR2)
1152: IS
1145: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1146: ,p_config_hdr_id IN NUMBER
1147: ,p_config_rev_nbr IN NUMBER
1148: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1149: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1150: ,p_direct_save IN BOOLEAN := FALSE
1151: ,p_ui_flag IN VARCHAR2)
1152: IS
1153: CURSOR config_upd_cursor IS
1164: AND l.top_model_line_id = p_model_line_rec.line_id
1165: AND l.component_code = c.component_code
1166: AND l.open_flag = 'Y';
1167:
1168: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1169: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1170: l_line_count NUMBER;
1171: l_class_line_count NUMBER;
1172: --
1165: AND l.component_code = c.component_code
1166: AND l.open_flag = 'Y';
1167:
1168: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1169: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1170: l_line_count NUMBER;
1171: l_class_line_count NUMBER;
1172: --
1173: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1177:
1178: l_line_count := nvl(p_x_line_tbl.LAST, 0);
1179: l_class_line_count := nvl(p_x_class_line_tbl.LAST, 0);
1180:
1181: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
1182: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1183: l_line_rec.top_model_line_id := p_model_line_rec.line_id;
1184:
1185:
1246: oe_order_lines.
1247: ----------------------------------------------------------*/
1248:
1249: PROCEDURE Handle_Deletes
1250: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1251: ,p_config_hdr_id IN NUMBER
1252: ,p_config_rev_nbr IN NUMBER
1253: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1254: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1249: PROCEDURE Handle_Deletes
1250: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1251: ,p_config_hdr_id IN NUMBER
1252: ,p_config_rev_nbr IN NUMBER
1253: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1254: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1255: ,p_direct_save IN BOOLEAN := FALSE
1256: ,p_ui_flag IN VARCHAR2)
1257: IS
1250: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1251: ,p_config_hdr_id IN NUMBER
1252: ,p_config_rev_nbr IN NUMBER
1253: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1254: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1255: ,p_direct_save IN BOOLEAN := FALSE
1256: ,p_ui_flag IN VARCHAR2)
1257: IS
1258: CURSOR config_del_cursor IS
1280: AND c.config_hdr_id = p_config_hdr_id
1281: AND c.config_rev_nbr = p_config_rev_nbr
1282: AND c.quantity = 0));
1283:
1284: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1285: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1286: l_line_count NUMBER;
1287: l_class_line_count NUMBER;
1288: l_cancellation BOOLEAN;
1281: AND c.config_rev_nbr = p_config_rev_nbr
1282: AND c.quantity = 0));
1283:
1284: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1285: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1286: l_line_count NUMBER;
1287: l_class_line_count NUMBER;
1288: l_cancellation BOOLEAN;
1289: l_change_reason VARCHAR2(30);
1318: END IF;
1319:
1320: l_line_count := nvl(p_x_line_tbl.LAST, 0);
1321: l_class_line_count := nvl(p_x_class_line_tbl.LAST, 0);
1322: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
1323:
1324: IF l_debug_level > 0 THEN
1325: oe_debug_pub.add( 'CONFIG_DEL CURSOR OPENED' , 1 ) ;
1326: END IF;
1435: oe_order_lines.
1436: ----------------------------------------------------------*/
1437:
1438: PROCEDURE Handle_Deletes_Old
1439: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1440: ,p_config_hdr_id IN NUMBER
1441: ,p_config_rev_nbr IN NUMBER
1442: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1443: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1438: PROCEDURE Handle_Deletes_Old
1439: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1440: ,p_config_hdr_id IN NUMBER
1441: ,p_config_rev_nbr IN NUMBER
1442: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1443: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1444: ,p_direct_save IN BOOLEAN := FALSE
1445: ,p_ui_flag IN VARCHAR2)
1446: IS
1439: ( p_model_line_rec IN OE_Order_Pub.Line_rec_Type
1440: ,p_config_hdr_id IN NUMBER
1441: ,p_config_rev_nbr IN NUMBER
1442: ,p_x_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1443: ,p_x_class_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_tbl_Type
1444: ,p_direct_save IN BOOLEAN := FALSE
1445: ,p_ui_flag IN VARCHAR2)
1446: IS
1447: CURSOR config_del_cursor IS
1467: AND c.config_hdr_id = p_config_hdr_id
1468: AND c.config_rev_nbr = p_config_rev_nbr
1469: AND c.quantity = 0));
1470:
1471: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1472: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1473: l_line_count NUMBER;
1474: l_class_line_count NUMBER;
1475: l_cancellation BOOLEAN;
1468: AND c.config_rev_nbr = p_config_rev_nbr
1469: AND c.quantity = 0));
1470:
1471: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
1472: l_class_line_rec OE_ORDER_PUB.Line_Rec_Type;
1473: l_line_count NUMBER;
1474: l_class_line_count NUMBER;
1475: l_cancellation BOOLEAN;
1476: l_qty NUMBER;
1481: Print_Time('Handle_Deletes_Old start time');
1482:
1483: l_line_count := nvl(p_x_line_tbl.LAST, 0);
1484: l_class_line_count := nvl(p_x_class_line_tbl.LAST, 0);
1485: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
1486:
1487: IF l_debug_level > 0 THEN
1488: oe_debug_pub.add( 'CONFIG_DEL CURSOR OPENED' , 1 ) ;
1489: END IF;
1841: MACD: Modified the control record to pass security
1842: ---------------------------------------------------------------*/
1843:
1844: PROCEDURE Call_Process_Order
1845: ( p_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_Tbl_Type
1846: ,p_class_line_tbl IN OE_Order_Pub.Line_Tbl_Type
1847: := OE_ORDER_PUB.G_MISS_LINE_TBL
1848: ,p_control_rec IN OUT NOCOPY OE_GLOBALS.Control_Rec_Type
1849: ,p_ui_flag IN VARCHAR2 := 'N'
1842: ---------------------------------------------------------------*/
1843:
1844: PROCEDURE Call_Process_Order
1845: ( p_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_Tbl_Type
1846: ,p_class_line_tbl IN OE_Order_Pub.Line_Tbl_Type
1847: := OE_ORDER_PUB.G_MISS_LINE_TBL
1848: ,p_control_rec IN OUT NOCOPY OE_GLOBALS.Control_Rec_Type
1849: ,p_ui_flag IN VARCHAR2 := 'N'
1850: ,p_top_model_line_id IN NUMBER := null
1843:
1844: PROCEDURE Call_Process_Order
1845: ( p_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_Tbl_Type
1846: ,p_class_line_tbl IN OE_Order_Pub.Line_Tbl_Type
1847: := OE_ORDER_PUB.G_MISS_LINE_TBL
1848: ,p_control_rec IN OUT NOCOPY OE_GLOBALS.Control_Rec_Type
1849: ,p_ui_flag IN VARCHAR2 := 'N'
1850: ,p_top_model_line_id IN NUMBER := null
1851: ,p_config_hdr_id IN NUMBER := null
1854: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
1855: IS
1856: -- process_order in variables
1857: I NUMBER;
1858: l_line_rec OE_Order_PUB.Line_Rec_Type;
1859: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
1860: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
1861: l_msg_count NUMBER;
1862: l_msg_data VARCHAR2(2000);
1855: IS
1856: -- process_order in variables
1857: I NUMBER;
1858: l_line_rec OE_Order_PUB.Line_Rec_Type;
1859: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
1860: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
1861: l_msg_count NUMBER;
1862: l_msg_data VARCHAR2(2000);
1863: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1856: -- process_order in variables
1857: I NUMBER;
1858: l_line_rec OE_Order_PUB.Line_Rec_Type;
1859: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
1860: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
1861: l_msg_count NUMBER;
1862: l_msg_data VARCHAR2(2000);
1863: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1864: l_index NUMBER;
2917: l_shipping_method_code varchar2(30);
2918: l_freight_carrier_code varchar2(30);
2919: l_ato_line_id number;
2920: l_option_line_id number;
2921: l_ato_line_rec OE_ORDER_PUB.Line_Rec_Type;
2922: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
2923: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2924: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
2925: l_control_rec OE_GLOBALS.Control_Rec_Type;
2918: l_freight_carrier_code varchar2(30);
2919: l_ato_line_id number;
2920: l_option_line_id number;
2921: l_ato_line_rec OE_ORDER_PUB.Line_Rec_Type;
2922: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
2923: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2924: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
2925: l_control_rec OE_GLOBALS.Control_Rec_Type;
2926: l_line_count NUMBER := 0;
2919: l_ato_line_id number;
2920: l_option_line_id number;
2921: l_ato_line_rec OE_ORDER_PUB.Line_Rec_Type;
2922: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
2923: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2924: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
2925: l_control_rec OE_GLOBALS.Control_Rec_Type;
2926: l_line_count NUMBER := 0;
2927: l_return_status VARCHAR2(1);
2920: l_option_line_id number;
2921: l_ato_line_rec OE_ORDER_PUB.Line_Rec_Type;
2922: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
2923: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
2924: l_old_line_tbl OE_Order_PUB.Line_Tbl_Type;
2925: l_control_rec OE_GLOBALS.Control_Rec_Type;
2926: l_line_count NUMBER := 0;
2927: l_return_status VARCHAR2(1);
2928: l_sql_found NUMBER := 0; -- bug 12758138
3911: x_config_effective_date : null if p_check_effective_date is N
3912: x_frozen_model_bill : null if p_check_effective_date is N
3913: ------------------------------------------------------------*/
3914: Procedure Explode_Bill
3915: ( p_model_line_rec IN OUT NOCOPY OE_Order_Pub.Line_Rec_Type
3916: ,p_do_update IN BOOLEAN := TRUE
3917: ,p_check_effective_date IN VARCHAR2 := 'Y'
3918: ,x_config_effective_date OUT NOCOPY DATE
3919: ,x_frozen_model_bill OUT NOCOPY VARCHAR2
4108: (x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
4109: IS
4110: I NUMBER;
4111: l_index NUMBER;
4112: l_line_rec OE_Order_Pub.Line_Rec_Type
4113: := OE_Order_Pub.G_Miss_Line_Rec;
4114: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
4115: l_control_rec OE_GLOBALS.Control_Rec_Type;
4116: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4109: IS
4110: I NUMBER;
4111: l_index NUMBER;
4112: l_line_rec OE_Order_Pub.Line_Rec_Type
4113: := OE_Order_Pub.G_Miss_Line_Rec;
4114: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
4115: l_control_rec OE_GLOBALS.Control_Rec_Type;
4116: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4117:
4110: I NUMBER;
4111: l_index NUMBER;
4112: l_line_rec OE_Order_Pub.Line_Rec_Type
4113: := OE_Order_Pub.G_Miss_Line_Rec;
4114: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
4115: l_control_rec OE_GLOBALS.Control_Rec_Type;
4116: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4117:
4118:
4219: END IF;
4220:
4221: l_index := l_index + 1;
4222: l_line_tbl(l_index) := l_line_rec;
4223: l_line_rec := OE_Order_Pub.G_MISS_LINE_REC;
4224:
4225:
4226: END LOOP; -- end cursor
4227: I := OE_MODIFY_INC_ITEMS_TBL.NEXT(I);
4258: that is called from OEXULINB
4259: __________________________________________________________________*/
4260:
4261: PROCEDURE Included_Items_DML
4262: ( p_x_line_tbl IN OUT NOCOPY OE_Order_PUB.Line_Tbl_Type
4263: ,p_top_model_line_id IN NUMBER
4264: ,p_ui_flag IN VARCHAR2
4265: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
4266: IS
4264: ,p_ui_flag IN VARCHAR2
4265: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
4266: IS
4267: I NUMBER;
4268: l_line_rec OE_Order_Pub.Line_Rec_Type;
4269: l_found BOOLEAN;
4270: l_ordered_qty NUMBER;
4271: l_component_sequence_id NUMBER;
4272: l_creation_date DATE;
4322:
4323: IF SUBSTR(l_rec.component_code, 1,
4324: INSTR(l_rec.component_code, '-') -1) = l_code
4325: THEN
4326: l_line_rec := OE_Order_Pub.G_Miss_Line_Rec;
4327: l_line_rec.operation := p_x_line_tbl(I).operation;
4328: l_line_rec.line_id := l_rec.line_id;
4329:
4330: l_line_rec.ordered_quantity := p_x_line_tbl(I).ordered_quantity;
4355: FROM oe_order_lines
4356: WHERE top_model_line_id = p_top_model_line_id
4357: AND line_id = l_rec.link_to_line_id;
4358:
4359: l_line_rec := OE_Order_Pub.G_Miss_Line_Rec;
4360: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
4361: l_line_rec.line_id := l_rec.line_id;
4362: l_line_rec.ordered_quantity := l_ordered_qty; -- ratio??***
4363: l_line_rec.change_reason := 'SYSTEM';
4494: ( p_line_id IN NUMBER
4495: ,p_change_reason IN VARCHAR2 := null
4496: ,p_change_comments IN VARCHAR2 := null
4497: ,x_cancellation OUT NOCOPY BOOLEAN
4498: ,x_line_rec IN OUT NOCOPY OE_Order_Pub.line_rec_type)
4499: IS
4500: l_return_status VARCHAR2(1);
4501: I NUMBER;
4502: l_msg_count1 NUMBER;