#!/bin/ksh -x
DIR_Eta=/home/eta/MesoEta/posfig
DIR_EXEC=${DIR_Eta}/scripts
DIR_SCR_FTP=${DIR_EXEC}/ftp
DIR_GIF=${DIR_Eta}/gif
DIR_SKT_PNG=${DIR_Eta}/SkewT/png

DIR_IPMET=./Eta10km/gif
icn=$1
serv_pub=pcpesq10.ipmet.unesp.br

fserv_pub=1
Eta_ftp_sector()
#!/bin/ksh -x
{
ICN=$1
ARQ=$2
SOURCE_DIR=$3
MAQUINA=$4
TARGET_DIR=$5
cd ${DIR_SCR_FTP}
cat <<EOT > ${DIR_SCR_FTP}/put_SECTOR
user etamodel Modelo
lcd ${SOURCE_DIR}
cd ${TARGET_DIR}
mkdir ${ICN}
cd ${ICN}
mput *${ARQ}
quit
EOT
#
ftp -in $MAQUINA <${DIR_SCR_FTP}/put_SECTOR > ${DIR_SCR_FTP}/put_SECTOR.txt
rm -f ${DIR_SCR_FTP}/put_SECTOR
cd ${WRKDIR}
}

if ((${fserv_pub}==1)) ; then
 Eta_ftp_sector $icn .gif ${DIR_GIF} ${serv_pub} ${DIR_IPMET}
fi


#if ((${fserv_pub}==1)) ; then
# Eta_ftp_sector $icn .png ${DIR_SKT_PNG} ${serv_pub} ${DIR_WEB}
#fi