资源

项目活动弧上表示(cpm2)

/****************************************************************//*S A S S A M P L E L I B R A R Y*//*                                                              *//*名称:CPM2*//*标题:项目活动弧上表示(cpm2)*//*产品:或*//*系统:所有*//*关键词:CPM*//*程序:CPM*//*数据:*//*                                                              *//*支持:更新:*//*参考:CPM章节中的示例2。将程序包含到*//*绘制网络图。(PM用户指南)*//*其他:*//*                                                              *//****************************************************************//*项目的活动弧上表示*/数据widgaoa;格式化任务$12;输入任务和天数尾头;数据线;批准计划5 1 2图纸10 2 3研究市场5 2 4写入规范5 2 3原型15 3 5市场。地层。10   4   6材料10 5 7贷款10 5 7初始化。产品10 7 8评估10 8 9测试市场15 6 9更改5 9 10生产0 10 11市场营销0 6 12假人0 8 6;数据细节;格式化任务$12。部门13美元。描述$30。;输入任务&dept$descrpt&;label dept=“部门”descrpt=“活动描述”;数据线;批准计划计划定稿和批准计划图纸工程编制图纸研究市场营销分析潜在市场编写规范工程编写规范原型工程建造原型市场。地层。营销发展营销理念材料制造采购原材料设施制造准备制造设施初始化。生产制造初始生产运行评估测试评估内部产品测试市场测试邮件产品到样本市场变更工程设计变更生产制造开始大规模生产市场营销开始全面营销笨蛋。生产里程碑;数据小部件;合并widgaoa细节;运行;/*项目计划采用PROC CPM*//*使用TAILNODE传输网络信息*//*和HEADNODE语句。ID语句用于*//*将项目信息传输到输出数据集*/proc cpm data=widgeta date='1dec03'd out=save;尾节尾;头节点头部;持续天数;活动任务;id部门描述;运行;进程排序;通过e_start;运行;标题“小工具制造:Activity-On-Arc格式”;标题2“项目进度”;程序打印;id描述;var部门e:l:t浮点f浮点;运行;/****************************************************************//*S A S S A M P L E L I B R A R Y*//*                                                              *//*名称:CPM示例2——AOA表示*//*标题:修改圆弧布线和注释*//*产品:或*//*系统:所有*//*关键:NETDRAW*//*程序:格式,NETDRAW*//*数据:*//*                                                              *//*支持:更新:*//*REF:AOA格式的网络图*//*其他:*//*                                                              *//****************************************************************/数据widgaoa;输入任务$1-12天尾头x y;数据线;批准计划5 1 2 1 2图纸10 2 3 4 2研究市场5 2 4 4 2编写规范5 2 3 4 2原型15 3 5 7 1市场。地层。10   4   6  10  3材料10 5 7 10 1贷款10 5 7 10 1初始化。产品10 7 8 13 1评估10 8 9 16 1测试市场15 6 9 18 2更改5 9 10 20 1生产0 10 11 23 1市场营销0 6 12 19 2假人0 8 6 16 1.              .  11   .  第26页.              .  12   .  22  3;title j=l“项目:小工具制造”;title2 j=l h=1.5‘活动弧格式网络’;proc netdraw nodisplay data=widgaoa-out=netout;actnet/act=尾部suc=头部id=(尾部);数据网素;设置网络输出;如果_from=4且_to=6且_seq>0,则x=16.5;运行;数据注释1;设置网络输出;如果_seq=0;/*设置所需的可变长度等*/长度函数颜色样式$8;长度xsys ysys hsys$1;位置$1时的长度;长度文本$12;xsys=“2”;ysys=“2”;hsys=“4”;当=“a”时;函数=“label”;尺寸=2.5;位置=“5”;文本=左侧(put(tail,f2));x=x;如果y_y=1,则y=y_-.3;否则y=y+.5;运行;数据注释2;/*设置所需的可变长度等*/长度函数颜色样式$8;长度xsys ysys hsys$1;位置$1时的长度;长度文本$12;xsys=“2”;ysys=“2”;hsys=“4”;当=“a”时;函数=“label”;尺寸=2.5;位置=“5”;x=2.5;y=1.8;text=“批准计划”;产出;x=5.5;y=.8;text=“图纸”;产出;x=5.7;y=1.4;text='写入规范';产出;x=7;y=3.4;text=“研究市场”;产出;x=8.5;y=.8;text='原型';产出;x=11.5;y=1.4;text=“设施”;产出;x=11.5;y=.8;text=“材料”;产出;x=14.5;y=.9;text='单位。生产';产出;x=13.5;y=3.4;text='市场。地层';产出;x=18;y=.8;text=“评估”;产出;x=21.5;y=.8;text=“更改”;产出;x=24.5;y=.8;text=“生产”;产出;x=20;y=3.4;text=“营销”;产出;位置=6;x=16.6;y=1.5;text=“假人”;产出;x=18.6;y=1.5;text=“测试市场”;产出;;数据anno;设置anno1 anno2;运行;goptions hpos=120 vpos=80;模式1 v=s c=红色;title j=l h=3“项目:小工具制造”;title2 j=l h=2.2‘活动弧格式网络’;proc netdraw图形数据=netin anno=anno;actnet/nodefid诺拉贝尔箱宽=1pcompress(压缩)诺夫中心vmargin=20;运行;