proc optmodel; set Lane={'AB','BC','CA','CB'}; set Carrier={'I','II'}; number Bids{Lane,Carrier}=[ 500 525 500 475 500 525 475 500]; number Capacity{Lane,Carrier}=[ 5 8 100 6 4 100 8 100]; var Loads{Lane,Carrier} integer >=0 ; minimize Z=sum{i in Lane, j in Carrier}Bids[i,j]*Loads[i,j]; con LoadsperLane{i in Lane}: sum{j in Carrier}Loads[i,j]=10; con CapacityperLane{i in Lane, j in Carrier}: Loads[i,j]<=Capacity[i,j]; solve; print Loads Z; quit;