Script Automation

    . /d1/d2/proj.setup # calls dept.setup calls org.setup
    # and sets and exports $PATH and $PROJDIR and others
    D=/app/proj; OUT=$D/out; ERR=$D/err; LOG=$D/log

    # set I/O (assume input handled elsewhere)
    exec 1<$OUT; alias printout='print -u1'
    exec 2<$ERR; alias printerr='print -u2'
    exec 3<$LOG; alias printlog='print -u3'
    

    # one test among many
    if   [[ ! -w "${D}" ]] 
    then printerr "Cannot write to directory ${D}"
         exit 2
    fi

    # typical logging
    function nowdate { date '+%Y%m%d_%H%M%S'; }
    printlog "$(nowdate) archived $DATA in $ARCHIVE"

    # function for logging exit
    function byebye
    { print "status=$status\n$0 $ARGS\nat $(nowdate)"
      exit $retcode; }