#########################################################################
#
# Script: exhur_tropical_cyclone_message.sh.sms     Author:  Bob Hollern
#
# Abstract: Script to execute the bufrcyc program to generate the KWNO
#  bulletins: ISXA40, ISXB40, ISXC40, ISXD40, ISXI40, ISXJ40, ISXK40,
#  ISXL40.  These bulletins contain cyclone position and intensity data
#  in BUFR representation.
# 
# History:  
#
#       September, 1997 - first implementation
#
#       September 29, 1999  - Converted program to run on IBM SP
#########################################################################
 
#
set -x

msg="$job HAS BEGUN!"
postmsg "$jlogfile" "$msg"

cp $FIXbufr/bufrtab.007 bufrtab.007
cp /tpc/save/guidance/storm-data/ncep/tcvitals tcvitals    

OUTFILE=xtrn.strmbuls.$cycle.$job

export pgm=bulls_bufrcyc
. prep_step

export XLFUNIT_12="bufrtab.007"
export XLFUNIT_20="tcvitals"
export XLFUNIT_21="storm2"
export XLFUNIT_22="storm3"
export XLFUNIT_51="$OUTFILE"

startmsg
$EXECbulls/bulls_bufrcyc >> $pgmout 2>errfile
export err=$?; err_chk

if test -s $OUTFILE
then
   if test "$SENDCOM" = 'YES'
   then
      cp $OUTFILE $pcom

      if test "$SENDDBN" = 'YES'
      then

         $DBNROOT/bin/dbn_alert GRIB_LOW ${NET} ${job} ${pcom}/$OUTFILE                            
      else
         msg='THERE IS A STRMBUL FILE FOR DBN, BUT WE ARE NOT TELLING DBN'
      fi
      msg='JOB COMPLETED NORMALLY'
   else
      msg='THERE IS A STRMBUL FILE TO SEND, BUT WE ARE NOT DOING SO'
   fi
else
   msg='JOB COMPLETED NORMALLY-NO STORM BULLETINS FOUND'
fi

postmsg "$jlogfile" "$msg"

set +x
echo " ***** $RUN PROCESSING COMPLETED NORMALLY *****"
echo " ***** $RUN PROCESSING COMPLETED NORMALLY *****"
echo " ***** $RUN PROCESSING COMPLETED NORMALLY *****"
set -x

exit