if [ "$TERM"="" ]then
    eval `tset -s -Q -m':?hp'`
else
    eval `tset -s -Q`
fi

stty erase "^H" kill "^U" intr"^C" eof "^D"
stty hupcl ixon ixoff
tabs

PATH=$PATH:.

set -u
trap "echo 'logout'" 0

set -o ignoreeof

EDITOR=vi
export EDITOR

## Here are the lines that I am adding.
cd /home/production/scripts
USER=`who am i|cut -c 1..8`
(trap "trap 0;exit" 0 1 3 15; cobrun /home/production/cobol/obj/eftchg $USER)