资源

多个日历(甘特图09)

/****************************************************************//*S A S S A M P L E L I B R A R Y*//*                                                              *//*姓名:GANTTE09*//*标题:多个日历(甘特图09)*//*产品:或*//*系统:所有*//*钥匙:GANTT*//*程序:CPM、SORT、GANTT*//*数据:*//*                                                              *//*支持:更新:*//*参考:GANTT章节中的示例9(PM用户指南)*//*杂项:*//*                                                              *//****************************************************************/选项ps=60 ls=80;title“多日历”;/*项目的活动节点表示*/数据小部件9;格式化任务$12。成功-成功3$12。;输入任务天数succ1&suc2&suc3&;数据线;批准计划5.5图纸研究市场编写规范图纸10原型。研究市场5个市场。战略。编写规范4.5原型。原型15材料设施。市场。地层。10测试市场营销。材料10初始。生产。贷款10初始。生产。初始化。产品10测试市场营销评估评估10个更改。测试市场15的变化。更改5生产。生产0。营销0。;数据widgvac;设置小部件9;如果任务=“生产”,则cal=“PROD_cal”;否则,如果任务=“原型”,则cal=“OVT_cal”;否则,如果任务=“编写规范”,则cal=“Eng_cal”;else cal=“默认”;运行;数据整体数据;格式假日假日日期7。;输入假日和日期7。holfin&日期7。holidur cal$;数据线;2003年12月8日。7工程师(_C)2003年12月24日至26日。2004年1月1日04年1月01日。;数据工作数据;输入全天时间8。半天时间8。ovtday时间8。s1时间8。s2时间8。s3时间8。;格式化全天半天ovtday s1 s2 s3 time6。;数据线;08:00   08:00   08:00   .       08:00   .16:00   12:00   18:00   06:00   18:00   06:00.       .       .       08:00   20:00   08:00.       .       .       18:00   .       18:00.       .       .       20:00   .       ..       .       .       .       .       .;数据量表;输入cal$_sun_$_mon_$_tue_$_wed_$_thu_$_fri_$_sat_$;数据线;默认假日全天全天全日全天假日OVT_CAL假日ovtday ovtday ov tday ovdtay ovtday-ovtday半天PROD_CAL假日s2 s1 s1 s3工程电话。;proc打印数据=工作数据;title3“工作日数据集”;运行;标题1“”;标题3;过程打印数据=刻度数据;title2“日历数据集”;运行;proc打印数据=holidata;title2“节假日数据集”;运行;proc打印数据=widgvac;title 2“项目数据集”;运行;*建立模式语句;模式1 c=绿色v=s;模式2 c=绿色v=e;图案3 c=红色v=s;图案4 c=洋红v=e;图案5 c=洋红v=s;图案6 c=青色v=s;图案7 c=黑色v=e;proc-cpm date='01dec03'd interval=工作日数据=widgvacout=schedvac holidata=holidataworkday=工作数据日历=刻度数据;假日/holifin=holifin-holidur=holidur;活动任务;持续天数;继承人suc1 suc2 suc3;calid cal;运行;title h=2“甘特图示例9”;title2 h=1.5“多日历”;proc-gantt数据=schedvac holidata=holidataworkday=工作数据日历=刻度数据;图表/假日=(假日)holiend=(holifin)calid=校准markbreak刻度=12mindate='27dec03:00:00'maxdate='02jan04:08:00'tp压力;id任务;运行;