chkbk

#!/bin/sh
# =============================================================================
# Script:	chkbk
# By:		SMK
# Date:		04/07/05
# Purpose:	main menu for chkbk program
#
# License:      GPL
# License file  LICENSE.txt
# Email:        freesol29@gmail.com
#
# Copyright (C) 2005 Stephen M. Kaiser
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version
# 2 of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
# =============================================================================

#################### Begin Variables ########################
VERSION="1.55"
HELP="$HOME/.chkbk/HELP.txt"
LICENSE="$HOME/.chkbk/LICENSE.txt"
S_DEFAULT="$HOME/.chkbk/sav.db.bak"
C_DEFAULT="$HOME/.chkbk/chk.db.bak"
SAVDB="$HOME/.chkbk/sav.db"
CHKDB="$HOME/.chkbk/chk.db"
TMPDB="$HOME/.chkbk/new.db"
TMPDB2="$HOME/.chkbk/tmpdb2"
TMPDB3="$HOME/.chkbk/tmpdb3"
TMPDB4="$HOME/.chkbk/tmpdb4"
TMPFILE="$HOME/.chkbk/tmpfile"
NEWTMP="$HOME/.chkbk/newtmp"
SUBTMP="$HOME/.chkbk/subtmp"
OUTPUTF="$HOME/.chkbk/balance.txt"

loop=y

#################### End Variable Section ###################

#################### Begin Functions ########################
####
## Print Main menu to scren
##
####
mainmenu()
{
while test "$loop" = "y"
  do
	clear
	tput cup 4 29   ; echo "Main Menu"
	tput cup 5 23   ; echo "===================="
	tput cup 6 25   ; echo "(S) Savings"
	tput cup 7 25   ; echo "(C) Checking"
	tput cup 8 25	; echo "(B) Backup"
	tput cup 9 25   ; echo "(R) Restore"
	tput cup 12 25  ; echo "(Q) Quit"
	tput cup 15 20  ; echo "Enter choice: "
	tput cup 20 17	; echo "(H) Help  (A) About  (L) License" 
	tput cup 21 14  ; echo "(C) Copyleft 2005 by Stephen M. Kaiser"
  ### Display Welcome to ChkBk message as an animation
	tput cup 2 18   ; echo -n "W " ; sleep 0.01 ; echo -n "e " ; sleep 0.01 ; echo -n "l " ; sleep 0.01 ; echo -n "c " ; sleep 0.01 ; echo -n "o " ; sleep 0.01 ; echo -n "m " ; sleep 0.01 ; echo -n "e " ; sleep 0.01 ; echo -n "  t " ; sleep 0.01 ; echo -n "o  " ; sleep 0.01 ; echo -n " C " ; sleep 0.01 ; echo -n "h " ; sleep 0.01 ; echo -n "k " ; sleep 0.01 ; echo -n "B " ; sleep 0.01 ; echo -n "k "
	tput cup 15 34  ; read choice


#### Begin case
	case $choice in
		[Ss]) DB="$SAVDB" ; printmenus ;; # change variable so it doesn't bother constants
		[Cc]) DB="$CHKDB" ; printmenuc ;; # change variable so it doesn't bother constants
		[Bb]) backupmenu  ;;
		[Rr]) restoremenu ;;
		[Hh]) less "$HELP" ;;
		[Aa]) tput cup 22 22 ; echo ChkBk Version "$VERSION" ; tput cup 23 19 ; echo "Press <ENTER> to continue" ; read prompt ;;
		[Ll]) less "$LICENSE" ;; 
		[Qq]) clear ; exit	;;
		   *) invaliderror ;; 
	esac
#### End case


done
#### End while

}


####
## print main chkmenu
##
####
printmenuc()
{
while test "$loop" = "y"
  do
	clear
	tput cup 4 29   ; echo "Checking"
	tput cup 5 23  	; echo "===================="
	tput cup 6 25   ; echo "(D) Deposit"
	tput cup 7 25   ; echo "(W) Withdrawal"
	tput cup 8 25   ; echo "(C) Check Balance"
	tput cup 9 25   ; echo "(S) Search Database"
	tput cup 10 25  ; echo "(X) Delete Entry"
	tput cup 12 25  ; echo "(Q) Quit"
	tput cup 15 20  ; echo "Enter choice: "
	tput cup 15 34  ; read choice2

	case $choice2 in
		[Dd]) menu  ;;
		[Ww]) menu  ;;
		[Cc]) if test -e "$DB"
			then
			  balmenu
			else
			  neednewdb
		      fi ;;
		[Ss]) if test -e "$DB"
			then
			  searchmenu
			else
			   neednewdb
		      fi ;;
		[Xx]) if test -e "$DB"
			then
			  searchmenu  
			else
			  neednewdb
		      fi ;;
		[Hh]) less "$HELP" ;;
		[Qq]) mainmenu	;;
		   *) invaliderror ;;
	esac
  done
}



####
## print main savings menu
##
####
printmenus()
{
while test "$loop" = "y"
  do
	clear
	tput cup 4 29   ; echo "Savings"
	tput cup 5 23  	; echo "===================="
	tput cup 6 25   ; echo "(D) Deposit"
	tput cup 7 25   ; echo "(W) Withdrawal"
	tput cup 8 25   ; echo "(C) Check Balance"
	tput cup 9 25   ; echo "(S) Search Database"
	tput cup 10 25  ; echo "(X) Delete Entry"
	tput cup 12 25  ; echo "(Q) Quit"
	tput cup 15 20  ; echo "Enter choice: "
	tput cup 15 34  ; read choice2

	case $choice2 in
		[Dd]) menu  ;;
		[Ww]) menu  ;;
		[Cc]) if test -e "$DB"
			then
			  balmenu
			else
			  neednewdb
		      fi ;;
		[Ss]) if test -e "$DB"
			then
			  searchmenu
			else
			   neednewdb
		      fi ;;
		[Xx]) if test -e "$DB"
			then
			  searchmenu
			else
			   neednewdb
		      fi ;;
		[Hh]) less "$HELP" ;;
		[Qq]) mainmenu	;;
		   *) invaliderror ;;
	esac
  done
}



####
## Print Backup menu
##
####
backupmenu()
{
while test "$loop" = "y"
do
  clear
  tput cup 4 29 ; echo "Backup?"
  tput cup 5 23	; echo "===================="
  tput cup 6 25	; echo "(S) Savings"
  tput cup 7 25	; echo "(C) Checking"
  tput cup 12 25; echo "(Q) Quit"
  tput cup 15 20; echo "Enter Choice: "
  tput cup 15 34; read choice3

	case $choice3 in
		# change variables so they don't affect the constants
	[Ss]) DB="$SAVDB" ; DB_DEF="$S_DEFAULT" ; pathb ;;
	[Cc]) DB="$CHKDB" ; DB_DEF="$C_DEFAULT" ; pathb ;;
	[Hh]) less "$HELP" ;;
	[Qq]) mainmenu ;;
	*) invaliderror ;;
	esac 

done
}



####
## Print restore menu
##
####
restoremenu()
{
while test "$loop" = "y"
do
  clear
  tput cup 4 29	; echo "Restore?"
  tput cup 5 23 ; echo "===================="
  tput cup 6 25	; echo "(S) Savings"
  tput cup 7 25	; echo "(C) Checking"
  tput cup 12 25; echo "(Q) Quit"
  tput cup 15 20; echo "Enter Choice: "
  tput cup 15 34; read choice3

	case $choice3 in
		# change variables so they don't affect the constants
	[Ss]) DB="$SAVDB" ; DB_DEF="$S_DEFAULT" ; pathr ;;
	[Cc]) DB="$CHKDB" ; DB_DEF="$C_DEFAULT" ; pathr ;;
	[Hh]) less "$HELP" ;;
	[Qq]) mainmenu ;;
	*) invaliderror ;;
	esac 


done
}



####
## print data entry menu
##
####
menu()
{
  clear
  menuloop="y"
  while test "$menuloop" = "y"
  do 	
    tput cup 4 29  ; echo "Enter Info"
    tput cup 5 23  ; echo "===================="
    tput cup 6 25  ; echo "Check#  : "
    tput cup 7 25  ; echo "Date    :           (MMDDYY)" 
    tput cup 8 25  ; echo "Comment : "
    tput cup 9 25  ; echo "Amount  : "
    tput cup 10 25 ; echo "Code    : "
    tput cup 11 25 ; echo "Fee     : "
    tput cup 6 35  ; read checknum 
    if test "$checknum" = "q"
      then
		case $choice in
		[Ss]) printmenus ;;
		[Cc]) printmenuc ;;
		esac
      elif test "$checknum" = "h"
	  	then
		less "$HELP" ; menu
      else
	if test "$checknum" = ""	# allow blank check no.
	  then 
	    	clearerror ; date
	  else				# verify that check has between 3 and 4 digits
           	case "$checknum" in
	  	  [0-9][0-9][0-9]) menuloop="n" ; checkchk ; clearerror ; date ;;
	  	  [0-9][0-9][0-9][0-9]) menuloop="n" ; checkchk ; clearerror ; date ;;
	  	  *) tput cup 6 35  ; echo "                             "
	     	     tput cup 20 25 ; echo "BAD check#. Check numbers can range"
		     tput cup 21 25 ; echo "from 000-9999" ;;
        	esac
	fi
    fi
  done
}



####
## make sure of no duplicate check no. entries
##
####
checkchk()	
{
if test -e "$DB"
then
while cut -d "^" -f 3-8 "$DB" | grep "^$checknum" > "$TMPFILE"
  do
  	tput cup 20 25 ; echo "This number has already been assigned to: "
        tput cup 22 1  ; tr '^' ' ' < "$TMPFILE"
        echo ; echo "Press ENTER to continue... "  	
	read prompt
 	menu
  done
fi
}



####
## get date and verify format
##
####
date()		
{
  dateloop="y"
  while test "$dateloop" = "y"
    do
      	tput cup 7 35 ; read date
        case "$date" in
	  [1][0-2][0][1-9][0-9][0-9]) dateloop="n" ; clearerror ; comment;;
	  [1][0-2][1-2][0-9][0-9][0-9]) dateloop="n" ; clearerror ; comment;;
	  [1][0-2][3][0-1][0-9][0-9]) dateloop="n" ; clearerror ; comment;;
          [0][1-9][0][1-9][0-9][0-9]) dateloop="n" ; clearerror ; comment ;;
          [0][1-9][1-2][0-9][0-9][0-9]) dateloop="n" ; clearerror ; comment ;;
	  [0][1-9][3][0-1][0-9][0-9]) dateloop="n" ; clearerror ; comment;;
          [-]) while test "$date" = "-"
                 do
		   menu
	         done ;;
	  [Hh]) less "$HELP"
                tput cup 7 35  ; echo "          (MMDDYY)        " ;;  
          [Qq]) case $choice in
		[Ss]) printmenus ;;
		[Cc]) printmenuc ;;
		esac ;;
            *)  tput cup 7 35  ; echo "          (MMDDYY)        "  
		tput cup 21 25 ; echo "BAD date format"
                  ;;
        esac
    done
}



####
## get comment field and disallow '^', '/', and '|' characters
##
####
comment()	
{
  commentloop="y"
  while test "$commentloop" = "y"
    do
	tput cup 8 35	; read comment
	case "$comment" in
	*['^']*) clearerror ; tput cup 20 25 ; echo "Sorry, but the ^ character is not allowed"
		 tput cup 21 25 ; echo "due to its use in the database"
		 tput cup 8 35  ; echo "                                        " ;;
	*['|']*) clearerror ; tput cup 20 25 ; echo -e "Sorry, but the | character is not allowed for security reasons\n"
		 tput cup 8 35  ; echo "                                        " ;;
	*['/']*) clearerror ; tput cup 20 25 ; echo -e "Sorry, but the / character is not allowed for security reasons\n"
		 tput cup 8 35 ; echo "                                        " ;;
	[-]) while test "$comment" = "-"
		do 
		  tput cup 8 35 ; echo "  "
		  tput cup 7 35 ; echo "         " ; clearerror ; date
		done ;;
	[Hh]) less "$HELP"
	      tput cup 8 35 ; echo "                                          " ;;
	[Qq]) case $choice in
		[Ss]) printmenus ;;
		[Cc]) printmenuc ;;
		esac ;;
	*) comsize="$(echo "$comment" | wc -m )"
	     if test "$comsize" -gt "33"
		then
		  clearerror ; tput cup 20 25 ; echo -e "Sorry, but comments are limited to 32 characters...\n"
		  tput cup 8 35 ; echo "                                                           "
		else
		  commentloop="n" ; clearerror ; amount
	     fi ;;
	esac
    done
}



####
## get amt of transaction and verify in dollar format
## allow up to $999999.99 dollars to be entered
####
amount()	
{
  amountloop="y"
  while test "$amountloop" = "y"
    do
	tput cup 9 35 	; read amount
	case "$amount" in
	# allow user to enter amount without ending zeros and fill the zeros in
	  [0-9]) amountloop="n" ; type="a" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9]) amountloop="n" ; type="a" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9]) amountloop="n" ; type="a" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9]) amountloop="n" ; type="a" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9][0-9]) amountloop="n" ; type="a" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9][0-9][0-9]) amountloop="n" ; type="a" ; addzeroz ; clearerror ; code ;;
	# amount entered with one decimal place- auto add one zero to the end
	  [0-9].[0-9]) amountloop="n" ; type="a1" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9].[0-9]) amountloop="n" ; type="a1" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9].[0-9]) amountloop="n" ; type="a1" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9].[0-9]) amountloop="n" ; type="a1" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9][0-9].[0-9]) amountloop="n" ; type="a1" ; addzeroz ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9][0-9][0-9].[0-9]) amountloop="n" ; type="a1" ; addzeroz ; clearerror ; code ;;
	# amount entered with both decimal places
	  [0-9].[0-9][0-9]) amountloop="n" ; clearerror ; code ;;
	  [1-9][0-9].[0-9][0-9]) amountloop="n" ; clearerror ; code ;;
	  [1-9][0-9][0-9].[0-9][0-9]) amountloop="n" ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9].[0-9][0-9]) amountloop="n" ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9][0-9].[0-9][0-9]) amountloop="n" ; clearerror ; code ;;
	  [1-9][0-9][0-9][0-9][0-9][0-9].[0-9][0-9]) amountloop="n" ; clearerror ; code ;;
	  [-]) while test "$amount" = "-"
		 do
		   tput cup 9 35 ; echo "  "
		   tput cup 8 35 ; echo "                                        " ; clearerror ; comment
		 done ;;
	  [Hh]) less "$HELP"
	        tput cup 9 35 ; echo "                                          " ;;
	  [Qq]) case $choice in
		[Ss]) printmenus ;;
		[Cc]) printmenuc ;;
		esac ;;
	  *) tput cup 9 35  ; echo "                            "
	     tput cup 21 25 ; echo "BAD amount. Please enter a dollar amount" ;;
        esac
    done
}


####
## add zeros to amount or fee if only the first part of the number is entered
## This is intended to ease use by allowing the user to only have to input
## 11 instead of 11.00 for an $11.00 transaction
####
addzeroz()
{
if test "$type" = "a"
  then
	amount="$amount".00
	tput cup 9 35  ; echo "$amount"
  elif test "$type" = "a1"
    then
	amount="$amount"0
	tput cup 9 35  ; echo "$amount"
  elif test "$type" = "f"
    then
	fee="$fee".00
	tput cup 11 35 ; echo "$fee"
  elif test "$type" = "f1"
    then
	fee="$fee"0
	tput cup 11 35  ; echo "$fee"
  else
	tput cup 21 25 ; echo "INVALID TYPE! TRY AGAIN..."
	if test "$fee" = ""
	  then
		clearerror ; amount
	  else 
		clearerror ; fee
	fi
fi
}




####
## get any single char code from user for the transaction if one exists
##
####
code()		
{
  codeloop=y
  while test "$codeloop" = "y"
    do
	tput cup 10 35	; read code
	if test "$code" = ""
	  then 
		clearerror ; fee
          else
	    case "$code" in
	      [Qq]) case $choice in
		    [Ss]) printmenus ;;
		    [Cc]) printmenuc ;;
		    esac ;;
	      [0-9a-zA-Z]) codeloop="n" ; clearerror ; fee ;;
	      [-]) while test "$code" = "-"
		   do
		     tput cup 10 35 ; echo "  "
		     tput cup 9 35  ; echo "          " ; clearerror ; amount
		   done ;;   
	      [Hh]) less "$HELP"
	            tput cup 10 35 ; echo "                                          " ;;
	      
	      *) tput cup 10 35 ; echo "                     "
	         tput cup 21 25 ; echo "BAD code. Please enter a single letter or number" ;;
	    esac
	fi
    done
}



####
## get fee amt of transaction if one exists
## allow up to $999.99 fee-seems a bit excessive, 
## but who knows?
####
fee()		
{
  feeloop=y
  while test "$feeloop" = "y"
    do
	tput cup 11 35 	; read fee
	if test "$fee" = ""
	  then
	    clearerror ; printvalues
	  else
	    case "$fee" in
	  # allow user to enter amount without ending zeros and fill the zeros in
	    [0-9]) feeloop="n" ; type="f" ; addzeroz ; clearerror ; printvalues ;;
	    [1-9][0-9]) feeloop="n" ; type="f" ; addzeroz ; clearerror ; printvalues ;;
	    [1-9][0-9][0-9]) feeloop="n" ; type="f" ; addzeroz ; clearerror ; printvalues ;;
	  # allow user to enter amount with only one decimal point filled in 
	    [0-9].[0-9]) feeloop="n" ; type="f1" ; addzeroz ; clearerror ; printvalues ;;
	    [1-9][0-9].[0-9]) feeloop="n" ; type="f1" ; addzeroz ; clearerror ; printvalues ;;
	    [1-9][0-9][0-9].[0-9]) feeloop="n" ; type="f1" ; addzeroz ; clearerror ; printvalues ;;
	  # fee amount entered with decimal places	
	    [0-9].[0-9][0-9]) feeloop="n" ; clearerror ; printvalues ;;
	    [1-9][0-9].[0-9][0-9]) feeloop="n" ; clearerror ; printvalues;;
	    [1-9][0-9][0-9].[0-9][0-9]) feeloop="n" ; clearerror ; printvalues ;;
	    [-]) while test "$fee" = "-"
		   do
		     tput cup 11 35 ; echo "  "
		     tput cup 10 35 ; echo "  " ; clearerror ; code
		   done ;;
	    [Hh]) less "$HELP"
	          tput cup 11 35 ; echo "                                          " ;;
	    [Qq]) case $choice in
		  [Ss]) printmenus ;;
		  [Cc]) printmenuc ;;
		  esac ;;
	    *) tput cup 11 35 ; echo "                        "
	       tput cup 21 25 ; echo "BAD fee. Please enter a dollar amount." ;;
            esac
	fi
    done
}


####
## clear any error output from menu screen
##
####
clearerror()
{
  tput cup 20 25 ; echo "                                                                       "
  tput cup 21 25 ; echo "                                                                       "
}




####
## show the user the values he/she entered and ask
## if they are ok...then send to the appropriate
## calc function based on input in step 1 or 
## start allover again
####
printvalues()		
{
    tput cup 4 29  ; echo "You Entered:"
    tput cup 5 23  ; echo "===================="
    tput cup 6 25  ; echo "Check#  : "$checknum""
    tput cup 7 25  ; echo "Date    : "$date"" 
    tput cup 8 25  ; echo "Comment : "$comment""
    tput cup 9 25  ; echo "Amount  : "$amount""
    tput cup 10 25 ; echo "Code    : "$code""
    tput cup 11 25 ; echo "Fee     : "$fee""
echo
echo -en "\nDo you wish to save these values (y/n)? "
read save
if test "$save" = "y"
  then
	case "$choice2" in
	  [Dd]) calcdeposit ;;
	  [Ww]) calcwithdrawal ;;
	esac
  else
	echo -en "\n\nWould you like to start again (y/n)? "
	read nloop
	if test "$nloop" = "y"
          then
		menu
          else
	    	mainmenu
	fi
fi
}



####
## calculate a deposit transaction
##
####
calcdeposit()		
{
trans_type=d
if test "$fee" = ""
  then fee="0.00"		# this is just to make output prettier
fi

deposit="$amount"		
withdrawal=""			# blank withdrawal amount since we are depositing
	# get total from previous transaction
oldtotal="$(tail -1 "$DB" 2> /dev/null | cut -d '^' -f 10)"
echo ""$oldtotal"^"$deposit"^" > "$TMPDB"
	# calc total(without fee) of this new transaction
newtotal="$(tail -1 "$TMPDB" | cut -d '^' -f 1,2 | awk -F '^' '{ print $1+$2 }')"
echo ""$newtotal"^"$fee"" > "$TMPDB"
	# calc total including fee
total="$(cut -d '^' -f 1,2 "$TMPDB" | awk -F '^' '{ print $1-$2 }')"
	# show transaction with new balance to user			
echo
echo "Previous Balance: $"$oldtotal" + Deposited $"$deposit" - Fee: $"$fee" = New Balance: $"$total""
	# make db prettier for output later
if test "$code" = ""
  then code="n/a"
fi

	# get unique record number
chk_rec_num
       
	# put records in date order
sort_by_date


  # prompt to do again...duh?
echo -en "\n\nWould you like to make another deposit (y/n)?"
read dloop
if test "$dloop" = "y"
  then
	menu
  else
	mainmenu
fi
}



####
## calculate a withdrawal transaction
##
####
calcwithdrawal()	
{
trans_type=w
if test "$fee" = ""
  then fee="0.00"		# this is just to make output prettier
fi

deposit=""			# blank deposit amount since we are withdrawing
withdrawal="$amount"
	# get total from previous transaction
oldtotal="$(tail -1 "$DB" 2> /dev/null | cut -d '^' -f 10)"
echo ""$oldtotal"^"$withdrawal"^" > "$TMPDB"
	# calc total(without fee) of this new transaction
newtotal="$(tail -1 "$TMPDB" | cut -d '^' -f 1,2 | awk -F '^' '{ print $1-$2 }')"
echo ""$newtotal"^"$fee"" > "$TMPDB"
	# calc total including fee
total="$(cut -d '^' -f 1,2 "$TMPDB" | awk -F '^' '{ print $1-$2 }')"
	# show transaction with new balance to user			
echo
echo "Previous Balance: $"$oldtotal" - Withdrawn: $"$withdrawal" - Fee: $"$fee" = New Balance: $"$total""
	# make db prettier for output later
if test "$code" = ""
  then code="n/a"
fi

	# get unique record number
chk_rec_num

   	# make sure date gets put in chronological order
sort_by_date


  # you know what this does, i hope...
echo -en "\n\nWould you like to make another withdrawal (y/n)?"
read wloop
if test "$wloop" = "y"
  then
	menu
  else
	mainmenu
fi
}



####
## Generate recoord # and make sure it will be unique
## beefore writing it to the database cuz this will
## really screw things up later if there are duplicate
## records and it will be a REAL pain in the ass! Plus, people
## will prolly get really pissed at the author of CHKBK
## if this happens...
##
####
chk_rec_num()
{
rec_loop="y"
while test "$rec_loop" = "y"
do
	# generate record number by incrementing by one
	# from the last line of existing db
	# we also send complaints from tail if no
	# db exists yet to /dev/null
  i="$(tail -1 "$DB" 2> /dev/null | cut -d'^' -f 1)"
	# j will be new record number, hopefully
  let "j = i + 1"

	# make sure that record isn't already existing
	# if it is, keep increasing number by one until
	# it be the onlyest record wit dat numbah
	# same reason for /dev/null use as above
  while cut -d'^' -f 1 "$DB" 2> /dev/null | grep "^$j" > "$TMPFILE"
    do
      let "j = j + 1"
    done
 	
	# only allow 99999 transaction entries 
  if test "$j" -gt "99999"
    then 
  	echo ; echo
	echo "Sorry, you have too many records :("
	echo ; echo
	echo "I will return you to the previous menu"
	echo "from which you may delete records..."
	echo
	pressenter ; rec_loop=n  
	case $choice in
	  [Ss]) printmenus ;;
	  [Cc]) printmenuc ;;
	esac 
    else
	rec_loop=n
  fi

done
}



####
## Inserts the record to be added to the database in chronological order
##
####
sort_by_date()
{
  # loop control
i=2
  # date for the last line of the current db
eof_date="$(tail -1 "$DB" 2> /dev/null | cut -d '^' -f 4)"

  # date for the line above whatever line we were just on once we
  # start the loop
next_date="$(tail -"$i" "$DB" 2> /dev/null | cut -d '^' -f 4 | head -1)"

  # date of the first line in the current db
tof_date="$(head -1 "$DB" 2> /dev/null | cut -d '^' -f 4)"

  # record number of the last line in the file
eof_rec="$(tail -1 "$DB" 2> /dev/null | cut -d '^' -f 1)"
  
    # if tof_date is empty, there are no records currently existing
    # in the database, so we just write the new data
  if test "$tof_date" = ""
    then 
      last_rec=y ; write_vals

    # if new date is older than the first date in the db, we don't allow
    # this since it's older than the initial entry.
  elif test "$date" -lt "$tof_date"
    then
      echo
      echo "Sorry, but you've entered a date that is older than"
      echo "the date of the first entry in the database. You'll need"
      echo "to enter this manually if that's what you really wish to do."
      pressenter
      case $choice in
        [Ss]) printmenus ;;
        [Cc]) printmenuc ;;
      esac

    # we see if new record is already younger than any other
    # entries in the db...if it is we just need to append it to existing
    # db and no further modifications are needed...yay!!!!
  elif test "$date" -ge "$eof_date"
    then
      last_rec=y ; write_vals

    # if eof date equals top of file date, that means we only have
    # one date currently in the db...this could be do to only one record being
    # in the db already or multiple entries with the same initial start date
  elif test "$eof_date" = "$tof_date"
    then
      last_rec=y ; write_vals

    # new record is some older date in history than the last entry in the
    # database...this SEVERELY complicates things...
    # keep going through the database from the bottom until we find somewhere
    # to enter the new record by date order until we get to the first entry in
    # the database 
  else
    last_rec=n
      # test to see if there are only two diff dates, in the current db
      # since all the previous
      # criteria for where to put the new record haven't been met yet,
      # this means that there are at least 2 records with diff dates and the new
      # record's date is the same as the first record in the db, so we
      # have to modify our criteria for determining next_date by getting 
      # next_date to match eof_date so we can get into the loop below.
    if test "$next_date" = "$tof_date" && test "$eof_date" != "$tof_date"
      then 
        next_date="$eof_date"
    fi

    while test "$next_date" != "$tof_date"
      do
          # get next_date's current value
        next_date="$(tail -"$i" "$DB" 2> /dev/null | cut -d '^' -f 4 | head -1)"

	  # see if new date equal to or greater than the next date in db
        if test "$date" -ge "$next_date"
          then
              # we need to know what line we are at in the db
	    curr_rec="$(tail -"$i" "$DB" 2> /dev/null | cut -d '^' -f 1 | head -1)"

	      # Step 1: reverse db
            sed -n '1!G;h;$p' "$DB" > "$TMPDB2"    

	      # Step 2: cut all lines below current record giving us top portion
	      # only in reversed order
	    sed -n "/^"$curr_rec"^/,\$p" "$TMPDB2" > "$TMPDB3"

	      # Step 3: reverse again to put back in original order
	    sed -n '1!G;h;$p' "$TMPDB3" > "$NEWTMP"

	      # Step 4: send data to be recalculated because it's out of order
	    recalc

     	      # Step 5: append new record values to existing db in their
    	      # respective order datewise
	    write_vals

	      # step 6: make a loop to keep getting the rest of the lines and writing
  	      # them to the end of the file
	    while test "$curr_rec" != "$eof_rec"
  	      do
		  # get line after current line...this starts to form what will
		  # soon be the bottom portion of the db
	        sed -n "/^"$curr_rec"^/{n;p;}" "$DB" > "$TMPDB2"  

		  # get record number of this line so that we can keep moving to 
		  # the next record in the file each time through this loop
		curr_rec="$(cut -d '^' -f 1 "$TMPDB2")"

		  # get old total before all this mess happened
		tmp_oldtotal="$(cut -d "^" -f 2 "$TMPDB2")"

		  # get the total after the transaction occured...
        	  # this is the number that is the actual total for the
        	  # line and is equal tmp_oldtotal of the line that follows it...got it
    		tmp_total="$(cut -d "^" -f 10 "$TMPDB2")"

	       	  # see what type of transaction we had then write important stuff to temp
		if test "$trans_type" = "w"
	 	  then 
		    sub_amt="$withdrawal"
	 	  else
		    sub_amt="$deposit"
		fi
	 	
		echo ""$sub_amt"^"$tmp_oldtotal"^"$tmp_total"^"$fee"" > "$TMPFILE"

		  # test if we had a withdrawal or deposit and act accordingly
    		if test "$trans_type" = "w"
      		  then
          	      # this goes in field 2 of the updated db
        	    new_oldtotal="$(cut -d "^" -f 2,1,4 "$TMPFILE" | awk -F '^' '{ print $2 - $1 - $3 }')"
          	      # this goes in field 10 of the updated db
        	    new_total="$(cut -d '^' -f 3,1,4 "$TMPFILE" | awk -F '^' '{ print $2 - $1 - $3 }')"
      		else
          	      # this goes in field 2 of the updated db
        	    new_oldtotal="$(cut -d "^" -f 2,1,4 "$TMPFILE" | awk -F '^' '{ print $2 + $1 - $3 }')"
          	      # this goes in field 10 of the updated db
        	    new_total="$(cut -d '^' -f 3,1,4 "$TMPFILE" | awk -F '^' '{ print $2 + $1 - $3 }')"
    		fi

        	  # set new field amounts to be rewritten for updated db
    		field1="$curr_rec"
    		field2="$new_oldtotal"
    		field3="$(cut -d '^' -f 3 "$TMPDB2")"
    		field4="$(cut -d '^' -f 4 "$TMPDB2")"
    		field5="$(cut -d '^' -f 5 "$TMPDB2")"
    		field6="$(cut -d '^' -f 6 "$TMPDB2")"
    		field7="$(cut -d '^' -f 7 "$TMPDB2")"
		field8="$(cut -d '^' -f 8 "$TMPDB2")"
    		field9="$(cut -d '^' -f 9 "$TMPDB2")"
    		field10="$new_total"

        	  # actually rewrite the data to temp db...and continue to add
        	  # to the file each following line...this is forming the bottom portion of the database
    		echo ""$field1"^"$field2"^"$field3"^"$field4"^"$field5"^"$field6"^"$field7"^"$field8"^"$field9"^"$field10"" >> "$NEWTMP"
  	      done
		##### end of while statement

	      # get out of loop since we have done what we needed to do
	    break

          # increment $i so we can move to next line and check everything all over again
        else
          let "i = i + 1"    
	fi

      done 
          # let user know we are done recalculating and writing data
        echo
        echo "Done!"     
          # temp db is now updated version of db, so we overwrite old version with it
        cp -f "$NEWTMP" "$DB"

  fi          
}



########
## re-calculate current data because it's out of date order
##
####
recalc()
{
    # it could take a few seconds for sed and awk to do their
    # thing depending on how far back we had to go to recalculate things.
    # so we just print a little message saying that we are working
    # and not locked up
  echo
  echo "Re-calculating transactions. This could take a little while..."

    # set value based on what type of transaction
  if test "$trans_type" = "w"
    then
      sub_amt="$withdrawal"
  else 
      sub_amt="$deposit"
  fi

    # get a new oldtotal value since it was originally based on being
    # taken from the end of the original db, here we get it
    # from the next line above it in date order 
  oldtotal="$(tail -1 "$NEWTMP" 2> /dev/null | cut -d '^' -f 10)"

  echo ""$oldtotal"^"$sub_amt"^" > "$TMPDB"
  if test "$trans_type" = "w"
    then
	# calc total(without fee) of this new transaction
      newtotal="$(tail -1 "$TMPDB" | cut -d '^' -f 1,2 | awk -F '^' '{ print $1-$2 }')"
      echo ""$newtotal"^"$fee"" > "$TMPDB"
	# calc total including fee
      total="$(cut -d '^' -f 1,2 "$TMPDB" | awk -F '^' '{ print $1-$2 }')"
  else
	# calc total(without fee) of this new transaction
      newtotal="$(tail -1 "$TMPDB" | cut -d '^' -f 1,2 | awk -F '^' '{ print $1+$2 }')"
      echo ""$newtotal"^"$fee"" > "$TMPDB"
	# calc total including fee
      total="$(cut -d '^' -f 1,2 "$TMPDB" | awk -F '^' '{ print $1-$2 }')"
  fi
}



####
## Write enter transaction values to database
##
####
write_vals()
{
    # if the new record is gonna be the last record in the db, just append it to the end
  if test "$last_rec" = "y"
    then
	# write vals to database
      echo ""$j"^"$oldtotal"^"$checknum"^"$date"^"$comment"^"$withdrawal"^"$code"^"$fee"^"$deposit"^"$total"" >> "$DB"
  else
	# this will append the new record to a temp db that we will add the younger
        # transactions to after this.  This is basically inserting the new line between
	# the pre-existing data, but putting it in date order
      echo ""$j"^"$oldtotal"^"$checknum"^"$date"^"$comment"^"$withdrawal"^"$code"^"$fee"^"$deposit"^"$total"" >> "$NEWTMP"
  fi
}




####
## print menu for checking balance
##
####
balmenu()
{
balloop=y
while test "$balloop" = "y"
  do
	clear
	tput cup 4 29   ; echo "Balance"
	tput cup 5 23  	; echo "===================="
	tput cup 6 25   ; echo "(C) Current Balance"
	tput cup 7 25   ; echo "(V) View Last 10 "
	tput cup 8 25   ; echo "(D) Entire Database"
	tput cup 9 25   ; echo "(M) Manually Enter"
	tput cup 12 25  ; echo "(Q) Quit"
	tput cup 15 20  ; echo "Enter choice: "
	tput cup 15 34  ; read balchoice

	case $balchoice in
		[Cc]) balloop=n ; curbal ;;
		[Vv]) balloop=n ; tail -10 "$DB" > "$TMPFILE" ; showbal ;;
		[Dd]) balloop=n ; cat "$DB" > "$TMPFILE" ; showbal ;;
		[Mm]) balloop=n ; getnumbal ;; 
	    	[Hh]) less "$HELP" ;;
		[Qq]) balloop=n ; case $choice in
			[Ss]) printmenus ;;
			[Cc]) printmenuc ;;
		      esac ;;
		   *) invaliderror ;;
	esac
  done
}



####
## Decides how many lines to print
##
####
getnumbal()
{
bloop=y
while test "$bloop" = "y"
  do
    echo -n "How many lines would you like to view? "
    read numlines
    case "$numlines" in
	[1-9]) bloop=n ; tail -"$numlines" "$DB" > "$TMPFILE" ; showbal ;; 
	[1-9][0-9]) bloop=n ; tail -"$numlines" "$DB" >"$TMPFILE" ;  showbal ;;
	*) echo -e "\n\nInvalid number of lines...pick a number between 1-99\n"
    esac
  done
}



####
## Displays current balance only
##
####
curbal()
{
echo -e "\n============================================================================================================" > "$TMPDB"
tail -1 "$DB" | cut -d '^' -f 10 | awk -F ' ' '{ printf("\n                                    Current Balance:     $ %-10.2f", $1) 
print("\n\n============================================================================================================")
}' >> "$TMPDB"

cat "$TMPDB"

  # check to see if we are showing balance after successful
  # item deletion or just showing at the user's request
if test "$delete_yes" != "1"
  then
    askprint
fi
}



####
## Formats output for reading
##
####
showbal()
{
awk ' BEGIN {
   printf("\n%-6s %-8s %-8s %-34s %10s %10s %6s %8s %11s \n"),"REC#","CHECK#","DATE","COMMENTS","DEBIT","DEPOSIT","CODE","FEE","TOTAL"
       print("===============================================================================================================")
        }' > "$TMPDB"

	# test to see if any records are in tmpfile, if there are some print them to
	# the screen, else say there are no records
   empty_file="$(cat "$TMPFILE")"
   if test "$empty_file" != ""
     then

         # print every line of file with separator line after it
       for line in "$TMPFILE" ; do
       awk -F'^' '{ printf("%-6s %-8s %-8s %-34s %10.2f %10.2f %6s %8.2f %11.2f \n\n"), $1,$3,$4,$5,$6,$9,$7,$8,$10 
        print ("--------------------------------------------------------------------------------------------------------------")
        }' $line >> "$TMPDB"
       done
	 # database isn't empty so we set this to let us enter the loop 
	 # in ask_num()
       no_records=n

     else
       echo -e "\nThere are no items currently in the database.\n" >> "$TMPDB"
         # avoid loop so we don't ask user what record to 
	 # delete when no records exist.
       no_records=y
   fi

	# only print current balance if user is checking balance and not deleting
if test "$delete_search" != "1"
  then
    	# print current balance again at bottom ;;
    echo -e "\n===============================================================================================================" >> "$TMPDB" 
    tail -1 "$DB" | cut -d '^' -f 10 | awk -F ' ' '{ printf("\n                                    Current Balance:     $ %-10.2f", $1) 
    print("\n\n===============================================================================================================") 
    }' >> "$TMPDB" 
fi
	# echo the database to screen regardless of searching or deleting
cat "$TMPDB" 


	# see if we've already displayed the searched for items once
	# if so, go ahead and move towards actually deleting them
	# if not, either display the the items and ask which one needs
	# to be deleted or ask user if he/she wants to print the search if 
	# he/she is not deleting and just searching... 
if test "$pass" != "1"
  then
    case $choice2 in
      [Xx]) ask_num  ;;
         *) askprint ;;
    esac
  else
    confirm_delete
fi

}



####
## user search menu
##
####
searchmenu()
{
searchloop="y"
while test "$searchloop" = "y"
  do
	clear
	tput cup 5 25   ; echo "Enter search: ___________________________"
	tput cup 6 25   ; echo '(ex. "010199", "check", "Power bill")'
	tput cup 10 25  ; echo '(Hint: Type "L" to view a list of entries)'
	tput cup 5 39   ; read search

	if test "$search" = ""
	  then
	    case $choice in
		  [Ss]) printmenus ;;
		  [Cc]) printmenuc ;;
	    esac 
	  elif test "$search" = "q"
	    then
	      case $choice in
		  [Ss]) printmenus ;;
		  [Cc]) printmenuc ;;
	      esac 
	  elif test "$search" = "Q"
	    then
	      case $choice in
		  [Ss]) printmenus ;;
		  [Cc]) printmenuc ;;
	      esac 
	  elif test "$search" = "L"
	    then
	      case $choice2 in
			# use variable delete_search to control whether to print current balance in showbal()
                [Xx]) clear ; cat "$DB" > "$TMPFILE" ; delete_search=1 ; showbal ; delete_search=0 ;;
	           *) clear ; cat "$DB" > "$TMPFILE" ; delete_search=0 ; showbal ;;
              esac
	  else
	    searchdb
	  fi
  done
}




####
## Search the database for a user defined string
##
####
searchdb()
{
  grep -i "$search" "$DB" > "$TMPFILE"
  read results < "$TMPFILE"
  if test "$results" != ""
    then
      clear 
      case $choice2 in
		# use variable delete_search to control whether to print current balance in showbal()
	[Xx]) delete_search=1 ; showbal ; delete_search=0 ;; 
           *) delete_search=0 ; showbal ;;
      esac 
    else
      clear ; tput cup 5 25  ; echo -en "Sorry, but your search returned no results...\n"
      pressenter
  fi
}



####
## Ask user for record number to be deleted
##
####
ask_num()
{
del_line_loop=y

if test "$no_records" != "y"
  then
      # get the record number to delete 
    while test "$del_line_loop" = "y"
      do
	echo -n "Enter the record number of the item you wish to delete: "
	read record

	  # allow user to back out of screen by typing q, Q, or just hitting enter
 	if test "$record" = ""
    	  then
      	    case $choice in
	      [Ss]) printmenus ;;
	      [Cc]) printmenuc ;;
      	    esac 
  	elif test "$record" = "q"
          then
            case $choice in
	      [Ss]) printmenus ;;
	      [Cc]) printmenuc ;;
            esac 
        elif test "$record" = "Q"
          then
            case $choice in
	      [Ss]) printmenus ;;
	      [Cc]) printmenuc ;;
            esac

	  # user didn't chicken out and actually wants to delete
	  # a record, so now we check to see how well he/she
	  # can read and type...
  	else
    	  get_line="$(grep -i "^$record" "$TMPFILE" > "$NEWTMP")"
    	  line_is="$(cat "$NEWTMP")"
    	  if test "$line_is" = ""
            then
              echo  -e "\nSorry, but you entered an incorrect record number...Try again...\n"
          else
	    cp -f "$NEWTMP" "$TMPFILE" ; del_line_loop=n ; show_num
    	  fi
  	fi
    done 
# end while loop

    # give user the option to print that there are no records in the db
    # as proof to whomever he/she has something to prove to
  else
    askprint
fi
}



####
## Now that the user has proven his/her proficiency at reading,
## typing, and all around general ability to follow instructions,
## we will are happy to oblige and proceed to show the
## line of record to be removed from the db 
##
####
show_num()
{
  # see whether one or more items will be deleted
  # this is only useful for so we can use proper
  # English in our user prompt...not very important...
  # especially since chkbk currently has no way of deleting
  # more than one line at once, so this should always be only
  # one line here, but hey, ya never know! plus, i'm planning
  # for the future here...
numlines="$(wc -l "$TMPFILE" | cut -d " " -f8)"
if test "$numlines" -gt "1"
  then
    clear
    echo -e "These records will be deleted:\n"
	# pass variable controls if ask_num() or askprint() get called in showbal()
    pass=1
	# send the lines to be deleted back to the showbal function
	# (this is basically the entire point of this function)
    showbal
	# reset pass variable so we don't get stuck in loop at ask_num()
    pass=0
  else
    clear
    echo -e "This record will be deleted:\n"
	# pass variable controls if ask_num() or askprint() get called in showbal()
    pass=1
	# send the line to be deleted back to the showbal function
	# (this is basically the entire point of this function)
    showbal
	# same reason as above
    pass=0
fi
}



####
## Confirm deletion of file
##
####
confirm_delete()
{
confirm_loop=1
  # set pass variable to 0, so the user gets prompted again next time
pass=0

while test "$confirm_loop" -lt "4"
  do
    echo -n "Are you sure you really want to remove this record? (y/n) "
    read confirm
	# add a line to make it prettier if user has to be asked again
    echo
	# test to see if the user said "yes"
    if test "$confirm" = "y"
      then
	  # the user answered yes and wants to go on, so we do...
	confirm_loop=5 ; del_item
	
	# user is obviously scared, so we just send him/her back
	# to the previous menu
    elif test "$confirm" = "n"
      then
        confirm_loop=5
        case $choice in
          [Ss]) printmenus ;;
          [Cc]) printmenuc ;;
        esac
      	
	# increment confirm_loop by one, this gives the user 3 chances to 
	# hit either y or n...i think that should be a sufficient amount of 
	# attempts at that....don't you? If he/she can't manage we send him/her
	# back to the main menu as punishment
    else
      let "confirm_loop = confirm_loop + 1"

        # test to see is confirm_loop is more than 3 and if it is send
        # the numbskull at the keyboard back to main menu
      if test "$confirm_loop" -gt "3"
        then 
    	  confirm_loop=5 ; mainmenu
      fi
    fi
  done

}



####
## Delete item from db...muhahaha
##
####
del_item()
{
  # save the original record number...this will come in
  # handy later on...you'll see...
original_record="$record"

  # set pass back to zero for showbal()
pass=0

  # get amount to be deleted defaulting to a deposit transaction
sub_amt="$(cut -d ^ -f 9 "$TMPFILE")"

  # get fee amount if any
fee_amt="$(cut -d '^' -f 8 "$TMPFILE")"

  # test whether the transaction was actually a deposit
  # if not, get amount to be deleted from withdrawal field
if test "$sub_amt" = ""
  then
	# set variable to denote which typo de transaction
	# we have..."w" stands for withdrawal
    trans_type=w 
	# this is the withdrawal field
    sub_amt="$(cut -d ^ -f 6 "$TMPFILE")"
  else
	# else set transaction variable to type "d" for, you
	# guessed it, deposit...  
    trans_type=d
fi

  # get end of file so we can tell the while loop when to stop looping
eof="$(tail -1 "$DB" | cut -d '^' -f 1)"

while test "$record" != "$eof"
  do
	# cut the record following the one we are deleting
	# this allows us to get the amount we need to calculate with
	# i.e. the old total and allows us to continue to get the
	# next line in the db until there are no more lines 
    sed -n "/^"$record"^/{n;p;}" "$DB" > "$TMPDB"

	# well, this is what really allows us to keep getting new
	# lines until we have no more...
    record="$(cut -d '^' -f 1 "$TMPDB")"
	# get the total before the transactions occured
	# so that we can know what number to start with to either add
	# to or subtract from
    tmp_oldtotal="$(cut -d "^" -f 2 "$TMPDB")"
	# get the total after the transaction occured...same reason as 
	# above, but this is the number that is the actual total for the
	# line and is equal tmp_oldtotal of the line that follows it...got it
    tmp_total="$(cut -d "^" -f 10 "$TMPDB")"
	# store the values into a temporary file so we can do some
	# calculations on them with the wonderful awk program
    echo ""$sub_amt"^"$tmp_oldtotal"^"$tmp_total"^"$fee_amt"" > "$TMPFILE"

	# test if we had a withdrawal or deposit and act accordingly
    if test "$trans_type" = "w"
      then
	  # if we withdrew $$, then we need to add it back, right?
	  # this goes in field 2 of the updated db...also add back fee amount
        new_oldtotal="$(cut -d "^" -f 2,1,4 "$TMPFILE" | awk -F '^' '{ print $2 + $1 + $3 }')"
	  # this goes in field 10 of the updated db
	new_total="$(cut -d '^' -f 3,1,4 "$TMPFILE" | awk -F '^' '{ print $2 + $1 + $3 }')"
      else 
	  # we deposited, so now we need to take the money back out :(
	  # this goes in field 2 of the updated db
        new_oldtotal="$(cut -d "^" -f 2,1,4 "$TMPFILE" | awk -F '^' '{ print $2 - $1 + $3 }')"
	  # this goes in field 10 of the updated db
	new_total="$(cut -d '^' -f 3,1,4 "$TMPFILE" | awk -F '^' '{ print $2 - $1 + $3 }')"
    fi
 	
	# set new field amounts to be rewritten for updated db    
    field1="$record"
    field2="$new_oldtotal"
    field3="$(cut -d '^' -f 3 "$TMPDB")"
    field4="$(cut -d '^' -f 4 "$TMPDB")"
    field5="$(cut -d '^' -f 5 "$TMPDB")"
    field6="$(cut -d '^' -f 6 "$TMPDB")"
    field7="$(cut -d '^' -f 7 "$TMPDB")"
    field8="$(cut -d '^' -f 8 "$TMPDB")"
    field9="$(cut -d '^' -f 9 "$TMPDB")"
    field10="$new_total"
	
	# actually rewrite the data to temp db whilst we do other stuff later...and continue to add
	# to the file each follwoing line...this is forming the bottom portion of the database
	# that exists below the line containing the record we are removing...it will rejoin the
	# top portion momentarily...
    echo ""$field1"^"$field2"^"$field3"^"$field4"^"$field5"^"$field6"^"$field7"^"$field8"^"$field9"^"$field10"" >> "$NEWTMP"
  done 
##### end of while statement

	# get rid of original record from temp db otherwise we would be doing all this work
	# and still have the original record in the db, but have altered totals..no bueno
    grep -v "^$original_record" "$NEWTMP" > "$TMPDB"

	# this cuts all the records above the one being deleted so we can add them
	# to the ones below the deleted line...it accomplishes this by: reversing
	# all the lines in the original db, writes them to a file, cuts the line
	# which will soon no longer exist and all the lines below it,
	# writes them to a file, deletes the line with the record being deleted
	# in it, writes to a file, reverses them again so that they are in their original order,
	# (sigh) appends the temp db above to the end of this temp db...this
	# seems like a ridiculous amount of work, but i didn't know how to get sed to just cut
	# above the line staight up...if anyone has suggestions on how to do this 
	# another way, I'm all ears...

	
	# Step 1:
	# must use -n switch here so that sed doesn't print what it's doing
	# after every line-only the final version gets printed this way which 
	# is what we want...this step reverses the order of the whole
	# original db and prepares us for step 2...
    sed -n '1!G;h;$p' "$DB" > "$TMPDB2" 

	# Step 2:
	# cut everything from the reversed version of the original db starting at
	# the original record number that was to be deleted...this gives us a
	# reversed version of the top portion which we will be adding to the bottom
	# version that we already have...bottom version is currently stored in
	# the "$TMPDB" variable above...needs -n switch obviously or else i wouldn't
	# have used it ;) 
    sed -n "/^"$original_record"^/,\$p" "$TMPDB2" > "$TMPDB3"

	# Step 3:
	# removes the line containing the original record number from the reversed
	# version of db leaving just the top protion above that record in reversed
	# order...DON'T use -n switch here else it will create a blank file!! ugh!
    sed '1d' "$TMPDB3" > "$TMPDB2" 

	# Step 4:
	# this is the final step in this particular process...it simply re-reverses
	# the order of the records so that they are back to their original order and
	# writes them to yet another temp file that we will append the bottom
	# half of the updated database (see "$TMPDB") to and create the brand new
	# and improved updatd db...
    sed -n '1!G;h;$p' "$TMPDB2" > "$SUBTMP"

	# Step 5:
	# i know i said step 4 was the last step, but i was really just talking about
	# the whole sed command part of it...it's not over yet...just a few more things
	# to take care of before we have our finished version...
	# now we simply append bottom portion to top portion
    cat "$TMPDB" >> "$SUBTMP"

	# Step 6:
	# and FINALLY, overwrite old database with updated version...whew!!
    cp -f "$SUBTMP" "$DB"	

  # continue on to make sure everything worked as planned
record_gone_byebye

}



####
## Ask user if they wanna print and to where
##
####
askprint()
{
ploop=y
echo -en "\n\nDo you wanna print? (y/n) " ; read answer
if test "$answer" = "y"
  then
	while test "$ploop" = "y"
	  do
		echo -e "\n (F) print to file balance.txt\n (P) print to system default printer" ; read answer
		case "$answer" in
  	  	[Ff]) ploop=n ; printfile ;;
  	  	[Pp]) ploop=n ; printpr ;; 
  	  	*) echo "INVALID IPNUT" ; pressenter ;; 
		esac
	  done  
  else
      # this makes it so we don't get prompted to search again if 
      # we are only checking balance and already searched o deleted
    case $choice2 in
	# choice2 [Cc] refers to the check balance choice...tadd-oww
      [Cc]) searchloop=n ;;
         *) echo -en "\nDo you wanna search again? (y/n) "
            read searchloop ;;
    esac
fi
}



####
## Check to amke sure the record that was supposed to be deleted 
## really was
####
record_gone_byebye()
{
  # search the db to see if the record is not there
gone_byebye="$(grep "^$original_record" "$DB")"
  # test to see if we found a match
if test "$gone_byebye" = ""
  then
      # when, as expected, (cough) we find no match because the
      # the record was successfully removed, we print a nifty message
      # saying so, pat ourselves on the back, and celebrate quickly
      # before we continue with our work. When we are finished
      # doing our celebration dance, we set variable delete_yes to 1
      # to help us control which action to take in curbal (like don't 
      # run askprint). then run curbal, then set var back to 0. Then
      # move on to the next step of asking to delete another record.
    delete_success ; delete_yes=1 ; curbal ; delete_yes=0 ; delete_again 
  else
    echo -e "\nThere was an error removing the record from the database!"
    echo -e "Please try again or manually edit file (not recommended)\n"
    pressenter
fi
}
 


####
## report that the record deletion was a success
## which as we know, it was :)
####
delete_success()
{
clear
echo -e "\nRecord was successfully removed from the database!\n\n"
}



####
## Prompt user if he/she wants to delete another record
##
####
delete_again()
{
  # this should be self-explanatory
echo -en "\n\nWould you like to delete another record? (y/n) "
read delete_another

  # is the user wishes to continue removing stuff from the
  # database we take them back to the searchmenu, but
  # i think he/she really needs to look at why he/she is
  # entering so many incorrect transactions...`
if test "$delete_another" = "y"
  then
    searchmenu
  else
      # user wishes to return to menu screen and perhaps get on
      # with life, so we oblige
    case $choice in
      [Ss]) printmenus ;;
      [Cc]) printmenuc ;;
    esac
fi
}



####
## Print output to file "$OUTPUTF"
##
####
printfile()
{
mv -f "$TMPDB" "$OUTPUTF"
}



####
## Print output to printer
##
####
printpr()
{
 lpr -o landscape -o cpi=11 "$TMPDB" 
	# other possibilities? uncomment to try them
	# lp -o cpi=16 "$TMPDB" ;; 
	# mpage -1 -l -I10 balance.txt |lpr
}



####
## ask where to backup db to
##
####
pathb()
{
  echo -en "\n\nEnter the path of where to backup to: ["$DB_DEF"] "; 
  read path;
  if test -d "$path"
    then
	pathisadir
    else
        checkpath
  fi
}



####
## ask where to restore db from
##
####
pathr()
{
  echo -en "\n\nEnter the path of the database to restore: ["$DB_DEF"] "; 
  read path;
  if test -d "$path"
    then
	pathisadir
    else
        checkpath
  fi
}


####
## Print error message if path entered is a directory not a file
##
####
pathisadir()
{
  echo ; echo "Sorry, but the path you entered is a directory."
  echo "You must specify a filename for the database."
  case $choice in
    [Bb]) pathb ;;
    [Rr]) pathr ;;
  esac
}



####
## check to see if path is valid
##
####
checkpath()
{
	### needs to test if file exists
if test "$path" = ""
  then
	if test -e "$DB_DEF"
	  then
		origexist
	  else
		case $choice in
		  [Bb]) copyfile ;;
		  [Rr]) nodb ;;
		esac		
	fi
  elif test -e "$path"
	then	# set default path to path entered for ease of admin later
	  DB_DEF="$path" ; origexist
  elif test "$path" = "q"
	then
	  mainmenu
  else 	# if path entered doesn't exist, write it for backup or error for restore
	case $choice in
	  [Bb]) DB_DEF="$path" ; copyfile ;;
	  [Rr]) nodb ;;
	esac
fi
}



####
## if main database(not backed-up db) exists, prompt to overwrite else just go
## to back it up
####
origexist()
{
if test -e "$DB"
  then
	overwrite
  else
	copyfile
fi 
}



####
## prompt to overwrite database
##
####
overwrite()
{
echo -en "A database file already exists.\nOverwite?? (y/n): ";
read answer;
case $answer in
  [Yy]) copyfile ;;
  [Nn]) nocopy ; pressenter ;;
     *) case $choice in
	  [Bb]) pathb ;;
	  [Rr]) pathr ;;
	esac
	 
esac
}



####
## write new backup file or overwrite db from previous backup file
##
####
copyfile()
{
case $choice in
  [Bb]) cp -f "$DB" "$DB_DEF" ; verify	;;
  [Rr])	cp -f "$DB_DEF" "$DB" ; verify	;;
esac
}



####
## tell the user we aren't going to do anything to his/her data
## if he/she says not to
####
nocopy()
{
echo -e "\nOk, I won't overwrite existing data\n"; 
}



####
## test to see if data was written
##
####
verify()
{
verify="$(diff "$DB_DEF" "$DB")"; 	
if test "$verify" = ""
  then
	case $choice in
 	[Bb]) if test -e "$DB_DEF"
		then
	          echo -e "\nDatabase successfully backed up to "$DB_DEF"\n" ; pressenter
		else 
		  pressenter
	      fi ;;
	[Rr]) if test -e "$DB"
		then
		  echo -e "\nDatabase successfully restored to "$DB"\n" ; pressenter
	        else
		  pressenter
	      fi ;;
	esac 
  else
	case $choice in
	[Bb]) echo -e "\nDatabase could not be backed up...";
		echo -e "\nDo you have permissions to write here??\n"; ;;
	[Rr]) echo -e "\nDatabase could not be restored...";
		echo -e "\nDo you have permissions to write here??\n"; ;;
	esac
fi 
}



####
## Let the user know that we couldn't find the file he/she asked for
##
####
nodb()
{
echo -e "\nSorry, but I couldn't find a database in that location";
echo -e "Are you sure you spelled it right??\n"
case $choice in
  [Bb]) pathb ;;
  [Rr]) pathr ;;
esac
}



####
## Displays message telling the user to he/she needs to create a new 
## database when checking balance and no db exists yet.
####
neednewdb()
{
  echo 
  echo "Sorry, I can't find a database" 
  echo "To create a new database, choose Deposit from this menu"
  pressenter
}



####
## Invalid input error message
##
####
invaliderror()
{
  tput cup 15 34 ; echo "                                                  "
  tput cup 20 10 ; echo "                                                  "
  tput cup 21 10 ; echo "                                                  "
  tput cup 22 10 ; echo "                                                  "
  tput cup 20 20 ; echo "***INVALID INPUT***"
  tput cup 21 20 ; echo "Press <ENTER> to continue"
  tput cup 15 34 ; read prompt
}



####
## Pause the screen to read messages
##
####
pressenter()
{
echo -e "\nPress <ENTER> to continue" ; read prompt
}

usage()
{
echo -e "\nUsage:\n\n      ChkBk does not need any arguments:
	To run ChkBk:
	- change to the directory where chkbk is located:
		cd /home/<username>/chkbk-<Version>
	- run the script chkbk
		./chkbk

      The recommended terminal size settings to use ChkBk are 115x40.
	The program should look fine at the usual default settings of 80x24
	but will look ugly when you try to check your balance.

	Menu Navigation
	- To choose a feature just select the letter surrounded by
	  parentheses-except for the copyright logo (C), obviously.
	- Typing '"h"' in most any menu field will bring open the help file.
	- When in the deposit or withdrawal screens for savings or checking,
	  enter a '"q"' in any field and you will exit back to the menu.
	  If you make a mistake in one of the fields just hit enter and either
	  the field will clear or move to the next field.  If the cursor moves
	  to the next field just type a dash "-" and the previous field will
	  cleared and the cursor will move there for you to re-enter the data.
	- When in doubt of how to leave a screen type a '"q"'

	CONTACT
	 - To contact the author or to report a bug, send a nice, friendly
	   email to freesol29 AT gmail DOT com.

Licensed under the GPL
(C) Copyright 2005 Stephen M. Kaiser\n\n"
}
######################## End Function Section #################


##################### Begin Program ###########################
trap "rm "$TMPDB" "$TMPDB2" "$TMPDB3" "$TMPDB4" "$TMPFILE" "$NEWTMP" "$SUBTMP" 2> /dev/null; exit" 0 1 2 3


if [ "$1" != "" ]
  then
	usage         
        exit 127
  else
  	mainmenu
fi

# yes, that's it!
##################### End Program Section #####################