课程安排/教师组合(cpme22)
/****************************************************************//*S A S S A M P L E L I B R A R Y*//* *//*名称:CPME22*//*标题:课程安排/教师组合(cpme22)*//*产品:或*//*系统:所有*//*关键词:CPM*//*程序:CPM*//*数据:*//* *//*支持:更新:*//*参考:CPM章节示例22(PM用户指南)*//*其他:*//* *//****************************************************************/标题“课程安排/教师组合”;数据类别;输入类$suc$dur c1-c4 t1-t3 nrooms;数据线;c1t1。1 1 . . . 1 . . 1c1t2。1 1 . . . . 1 . 1c1t3。1 1 . . . . . 1 1c2t1。1 . 1 . . 1 . . 1c2t3。1 . 1 . . . . 1 1c3t1。1 . . 1 . 1 . . 1c3t2。1 . . 1 . . 1 . 1c3t3。1 . . 1 . . . 1 1c4t1。1 . . . 1 1 . . 1c4t2。1 . . . 1 . 1 . 1;数据资源;每个c1-c4 t1-t3房间的输入;数据线;1 1 1 1 1 1 . 1 34 . . . . . 1 . .;proc-cpm-data=classes-out=sched树脂=资源;活动类;持续时间;继承人继承;资源c1-c4 t1-t3 nrooms/period=每个停止日期=6;运行;proc格式;值类tim1='周六9:00-10:00'2='周六10:00-11:00'3='周六11:00-12:00'4=“周日9:00-10:00”5='星期日10:00-11:00'6=“星期日11:00-12:00”7=“未计划”;值$classtc1t1=“1班,老师1”c1t2=“1班,教师2”c1t3=“1班,3老师”c2t1=“2班,老师1”c2t2=“2班,老师2”c2t3=“2班,3老师”c3t1=“3班,老师1”c3t2=“三班,老师2”c3t3=“三班,三老师”c4t1=“4班,老师1”c4t2=“4班,老师2”c4t3=“4班,老师3”;数据调度;设置计划;格式classtim classtim。;格式化类$classt。;如果(s_start<=6),则classtim=s_start;否则classtim=7;运行;标题2“课程表”;程序打印;id类;var类;运行;数据资源2;每个c1-c4 t1-t3房间的输入;数据线;1 1 1 1 1 1 . 1 12 . . . . . . . 三3 . . . . . . . 24 . . . . . 1 . 15 . . . . . . . 三;proc-cpm数据=类输出=调度2树脂=资源2;活动类;持续时间;继承人继承;资源c1-c4 t1-t3 nrooms/period=每个停止日期=6;运行;数据调度;设置sched2;格式classtim classtim。;格式化类$classt。;如果(s_start<=6),则classtim=s_start;否则classtim=7;运行;title2“附加限制的替代计划”;程序打印;id类;var类;运行;