怎么写BOM的展开能简单一些？

siemenwang · 发表于 2006-3-25 10:37

oracle erp 不太清楚.
思路應該是循環嵌套
哪麼多表的設置應該有別的分析用途吧?

cqnownew · 发表于 2006-4-5 10:50

可以直接用标准的包来展开的啊，不用那么麻烦的。如果自己用代码展开，碰到虚拟件之类的东西很繁琐的。bompxinq.exploder_userexit这个就可以了。

镶黄旗 · 发表于 2006-4-5 18:07

俺这个表里都有几千万行记录了.
后来问过高手,说哪果BOM太大的话,卷积后就会删不掉.说可以放心删掉的.
俺大胆的用TRUNCATE删的,没事.

但是我感觉到我们BOM卷得太慢了,需要提速,于是想自己搞一个编历来用.所以还想问楼上列位高手有没有现成的我可以改改拿来用.
俺是搞功能应用的,所以写代码不太行的.

shijiechua · 发表于 2006-4-5 18:54

SQL Server環境:
1個table(T_SBOM)
1個存儲過程(sp_QryBomList)
實現
腳本如附件
自己寫的...我用的不錯,但是不保證No bug啊

CREATE TABLE [T_SBOM] (
[PBomID] [varchar] (20) COLLATE Chinese_Taiwan_Stroke_CI_AS NOT NULL ,
[CBomID] [varchar] (20) COLLATE Chinese_Taiwan_Stroke_CI_AS NOT NULL ,
[QPA] [numeric](12, 6) NOT NULL CONSTRAINT [DF_T_SBOM_QPA] DEFAULT (0),
[Remark] [tinyint] NOT NULL CONSTRAINT [DF_T_SBOM_Status] DEFAULT (0),
[A1] [numeric](18, 6) NULL CONSTRAINT

CLUSTERED
(
[PBomID],
[CBomID]
) ON [PRIMARY]
) ON [PRIMARY]
GO

Huaer_hl · 发表于 2006-4-5 20:41

学习ing,copy,tks!

heyun139___ · 发表于 2006-4-5 20:49

我是新手是向大家學習的希望支持!

smiszch · 发表于 2006-4-6 15:06

最初由 cqnownew 发布
[B]可以直接用标准的包来展开的啊，不用那么麻烦的。如果自己用代码展开，碰到虚拟件之类的东西很繁琐的。bompxinq.exploder_userexit这个就可以了。 [/B]

例如:

bompxinq.exploder_userexit(verify_flag    => 0,
                           org_id          => 15,
                           order_by       => 1,
                           grp_id          => g_group_id,
                           session_id       => 0,
                           levels_to_explode => 9,
                           bom_or_eng       => 1,
                           impl_flag       => 1,
                           plan_factor_flag  => 2,
                           explode_option => 2,
                           module          => 1,
                           cst_type_id    => 2,
                           std_comp_flag    => 2,
                           expl_qty       => 1,
                           item_id          => p_item_id,
                           unit_number_from  => NULL,
                           unit_number_to => NULL,
                           alt_desg       => NULL,
                           comp_code       => NULL,
                           rev_date       => SYSDATE, --to_date('2000-01-01 00:00:00','YYYY-MM-DD HH24:MI:SS'),
                           show_rev       => 1, -- yes
                           material_ctrl    => 1,
                           lead_time       => 1,
                           err_msg          => x_error_message,
                           ERROR_CODE       => x_error_code);