home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1994 March
/
CHIP0394.BIN
/
info
/
softserv
/
fibu40
/
fibuinst.bat
< prev
next >
Wrap
DOS Batch File
|
1994-07-16
|
5KB
|
111 lines
ECHO OFF
REM YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYY
CLS
ECHO OFF
CLS
ECHO ╔══════════════════════════════════════════════════════════════╗
ECHO ║ Finanzbuchhaltung 4.x Installationsprogramm ║
ECHO ║ Copyright 1989-94 STYX GmbH, Friedenstr. 9, D-85609 Aschheim ║
ECHO ╚══════════════════════════════════════════════════════════════╝
IF "%1" == "" GOTO FEHLER
SET START=A:
IF "%2" == "" GOTO WEITER
SET START=%2
IF %START% == A: GOTO WEITER
IF %START% == a: GOTO WEITER
IF %START% == B: GOTO WEITER
IF %START% == b: GOTO WEITER
IF %START% == D: GOTO WEITER
IF %START% == d: GOTO WEITER
IF %START% == E: GOTO WEITER
IF %START% == e: GOTO WEITER
IF %START% == F: GOTO WEITER
GOTO FEHLER
:WEITER
ECHO ┌──────────────────────────────────────────────────────────────┐
ECHO │Installation: │
ECHO ├──────────────────────────────────────────────────────────────┤
IF NOT EXIST FIBUO.* ECHO │ Update │
IF EXIST FIBUO.PRG ECHO │ Grund-Programm │
IF EXIST FIBUO.OP ECHO │ Offene-Posten-Verwaltung │
IF EXIST FIBUO.MAH ECHO │ Mahnungswesen │
IF EXIST FIBUO.MAN ECHO │ Mandanten-Verwaltung │
IF EXIST FIBUO.DEM ECHO │ Demo-Version │
IF EXIST FIBUO.NOV ECHO │ Netzwerk (Novell) │
ECHO ├──────────────────────────────────────────────────────────────┤
ECHO │ Quelle: %START% Ziel: %1 Directory: \FIBU │
ECHO └──────────────────────────────────────────────────────────────┘
PAUSE
IF EXIST FIBUO.PRG GOTO START
IF EXIST FIBUO.DEM GOTO START
IF EXIST %1\FIBU\FIBU.EXE GOTO START
ECHO .
ECHO Fehler:
ECHO Für die Installation des Updates (oder Modules) muß die Grundversion des
ECHO Programmes bereits auf der Festplatte installiert sein
GOTO ENDE
:START
DATE
COPY FIBUDIR.LIB %1\FIBUDIR.EXE > NUL:
%1\FIBUDIR %1 F
IF ERRORLEVEL 1 GOTO ENDE
DEL %1\FIBUDIR.EXE
%START%
echo Dateien werden kopiert, bitte etwas Geduld ...
ECHO -------- Start Installation FIBU -------- >>%1\FIBU\INSTALL.DAT
ECHO Ziel-Laufwerk: %1 Directory: \FIBU >>%1\FIBU\INSTALL.DAT
DIR >>%1\FIBU\INSTALL.DAT
DIR %1\*.* >>%1\FIBU\INSTALL.DAT
DIR %1\FIBU\*.* >>%1\FIBU\INSTALL.DAT
IF EXIST %1\FIBU\FIBUO.DEM DEL %1\FIBU\FIBUO.DEM >>%1\FIBU\INSTALL.DAT
COPY FIBUINST.BAT %1\FIBU >>%1\FIBU\INSTALL.DAT
COPY FIBU40.LIB %1\FIBU\FIBU40.EXE >>%1\FIBU\INSTALL.DAT
IF EXIST FIBUO.* COPY FIBUO.* %1\FIBU >>%1\FIBU\INSTALL.DAT
%1
CD \FIBU >>%1\FIBU\INSTALL.DAT
ECHO Dateien werden dekomprimiert .....
FIBU40 <FIBUINST.BAT >>INSTALL.DAT
IF ERRORLEVEL 1 GOTO FEHLER2
IF EXIST FORMULAR.MA1 GOTO KFORM
COPY LEER.FOR FORMULAR.KON >>INSTALL.DAT
COPY LEER.FOR FORMULAR.MA1 >>INSTALL.DAT
COPY LEER.FOR FORMULAR.MA2 >>INSTALL.DAT
COPY LEER.FOR FORMULAR.MA3 >>INSTALL.DAT
COPY LEER.FOR FORMULAR.ZAH >>INSTALL.DAT
:KFORM
DEL FIBU40.EXE
IF NOT EXIST FARBE.DEF REN FARBE.REF FARBE.DEF
IF NOT EXIST \FIBU.BAT COPY FIBU.BAT \FIBU.BAT >>INSTALL.DAT
ECHO ------- Ende Installation FIBU --------------------- >>INSTALL.DAT
ECHO -
ECHO Installation beendet.
echo -
IF NOT EXIST %START%PLAN40.LIB GOTO ENDE
:PLAN
echo Wenn Sie auch den Standard-Kontenplan übernehmen wollen,
echo dann geben Sie einfach noch ein:
echo %START%
echo PLANINST %1 %START%
ECHO ----------------------------------------------------------------------
echo Wenn Sie den umfangreicheren Alternativ-Kontenplan (SKR03) übernehmen
echo wollen, dann geben Sie noch ein:
ECHO %START%
echo PLANSK %1 %START%
GOTO ENDE
:FEHLER2
ECHO -------------------------------------------------------------
ECHO Achtung, es ist ein Fehler beim Anlegen der Dateien
ECHO aufgetreten.
ECHO Bitte überprüfen Sie, ob auf Ihrem Ziellaufwerk genügend Platz
ECHO frei ist.
ECHO --------------------------------------------------------------
GOTO ENDE
:FEHLER
ECHO Fehler beim Aufruf des Programmes:
ECHO Sie haben kein Laufwerk angegeben. Wenn Sie das Programm z.B.
ECHO auf der Festplatte C: installieren wollen, geben Sie ein:
ECHO FIBUINST C:
ECHO Wenn die Originaldiskette in Laufwerk B: liegt geben Sie
ECHO zusätzlich dieses an: FIBUINST C: B:
:ENDE