Автоматизація господарської діяльності ВАТ "Коломийський сирзавод"

otherwise

zspom=zspom+a.amrt

endcase

else

endif



if a.grupa=3

zsbg3=zsbg3+a.balrax

zspg3=zspg3+a.cena

zskg3=zskg3+a.amrt

zszg3=zszg3+a.oper1

do case

case a.nrax=23

zs23g3=zs23g3+a.amrt

case a.nrax=23

zs231g3=zs231g3+a.amrt

case a.nrax=24

zs24g3=zs24g3+a.amrt

case a.nrax=26

zs26g3=zs26g3+a.amrt

case a.nrax=44

zs44g3=zs44g3+a.amrt

case a.nrax=81

zs81g3=zs81g3+a.amrt

otherwise

zspom=zspom+a.amrt

endcase

else

endif