处理物料搬运单代码,OracleEBS代码库,德仔网

代码语言

代码分类

【OracleEBS】处理物料搬运单

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

get_move_order_line_id(p_order_line_id      => rec_data.line_id,
                               o_move_order_line_id => l_mv_line_id,
                               o_mv_status          => l_mv_status,
                               o_err_code           => l_err_code,
                               o_err_msg            => l_err_msg);
        IF l_err_code IS NOT NULL THEN
          GOTO next_line;
        END IF;
        
        <<move_order>>
        
        l_trolin_tbl := inv_trolin_util.query_rows(p_line_id => l_mv_line_id);
        l_mold_tbl   := inv_mo_line_detail_util.query_rows(p_line_id => l_mv_line_id);
        
        inv_pick_wave_pick_confirm_pub.pick_confirm(p_api_version_number  => 1.0,
                                                    p_init_msg_list       => fnd_api.g_false,
                                                    p_commit              => fnd_api.g_false,
                                                    x_return_status       => l_return_status,
                                                    x_msg_count           => l_msg_count,
                                                    x_msg_data            => l_msg_data,
                                                    p_move_order_type     => 3,
                                                    p_transaction_mode    => 1,
                                                    p_trolin_tbl          => l_trolin_tbl,
                                                    p_mold_tbl            => l_mold_tbl,
                                                    x_mmtt_tbl            => l_mold_tbl,
                                                    x_trolin_tbl          => l_trolin_tbl);
        IF l_return_status != fnd_api.g_ret_sts_success THEN
          l_err_code := g_warning;
          l_err_msg  := '处理物料搬运单失败';
          GOTO next_line;
        END IF;

试试其它关键字

　物料搬运单　

同语言下

可能有用的

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