DECLARE
p_rsv apps.inv_reservation_global.mtl_reservation_rec_type;
p_dummy_sn apps.inv_reservation_global.serial_number_tbl_type; l_msg_count NUMBER;
l_msg_data VARCHAR2 (240);
l_status VARCHAR2 (1);
l_index_out NUMBER;
v_reserv_id NUMBER;
l_err_status VARCHAR2(50);
l_err_mesg VARCHAR2 (2000); -- User Variables: Update for your environment ~~!
L_RESP_APPL_ID NUMBER := 401; --FND_PROFILE.VALUE ('RESP_APPL_ID');
L_RESP_ID NUMBER := 56229; --FND_PROFILE.VALUE ('RESP_ID');
L_USER_ID NUMBER := 1068; --FND_PROFILE.VALUE ('USER_ID'); -- Item/Organization Variables
l_organization_id NUMBER := &YourOrgID;
l_YourItem VARCHAR2(100) := '&YourPartNumber'; -- Find 1 reservation for your item
CURSOR c_reserve IS
SELECT DISTINCT reservation_id
FROM apps.mtl_reservations_all_v
WHERE inventory_item_id in (SELECT inventory_item_id FROM apps.mtl_system_items_b where ORGANIZATION_ID = l_organization_id and segment1 = l_YourItem)
AND organization_id = l_organization_id --p_organization_id;
and rownum < 2; BEGIN
fnd_global.APPS_INITIALIZE ( user_id => L_USER_ID, resp_id => L_RESP_ID, resp_appl_id => L_RESP_APPL_ID); FOR R_RESERVE IN C_RESERVE LOOP dbms_output.PUT_LINE('Reservation ID : '||R_RESERVE.reservation_id); p_rsv.reservation_id := R_RESERVE.reservation_id; APPS.inv_reservation_pub.delete_reservation (
p_api_version_number => 1.0,
p_init_msg_lst => fnd_api.g_false,
p_rsv_rec => p_rsv,
p_serial_number => p_dummy_sn,
-- p_validation_flag => fnd_api.g_true,
x_return_status => l_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
); dbms_output.PUT_LINE('Reservation API : '||l_status); IF l_status <> 'S' THEN
FND_MSG_PUB.GET (P_msg_index => l_msg_count,
P_data => l_msg_data,
P_encoded => 'F',
p_msg_index_out => l_index_out); L_ERR_STATUS := 'E';
L_ERR_MESG := 'Delete Allocations API failed ' || RTRIM (l_msg_data);
dbms_output.PUT_LINE('API failed '||L_ERR_MESG); ELSE
L_ERR_STATUS := 'S';
L_ERR_MESG := NULL;
dbms_output.PUT_LINE('API success '||L_ERR_MESG);
END IF; END LOOP; END;
/

  

Oracle EBS INV 删除保留的更多相关文章

  1. Oracle EBS INV 释放保留

    CREATE or REPPLACE PROCEDURE RelieveReservation AS -- Common Declarations l_api_version NUMBER := 1. ...

  2. Oracle EBS INV创建保留

    CREATE or REPPLACE PROCEDURE CreateReservation AS -- Common Declarations l_api_version NUMBER := 1.0 ...

  3. Oracle EBS INV更新保留

    CREATE or REPPLACE PROCEDURE UpdateReservation AS -- Common Declarations l_api_version NUMBER := 1.0 ...

  4. Oracle EBS INV 创建物料搬运单

    Create or Replace PROCEDURE ProcessMoveOrder AS -- Common Declarations l_api_version NUMBER := 1.0; ...

  5. Oracle EBS INV 挑库发放物料搬运单

    create or replace PROCEDURE XX_TRANSACT_MO_LINE AS -- Common Declarations l_api_version NUMBER := 1. ...

  6. Oracle EBS INV 查询物料无值 ECO

    查找物料的时候报错 没有输入值 解决方法: 针对FORM做trace 多查看几个生成的trace 搜索 MTL_SYSTEM_ITEMS_b 的信息 查看到最后面的语句(一般可直接查看) 看SQL 哪 ...

  7. Oracle EBS INV 更新物料慢

    失效 ICX SELECT FA.APPLICATION_SHORT_NAME, FA.APPLICATION_ID, PI.STATUS, PI.PRODUCT_VERSION, PI.PATCH_ ...

  8. Oracle EBS OM 删除订单行

    DECLARE l_header_rec OE_ORDER_PUB.Header_Rec_Type; l_line_tbl OE_ORDER_PUB.Line_Tbl_Type; l_action_r ...

  9. Oracle EBS INV 创建物料搬运单头

    CREATE OR REPLACE PROCEDURE XX_CreateMoveOrderHeader AS -- Common Declarations l_api_version NUMBER ...

随机推荐

  1. tabs高度自适应方法

    1.去掉easyui-tabs类属性,改为id=tabs 2.用js控制高度

  2. asp.net调用js方法

    C#前台js调用后台代码 前台js <script type="text/javascript" language="javascript"> fu ...

  3. win2003 远程连接限制

    1.单击开始->运行,输入gpedit.msc,打开组策略编辑器,找到计算机配置 ->管理模版 -> Windows组件 ->终端服务.把限制连接数量的属性修改成我们需要的数字 ...

  4. print默认在末尾添加一个换行符,但其实也可以不用!

    白月黑羽今天给大家分享另外一个冷知识:) python中 print函数打印信息时默认添加一个换行符,所以你看到一条print语句,则单独占一行,那是否可以不要换行符呢? 答案是肯定的,当然可以,可用 ...

  5. Mybatis在非spring环境下配置文件中使用外部数据源(druidDatasource)

    Spring环境下, MyBatis可以通过其本身的增强mybatis-spring提供的org.mybatis.spring.SqlSessionFactoryBean来注入第三方DataSourc ...

  6. selenium3 无人工干预地自动下载某个文件

    一:主要内容 下载效果展示 代码内容展示 saveToDisk不生效说明,即文件没有下载下来解决办法 二:展示效果 1.下载效果展示 用selenium3无人工干预的自动下载该文件到指定路径下,如:D ...

  7. C# 例子1

    using System; using System.Collections.Generic; using System.Linq; using System.Text; using System.T ...

  8. notepad++ jstool 插件安装

    notepad++ 格式化显示 网上下载 jstool 插件 放入Notepad++\安装目录的plugins位置下,重启即可使用 插件-->JSTool

  9. Webhook是什么、怎么理解

    Webhook是什么 我们想看看维基老大的解说: A webhook in web development is a method of augmenting or altering the beha ...

  10. Arrays工具类的aslist()方法的使用

    数组转换成集合: 数组转换成集合不能增加或减少元素,但是可以用集合思想操作数组,也就是说可以使用其他集合中的办法 String[] arr = {"a", "b" ...