####################################################################
echo "------------------------------------------------"
echo "JRHIST - " 
echo "------------------------------------------------"
echo "History: OCT 1999 - First implementation of this new script."
echo "       : AUG 2001 - Added breakup of Eta and Ens directories."
echo "       : AUG 2001 - Added steps to save directories"
echo "                    /com/hourly/prod/hourly.YYYYMMDD and"
echo "                    /com/hourly/prod/eta_pcpn_anal.YYYYMMDD and"
echo "       : JAN 2003 - Modified for snow/frost"
echo "                    removed /nwges directories avn, mrf and fnl"
echo "       : JUN 2003 - Beakup Wave archive and "
echo "                    added Fog and Ice directories."
echo "       : FEB 2004 - Added SREF Archive."
echo "       : JUN 2006 - Changed /com/mrf/prod/ens.YYYYMMDD"
echo "                    to /com/gens/prod/gefs.YYYYMMDD for the"
echo "                    arguments to rhist_saveens.sh."
echo "       : OCT 2006 - Added entry for lamp area."
echo "       : NOV 2006 - Added entry to archive eta32k."
echo "       : FEB 2007 - Added entry to archive CMCENS."
echo "       : APR 2007 - Added entry to archive RTOFS."
echo "       : JUL 2007 - Added entry to archive HYSPLIT/SMOKE."
echo "       : JUL 2007 - Added entry to archive RTMA."
echo "       : AUG 2007 - Changed lamp area archiving to now"
echo "                    archive entire lamp directory."
echo "       : NOV 2007 - Added 03 and 15 cycle archiving"
echo "                    for SREF."
echo "       : FEB 2008 - Added entry to archive AKRTMA."
echo "       : FEB 2008 - Added execution of new script to archive"
echo "                    NDAS which splits it into five archive"
echo "                    files."
echo "       : APR 2008 - Added SREF GES archiving for 03 and 15 "
echo "                    cycles."
echo "       : AUG 2008 - Added FNMOC ENS archiving for 00 cycle."
echo "       : SEP 2008 - Added HIRESW archiving for 00 cycle."
echo "       : OCT 2008 - Added SMOKE archiving for 00 cycle."
echo "       : DEC 2008 - Added VSDB archiving for 00 cycle."
echo "       : NOV 2009 - Split up the jobs in 00 cycle."
echo "       : FEB 2010 - Move RTMAs to rhist_savertma.sh."
echo "       : FEB 2010 - Changed dcom to be only archive to use"
echo "                    dual copy."
echo "       : MAY 2010 - Added dustconus archiving to daily."
echo "       : MAY 2010 - Added smokehi archiving to daily."
echo "       : AUG 2010 - Remove archiving of FNMOC ensembles."
echo "       : AUG 2010 - Added Gulf Stream Finder (gsf) to daily."
echo "       : SEP 2010 - Added rtma2p5 and gurtma archiving to daily."
echo "       : SEP 2010 - Added AQMAK and AQMHI to 06Z and 12Z."
echo "       : OCT 2010 - Added 3D radar reflectivity mosaic data (gif"
echo "                    images and grib2) to daily."
echo "       : DEC 2010 - Added NOS/GLOFS to daily."
echo "       : MAR 2011 - Changed for HIRESW upgrade to daily."
echo "       :            Added HIRESW/HREF to daily."
echo "       :            Added NOS/CBOFS, DBOFS and TBOFS to daily."

#####################################################################

cd $DATA

#####################################################################
#
# RUNHISTORY JOB
#
# This job uses script rhist_savedir.sh to tar up and save a specified
# operational directory in the appropriate directory under /hsmprod
# on the HPSS server, ncos70a.
#
# Directories /nwprod and /com/eta will be tarred first and saved under 
# the previous day (day minus 1).  Then, data from day minus 2 will be
# saved.
#
#####################################################################

########################################
set -x
msg="JOB $job HAS BEGUN"
postmsg "$jlogfile" "$msg"
##########################################

# Run setpdy and initialize PDY variables
sh $utilscript/setpdy.sh
. PDY
errsum=0

#
#   Only run the RUN HISTORY backup at 0000 UTC Cycle
#

if test $CYC = "00"
then
   
   case $job in

   jrun_history_daily)

      #  Copy SDM edit flags to appropriate /dcom directory
      #  so that they will get picked up in the archive.
 
      cp /dcom/us007003/maksynrc /dcom/us007003/$PDYm1
      cp /dcom/us007003/quips /dcom/us007003/$PDYm1
      cp /dcom/us007003/sdmedit /dcom/us007003/$PDYm1
      
      let yearmo=$PDYm6/100   

      $USHrhist/rhist_savearkvc2.sh /com/arkv/prod/cdas2.$yearmo $PDYm6
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh arkvc2
      $USHrhist/rhist_savedir.sh /com/cdas2/prod/cdas2.$PDYm3 $PDYm3
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh cdas2
      PDYm9=`sh /nwprod/util/ush/finddate.sh $PDY d-9`
      $USHrhist/rhist_savecfsv1.sh /com/cfsv1/prod/forecast.$PDYm3 $PDYm3
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh cfsv1
      $USHrhist/rhist_savedir.sh /dcom/us007003/$PDYm2 $PDYm2 0 dual_copy ignoreerr
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh dcom
      $USHrhist/rhist_savedir.sh /com/omb/prod/fog.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh fog
      $USHrhist/rhist_savedir.sh /com/omb/prod/gsf.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gsf
      $USHrhist/rhist_savedir.sh /com/godas/prod/godas.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh godas
      $USHrhist/rhist_savedir.sh /com/godas/prod/godas_ext.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh godasext
      $USHrhist/rhist_savedir.sh /com/godas/prod/godas2.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh godas2
      $USHrhist/rhist_savehiresw.sh /com/hiresw/prod/hiresw.$PDYm1 ${PDYm1}
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hiresw
      $USHrhist/rhist_savehref.sh /com/hiresw/prod/href.$PDYm1 ${PDYm1}
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh href
      $USHrhist/rhist_savedir.sh /com/hourly/prod/hourly.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hrly
      $USHrhist/rhist_savedir.sh /com/hysplit/prod/hysplit.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hysplit
      $USHrhist/rhist_savedir.sh /com/lmp/prod/lmp.$PDYm1 $PDYm1 1 
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh lamp
      $USHrhist/rhist_savedir.sh /com/mrf/prod/mrf.$PDYm2 $PDYm2 1
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh mrf
      $USHrhist/rhist_savedir.sh /com/hourly/prod/nam_pcpn_anal.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nampcp
      $USHrhist/rhist_saveprecip.sh /com/verf/prod/precip.$PDYm3 $PDYm3
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh precip
      $USHrhist/rhist_savedir.sh /com/verf/prod/gridtobs.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh precip_gridtobs
      $USHrhist/rhist_savevsdb_gridtobs.sh /com/verf/prod/vsdb/gridtobs $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh precip_vsdb
      $USHrhist/rhist_savertofs.sh /com/ofs/prod/ofs.$PDYm1 $PDYm1
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtofs
      $USHrhist/rhist_savedir.sh /com/rucs/prod/rucs.$PDYm1 $PDYm1
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rucs
      $USHrhist/rhist_savedir.sh /com/omb/prod/sice.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh sice
      $USHrhist/rhist_savehysplitsmoke.sh /com/hysplit/prod/smoke.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh smoke
      $USHrhist/rhist_savedir.sh /com/hysplit/prod/smokeak.$PDYm2 $PDYm2 2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aksmoke
      $USHrhist/rhist_savedir.sh /com/hysplit/prod/smokehi.$PDYm2 $PDYm2 2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hismoke
      $USHrhist/rhist_savedir.sh /com/gfs/prod/sst.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh sst
      $USHrhist/rhist_savedir.sh /com/mrf/prod/ukmet.$PDYm2 $PDYm2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ukmet
      $USHrhist/rhist_savedir.sh /com/mrf/prod/wsr.$PDYm2 $PDYm2 perm
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh wsr
      $USHrhist/rhist_savedir.sh /com/hysplit/prod/dustconus.$PDYm2 $PDYm2 2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh dustconus 
      $USHrhist/rhist_saveref.sh /com/hourly/prod/radar.$PDYm2 $PDYm2 
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh radarref 
      $USHrhist/rhist_savedir.sh /com/nos/prod/glofs.$PDYm2 $PDYm2 2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh glofs 
      $USHrhist/rhist_savedir.sh /com/nos/prod/cbofs.$PDYm2 $PDYm2 2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh cbofs
      $USHrhist/rhist_savedir.sh /com/nos/prod/dbofs.$PDYm2 $PDYm2 2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh dbofs
      $USHrhist/rhist_savedir.sh /com/nos/prod/tbofs.$PDYm2 $PDYm2 2
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh tbofs
      ;; 

   jrun_history00)

      $USHrhist/rhist_savecmcens.sh /com/gens/prod/cmce.$PDYm2 ${PDYm2}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh cmcens 00 
      $USHrhist/rhist_savefnmocens.sh /com/gens/prod/fens.$PDYm2 ${PDYm2}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh fnmocens 00 
      $USHrhist/rhist_saveens.sh /com/gens/prod/gefs.$PDYm2 ${PDYm2}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ens 00
      $USHrhist/rhist_savecyc.sh /com/gfs/prod/gdas.$PDYm2 ${PDYm2}00 $PARMrhist/rhist_gdasexclude
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gdas 00
      $USHrhist/rhist_savegfs.sh /com/gfs/prod/gfs.$PDYm2 ${PDYm2}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gfs 00
      $USHrhist/rhist_savenaefs.sh /com/gens/prod/naefs.$PDYm2 ${PDYm2}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh naefs 00 
      $USHrhist/rhist_savenam.sh /com/nam/prod/nam.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nam 00
      $USHrhist/rhist_savendas.sh /com/nam/prod/ndas.$PDYm2 ${PDYm2}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ndas 00
      $USHrhist/rhist_saveruc.sh /com/ruc/prod/ruc2a.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ruc2a 00
      $USHrhist/rhist_savesref.sh /com/sref/prod/sref.$PDYm2 ${PDYm2}03
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh sref 03
      $USHrhist/rhist_savesrefges.sh /nwges/prod/sref.$PDYm1 ${PDYm1}03
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh srefges 03
      $USHrhist/rhist_savewave.sh /com/wave/prod/wave.$PDYm2 ${PDYm2}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh wave 00
      $USHrhist/rhist_savertma.sh /com/rtma/prod/rtma.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma 00
      $USHrhist/rhist_savertma.sh /com/akrtma/prod/akrtma.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh akrtma 00
      $USHrhist/rhist_savertma.sh /com/hirtma/prod/hirtma.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hirtma 00
      $USHrhist/rhist_savertma.sh /com/prrtma/prod/prrtma.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh prrtma 00
      $USHrhist/rhist_savertma.sh /com/rtma2p5/prod/rtma2p5.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma2p5 00
      $USHrhist/rhist_savertma.sh /com/gurtma/prod/gurtma.$PDYm1 ${PDYm1}00
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gurtma 00
      ;;

   jrun_history06)
      
      $USHrhist/rhist_saveaqm.sh /com/aqm/prod/aqm.$PDYm2 ${PDYm2}06 aqm
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aqm 06
      $USHrhist/rhist_saveaqm.sh /com/aqm/prod/HI.$PDYm2 ${PDYm2}06 HI.aqm
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aqmHI 06
      $USHrhist/rhist_saveaqm.sh /com/aqm/prod/AK.$PDYm2 ${PDYm2}06 AK.aqm
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aqmAK 06
      $USHrhist/rhist_savecmcens.sh /com/gens/prod/cmce.$PDYm2 ${PDYm2}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh cmcens 06
      $USHrhist/rhist_savefnmocens.sh /com/gens/prod/fens.$PDYm2 ${PDYm2}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh fnmocens 06
      $USHrhist/rhist_saveens.sh /com/gens/prod/gefs.$PDYm2 ${PDYm2}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ens 06
      $USHrhist/rhist_savecyc.sh /com/gfs/prod/gdas.$PDYm2 ${PDYm2}06 $PARMrhist/rhist_gdasexclude
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gdas 06
      $USHrhist/rhist_savegfs.sh /com/gfs/prod/gfs.$PDYm2 ${PDYm2}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gfs 06
      $USHrhist/rhist_savenaefs.sh /com/gens/prod/naefs.$PDYm2 ${PDYm2}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh naefs 06 
      $USHrhist/rhist_savenam.sh /com/nam/prod/nam.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nam 06
      $USHrhist/rhist_savendas.sh /com/nam/prod/ndas.$PDYm2 ${PDYm2}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ndas 06
      $USHrhist/rhist_saveruc.sh /com/ruc/prod/ruc2a.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ruc2a 06
      $USHrhist/rhist_savesref.sh /com/sref/prod/sref.$PDYm2 ${PDYm2}09
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh sref 09 
      $USHrhist/rhist_savesrefges.sh /nwges/prod/sref.$PDYm1 ${PDYm1}09
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh srefges 09
      $USHrhist/rhist_savewave.sh /com/wave/prod/wave.$PDYm2 ${PDYm2}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh wave 06
      $USHrhist/rhist_savertma.sh /com/rtma/prod/rtma.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma 06
      $USHrhist/rhist_savertma.sh /com/akrtma/prod/akrtma.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh akrtma 06
      $USHrhist/rhist_savertma.sh /com/hirtma/prod/hirtma.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hirtma 06
      $USHrhist/rhist_savertma.sh /com/prrtma/prod/prrtma.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh prrtma 06
      $USHrhist/rhist_savertma.sh /com/rtma2p5/prod/rtma2p5.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma2p5 06
      $USHrhist/rhist_savertma.sh /com/gurtma/prod/gurtma.$PDYm1 ${PDYm1}06
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gurtma 06
      ;;

   jrun_history12)

      $USHrhist/rhist_saveaqm.sh /com/aqm/prod/aqm.$PDYm2 ${PDYm2}12 aqm 
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aqm 12 
      $USHrhist/rhist_saveaqm.sh /com/aqm/prod/HI.$PDYm2 ${PDYm2}12 HI.aqm
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aqmHI 12
      $USHrhist/rhist_saveaqm.sh /com/aqm/prod/AK.$PDYm2 ${PDYm2}12 AK.aqm
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aqmAK 12
      $USHrhist/rhist_saveaqmnam.sh /com/nam/prod/nam.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh aqmnam 12
      $USHrhist/rhist_savecmcens.sh /com/gens/prod/cmce.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh cmcens 12
      $USHrhist/rhist_savefnmocens.sh /com/gens/prod/fens.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh fnmocens 12
      $USHrhist/rhist_saveens.sh /com/gens/prod/gefs.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ens 12
      $USHrhist/rhist_savecyc.sh /com/gfs/prod/gdas.$PDYm2 ${PDYm2}12 $PARMrhist/rhist_gdasexclude
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gdas 12
      $USHrhist/rhist_savegfs.sh /com/gfs/prod/gfs.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gfs 12
      $USHrhist/rhist_savenaefs.sh /com/gens/prod/naefs.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh naefs 12
      $USHrhist/rhist_savenam.sh /com/nam/prod/nam.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nam 12     
      $USHrhist/rhist_savendas.sh /com/nam/prod/ndas.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ndas 12
      $USHrhist/rhist_savesrefges.sh /nwges/prod/sref.$PDYm1 ${PDYm1}15
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh srefges 15 
      $USHrhist/rhist_saveruc.sh /com/ruc/prod/ruc2a.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ruc2a 12
      $USHrhist/rhist_savesref.sh /com/sref/prod/sref.$PDYm2 ${PDYm2}15
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh sref 15
      $USHrhist/rhist_savewave.sh /com/wave/prod/wave.$PDYm2 ${PDYm2}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh wave 12
      $USHrhist/rhist_savertma.sh /com/rtma/prod/rtma.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma 12
      $USHrhist/rhist_savertma.sh /com/akrtma/prod/akrtma.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh akrtma 12
      $USHrhist/rhist_savertma.sh /com/hirtma/prod/hirtma.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hirtma 12
      $USHrhist/rhist_savertma.sh /com/prrtma/prod/prrtma.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh prrtma 12
      $USHrhist/rhist_savertma.sh /com/rtma2p5/prod/rtma2p5.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma2p5 12
      $USHrhist/rhist_savertma.sh /com/gurtma/prod/gurtma.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gurtma 12
      $USHrhist/rhist_savesstoiqd.sh /com/omb/prod/sstoiqd.$PDYm1 ${PDYm1}12
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh sstoiqd 12
      ;;

   jrun_history18)
      
      $USHrhist/rhist_savecmcens.sh /com/gens/prod/cmce.$PDYm2 ${PDYm2}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh cmcens 18
      $USHrhist/rhist_savefnmocens.sh /com/gens/prod/fens.$PDYm2 ${PDYm2}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh fnmocens 18
      $USHrhist/rhist_saveens.sh /com/gens/prod/gefs.$PDYm2 ${PDYm2}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ens 18
      $USHrhist/rhist_savecyc.sh /com/gfs/prod/gdas.$PDYm2 ${PDYm2}18 $PARMrhist/rhist_gdasexclude
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gdas 18
      $USHrhist/rhist_savegfs.sh /com/gfs/prod/gfs.$PDYm2 ${PDYm2}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gfs 18
      $USHrhist/rhist_savenaefs.sh /com/gens/prod/naefs.$PDYm2 ${PDYm2}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh naefs 18
      $USHrhist/rhist_savenam.sh /com/nam/prod/nam.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nam 18
      $USHrhist/rhist_savendas.sh /com/nam/prod/ndas.$PDYm2 ${PDYm2}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ndas 18
      $USHrhist/rhist_saveruc.sh /com/ruc/prod/ruc2a.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh ruc2a 18
      $USHrhist/rhist_savesref.sh /com/sref/prod/sref.$PDYm2 ${PDYm2}21
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh sref 21
      $USHrhist/rhist_savesrefges.sh /nwges/prod/sref.$PDYm1 ${PDYm1}21
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh srefges 21     
      $USHrhist/rhist_savewave.sh /com/wave/prod/wave.$PDYm2 ${PDYm2}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh wave 18 
      $USHrhist/rhist_savertma.sh /com/rtma/prod/rtma.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma 18
      $USHrhist/rhist_savertma.sh /com/akrtma/prod/akrtma.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh akrtma 18
      $USHrhist/rhist_savertma.sh /com/hirtma/prod/hirtma.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh hirtma 18
      $USHrhist/rhist_savertma.sh /com/prrtma/prod/prrtma.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh prrtma 18
      $USHrhist/rhist_savertma.sh /com/rtma2p5/prod/rtma2p5.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh rtma2p5 18
      $USHrhist/rhist_savertma.sh /com/gurtma/prod/gurtma.$PDYm1 ${PDYm1}18
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh gurtma 18
      ;;
   jrun_history_nwpara)
      $USHrhist/rhist_savenwpara.sh $PDY
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nwpara
      ;;
   jrun_history_nwtest)
      $USHrhist/rhist_savenwtest.sh $PDY
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nwtest 
      ;;
   jrun_history_nwprod)
      $USHrhist/rhist_savenwprod.sh $PDY
      export err=$?;let errsum=errsum+err;$USHrhist/rhist_errchk.sh nwprod 
      ;;
  
   *)
      echo " Job=$job not recognized by script exrunhist.sh.sms." 
      ;;
   esac

fi

#
#  check if any the tarfiles were missed, and abort if so.
#
err=$errsum; ${utilscript}/err_chk.sh

#####################################################################

# GOOD RUN
set +x
echo "**************JOB RHIST COMPLETED NORMALLY ON THE IBM"
echo "**************JOB RHIST COMPLETED NORMALLY ON THE IBM"
echo "**************JOB RHIST COMPLETED NORMALLY ON THE IBM"
set -x

msg="JOB $job HAS COMPLETED NORMALLY."
echo $msg
postmsg "$jlogfile" "$msg"

############## END OF SCRIPT #######################