带交付周期信息的物料清单
/**************************************************************//* *//*S A S S A M P L E L I B R A R Y*//* *//*姓名：BOME02*//*标题：带交付周期信息的物料清单*//*（清单02）*//*产品：或*//*系统：所有*//*钥匙：或PPLOT*//*程序：BOM、打印、排序、NETDRAW*//*数据：*//* *//*支持：更新：*//*参考：*//*MISC：BOM程序章节中的示例2*//*物料清单簿*//* *//**************************************************************//*产品结构和零件主数据*/数据SlBOM2；输入母公司$8。组件$8。描述$24。单位：8美元。交付周期4.0质量每4.0总量报告4.0On_Hand 4.0（手动4.0）;数据线；LA01灯LA每个2。50 20LA01 B100底座总成各1 1。50LA01 S100黑色阴影每个2 1。LA01 A100套筒组件每个1 1。B100 1100成品轴每个2 1。B100 1200 6直径钢板每个3 1。B100 1300轮毂每个2 1。B100 1400 1/4-20螺钉各1 4。A100 1500钢支架每个2 1。A100 1600单向插座每个2 1。A100 1700接线组件每个1 1。1100 2100 3/8钢管英寸3 26。1500 1400 1/4-20螺钉每个12个。1700 2200 16-规格灯线英尺2 12。1700 2300标准插头端子每个1 1。;/*显示输入数据集*/proc打印数据=SlBOM2 noobs；标题为“ABC灯具公司”；title3“PROC BOM输入数据集”；运行；/*创建缩进BOM表和汇总明细表*/proc bom data=SlBOM2-out=IndBOM2汇总=SumBOM2；结构/部件=组件leadtime=交付周期parent=父级component=组件数量=QtyPerqtyonhand=现有要求=总需求id=（描述单位）；运行；/*显示缩进的BOM表数据*/proc打印数据=IndBOM2 noobs；var _级别_父级_部件_描述每个Qty_Prod的数量单位提前时间总计提前_生产；标题为“ABC灯具公司”；title3“缩进材料清单，LA01部分”；运行；/*排序并显示汇总明细表*/进程排序数据=SumBOM2；第_部分；运行；proc打印数据=SumBOM2 noobs；标题为“ABC灯具公司”；title3“总结零件清单，第2期”；运行；/*为运行NETDRAW准备数据集*/数据IndBOM2a（下降=零件ID）；设置IndBOM2；Paren_ID=零件ID；运行；数据IndBOM2b；设置IndBOM2（保持=Paren_ID Part_ID）；运行；数据TreBOM2；设置IndBOM2a-IndBOM2b；LTnQP=put（LeadTime，f3.）||“”|| put（QtyPer，f3；运行；/*指定图形选项*/title h=4pct j=c'带提前期补偿的多级物料清单'；脚注h=3pct j=l'节点显示部件号、交付周期和所需数量'；pattern1 v=e c=蓝色；/*获取BOM表树的布局信息*/proc网络绘制数据=TreBOM2（其中=（Paren_ID NE.））out=布局2无显示；actnet/act=Paren_ID suc=零件ID ID=（零件LTnQP总计读取）ybetween=3 x between=15树直线节点nolabel；运行；/*交付周期偏移每个节点的X坐标*/数据TreBOM2a；设置布局2；如果_seq=0；删除seq；_x_=总长度；运行；/*显示带有交付周期偏移的BOM树*/proc网络绘制数据=TreBOM2a输出=网络输出；；actnet/id=（部件LTnQP）ctext=黑色htext=3个骨架=黑色align=Tot_Lead帧压缩x介于=15 y介于=3箭头=0直线节点nolabel；运行；