#
# Run IBSYS Job using cards as input.
#
if [ "$1" = "" ];then
   echo "usage: runibsysc program listing"
   exit 1
fi
if [ "$2" = "" ];then
   echo "usage: runibsysc program listing"
   exit 1
fi
rm -f punch.* print.* sysou* $2
#
# Make sysin card file
#
echo "\$LIST" >reader.txt
echo -n "\$DATE          " >>reader.txt
date +%m%d%y >>reader.txt
cat ibsysc.ctl >>reader.txt
cat $1 >>reader.txt
echo -n -e "\f" >>sysin.txt
echo "\$IBSYS" >>reader.txt
echo "\$STOP" >>reader.txt
txt2bcd reader.txt reader.bcd 80
bcd2cbn reader
#
# Run it
#
s709 -m7094 r=reader p=print u=punch \
	a1=ASYS1.BIN   a2=ASYS8.BIN  a3=sysin.bcd  a4=sysou1.bcd \
	a5=sysut1.bin  a6=sysut3.bin a7=sysut2.bin a8=syspp1.bin \
	a9=sysut4.bin a10=sysck2.bin 
#
#	a1=ASYS1.BIN a2=ASYS8.BIN a3=syslb3.bin a4=syslb4.bin \
#	a5=sysut1.bin a6=sysut2.bin a7=sysut3.bin a8=sysdmp.bin \
#	b1=sysou1.bcd b2=sysou2.bin b3=syspp1.bin b4=syspp2.bin \
#	b5=sysut4.bin b6=sysut5.bin b7=sysut6.bin
#
# Convert printed output
#
bcd2txt print
bcd2txt -p sysou1.bcd $2
rm reader.* sys*.bin
