[Home] [Help]
22: G_TRANSACTION_TABLE CONSTANT VARCHAR2(30) := 'OE_ORDER_LINES_ALL';
23: G_CSI_T_SOURCE_LINE_REF CONSTANT VARCHAR2(50) := 'AHL_OSP_ORDER_LINES';
24:
25:
26: x_header_rec OE_ORDER_PUB.Header_Rec_Type;
27: x_header_val_rec OE_ORDER_PUB.Header_Val_Rec_Type;
28: x_Header_Adj_tbl OE_ORDER_PUB.Header_Adj_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
23: G_CSI_T_SOURCE_LINE_REF CONSTANT VARCHAR2(50) := 'AHL_OSP_ORDER_LINES';
24:
25:
26: x_header_rec OE_ORDER_PUB.Header_Rec_Type;
27: x_header_val_rec OE_ORDER_PUB.Header_Val_Rec_Type;
28: x_Header_Adj_tbl OE_ORDER_PUB.Header_Adj_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
24:
25:
26: x_header_rec OE_ORDER_PUB.Header_Rec_Type;
27: x_header_val_rec OE_ORDER_PUB.Header_Val_Rec_Type;
28: x_Header_Adj_tbl OE_ORDER_PUB.Header_Adj_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
25:
26: x_header_rec OE_ORDER_PUB.Header_Rec_Type;
27: x_header_val_rec OE_ORDER_PUB.Header_Val_Rec_Type;
28: x_Header_Adj_tbl OE_ORDER_PUB.Header_Adj_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
26: x_header_rec OE_ORDER_PUB.Header_Rec_Type;
27: x_header_val_rec OE_ORDER_PUB.Header_Val_Rec_Type;
28: x_Header_Adj_tbl OE_ORDER_PUB.Header_Adj_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
27: x_header_val_rec OE_ORDER_PUB.Header_Val_Rec_Type;
28: x_Header_Adj_tbl OE_ORDER_PUB.Header_Adj_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
28: x_Header_Adj_tbl OE_ORDER_PUB.Header_Adj_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
29: x_Header_Adj_val_tbl OE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
30: x_Header_price_Att_tbl OE_ORDER_PUB.Header_Price_Att_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
31: x_Header_Adj_Att_tbl OE_ORDER_PUB.Header_Adj_Att_Tbl_Type ;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
32: x_Header_Adj_Assoc_tbl OE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
33: x_Header_Scredit_tbl OE_ORDER_PUB.Header_Scredit_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
34: x_Header_Scredit_val_tbl OE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
35: x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
36: x_line_val_tbl OE_ORDER_PUB.Line_Val_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
44: x_Lot_Serial_tbl OE_ORDER_PUB.Lot_Serial_Tbl_Type;
37: x_Line_Adj_tbl OE_ORDER_PUB.Line_Adj_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
44: x_Lot_Serial_tbl OE_ORDER_PUB.Lot_Serial_Tbl_Type;
45: x_Lot_Serial_val_tbl OE_ORDER_PUB.Lot_Serial_Val_Tbl_Type;
38: x_Line_Adj_val_tbl OE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
44: x_Lot_Serial_tbl OE_ORDER_PUB.Lot_Serial_Tbl_Type;
45: x_Lot_Serial_val_tbl OE_ORDER_PUB.Lot_Serial_Val_Tbl_Type;
46: x_action_request_tbl OE_ORDER_PUB.Request_Tbl_Type;
39: x_Line_price_Att_tbl OE_ORDER_PUB.Line_Price_Att_Tbl_Type;
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
44: x_Lot_Serial_tbl OE_ORDER_PUB.Lot_Serial_Tbl_Type;
45: x_Lot_Serial_val_tbl OE_ORDER_PUB.Lot_Serial_Val_Tbl_Type;
46: x_action_request_tbl OE_ORDER_PUB.Request_Tbl_Type;
47:
40: x_Line_Adj_Att_tbl OE_ORDER_PUB.Line_Adj_Att_Tbl_Type ;
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
44: x_Lot_Serial_tbl OE_ORDER_PUB.Lot_Serial_Tbl_Type;
45: x_Lot_Serial_val_tbl OE_ORDER_PUB.Lot_Serial_Val_Tbl_Type;
46: x_action_request_tbl OE_ORDER_PUB.Request_Tbl_Type;
47:
48: ------------------------------
41: x_Line_Adj_Assoc_tbl OE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
44: x_Lot_Serial_tbl OE_ORDER_PUB.Lot_Serial_Tbl_Type;
45: x_Lot_Serial_val_tbl OE_ORDER_PUB.Lot_Serial_Val_Tbl_Type;
46: x_action_request_tbl OE_ORDER_PUB.Request_Tbl_Type;
47:
48: ------------------------------
49: -- Declare Local Procedures --
42: x_Line_Scredit_tbl OE_ORDER_PUB.Line_Scredit_Tbl_Type;
43: x_Line_Scredit_val_tbl OE_ORDER_PUB.Line_Scredit_Val_Tbl_Type;
44: x_Lot_Serial_tbl OE_ORDER_PUB.Lot_Serial_Tbl_Type;
45: x_Lot_Serial_val_tbl OE_ORDER_PUB.Lot_Serial_Val_Tbl_Type;
46: x_action_request_tbl OE_ORDER_PUB.Request_Tbl_Type;
47:
48: ------------------------------
49: -- Declare Local Procedures --
50: ------------------------------
51:
52: PROCEDURE Convert_Header_Rec(
53: p_header_rec IN AHL_OSP_SHIPMENT_PUB.SHIP_HEADER_REC_TYPE,
54: p_module_type IN VARCHAR2 ,
55: x_header_rec OUT NOCOPY OE_ORDER_PUB.HEADER_REC_TYPE,
56: x_header_val_rec OUT NOCOPY OE_ORDER_PUB.HEADER_VAL_REC_TYPE);
57:
58: PROCEDURE Convert_Line_Tbl(
59: p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
52: PROCEDURE Convert_Header_Rec(
53: p_header_rec IN AHL_OSP_SHIPMENT_PUB.SHIP_HEADER_REC_TYPE,
54: p_module_type IN VARCHAR2 ,
55: x_header_rec OUT NOCOPY OE_ORDER_PUB.HEADER_REC_TYPE,
56: x_header_val_rec OUT NOCOPY OE_ORDER_PUB.HEADER_VAL_REC_TYPE);
57:
58: PROCEDURE Convert_Line_Tbl(
59: p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
60: p_module_type IN VARCHAR2 ,
57:
58: PROCEDURE Convert_Line_Tbl(
59: p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
60: p_module_type IN VARCHAR2 ,
61: x_line_tbl OUT NOCOPY OE_ORDER_PUB.LINE_TBL_TYPE,
62: x_line_val_tbl OUT NOCOPY OE_ORDER_PUB.LINE_VAL_TBL_TYPE,
63: x_lot_serial_tbl OUT NOCOPY OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE,
64: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE);
65:
58: PROCEDURE Convert_Line_Tbl(
59: p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
60: p_module_type IN VARCHAR2 ,
61: x_line_tbl OUT NOCOPY OE_ORDER_PUB.LINE_TBL_TYPE,
62: x_line_val_tbl OUT NOCOPY OE_ORDER_PUB.LINE_VAL_TBL_TYPE,
63: x_lot_serial_tbl OUT NOCOPY OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE,
64: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE);
65:
66: PROCEDURE Process_Line_Tbl(
59: p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
60: p_module_type IN VARCHAR2 ,
61: x_line_tbl OUT NOCOPY OE_ORDER_PUB.LINE_TBL_TYPE,
62: x_line_val_tbl OUT NOCOPY OE_ORDER_PUB.LINE_VAL_TBL_TYPE,
63: x_lot_serial_tbl OUT NOCOPY OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE,
64: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE);
65:
66: PROCEDURE Process_Line_Tbl(
67: p_osp_order_id IN NUMBER,
362: l_api_version CONSTANT NUMBER := 1.0;
363: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Process_Order';
364:
365:
366: l_header_rec OE_ORDER_PUB.header_rec_type;
367: l_line_tbl OE_ORDER_PUB.line_tbl_type;
368: l_header_val_rec OE_ORDER_PUB.header_val_rec_type;
369: l_line_val_tbl OE_ORDER_PUB.line_val_tbl_type;
370: l_lot_serial_tbl OE_ORDER_PUB.lot_serial_tbl_type;
363: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Process_Order';
364:
365:
366: l_header_rec OE_ORDER_PUB.header_rec_type;
367: l_line_tbl OE_ORDER_PUB.line_tbl_type;
368: l_header_val_rec OE_ORDER_PUB.header_val_rec_type;
369: l_line_val_tbl OE_ORDER_PUB.line_val_tbl_type;
370: l_lot_serial_tbl OE_ORDER_PUB.lot_serial_tbl_type;
371: l_del_oe_lines_tbl SHIP_ID_TBL_TYPE;
364:
365:
366: l_header_rec OE_ORDER_PUB.header_rec_type;
367: l_line_tbl OE_ORDER_PUB.line_tbl_type;
368: l_header_val_rec OE_ORDER_PUB.header_val_rec_type;
369: l_line_val_tbl OE_ORDER_PUB.line_val_tbl_type;
370: l_lot_serial_tbl OE_ORDER_PUB.lot_serial_tbl_type;
371: l_del_oe_lines_tbl SHIP_ID_TBL_TYPE;
372: l_osp_order_id NUMBER;
365:
366: l_header_rec OE_ORDER_PUB.header_rec_type;
367: l_line_tbl OE_ORDER_PUB.line_tbl_type;
368: l_header_val_rec OE_ORDER_PUB.header_val_rec_type;
369: l_line_val_tbl OE_ORDER_PUB.line_val_tbl_type;
370: l_lot_serial_tbl OE_ORDER_PUB.lot_serial_tbl_type;
371: l_del_oe_lines_tbl SHIP_ID_TBL_TYPE;
372: l_osp_order_id NUMBER;
373: l_line_type VARCHAR2(80);
366: l_header_rec OE_ORDER_PUB.header_rec_type;
367: l_line_tbl OE_ORDER_PUB.line_tbl_type;
368: l_header_val_rec OE_ORDER_PUB.header_val_rec_type;
369: l_line_val_tbl OE_ORDER_PUB.line_val_tbl_type;
370: l_lot_serial_tbl OE_ORDER_PUB.lot_serial_tbl_type;
371: l_del_oe_lines_tbl SHIP_ID_TBL_TYPE;
372: l_osp_order_id NUMBER;
373: l_line_type VARCHAR2(80);
374: l_msg_data VARCHAR2(2000);
555: OE_MSG_PUB.Get(p_msg_index => i,
556: p_encoded => FND_API.G_FALSE,
557: p_data => l_msg_data,
558: p_msg_index_out => l_msg_index_out);
559: fnd_msg_pub.add_exc_msg(p_pkg_name => 'OE_ORDER_PUB',
560: p_procedure_name => 'processOrder',
561: p_error_text => substr(l_msg_data,1,240));
562: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
563: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'OE:Err Msg '||i||'.' || l_msg_data);
964: x_msg_count OUT NOCOPY NUMBER,
965: x_msg_data OUT NOCOPY VARCHAR2 ) IS
966: --
967: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Book_Order';
968: l_action_request_tbl OE_ORDER_PUB.request_tbl_type;
969: l_action_request_rec OE_ORDER_PUB.request_rec_type;
970: l_msg_data VARCHAR2(2000);
971: l_msg_index_out NUMBER;
972: l_msg_count NUMBER;
965: x_msg_data OUT NOCOPY VARCHAR2 ) IS
966: --
967: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Book_Order';
968: l_action_request_tbl OE_ORDER_PUB.request_tbl_type;
969: l_action_request_rec OE_ORDER_PUB.request_rec_type;
970: l_msg_data VARCHAR2(2000);
971: l_msg_index_out NUMBER;
972: l_msg_count NUMBER;
973: --
988:
989: --LOOP throught all header ids
990: IF (p_oe_header_tbl.COUNT > 0) THEN
991: FOR i IN p_oe_header_tbl.FIRST..p_oe_header_tbl.LAST LOOP
992: l_action_request_rec := OE_ORDER_PUB.G_MISS_REQUEST_REC;
993: l_action_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER;
994: l_action_request_rec.entity_id := p_oe_header_tbl(i);
995: l_action_request_rec.request_type := OE_GLOBALS.G_BOOK_ORDER;
996: l_action_request_tbl(i) := l_action_request_rec;
1048: OE_MSG_PUB.Get( p_msg_index => i,
1049: p_encoded => FND_API.G_FALSE,
1050: p_data => l_msg_data,
1051: p_msg_index_out => l_msg_index_out);
1052: fnd_msg_pub.add_exc_msg(p_pkg_name => 'OE_ORDER_PUB',
1053: p_procedure_name => 'bookOrder',
1054: p_error_text => substr(l_msg_data,1,240));
1055: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1056: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'OE:Err Msg '||i||'.' || l_msg_data);
1190: AND booked_flag = 'N';
1191:
1192: --
1193: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Delete_Cancel_Order';
1194: l_header_rec OE_ORDER_PUB.header_rec_type;
1195: l_line_rec OE_ORDER_PUB.line_rec_type;
1196: l_line_tbl OE_ORDER_PUB.line_tbl_type;
1197: l_osp_order_id NUMBER;
1198: l_dummy NUMBER;
1191:
1192: --
1193: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Delete_Cancel_Order';
1194: l_header_rec OE_ORDER_PUB.header_rec_type;
1195: l_line_rec OE_ORDER_PUB.line_rec_type;
1196: l_line_tbl OE_ORDER_PUB.line_tbl_type;
1197: l_osp_order_id NUMBER;
1198: l_dummy NUMBER;
1199: l_type VARCHAR2(1);
1192: --
1193: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Delete_Cancel_Order';
1194: l_header_rec OE_ORDER_PUB.header_rec_type;
1195: l_line_rec OE_ORDER_PUB.line_rec_type;
1196: l_line_tbl OE_ORDER_PUB.line_tbl_type;
1197: l_osp_order_id NUMBER;
1198: l_dummy NUMBER;
1199: l_type VARCHAR2(1);
1200: l_order_type_id NUMBER;
1217: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1219: END IF;
1220:
1221: l_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
1222: l_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
1223:
1224: -- Try delete/cancel header first.
1225: IF (p_oe_header_id IS NOT NULL AND
1218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1219: END IF;
1220:
1221: l_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
1222: l_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
1223:
1224: -- Try delete/cancel header first.
1225: IF (p_oe_header_id IS NOT NULL AND
1226: p_oe_header_id <> FND_API.G_MISS_NUM) THEN
1258:
1259: -- Process lines into cancel or delete
1260: FOR i IN p_oe_lines_tbl.FIRST..p_oe_lines_tbl.LAST LOOP
1261:
1262: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
1263:
1264: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1265: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call Delete_OE_Lines with p_oe_line_id = ' || p_oe_lines_tbl(i));
1266: END IF;
1343: OE_MSG_PUB.Get( p_msg_index => i,
1344: p_encoded => FND_API.G_FALSE,
1345: p_data => l_msg_data,
1346: p_msg_index_out => l_msg_index_out);
1347: fnd_msg_pub.add_exc_msg(p_pkg_name => 'OE_ORDER_PUB',
1348: p_procedure_name => 'deleteCancelOrder',
1349: p_error_text => substr(l_msg_data,1,240));
1350: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1351: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'OE:Err Msg '||i||'.' || l_msg_data);
1582:
1583: PROCEDURE Convert_Header_rec(
1584: p_header_rec IN AHL_OSP_SHIPMENT_PUB.SHIP_HEADER_REC_TYPE,
1585: p_module_type IN VARCHAR2 ,
1586: x_header_rec OUT NOCOPY OE_ORDER_PUB.HEADER_REC_TYPE,
1587: x_header_val_rec OUT NOCOPY OE_ORDER_PUB.HEADER_VAL_REC_TYPE)
1588: IS
1589: ---
1590: --Commented by mpothuku to fix the Perf Bug #4919255
1583: PROCEDURE Convert_Header_rec(
1584: p_header_rec IN AHL_OSP_SHIPMENT_PUB.SHIP_HEADER_REC_TYPE,
1585: p_module_type IN VARCHAR2 ,
1586: x_header_rec OUT NOCOPY OE_ORDER_PUB.HEADER_REC_TYPE,
1587: x_header_val_rec OUT NOCOPY OE_ORDER_PUB.HEADER_VAL_REC_TYPE)
1588: IS
1589: ---
1590: --Commented by mpothuku to fix the Perf Bug #4919255
1591: /*
1676: END IF;
1677:
1678: IF (p_header_rec.operation = 'D') THEN
1679: x_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_header_rec.header_id);
1680: x_header_val_rec := OE_ORDER_PUB.G_MISS_HEADER_VAL_REC;
1681: x_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1682:
1683: ELSE
1684:
1684:
1685: -- Changed by jaramana on Sep 9, 2005 for MOAC Uptake
1686: l_org_id := MO_GLOBAL.get_current_org_id();
1687:
1688: --Convert our rec type into OE_ORDER_PUB entities
1689:
1690: x_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
1691: x_header_val_rec := OE_ORDER_PUB.G_MISS_HEADER_VAL_REC;
1692:
1686: l_org_id := MO_GLOBAL.get_current_org_id();
1687:
1688: --Convert our rec type into OE_ORDER_PUB entities
1689:
1690: x_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
1691: x_header_val_rec := OE_ORDER_PUB.G_MISS_HEADER_VAL_REC;
1692:
1693: --Added by mpothuku on 08-may-06 for fixing the Bug 5212130
1694: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1687:
1688: --Convert our rec type into OE_ORDER_PUB entities
1689:
1690: x_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
1691: x_header_val_rec := OE_ORDER_PUB.G_MISS_HEADER_VAL_REC;
1692:
1693: --Added by mpothuku on 08-may-06 for fixing the Bug 5212130
1694: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1695: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_header_rec.operation = ' || p_header_rec.operation);
3875:
3876:
3877: PROCEDURE Convert_Line_Tbl(p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
3878: p_module_type IN VARCHAR2 ,
3879: x_line_tbl OUT NOCOPY OE_ORDER_PUB.LINE_TBL_TYPE,
3880: x_line_val_tbl OUT NOCOPY OE_ORDER_PUB.LINE_VAL_TBL_TYPE,
3881: x_lot_serial_tbl OUT NOCOPY OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE,
3882: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE) IS
3883: --
3876:
3877: PROCEDURE Convert_Line_Tbl(p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
3878: p_module_type IN VARCHAR2 ,
3879: x_line_tbl OUT NOCOPY OE_ORDER_PUB.LINE_TBL_TYPE,
3880: x_line_val_tbl OUT NOCOPY OE_ORDER_PUB.LINE_VAL_TBL_TYPE,
3881: x_lot_serial_tbl OUT NOCOPY OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE,
3882: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE) IS
3883: --
3884: l_count NUMBER;
3877: PROCEDURE Convert_Line_Tbl(p_line_tbl IN AHL_OSP_SHIPMENT_PUB.SHIP_LINE_TBL_TYPE,
3878: p_module_type IN VARCHAR2 ,
3879: x_line_tbl OUT NOCOPY OE_ORDER_PUB.LINE_TBL_TYPE,
3880: x_line_val_tbl OUT NOCOPY OE_ORDER_PUB.LINE_VAL_TBL_TYPE,
3881: x_lot_serial_tbl OUT NOCOPY OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE,
3882: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE) IS
3883: --
3884: l_count NUMBER;
3885: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;
3881: x_lot_serial_tbl OUT NOCOPY OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE,
3882: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE) IS
3883: --
3884: l_count NUMBER;
3885: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;
3886: l_line_val_rec OE_ORDER_PUB.LINE_VAL_REC_TYPE;
3887: l_lot_serial_rec OE_ORDER_PUB.LOT_SERIAL_REC_TYPE;
3888: l_lot_serial_id NUMBER;
3889: l_del_count NUMBER := 0;
3882: x_del_oe_lines_tbl OUT NOCOPY SHIP_ID_TBL_TYPE) IS
3883: --
3884: l_count NUMBER;
3885: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;
3886: l_line_val_rec OE_ORDER_PUB.LINE_VAL_REC_TYPE;
3887: l_lot_serial_rec OE_ORDER_PUB.LOT_SERIAL_REC_TYPE;
3888: l_lot_serial_id NUMBER;
3889: l_del_count NUMBER := 0;
3890: l_line_table_index NUMBER := 0;
3883: --
3884: l_count NUMBER;
3885: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;
3886: l_line_val_rec OE_ORDER_PUB.LINE_VAL_REC_TYPE;
3887: l_lot_serial_rec OE_ORDER_PUB.LOT_SERIAL_REC_TYPE;
3888: l_lot_serial_id NUMBER;
3889: l_del_count NUMBER := 0;
3890: l_line_table_index NUMBER := 0;
3891: --
3916: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Convert_Line_Tbl';
3917: --
3918: BEGIN
3919: l_count := 1;
3920: --Convert our rec type into OE_ORDER_PUB entities
3921:
3922: x_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
3923: x_line_val_tbl := OE_ORDER_PUB.G_MISS_LINE_VAL_TBL;
3924: x_lot_serial_tbl := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL;
3918: BEGIN
3919: l_count := 1;
3920: --Convert our rec type into OE_ORDER_PUB entities
3921:
3922: x_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
3923: x_line_val_tbl := OE_ORDER_PUB.G_MISS_LINE_VAL_TBL;
3924: x_lot_serial_tbl := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL;
3925:
3926: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3919: l_count := 1;
3920: --Convert our rec type into OE_ORDER_PUB entities
3921:
3922: x_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
3923: x_line_val_tbl := OE_ORDER_PUB.G_MISS_LINE_VAL_TBL;
3924: x_lot_serial_tbl := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL;
3925:
3926: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3927: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
3920: --Convert our rec type into OE_ORDER_PUB entities
3921:
3922: x_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
3923: x_line_val_tbl := OE_ORDER_PUB.G_MISS_LINE_VAL_TBL;
3924: x_lot_serial_tbl := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL;
3925:
3926: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3927: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
3928: END IF;
3938: -- from the UI (after the order has been booked) is necessary.
3939: -- If the shipment is booked, Delete_Cancel_Order just zeroes out the ordered quantity.
3940: -- If not, it actually deletes the shipment line.
3941: l_line_rec := OE_LINE_UTIL.QUERY_ROW(p_line_id => p_line_tbl(i).line_id);
3942: l_line_val_rec := OE_ORDER_PUB.G_MISS_LINE_VAL_REC;
3943: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
3944: */
3945: l_del_count := l_del_count + 1;
3946: x_del_oe_lines_tbl(l_del_count) := p_line_tbl(i).line_id;
3944: */
3945: l_del_count := l_del_count + 1;
3946: x_del_oe_lines_tbl(l_del_count) := p_line_tbl(i).line_id;
3947: ELSE
3948: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
3949: l_line_val_rec := OE_ORDER_PUB.G_MISS_LINE_VAL_REC;
3950:
3951: IF (p_line_tbl(i).line_id IS NOT NULL) THEN
3952: l_line_rec.line_id := p_line_tbl(i).line_id;
3945: l_del_count := l_del_count + 1;
3946: x_del_oe_lines_tbl(l_del_count) := p_line_tbl(i).line_id;
3947: ELSE
3948: l_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
3949: l_line_val_rec := OE_ORDER_PUB.G_MISS_LINE_VAL_REC;
3950:
3951: IF (p_line_tbl(i).line_id IS NOT NULL) THEN
3952: l_line_rec.line_id := p_line_tbl(i).line_id;
3953: END IF;
4084: IF (p_line_tbl(i).line_type_id = FND_PROFILE.VALUE('AHL_OSP_OE_RETURN_ID') AND
4085: p_line_tbl(i).serial_number IS NOT NULL AND
4086: p_line_tbl(i).serial_number <> FND_API.G_MISS_CHAR) THEN
4087: IF (p_line_tbl(i).operation = 'C') THEN
4088: l_lot_serial_rec := OE_ORDER_PUB.G_MISS_LOT_SERIAL_REC;
4089: l_lot_serial_rec.from_serial_number := p_line_tbl(i).serial_number;
4090: l_lot_serial_rec.lot_number := p_line_tbl(i).lot_number;
4091: l_lot_serial_rec.quantity := p_line_tbl(i).ordered_quantity;
4092: l_lot_serial_rec.line_index := i;
6144: l_vendor_cust_dtls ahl_order_vendor_detls_csr%ROWTYPE;
6145: l_oe_header_id NUMBER;
6146: l_oe_line_id NUMBER;
6147:
6148: l_header_rec OE_ORDER_PUB.header_rec_type;
6149: l_line_tbl OE_ORDER_PUB.line_tbl_type;
6150: l_msg_data VARCHAR2(2000);
6151: l_msg_index_out NUMBER;
6152: l_index NUMBER;
6145: l_oe_header_id NUMBER;
6146: l_oe_line_id NUMBER;
6147:
6148: l_header_rec OE_ORDER_PUB.header_rec_type;
6149: l_line_tbl OE_ORDER_PUB.line_tbl_type;
6150: l_msg_data VARCHAR2(2000);
6151: l_msg_index_out NUMBER;
6152: l_index NUMBER;
6153: l_oe_line_rec OE_ORDER_PUB.line_rec_type;
6149: l_line_tbl OE_ORDER_PUB.line_tbl_type;
6150: l_msg_data VARCHAR2(2000);
6151: l_msg_index_out NUMBER;
6152: l_index NUMBER;
6153: l_oe_line_rec OE_ORDER_PUB.line_rec_type;
6154: l_count NUMBER := 0;
6155:
6156: BEGIN
6157:
6225: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6226: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to OE_ORDER_GRP.PROCESS_ORDER');
6227: END IF;
6228:
6229: l_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
6230: l_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
6231:
6232: l_header_rec.header_id := l_oe_header_id;
6233: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
6226: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to OE_ORDER_GRP.PROCESS_ORDER');
6227: END IF;
6228:
6229: l_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
6230: l_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
6231:
6232: l_header_rec.header_id := l_oe_header_id;
6233: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
6234: l_header_rec.sold_to_org_id := l_vendor_cust_dtls.customer_id;
6239: OPEN get_oe_order_lines(l_oe_header_id);
6240: LOOP
6241: FETCH get_oe_order_lines INTO l_oe_line_id;
6242: EXIT WHEN get_oe_order_lines%NOTFOUND;
6243: l_oe_line_rec := OE_ORDER_PUB.G_MISS_LINE_REC;
6244: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6245: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'l_oe_line_id = ' || l_oe_line_id);
6246: END IF;
6247: l_oe_line_rec.line_id := l_oe_line_id;
6299: OE_MSG_PUB.Get(p_msg_index => i,
6300: p_encoded => FND_API.G_FALSE,
6301: p_data => l_msg_data,
6302: p_msg_index_out => l_msg_index_out);
6303: fnd_msg_pub.add_exc_msg(p_pkg_name => 'OE_ORDER_PUB',
6304: p_procedure_name => 'processOrder',
6305: p_error_text => substr(l_msg_data,1,240));
6306: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6307: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'OE:Err Msg '||i||'.' || l_msg_data);
6728: l_ship_line_instance_id NUMBER;
6729: l_del_oe_lines_tbl SHIP_ID_TBL_TYPE;
6730: l_lot_serial_id NUMBER;
6731:
6732: l_oe_line_rec OE_ORDER_PUB.line_rec_type;
6733: l_oe_lot_serial_rec OE_ORDER_PUB.lot_serial_rec_type;
6734: l_oe_line_tbl OE_ORDER_PUB.LINE_TBL_TYPE;
6735: l_oe_lot_serial_tbl OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE;
6736: l_part_num_changed VARCHAR2(1) := 'N';
6729: l_del_oe_lines_tbl SHIP_ID_TBL_TYPE;
6730: l_lot_serial_id NUMBER;
6731:
6732: l_oe_line_rec OE_ORDER_PUB.line_rec_type;
6733: l_oe_lot_serial_rec OE_ORDER_PUB.lot_serial_rec_type;
6734: l_oe_line_tbl OE_ORDER_PUB.LINE_TBL_TYPE;
6735: l_oe_lot_serial_tbl OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE;
6736: l_part_num_changed VARCHAR2(1) := 'N';
6737: l_serial_num_changed VARCHAR2(1) := 'N';
6730: l_lot_serial_id NUMBER;
6731:
6732: l_oe_line_rec OE_ORDER_PUB.line_rec_type;
6733: l_oe_lot_serial_rec OE_ORDER_PUB.lot_serial_rec_type;
6734: l_oe_line_tbl OE_ORDER_PUB.LINE_TBL_TYPE;
6735: l_oe_lot_serial_tbl OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE;
6736: l_part_num_changed VARCHAR2(1) := 'N';
6737: l_serial_num_changed VARCHAR2(1) := 'N';
6738: l_order_line_id NUMBER;
6731:
6732: l_oe_line_rec OE_ORDER_PUB.line_rec_type;
6733: l_oe_lot_serial_rec OE_ORDER_PUB.lot_serial_rec_type;
6734: l_oe_line_tbl OE_ORDER_PUB.LINE_TBL_TYPE;
6735: l_oe_lot_serial_tbl OE_ORDER_PUB.LOT_SERIAL_TBL_TYPE;
6736: l_part_num_changed VARCHAR2(1) := 'N';
6737: l_serial_num_changed VARCHAR2(1) := 'N';
6738: l_order_line_id NUMBER;
6739: l_serialnum_change_rec Sernum_Change_Rec_Type := p_serialnum_change_rec;
6777:
6778: -- Initialize API return status to success
6779: x_return_status := FND_API.G_RET_STS_SUCCESS;
6780:
6781: l_oe_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
6782: l_oe_lot_serial_tbl := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL;
6783:
6784:
6785: -- Standard call to check for call compatibility
6778: -- Initialize API return status to success
6779: x_return_status := FND_API.G_RET_STS_SUCCESS;
6780:
6781: l_oe_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
6782: l_oe_lot_serial_tbl := OE_ORDER_PUB.G_MISS_LOT_SERIAL_TBL;
6783:
6784:
6785: -- Standard call to check for call compatibility
6786: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
7329: OE_MSG_PUB.Get(p_msg_index => i,
7330: p_encoded => FND_API.G_FALSE,
7331: p_data => l_msg_data,
7332: p_msg_index_out => l_msg_index_out);
7333: fnd_msg_pub.add_exc_msg(p_pkg_name => 'OE_ORDER_PUB',
7334: p_procedure_name => 'processOrder',
7335: p_error_text => substr(l_msg_data,1,240));
7336: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7337: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'OE:Err Msg '||i||'.' || l_msg_data);