OM API-WSH_DELIVERIES_PUB.CREATE_UPDATE

本文链接：https://blog.csdn.net/kikiwhq/article/details/135915618

本文详细描述了一个针对OracleOrderManagement12.0.6及更高版本的脚本，名为WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERYAPI，用于更新现有配送的名称。脚本涉及参数绑定、事务管理和SQL操作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

[Sample Script] WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERY API For Updating Delivery Name (Doc ID 2755998.1)

APPLIES TO:

Oracle Order Management - Version 12.0.6 and later
Information in this document applies to any platform.

GOAL

[Sample Script] WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERY API For Updating Delivery Name

SOLUTION

----------------------------------------------------------------------
-- Start of Comments
-- Sample Script: WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERY API
-- Function : Update an existing delivery
-- Parameters : the following bind variables
- delivery_id
- new_delivery_name
----------------------------------------------------------------------
SET serveroutput ON
--
DECLARE
l_operation VARCHAR2(30) := 'Update an existing delivery';
x_return_status VARCHAR2(1) ;
x_msg_data VARCHAR2(2000);
x_msg_count VARCHAR2(2000);

--Standard Parameters.
p_api_version_number NUMBER;
init_msg_list VARCHAR2(30);
x_msg_details VARCHAR2(3000);
x_msg_summary VARCHAR2(3000);
p_validation_level NUMBER;
p_commit VARCHAR2(30);

-- Parameters for WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERY
action_code VARCHAR2(15);
delivery_id NUMBER;
delivery_info WSH_DELIVERIES_PUB.Delivery_Pub_Rec_Type;
name VARCHAR2(30);
delivery_name VARCHAR2(30);

--
BEGIN
--
x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

FND_GLOBAL.APPS_INITIALIZE(
user_id => 1014765 -- User ID
, resp_id => 21623 -- Order Management Super User
, resp_appl_id => 660 -- Oracle Order Management
);

--========================================================================
--WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERY
--========================================================================
-- Values for WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERY
-- Update an existing delivery
delivery_info.delivery_id := &delivery_id; -- Exisitng Delivery
delivery_info.name := '&new_delivery_name';
action_code := 'UPDATE';

WSH_DELIVERIES_PUB.CREATE_UPDATE_DELIVERY(
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 => action_code
, p_delivery_info => delivery_info
, p_delivery_name => delivery_name
, x_delivery_id => delivery_id
, x_name => name );

--========================================================================
-- COMMIT/ROLLBACK
--========================================================================
IF x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
dbms_output.put_line( l_operation ||' done successfully.' ) ;
dbms_output.put_line( ' delivery_id :' ||delivery_info.delivery_id ) ;
dbms_output.put_line( ' name: :' ||delivery_info.name ) ;
commit;
ELSE
dbms_output.put_line('Failure.' );
dbms_output.put_line('Return Status = '||x_return_status);
wsh_util_core.get_messages('Y', x_msg_data, x_msg_details, x_msg_count);
dbms_output.put_line(l_operation ||': ');
dbms_output.put_line('Summary: '||substrb(x_msg_data,1,200));
dbms_output.put_line('Detail: '||substrb(x_msg_details,1,200));
rollback;
END IF;
END;
/