#!/bin/csh
# This is a program for the example Genesis Tooling Forms.
# This file will exist in form genform1 (but will be called by functions
# in both forms)
# The purpose of this program is to calculate and update the last save time.
# It is called by every process function in both forms.
# 
# Written by Ian Ticehurst (Autom8 Ltd.)
# Version 1A. Date: 02.02.01 - Initial design and development.
# Version 1B. Date: 05.02.01 - Change month format to string instead of numbers.
# Version 1C. Date: 09.02.01 - Modify the setting and useage of $TMP.
######################################################################### 

# source $_genesis_root/sys/scripts/include_me

# Go to correct local job directory.
cd $JOB_PATH/misc

# Set year digits.
set YR = `cut -c 3-4 last_save`

# Set day of month digits.
set DY = `cut -c 7-8 last_save`

# Set month (use fixed strings).
set MH_DGT = `cut -c 5-6 last_save`

if ("$MH_DGT" >= 1 && "$MH_DGT" <= 12) then
   set months = (Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec)
   set MH = months[$MH_DGT]
else
   set MH = 'XXX'
endif

# Set time digits.
set HR = `cut -c 10-11 last_save`
set MN = `cut -c 12-13 last_save`

# Set time saved elements in forms.
COM edit_form,job=$JOB,form=genform1,elem=last_save,value=Last Save ${HR}:$MN $DY $MH $YR
COM edit_form,job=$JOB,form=genform2,elem=last_save,value=Last Save ${HR}:$MN $DY $MH $YR

exit 0
