新增一展BOM Procedure供系統共用
在DB測試都正常,改由FORM呼叫一直都只能展一階
解法:rev_date是吃字串,故要改成to_date(p_rev_date , 'YYYY/MM/DD HH24:MI')才可正確執行
展BOM Procedure
CREATE OR REPLACE PROCEDURE p_unfold_bom
(
p_item_id NUMBER,
p_org_id NUMBER,
p_lvl_to NUMBER,
p_rev_date DATE DEFAULT SYSDATE,
p_grp_id OUT NUMBER
) IS
v_error_code NUMBER;
v_desg VARCHAR2 (100);
v_err_msg VARCHAR2 (100);
BEGIN
DELETE
FROM bom_explosion_temp;
SELECT bom_explosion_temp_s.NEXTVAL
INTO p_grp_id
FROM dual;
bompexpl.exploder_userexit (
verify_flag => 2,
org_id => p_org_id,
order_by => 1,
grp_id => p_grp_id,
session_id => -1,
levels_to_explode => p_lvl_to,
bom_or_eng => 1,
impl_flag => 1,
plan_factor_flag => 2,
explode_option => 2,
module => 2,
cst_type_id => 1,
std_comp_flag => -1,
expl_qty => 1,
item_id => p_item_id,
alt_desg => v_desg,
comp_code => '',
rev_date => p_rev_date,
err_msg => v_err_msg,
error_code => v_error_code
);
END;
/