Oracle EBS Interface/API(8)-标准展BOM存储过程

          在做二次开发过程中，有时遇到要展BOM计算物料需求或展BOM成本明细时，需要使用到该存储过程。以前，我刚触Oracle EBS时，不知道有标准展BOM存储过程，还自己创建类似的临时表和存储过程。因此，写本文章希望给初学者有帮助。

系统版本:

          RDBMS : 9.2.0.6.0

         Oracle 应用产品 : 11.5.10.2  

路径:BOM->清单->多级表单如下

主要调用Oracle EBS系统存储过程:bompexpl.exploder_userexit 和临时表:bom_explosion_temp。

参数说明备注Verify_Flag默认为0默认值为0Org_Id 库存组织ID Order_By排序1为 工序；物料序号
2为 物料序号；工序Grp_Id组别ID序列Bom_Explosion_Temp_S.NextVal给它赋值Session_Id会话ID，默认为0 Levels_To_Explode最大层级默认为设置Bom_Or_EngBOM或工程BOM默认值为1Impl_Flag仅限于已实施的BOM默认值为1Plan_Factor_Flag使用计划%默认值为2Explode_Option展BOM选项，默认值为31.全部
2.当前
3.将来和当前Module成本默认值为2Cst_Type_Id成本类型1.为Frozen冻结成本
3.为Pending待定成本Std_Comp_Flag 默认值为2Expl_Qty数量默认值为1Item_Id物料ID Alt_Desg替代项默认值为NullComp_Code 默认值为NullUnit_Number_From部件号从 Unit_Number_To部件号至 Rev_Date有效日期默认为当前时间Show_Rev 默认值为1Material_Ctrl物料控制 Lead_Time提前期默认值为2

实例代码如下:

declare  v_errbuf varchar2(200);  v_retcode varchar2(300);begin  DELETE FROM bom_explosion_temp;    bompexpl.exploder_userexit(VERIFY_FLAG       => 0,                             ORG_ID            => 122, --V_ORG_ID, --组织ID                             ORDER_BY          => 1,   --排序                             GRP_ID            => 1,   --分组                             SESSION_ID        => 0,   --会话ID                             LEVELS_TO_EXPLODE => 20,  --最大层级                             BOM_OR_ENG        => 1,                                IMPL_FLAG         => 1,   --仅限于已实施的BOM                                         PLAN_FACTOR_FLAG  => 2,   --使用计划%                             EXPLODE_OPTION    => 3,   --BOM显示类型                             MODULE            => 1,   --成本                             CST_TYPE_ID       => 1,   --成本类型                             STD_COMP_FLAG     => 2,                                            EXPL_QTY          => 1000,    --数量                             ITEM_ID           => 3001035,--V_ITEM_ID 物料ID                             ALT_DESG          => NULL,     ---替代项                                       COMP_CODE         => NULL,     --                             REV_DATE          => TO_CHAR(SYSDATE,                                                          'YYYY/MM/DD HH24:MI:SS'), --有效日期                             err_msg           => v_errbuf,                             error_code        => v_retcode);End;