Jag har problem w / this script. Menyn inte komma upp till snabba mig. Jag har arbetat med det i dagar och fortfarande inte kan se problemet. Vem som helst kan hjälpa till, skulle jag uppskatta det. Möjliga problem med syntax och samtal funktion.
Thks ...

TMP \u003d $ tapemgr / rpts / tmp

# TAPE MANAGER HUVUDMENY
samtidigt: do
klar
tapemgr_Main_Menu ()
(
echo "Tejp Management System Menu"
echo "Detta system används för att rapportera Legato ERV Offsite och band Returned"

1. BUR IPS Tape Offsite Report
2. BUR IPS TAPE Returns från ERV
q. Avsluta eller Ctrl-C
echo "Välj ett alternativ 1,2, q"
Läs alternativ
fallet $ alternativ i
1) Tapes_Offsite_Menu ();;
2) Tapes_Return_Menu ();;
q) exit;;
ESAC
gjord
)
Tapes_Offsite_Menu ()
(
echo "Välj ett alternativ för Offsite rapport -" (W) "eekly" (M) "onthly" (B) 'oth "
Läs alternativ
fallet $ alternativ i
W) Weekly_Offsite ();;
M) Monthly_Offsite ();;
B) Both_Offsite ();;
x) tapemgr_Main_Menu ();;
ESAC
)
Tapes_Return_Menu ()
(
echo "Tapes Avkastning Meny"
echo "Enter IPS band" (V) olumes eller (D) ates att vara tillbaka ""
echo "R - Return to Main Menu"
fallet $ SEL i
V) Volume_Returns ();
D) Volume_Date_Returns ();
r) tapemgr_Main_menu ();
ESAC
)
Volume_Returns ()
(
echo "Enter Volymerna skall återlämnas" vara $ input
mminfo-q volym \u003d $ 1-q location \u003d ERV | awk ( 'print $ 1')
# If [location \u003d! "ERV"]; sedan
echo "volym existerar inte på ERV"
# Fi
)
Volume_Date_Returns ()
(
echo "Return of all" "expired" "ERV Tapes '(y / n)"
# Om $ 1 \u003d "y", då
mminfo-q volrent \u003d löpte-q location \u003d ERV-R volym, volretent, pool | Fler> $ TMP / vol.out
echo "Denna lista korrekt lista över band som skall återsändas?
# Om $ 1 \u003d\u003d "y", sedan nästa
echo "Ange datum för band skall återlämnas" (/ mm dd / åå eller skriv i dag, i går, förra veckan) ' "vara $ 1
# Om $ 1 \u003d?
mminfo-q volretent \u003d $ 1-q location \u003d ERV-R volym, volrent, pool | mer $ TMP / vol.out
# Fi
)
# # Kör Weekly Offsite Report

Weekly_Offsite ()
(
echo "$ dat BURS Weekly Offsite STK9310 Tape rapporten"> $ WOFFSITE
mminfo-r volym, volretent, pool, location-Q pool \u003d "COE Full Offsite Weekly"-q location \u003d "STK9310">> $ WOFFSITE> $ EJECT_TAPES
echo "Totalt WEEKLY offsite IPS band" | wc-l | $ WOFFSITE> $ OFFSITE_REPORT> $ EMAIL_NOTICE
TMP_FILES ()
FTP_FILES ()
EMAIL_NOTIFICATION ()
)

# # Kör Månadsrapport

Monthly_OffSite ()
(
echo "$ dat BURS Weekly Offsite STK9310 Tape rapporten"> $ MOFFSITE
mminfo-r volym, volretent, pool, location-Q pool \u003d "COE Full Offsite Monthly"-q location \u003d "STK9310">> $ MOFFSITE> $ EJECT_TAPES
echo "totala månatliga Offsite IP Tapes" | wc-l $ MOFFSITE> $ OFFSITE_REPORT> $ EMAIL_NOTICE
TMP_FILES ()
FTP_FILES ()
EMAIL_NOTIFICATION ()
)

# # # # Både eller något band som ska offsite månad eller vecka
Both_Offsite ()
(

echo "$ dat BURS Alla Offsite STK9310 Tape rapporten"> $ BOFFSITE
mminfo-r volym, volretent, pool, location-Q pool \u003d "COE Full Offsite Monthly"-q location \u003d "STK9310"> $ BOFFSITE> $ EJECT_TAPES
mminfo-r volym, volretent, pool, location-Q pool \u003d "COE Full Offsite Weekly"-q location \u003d "STK9310">> $ BOFFSITE>> $ EJECT_TAPES
echo "Totalt IPS Tapes går Offsite" | wc-l $ BOFFSITE>> $ BOFFSITE>> EMAIL_NOTICE
TMP_FILES ()
FTP_FILES ()
EMAIL_NOTIFICATION ()
)

# # # Send Email Notification

EMAIL_NOTIFICATION ()
(
echo "mail-funktion"
)

# Skapa tmp-filer för cuting och klistra
TMP_FILES ()
(
cut-c1-8 $ EJECT_TAPES | Sortera 1> $ TMP / eject_sort.out
)
# FTP filer TO HOST SERVER
FTP_FILES ()
(
ftp-n $ FTP_HOST <<END_SCRIPT
citerar USER $ FTP_LOGIN
citerar PASS $ FTP_PWD
END_SCRIPT
)
bash-2.05 $