订单OM.docx
《订单OM.docx》由会员分享,可在线阅读,更多相关《订单OM.docx(36页珍藏版)》请在冰豆网上搜索。
订单OM
/*1,Bookorder*/
Oe_Order_Pub.Process_Order
(1
Fnd_Api.G_FALSE
Fnd_Api.G_FALSE
Fnd_Api.G_FALSE
x_return_status
x_msg_count
x_msg_data
–INPARAMETERS
p_header_rec=>l_header_rec
p_line_tbl=>l_line_tbl
p_action_request_tbl=>l_action_request_tbl
–OUTPARAMETERS
x_header_rec=>x_header_rec
x_header_val_rec=>x_header_val_rec
x_Header_Adj_tbl=>x_Header_Adj_tbl
x_Header_Adj_val_tbl=>x_Header_Adj_val_tbl
x_Header_price_Att_tbl=>x_Header_price_Att_tbl
x_Header_Adj_Att_tbl=>x_Header_Adj_Att_tbl
x_Header_Adj_Assoc_tbl=>x_Header_Adj_Assoc_tbl
x_Header_Scredit_tbl=>x_Header_Scredit_tbl
x_Header_Scredit_val_tbl=>x_Header_Scredit_val_tbl
x_line_tbl=>x_line_tbl
x_line_val_tbl=>x_line_val_tbl
x_Line_Adj_tbl=>x_Line_Adj_tbl
x_Line_Adj_val_tbl=>x_Line_Adj_val_tbl
x_Line_price_Att_tbl=>x_Line_price_Att_tbl
x_Line_Adj_Att_tbl=>x_Line_Adj_Att_tbl
x_Line_Adj_Assoc_tbl=>x_Line_Adj_Assoc_tbl
x_Line_Scredit_tbl=>x_Line_Scredit_tbl
x_Line_Scredit_val_tbl=>x_Line_Scredit_val_tbl
x_Lot_Serial_tbl=>x_Lot_Serial_tbl
x_Lot_Serial_val_tbl=>x_Lot_Serial_val_tbl
x_action_request_tbl=>x_action_request_tbl
);
/*2,创建发货行*/
WSH_DELIVERY_DETAILS_PUB.AUTOCREATE_DELIVERIES(
p_api_version_number=>1.0,
p_init_msg_list=>APPS.FND_API.G_TRUE,
p_commit=>l_commit,
x_return_status=>x_return_status,
x_msg_count=>x_msg_count,
x_msg_data=>x_msg_data,
p_line_rows=>p_line_rows,
x_del_rows=>x_del_rows);
/*3,挑库发放*/
wsh_deliveries_pub.delivery_action(
p_api_version_number=>1.0,
p_init_msg_list=>null,—INVARCHAR2,
x_return_status=>x_return_status,—OUTVARCHAR2,
x_msg_count=>x_msg_count,—OUTNUMBER,
x_msg_data=>x_msg_data,—OUTVARCHAR2,
p_action_code=>‘PICK-RELEASE’,—INVARCHAR2,
p_delivery_id=>p_delivery_id,—INNUMBERDEFAULTNULL,
p_delivery_name=>p_delivery_name,—INVARCHAR2DEFAULTNULL,
x_trip_id=>x_trip_id,—OUTVARCHAR2,
x_trip_name=>x_trip_name—OUTVARCHAR2
);
/*4,发放确认*/
WSH_DELIVERIES_PUB.Delivery_Action(
p_api_version_number=>1.0,
p_init_msg_list=>init_msg_list,
x_return_status=>x_return_status,
x_msg_count=>x_msg_count,
x_msg_data=>x_msg_data,
p_action_code=>p_action_code,
p_delivery_id=>p_delivery_id,
p_delivery_name=>p_delivery_name,
p_asg_trip_id=>p_asg_trip_id,
p_asg_trip_name=>p_asg_trip_name,
p_asg_pickup_stop_id=>p_asg_pickup_stop_id,
p_asg_pickup_loc_id=>p_asg_pickup_loc_id,
p_asg_pickup_loc_code=>p_asg_pickup_loc_code,
p_asg_pickup_arr_date=>p_asg_pickup_arr_date,
p_asg_pickup_dep_date=>p_asg_pickup_dep_date,
p_asg_dropoff_stop_id=>p_asg_dropoff_stop_id,
p_asg_dropoff_loc_id=>p_asg_dropoff_loc_id,
p_asg_dropoff_loc_code=>p_asg_dropoff_loc_code,
p_asg_dropoff_arr_date=>p_asg_dropoff_arr_date,
p_asg_dropoff_dep_date=>p_asg_dropoff_dep_date,
p_sc_action_flag=>p_sc_action_flag,
p_sc_intransit_flag=>p_sc_intransit_flag,
p_sc_close_trip_flag=>p_sc_close_trip_flag,
p_sc_create_bol_flag=>p_sc_create_bol_flag,
p_sc_stage_del_flag=>p_sc_stage_del_flag,
p_sc_trip_ship_method=>p_sc_trip_ship_method,
p_sc_actual_dep_date=>p_sc_actual_dep_date,
p_sc_report_set_id=>p_sc_report_set_id,
p_sc_report_set_name=>p_sc_report_set_name,
p_wv_override_flag=>p_wv_override_flag,
x_trip_id=>x_trip_id,
x_trip_name=>x_trip_name);
/*5,创建InstallBase*/
csi_item_instance_pub.create_item_instance(
p_api_version=>1.0–INNUMBER
p_instance_rec=>l_instance_rec–INOUTNOCOPYcsi_datastructures_pub.instance_rec
p_ext_attrib_values_tbl=>l_ext_attrib_values_tbl—INOUTNOCOPYcsi_datastructures_pub.extend_attrib_values_tbl
p_party_tbl=>l_party_tbl–INOUTNOCOPYcsi_datastructures_pub.party_tbl
p_account_tbl=>l_account_tbl–INOUTNOCOPYcsi_datastructures_pub.party_account_tbl
p_pricing_attrib_tbl=>l_pricing_attrib_tbl–INOUTNOCOPYcsi_datastructures_pub.pricing_attribs_tbl
p_org_assignments_tbl=>l_org_assignments_tbl–INOUTNOCOPYcsi_datastructures_pub.organization_units_tbl
p_asset_assignment_tbl=>l_asset_assignment_tbl–INOUTNOCOPYcsi_datastructures_pub.instance_asset_tbl
p_txn_rec=>l_txn_rec–INOUTNOCOPYcsi_datastructures_pub.transaction_rec
x_return_status=>x_return_status–OUTNOCOPYVARCHAR2
x_msg_count=>x_msg_count–OUTNOCOPYNUMBER
x_msg_data=>x_msg_data);–OUTNOCOPYVARCH
/*6,失效InstallBase*/
csi_item_instance_pub.expire_item_instance(
p_api_version=>1.0—INNUMBER
p_instance_rec=>l_instance_rec—INcsi_datastructures_pub.instance_rec
p_txn_rec=>l_txn_rec—INOUTNOCOPYcsi_datastructures_pub.transaction_rec
x_instance_id_lst=>l_instance_id_lst–OUTNOCOPYcsi_datastructures_pub.id_tbl
x_return_status=>x_return_status–OUTNOCOPYVARCHAR2
x_msg_count=>x_msg_count–OUTNOCOPYNUMBER
x_msg_data=>x_msg_data–OUTNOCOPYVARCHAR2
);
createorreplacepackagecomms_om_newis
--Author:
Horis
--Created:
11/11/20049:
22:
32AM
--Purpose:
Dealwithordermanagementprocess
PROCEDUREmain(
itemtypeinvarchar2,
itemkeyinvarchar2,
actidinnumber,
funcmodeinvarchar2,
resultoutinoutvarchar2);
PROCEDUREbook(x_return_statusOUTVARCHAR2,
x_msg_countOUTNUMBER,
x_msg_dataOUTVARCHAR2);
PROCEDUREauto_full(errbufOUTVARCHAR2,
retcodeOUTVARCHAR2,
p_line_idINNUMBER,
p_user_idINNUMBER
);
PROCEDUREpick_release(x_return_statusOUTVARCHAR2,
x_msg_countOUTNUMBER,
x_msg_dataOUTVARCHAR2);
PROCEDUREship_confirm(x_return_statusOUTVARCHAR2,
x_msg_countOUTNUMBER,
x_msg_dataOUTVARCHAR2,
p_delivery_idINNUMBER);
PROCEDUREsubmit_req;
PROCEDUREcreate_install_base(p_line_idINNUMBER,
x_return_statusOUTVARCHAR2,
x_msg_countOUTVARCHAR2,
x_msg_dataOUTVARCHAR2);
PROCEDUREcreate_install_base_rel(p_line_idINNUMBER,
x_return_statusOUTVARCHAR2,
x_msg_countOUTVARCHAR2,
x_msg_dataOUTVARCHAR2);
PROCEDUREexpire_install_base(x_return_statusOUTVARCHAR2,
x_msg_countOUTNUMBER,
x_msg_dataOUTVARCHAR2);
PROCEDUREdeal_install_base(x_return_statusOUTVARCHAR2,
x_msg_countOUTNUMBER,
x_msg_dataOUTVARCHAR2);
endcomms_om_new;
/
createorreplacepackagebodycomms_om_new
is
g_header_idNUMBER;
g_order_numberNUMBER;
g_line_idNUMBER;
g_line_ordered_quantityNUMBER;
g_line_schedule_dateDATE;
g_user_idNUMBER:
=fnd_profile.value('USER_ID');
g_delivery_idNUMBER;
g_cur_party_idNUMBER;
g_cur_party_account_idNUMBER;
--forWFcalling
PROCEDUREmain(
itemtypeinvarchar2,
itemkeyinvarchar2,
actidinnumber,
funcmodeinvarchar2,
resultoutinoutvarchar2)
AS
l_return_statusVARCHAR2(1000);
l_msg_countNUMBER;
l_msg_dataVARCHAR2(1000);
l_book_flagVARCHAR2
(1);
l_picked_flagVARCHAR2
(1);
l_line_typeNUMBER;
req_idNUMBER;
l_link_to_line_idNUMBER;
BEGIN
g_line_id:
=to_number(itemkey);
g_user_id:
=wf_engine.GetItemAttrNumber(itemtype,itemkey,'USER_ID');
g_user_id:
=1050;
IF(funcmode='RUN')THEN
SELECTooha.header_id,
ooha.order_number,
oola.line_type_id,
oola.link_to_line_id
INTOg_header_id,
g_order_number,
l_line_type,
l_link_to_line_id
FROMoe_order_headers_allooha,
oe_order_lines_alloola
WHEREooha.header_id=oola.header_id
ANDoola.line_id=g_line_id
ANDROWNUM=1;
--1033STRORDER,1034ChangePlan,1036Suspension
--forchilditemnoneedtodeal
IFl_line_typeIN(1033,1034,1036)AND
l_link_to_line_idISNULL
THEN
req_id:
=fnd_request.submit_request('ONT',--application
'TBFAFL',--program
NULL,--description
NULL,--start_time
FALSE,--sub_request
g_line_id,g_user_id,chr(0),'','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','');
ENDIF;--fortransation_type
resultout:
='COMPELTE:
COMPLETE';
RETURN;
ENDIF;
IF(funcmode='CANCEL')THEN
resultout:
='COMPELTE';
RETURN;
ENDIF;
resultout:
='COMPLETE:
COMPLETE';
OE_STANDARD_WF.Clear_Msg_Context;
return;
EXCEPTION
WHENOTHERSTHEN
WF_CORE.CONTEXT('comms_om_new','main',itemtype,itemkey,to_char(actid),funcmode);
RAISE;
END;
PROCEDUREbook(x_return_statusOUTVARCHAR2,
x_msg_countOUTNUMBER,
x_msg_dataOUTVARCHAR2)
AS
CURSORcur_lineIS
SELECTline_id,
ordered_quantity,
schedule_ship_date
FROMoe_order_lines_all
WHEREline_id=g_line_id;
iNUMBER:
=0;
X_DEBUG_FILEVARCHAR2(100);
--INParameters
l_header_recOE_ORDER_PUB.Header_Rec_Type;
l_action_request_tblOE_ORDER_PUB.Request_Tbl_Type;
l_line_tblOE_ORDER_PUB.Line_Tbl_Type;
--OUTParameters
x_header_recOE_ORDER_PUB.Header_Rec_Type;
x_header_val_recOE_ORDER_PUB.Header_Val_Rec_Type;
x_Header_Adj_tblOE_ORDER_PUB.Header_Adj_Tbl_Type;
x_Header_Adj_val_tblOE_ORDER_PUB.Header_Adj_Val_Tbl_Type;
x_Header_price_Att_tblOE_ORDER_PUB.Header_Price_Att_Tbl_Type;
x_Header_Adj_Att_tblOE_ORDER_PUB.Header_Adj_Att_Tbl_Type;
x_Header_Adj_Assoc_tblOE_ORDER_PUB.Header_Adj_Assoc_Tbl_Type;
x_Header_Scredit_tblOE_ORDER_PUB.Header_Scredit_Tbl_Type;
x_Header_Scredit_val_tblOE_ORDER_PUB.Header_Scredit_Val_Tbl_Type;
x_line_tblOE_ORDER_PUB.Line_Tbl_Type;
x_line_val_tblOE_ORDER_PUB.Line_Val_Tbl_Type;
x_Line_Adj_tblOE_ORDER_PUB.Line_Adj_Tbl_Type;
x_Line_Adj_val_tblOE_ORDER_PUB.Line_Adj_Val_Tbl_Type;
x_Line_price_Att_tblOE_ORDER_PUB.Line_Price_Att_Tbl_Type;
x_Line_Adj_Att_tblOE_ORDER_PUB.Line_Adj_Att_Tbl_Type;
x_Line_Adj_Assoc_tblOE_ORDER_PUB.Line_Adj_Assoc_Tbl_Type;
x_Line_Scredit_tblOE_ORDER_PUB.Line_Scredit_Tbl_Type;
x_Line_Scredit_val_tblOE_ORDER_PUB.Line_Scredit_Val_