Oracle EBS Interface/API(2)--销售订单释放暂挂(Sales Order Release Holds)

       Oracle EBS对客户启用信用额度，若某客户超出信用额度和销售订单行非关闭状态时，则所有销售订单或销售订单行暂挂提示Credit Check Failure。当客户的收款正常以后，需要对销售订单释放暂挂操作比较痛苦的事情。

       通客制化开发调用API批量释放，API函数：OE_Holds_Pvt.Release_Holds

参数

描述

p_order_tbl定义记录表（或索引表）数据类型，有二列分别为Header_Id（销售订单题头ID：OE_ORDER_HEADERS.HEADER_ID%TYPE）和Line_Id（销售订单行ID:OE_ORDER_LINES.LINE_ID%TYPE）p_hold_id暂挂IDp_release_reason_code释放原因代码p_release_comment释放备注说明x_return_status输出参数，是否执行成功参数，若值为S，则表示成功。若执行失败，则输出为E或Ux_msg_count输出参数，若执行成功，则为0；否则输出错误信息的个数x_msg_data输出参数，若执行成功，则为空，否则输出错误说明信息

其主要核心代码例实如下:

Declare  l_return_status       Varchar2(300);  l_msg_data            Varchar2(3000);  l_msg_count           Number;  l_order_tbl           OE_HOLDS_PVT.order_tbl_type;  l_Org_id              Number := 114;  l_hold_id             Number;  i                     Number := 0;  l_release_reason_code OE_HOLD_RELEASES.RELEASE_REASON_CODE%TYPE; --释放原因  l_release_comment     OE_HOLD_RELEASES.RELEASE_COMMENT%TYPE; --释放备注  Cursor Cr Is    SELECT hdra.header_id,           hdra.order_number,           hsrc.hold_source_id,           hsrc.hold_id,           hlda.line_id      FROM oe_order_headers_all hdra, --销售订单题头           oe_order_holds_all   hlda, --销售订单行暂挂明细           oe_hold_sources_all  hsrc, --暂挂解挂明细           oe_hold_definitions  hdef --暂挂定义表     WHERE 1 = 1       AND hdra.order_number = '1110032000' --销售订单編码       AND hdra.header_id = hlda.header_id       AND hlda.hold_source_id = hsrc.hold_source_id       AND hsrc.hold_id = hdef.hold_id       AND hlda.released_flag = 'N'     Order By hsrc.hold_id;Begin  fnd_client_info.set_org_context(l_Org_id);  l_release_reason_code := 'MANUAL_RELEASE_MARGIN_HOLD';  l_release_comment     := '测试释放暂挂';  For Rs In Cr Loop    If (Nvl(l_hold_id, 0) > 0 And l_hold_id <> Rs.hold_id) Then      OE_Holds_Pvt.Release_Holds(p_order_tbl           => l_order_tbl,                                 p_hold_id             => l_hold_id,                                 p_release_reason_code => l_release_reason_code,                                 p_release_comment     => l_release_comment,                                 x_return_status       => l_return_status,                                 x_msg_count           => l_msg_count,                                 x_msg_data            => l_msg_data);      If (l_return_status = 'S') Then        Dbms_Output.put_line('Release Success!');        Commit;      Else        dbms_output.put_line('l_msg_data:' || l_msg_data);        dbms_output.put_line('l_msg_count:' || l_msg_count);        Rollback;      End If;      i := 0;    End If;    i := i + 1;    l_hold_id := Rs.hold_id;    l_order_tbl(i).header_id := Rs.header_id;    l_order_tbl(i).line_id := Rs.line_id;  End Loop;  --  If (Nvl(i, 0) > 0) Then    OE_Holds_Pvt.Release_Holds(p_order_tbl           => l_order_tbl,                               p_hold_id             => l_hold_id,                               p_release_reason_code => l_release_reason_code,                               p_release_comment     => l_release_comment,                               x_return_status       => l_return_status,                               x_msg_count           => l_msg_count,                               x_msg_data            => l_msg_data);    If (l_return_status = 'S') Then      Dbms_Output.put_line('Release Success!');      Commit;    Else      dbms_output.put_line('l_msg_data:' || l_msg_data);      dbms_output.put_line('l_msg_count:' || l_msg_count);      Rollback;    End If;  End If;END;

其中“l_release_reason_code”来源释放原因代码:RELEASE_REASON
N：OM\Setup\QuickCodes\Order Management；
用户以根实需要可以添加原因代码。

个人建议客制化开发批量释放暂挂，调用如下二个API包，原因:部分暂挂系统强制不能释放或者设置某一些职责不能释放暂挂。
1.销售订单题头释放暂挂API包:OE_Holds_Pvt.process_release_holds_orders

参数

描述

p_num_of_records单个或多个销售订单题头ID的记录条数，与下面参数p_record_ids是对应的p_record_ids单个或通过逗号分隔多销售订单题头ID，如:p_record_ids=>'345,235,326,984'p_hold_id暂挂IDp_release_reason_code释放原因代码p_release_comment释放备注说明x_return_status输出参数，是否执行成功参数，若值为S，则表示成功。若执行失败，则输出为E或Ux_msg_count输出参数，若执行成功，则为0；否则输出错误信息的个数x_msg_data输出参数，若执行成功，则为空，否则输出错误说明信息

2.销售订单行释放暂挂API包:OE_Holds_Pvt.process_release_holds_lines

参数

描述

p_num_of_records单个或多个销售订单行ID的记录条数，与下面参数p_record_ids是对应的p_record_ids单个或通过逗号分隔多销售订单行ID，如:p_record_ids=>'2345,4235,5326,6984'p_hold_id暂挂IDp_release_reason_code释放原因代码p_release_comment释放备注说明x_return_status输出参数，是否执行成功参数，若值为S，则表示成功。若执行失败，则输出为E或Ux_msg_count输出参数，若执行成功，则为0；否则输出错误信息的个数x_msg_data输出参数，若执行成功，则为空，否则输出错误说明信息 

系统强制不能释放暂挂的如下三种暂挂:

名称

描述

Pending Process Payment HoldThis hold is applied when Process Payment is deferredEpayment Failure HoldThis hold is for expected errors returned by iPayment, like invalid dataEpayment Server Failure HoldThis hold is for any unxpected errors returned by ipayment, like failure to connect to the server