set -v
PRINTER=pfile;export PRINTER
PRINTER1=pfile;export PRINTER1
echo $TERM > termtype
mkdir rslts
runcobol  CALTIM < data.CALTIM >> rslts/CALTIM
runcobol  OPNTIM < data.OPNTIM >> rslts/OPNTIM
runcobol  SEGTIM < data.SEGTIM >> rslts/SEGTIM
runcobol  RELTST -s 1 < data.RELTST >> rslts/RELTST
runcobol  SEQTST -s 1 < data.SEQTST >> rslts/SEQTST
runcobol  ISMTST -s 1 < data.ISMTST >> rslts/ISMTST
runcobol  ISMAL8 -s 1 < data.ISMAL8 >> rslts/ISMAL8
rm INX* IOFL* RELF* SEQFL*
runcobol  CALTIM < data.CALTIM1 >> rslts/CALTIM1
runcobol  OPNTIM < data.OPNTIM1 >> rslts/OPNTIM1
runcobol  SEGTIM < data.SEGTIM1 >> rslts/SEGTIM1
runcobol  RELTST -s 1 < data.RELTST1 >> rslts/RELTST1
runcobol  SEQTST -s 1 < data.SEQTST1 >> rslts/SEQTST1
runcobol  ISMTST -s 1 < data.ISMTST0 >> rslts/ISMTST1
runcobol  ISMAL8 -s 1 < data.ISMAL80 >> rslts/ISMAL81
rm INX* IOFL* RELF* SEQFL*
runcobol  CALTIM < data.CALTIM2 >> rslts/CALTIM2
runcobol  OPNTIM < data.OPNTIM2 >> rslts/OPNTIM2
runcobol  SEGTIM < data.SEGTIM2 >> rslts/SEGTIM2
rm IOFL* SEQFL*
runcobol  SEQTST -s 1 < data.SEQTST2 >> rslts/SEQTST2
runcobol  RELTST -s 1 < data.RELTST2 >> rslts/RELTST2
rm RELF*
runcobol ISMTST -s 1 < data.ISMTST00 >> rslts/ISMTST00
rm INX*
runcobol ISMTST -s 1 -b 4 <data.ISMTST0 >> rslts/ISMTSTb4
rm INX*
runcobol ISMTST -s 1 -b 8 <data.ISMTST0 >> rslts/ISMTSTb8
rm INX*
runcobol ISMTST -s 1 -b 16 <data.ISMTST0 >> rslts/ISMTb16
rm INX*
runcobol ISMAL8 -s 1 -b 18 <data.ISMAL80 >> rslts/ISMAL8b18
rm INX*
runcobol ISMAL8 -s 1 -b 36 < data.ISMAL80 >> rslts/ISMAL8b36
rm INX*
runcobol ISMAL8 -s 1 -b 45 < data.ISMAL80 >> rslts/ISMAL8b45
rm INX*
runcobol STEEL ;cp pfile rslts/STEEL
runcobol SPROFILE < data.SPROFILE >> rslts/SPROFILE
