模型构造（omod3）
/***************************************************************//* *//*S A S S A M P L E L I B R A R Y*//* *//*姓名：omod3*//*标题：模型构造（omod3）*//*产品：或*//*系统：所有*//*关键字：或*//*程序：OPTMODEL，TABULATE*//*数据：*//* *//*支持：更新：*//*参考编号：*//*MISC：的OPTMODEL章节中的示例3*//*数学编程*//* *//***************************************************************/标题“分配问题”；数据等级（下降=i）；do i=1到6；grade=“grade”| | put（i，1.）；产出；结束；运行；数据对象；输入机器客户一年级二年级三年级四年级五年级六年级；数据线；1 1 102 140 105 105 125 1481 2 115 133 118 118 143 1661 3 70 108 83 83 88 861 4 79 117 87 87 107 1051 5 77 115 90 90 105 1482 1 123 150 125 124 154 .2 2 130 157 132 131 166 .2 3 103 130 115 114 129 .2 4 101 128 108 107 137 .2 5 118 145 130 129 154 .3 1 83 . . 97 122 1473 2 119 . . 133 163 1803 3 67。91 101 1013 4 85 . . 104 129 1293 5 90 . . 114 134 1794 1 108 121 79 . 112 1324 2 121 132 92 . 130 1504 3 78 91 59 . 77 724 4 100 113 76 . 109 1044 5 96 109 77。105 145;数据需求；输入客户一年级二年级三年级四年级五年级六年级；数据线；1 100 100 150 150 175 2502 300 125 300 275 310 3253 400 0 400 500 340 04 250 0 750 750 0 05 0 600 300 0 210 360;数据资源；输入机器1级2级3级4级5级6级有效；数据线；1 .250 .275 .300 .350 .310 .295 7442 .300 .300 .305 .315 .320 . 2443 .350 . . .320 .315 .300 7904 .280 .275 .260 . .二百五十点二九五六七二;过程操作模型；/*声明索引集*/设置CUSTOMERS；设置＜str＞梯度；设置MACHINES；/*声明参数*/num return｛CUSTOMERS，GRADES，MACHINES｝初始化0；num需求{客户，等级}；num成本{等级，机器}init 0；num可用{机器}；/*阅读成绩集*/将数据等级读入GRADES=[等级]；/*阅读客户群及其需求*/读取数据需求客户=[客户]{等级中的j}<需求[客户，j]=列（j）>；/*阅读机器集、成本和可用性*/读取数据资源命名到MACHINES=[机器]{等级中的j}<成本[j，机器]=列（j）>效用；/*读取目标数据*/读取数据对象名称进入[机器客户]{等级中的j}<return[客户，j，机器]=col（j）>；/*声明模型*/var生产量{客户、等级、机器}>=0；max TotalReturn=总和{i（客户），j（等级），k（机器）}return[i，j，k]*产量[i，j，k]；con req_demand{i在客户中，j在等级}中：总和{机器中的k}产生的数量[i，j，k]=需求[i，j]；机器中的conreq_avail{k：总和{i表示客户，j表示等级}成本[j，k]*生产量[i，j，k]<=效用[k]；/*调用解算器并保存结果*/解决；创建数据解决方案from[客户等级机器]={i in CUSTOMERS，j in GRADES，机器中的k：产量[i，j，k].sol ne 0}金额=生产金额；/*打印最佳解决方案*/打印产生的金额；退出；proc tabulate data=解决方案；类客户级机器；var数量；表（机器*客户），（等级*金额=''*sum=''）；运行；