################################################################################
#
#  Script-File   : ftp_put.sh
#  Author        : Georg
#  Creation date : 21.01.1998
#  Description
#
#    This Script uses ftp to send files to foreign systems
#
#    Input parameter:
#       $1 = Destination Node
#       $2 = Username
#       $3 = Password
#       $4 = Destination directory
#       $5 = Filename
#
#  Changes
#
################################################################################
#-------------------------------------------------------------------------------
#  Check input parameter
#-------------------------------------------------------------------------------
if [ "$#" -lt 5 ]
then
  echo ' '
  echo 'Error: Not enough parameter in ftp_send.com!'
  echo ' Sourcenode                      : ' $1
  echo ' Username                        : ' $2
  echo ' Password                        : ' $3
  echo ' Directory z.B /pfad/pfad/   : ' $4
  echo ' Filename eg. "*.csv"         : ' $5
  echo 'Execution terminated!'
  echo ' '
  exit 1
fi
#---------------------------------------------------------------
# Define transfer function
#---------------------------------------------------------------
transfer()
{
 echo "[4m                                                                                [0m"
 echo "Transfer" $5  "von [1m" $1 "[0m" $4
 echo "[4m                                                                                [0m"
 ftp -i -n -v <<EOJ
 open $1
 user $2 $3
 binary
 cd   $4
 put  $5
 close
 quit
EOJ
}
#---------------------------------------------------------------
# Transfer data
#---------------------------------------------------------------
transfer $1 $2 $3 $4 $5
exit