订单OM.docx

上传人:b****5 文档编号:30040987 上传时间:2023-08-04 格式:DOCX 页数:36 大小:23.41KB
下载 相关 举报
订单OM.docx_第1页
第1页 / 共36页
订单OM.docx_第2页
第2页 / 共36页
订单OM.docx_第3页
第3页 / 共36页
订单OM.docx_第4页
第4页 / 共36页
订单OM.docx_第5页
第5页 / 共36页
点击查看更多>>
下载资源
资源描述

订单OM.docx

《订单OM.docx》由会员分享,可在线阅读,更多相关《订单OM.docx(36页珍藏版)》请在冰豆网上搜索。

订单OM.docx

订单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_

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 高等教育 > 艺术

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1