liadhbs

#!/bin/sh
ACLDIR=`cat /usr/bin/liapath |grep ACCELLPATH|cut -f2`
U__REL__=IDS2.0.3.0.0
BUDEV=/dev/rfd096ds15; export BUDEV
BUDRVR=BUDRVR; export BUDRVR
BUBLK=4096; export BUBLK
NSEGS=1; export NSEGS
case $PATH in
:*) PATH=:$ACLDIR/bin$PATH;;
*) PATH=$ACLDIR/bin:$PATH;;
esac
UNIFY=$ACLDIR/lib
DBPATH=`cat /usr/bin/liapath |grep DBADMPATH|cut -f2`
LDATEFMT=DD-AAA-YYYY;export LDATEFMT
export PATH UNIFY DBPATH
if [ -f $UNIFY/unifymsgs ]
then continue
else echo accell: UNIFY environment variable incorrectly set to \'$UNIFY\'
echo \(The ACCELL directory may have been moved without changing \'accell\'\)
exit 1
fi
if [ "$TERMCAP" = "" ]
then TERMCAP=$UNIFY/termcap; export TERMCAP
else if [ -f $TERMCAP ]
then continue
else echo accell: cannot find the TERMCAP file
echo \(TERMCAP environment variable incorrectly set to \'$TERMCAP\'\)
exit 1
fi
fi
if [ "$UNICAP" = "" ]
then UNICAP=$UNIFY/unicap; export UNICAP
else if [ -f $UNICAP ]
then continue
else echo accell: cannot find the UNICAP file
echo \(UNICAP environment variable incorrectly set to \'$UNICAP\'\)
exit 1
fi
fi
#- Mencari kode Venue --------------------------------------------------
rm /tmp/tmp_dhbs_venue
echo "lines 0
select ps_kode_cb from ppiasys /" > /tmp/tmp_dhbs_venue
chmod 666 /tmp/tmp_dhbs_venue
BRANCH=`SQL /tmp/tmp_dhbs_venue`
USER=`who am i | cut -c1-11`
#
#- Menambah ke tabel RSTDACD -------------------------------------------
#rm /tmp/tmpstdacd*
#tgl=`/bin/date +%d-%h-%Y`
#echo "lines 0
#select tps_term from term
#where tps_awal<$tgl and tps_akhir>$tgl /" > /tmp/tmpstdacd1
#term=`SQL /tmp/tmpstdacd1`
#echo "lines 0
#select '$tgl',sta_course,sta_term,count (*),'$BRANCH' from stdacd
#where sta_1^=4 and sta_term='$term' and sta_room^='DUM*' and sta_course^='EX*'
#group by sta_course /" > /tmp/tmpstdacd2
#SQL /tmp/tmpstdacd2 > /tmp/tmpstdacd3
#echo "insert into rstdacd: from '/tmp/tmpstdacd3' /" > /tmp/tmpstdacd4
#SQL /tmp/tmpstdacd4
#
clear
echo " "
echo "MEMBUAT DATA DHBS UNTUK DIUMUMKAN via SMS / INTERNET"
echo " "
#echo "Menggunakan Disket"
echo " "
#echo "- Siapkan disket baru & masukkan ke drive di Server"
#echo "- Jika drive jarang dipakai (kotor) tolong dibersihkan dulu pakai Cleaner"
echo "- Pastikan bahwa semua nilai siswa pada Term ini sudah lengkap termasuk"
echo "  nilai siswa yang Make-Up"
echo "- Jika proses berhasil, gunakan internet (http://smart.lia.ac.id/app/..."
echo "  untuk mengirimkan data ke WEB SERVER"
echo " "
echo " "
echo "Tanggal Update Data : \c"
read TERM
echo "Ditunggu sebentar ......."

BAR="_"
A="PM"
#FILEDHBS=`echo $A$BAR$BRANCH$BAR$TERM$BAR$USER`
FILEDHBS=`echo $BRANCH$BAR$TERM$BAR$USER`
DHBSPATH=`cat /usr/bin/liapath |grep DHBSPATH|cut -f2`

rm /tmp/tmp_dhbs_select
echo "lines 0
select sth_num,std_name,ps_institute,sth_term,sth_harian,sth_written,sth_oral,sth_final,sth_attrec,sth_fail,sth_course
from stdacdh,ppiasys,course,term,stdmst,hari,jam
where sth_num=std_code and sth_course=crs_code and sth_day=kodehari and sth_time=kodejam and sth_term=tps_term and sth_today=$TERM and sth_final > 0
 into '$DHBSPATH/$FILEDHBS.TXT'/" > /tmp/tmp_dhbs_select
chmod 666 /tmp/tmp_dhbs_select
rm $DHBSPATH/$FILEDHBS
SQL /tmp/tmp_dhbs_select
chmod 666 $DHBSPATH/$FILEDHBS.TXT
echo " "
echo "Tanggal Update : $TERM"
echo "File Name      : $FILEDHBS"
echo "Folder         : $DHBSPATH"
echo " "
doscp $DHBSPATH/$FILEDHBS A:$FILEDHBS
echo " "
echo "Selesai"
echo "(tekan enter)"
read xxx