得到销售订单的交货号代码,OracleEBS代码库,德仔网

代码语言

代码分类

【OracleEBS】得到销售订单的交货号

作者:Dezai.CN / 发布于2013/1/5/ 685

PROCEDURE get_delivery_line_id(p_order_line_id IN NUMBER,
                               o_delivery_id   OUT NUMBER,
                               o_err_code      OUT number,
                               o_err_msg       OUT VARCHAR2) IS
BEGIN
  SELECT wda.delivery_id
    INTO o_delivery_id
    FROM wsh_delivery_details wdd, wsh_delivery_assignments wda
   WHERE wdd.source_line_id = p_order_line_id
     AND wdd.delivery_detail_id = wda.delivery_detail_id
     AND rownum = 1;

EXCEPTION
  WHEN NO_DATA_FOUND THEN
    o_err_code := g_warning;
    o_err_msg  := '无法获取订单行发运号';
  WHEN OTHERS THEN
    o_err_code := g_error;
    o_err_msg  := '获取发运行ID时发生意外错误：' || SQLERRM;
END;

--调用过程得到交货号
get_delivery_line_id(p_order_line_id => rec_data.line_id,
                             o_delivery_id   => l_delivery_id,
                             o_err_code      => l_err_code,
                             o_err_msg       => l_err_msg);
        IF l_delivery_id IS NULL THEN
          l_err_code := g_warning;
          l_err_msg  := '没有为该订单成功创建发运号';
          GOTO next_line;
        END IF;

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

试试其它关键字

　交货号　

同语言下

可能有用的

Dezai.CN贡献的其它代码(4037)