#!/bin/ksh
################################################################################
####  UNIX Script Documentation Block
#                      .                                             .
# Script name:         exdgex_post.sh
# Script description:  Run dgex post jobs
#
# Author:        Eric Rogers       Org: NP22         Date: 1999-06-23
#
# Abstract: This script runs the NAM post jobs for the 48-h NAM forecast
#
# Script history log:
# 1999-06-23  Eric Rogers
# 1999-08-17  Brent Gordon  -- Modified for production.
# 20
#

set -x
cd $DATA 

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

post_times_m3=`expr $post_times - 3`
for fhr in $post_times_m3 $post_times
do
  icnt=1
  while [ $icnt -lt 1000 ]
  do
    if [ -s $FCSTDIR/fcstdone${fhr}.${tmmark} ]
    then
      break
    else
      icnt=$((icnt + 1))
      sleep 5
    fi
    if [ $icnt -ge 360 ]
    then
      msg="ABORTING after 30 minutes of waiting for NAM FCST F${fhr} to end."
      err_exit $msg
    fi
  done

  cp $FIXnam/nam_micro_lookup.dat micro_lookup.dat

  nposts=01
  incpst=01

  ln -s $FCSTDIR/restrt${fhr}.${tmmark} restrt${fhr}.${tmmark}

  y=`expr $fhr % 6`

  if [ $y -eq 0 ] ; then

    cp $PARMdgex/dgex_cntrl.parm_${REGION} dgex_cntrl.parm.${fhr}

    export pgm=dgex_nampost_${REGION}
    . prep_step
    export XLFUNIT_11=$DATA/fcstdata.parm.${tmmark}
    export XLFUNIT_12=$DATA/nhbdgex
    export XLFUNIT_13=$DATA/restrt${fhr}.${tmmark}
    export XLFUNIT_14=dgex_cntrl.parm.${fhr}

    startmsg
    $EXECdgex/dgex_nampost_${REGION} << ioEOF >> $pgmout 2>errfile
    $fhr $nposts $incpst
ioEOF
    export err=$?;err_chk

    mv EGDAWP${fhr}.tm00 $COMOUT/dgex_${REGION}.${cycle}.egdawp${fhr}.tm00

  else

    cp $PARMdgex/dgex_cntrl.parm_${REGION}_3h dgex_cntrl.parm.${fhr}

    export pgm=dgex_nampost_${REGION}
    . prep_step
    export XLFUNIT_11=$DATA/fcstdata.parm.${tmmark}
    export XLFUNIT_12=$DATA/nhbdgex
    export XLFUNIT_13=$DATA/restrt${fhr}.${tmmark}
    export XLFUNIT_14=dgex_cntrl.parm.${fhr}

    startmsg
    $EXECdgex/dgex_nampost_${REGION} << ioEOF >> $pgmout 2>errfile
    $fhr $nposts $incpst
ioEOF
    export err=$?;err_chk

    mv EGDAWP${fhr}.tm00 $COMOUT/dgex_${REGION}.${cycle}.egdawp${fhr}.tm00

  fi

  echo done > $FCSTDIR/nampost.done${fhr}.${tmmark}

  postmsg "$jlogfile" "DGEX POST done for F${fhr}"

done

echo EXITING $0
exit
#
