This code has a suffix missing error in 38th line. Can you please help?
Sets
i factories /s1, s2, s3/
j distributors /d1, d2, d3, d4, d5, d6, d7, d8, d9, d10, d11, d12/
k vehicles /tir, kamyon/
m months /m1/;
Parameters
t(k) capacity of the vehicle k /tir 129176, kamyon 77120/
d(j,m) product demands for each month by distributor j
/d1.m1 6920, d2.m1 12030, d3.m1 18433, d4.m1 7675, d5.m1 8320, d6.m1 15249, d7.m1 5662, d8.m1 5459, d9.m1 20238, d10.m1 9374, d11.m1 6428, d12.m1 3884/
c(i,j) distance cost from i to j
/s1.d1 527, s1.d2 917, s1.d3 760, s1.d4 629, s1.d5 802, s1.d6 422, s1.d7 377, s1.d8 724, s1.d9 828, s1.d10 700, s1.d11 430, s1.d12 345, s2.d1 153, s2.d2 372, s2.d3 250, s2.d4 168, s2.d5 257, s2.d6 271, s2.d7 275, s2.d8 125, s2.d9 262, s2.d10 185, s2.d11 216, s2.d12 457, s3.d1 650, s3.d2 368, s3.d3 354, s3.d4 403, s3.d5 442, s3.d6 478, s3.d7 523, s3.d8 584, s3.d9 551, s3.d10 728, s3.d11 617, s3.d12 795/
h(j,j) distance cost from j to j
/d1.d2 492, d1.d3 357, d1.d4 275, d1.d5 384, d1.d6 274, d1.d7 245, d1.d8 276, d1.d9 398, d1.d10 225, d1.d11 153, d1.d12 312, d2.d3 158, d2.d4 302, d2.d5 114, d2.d6 471, d2.d7 517, d2.d8 288, d2.d9 195, d2.d10 513, d2.d11 526, d2.d12 768, d3.d4 143, d3.d5 122, d3.d6 336, d3.d7 378, d3.d8 224, d3.d9 230, d3.d10 409, d3.d11 357, d3.d12 598, d4.d5 223, d4.d6 200, d4.d7 242, d4.d8 213, d4.d9 275, d4.d10 356, d4.d11 244, d4.d12 486, d5.d6 412, d5.d7 455, d5.d8 173, d5.d9 110, d5.d10 398, d5.d11 405, d5.d12 646, d6.d7 46, d6.d8 392, d6.d9 464, d6.d10 457, d6.d11 146, d6.d12 318, d7.d8 399, d7.d9 493, d7.d10 464, d7.d11 104, d7.d12 273, d8.d9 158, d8.d10 228, d8.d11 335, d8.d12 528, d9.d10 383, d9.d11 442, d9.d12 683, d10.d11 374, d10.d12 424, d11.d12 256/
p(i,j,k) vehicle-specific cost from i to j for vehicle k
/s1.d1.tir 16056, s1.d1.kamyon 12939, s2.d1.tir 4155, s2.d1.kamyon 2776, s3.d1.tir 11751, s3.d1.kamyon 8307, s1.d2.tir 18982, s1.d2.kamyon 14394, s2.d2.tir 7505, s2.d2.kamyon 5265, s3.d2.tir 8553, s3.d2.kamyon 6320, s1.d3.tir 17306, s1.d3.kamyon 13145, s2.d3.tir 4746, s2.d3.kamyon 3484, s3.d3.tir 7257, s3.d3.kamyon 5347, s1.d4.tir 13556, s1.d4.kamyon 10424, s2.d4.tir 3165, s2.d4.kamyon 2296, s3.d4.tir 8736, s3.d4.kamyon 6430, s1.d5.tir 17732, s1.d5.kamyon 13556, s2.d5.tir 5484, s2.d5.kamyon 4001, s3.d5.tir 9688, s3.d5.kamyon 7174, s1.d6.tir 9395, s1.d6.kamyon 7102, s2.d6.tir 6164, s2.d6.kamyon 4259, s3.d6.tir 9441, s3.d6.kamyon 6971, s1.d7.tir 8763, s1.d7.kamyon 6675, s2.d7.tir 5457, s2.d7.kamyon 3876, s3.d7.tir 10216, s3.d7.kamyon 7513, s1.d8.tir 17306, s1.d8.kamyon 13145, s2.d8.tir 3809, s2.d8.kamyon 2761, s3.d8.tir 9973, s3.d8.kamyon 7397, s1.d9.tir 18349, s1.d9.kamyon 13968, s2.d9.tir 5302, s2.d9.kamyon 3919, s3.d9.tir 11132, s3.d9.kamyon 8223, s1.d10.tir 17306, s1.d10.kamyon 13145, s2.d10.tir 4056, s2.d10.kamyon 2862, s3.d10.tir 13066, s3.d10.kamyon 9641, s1.d11.tir 9175, s1.d11.kamyon 6881, s2.d11.tir 5173, s2.d11.kamyon 3257, s3.d11.tir 13105, s3.d11.kamyon 9678, s1.d12.tir 8511, s1.d12.kamyon 5953, s2.d12.tir 8598, s2.d12.kamyon 5902, s3.d12.tir 17332, s3.d12.kamyon 12792/;
Positive Variable
x(i,j,k) shipment of vehicle k from factory i to distributor j;
Free Variable
z total cost (to minimize);
Binary Variables
y(i,j,k) whether vehicle k is assigned from factory i to distributor j;
Equations
obj objective function for minimizing cost
demand(j,m) ensuring demand of each distributor is met
vehicleCapacity(i,k) ensuring vehicles' capacities are not exceeded;
obj.. z =e= sum((i,j,k), p(i,j,k) * y(i,j,k)) + sum((i,j,k), (c(i,j) + h(j,j)) * y(i,j,k));
demand(j,m).. sum((i,k), x(i,j,k)) =g= d(j,m);
vehicleCapacity(i,k).. sum(j, x(i,j,k)) =l= t(k);
x(i,j,k) =l= t(k) * y(i,j,k);
Model logistics /all/;
Solve logistics using mip minimizing z;
display z.l, x.l, y.l;