:
##########################################################################
# Shellscript:	transfer.dos - Datei zum Host uebertragen
# Projekt    :	SysUtil
# Autor      :	Heiner Steven (heiner.steven@odn.de)
# Erstellung :	03.02.94
# Category   :	System Administration
# $Id: transfer.dos,v 1.1 1999/07/06 20:44:21 heiner Exp $
##########################################################################
# Beschreibung:
##########################################################################
# Aenderungen:
#
# Nr    Datum     KZ	Beschreibung
# ========================================================================
# 0000	25.01.94  stv	Neuerstellung
##########################################################################

PN=`basename "$0"`			# Program name
VER=`echo '$Revision: 1.1 $' | cut -d' ' -f2`

if [ \( $# -lt 1 \) -o \( ! -r "$1" \) ]
then
    echo "Aufruf: $PN Datei [DOS-Diskettenlaufwerk]"
    exit 1
fi

Datei="$1"
Floppy="${2:-A:}"
Base=`basename $Datei`

if [ -d ${DISKSPOOL:=/u/disk} -a -w $DISKSPOOL ]
then
    cp "$Datei" $DISKSPOOL
else
    doscp "$Datei" "$Floppy"
fi

if [ $? -eq 0 ]
then
    rm -f "$Datei"
else
    echo "$PN: transfer nicht erfolgreich!" >&2
    exit 1
fi
exit 0