@ECHO OFF
CHCP 1252

TITLE DIGITAL DATA - QuickScan-Job

ECHO Stapelverarbeitungsprogramm
ECHO QuickScan-Job
ECHO -
ECHO Digital Data
ECHO Ludwig-Rinn-Strasse 16
ECHO 35452 Heuchelheim
ECHO Tel.: 0641 / 202360
ECHO E-Mail: info@didalog.de
ECHO -
ECHO Version 1.0
ECHO Letzte Aktualisierung: 22.01.2014
ECHO -
ECHO Programmstart am %date% um %time:~0,8% Uhr auf %computername%.

REM --------------------------------------------------------------
REM -------------------Definition der Variablen-------------------
REM --------------------------------------------------------------

SET QuickScanEXE="D:\Programme\Erfassung\QuickScan 4.7\QuickScn.exe"
SET Job=0
SET Jobs=3
SET InputPfad1=E:\windream-Import\Input\Stapel_Deckblatt
SET InputPfad2=E:\windream-Import\Input\Datei_Dokumentart\Kuendigung_per_Fax
SET InputPfad3=E:\windream-Import\Input\Datei_Dokumentart\Diverse_per_Scan
SET ArchivPfad=E:\windream-Import\Archiv
SET TempPfad=E:\windream-Import\Temp
SET Aufbewahrungszeit=30

REM --------------------------------------------------------------

ECHO -
ECHO Stelle fest, ob eine QuickScan Instanz bereits vorhanden ist.
tasklist |find /i "QuickScn.exe"
IF %ERRORLEVEL% == 0 (ECHO QuickScan scheint bereits gestartet zu sein, beende bereits gestartet Instanzen.) && (tskill /A QuickScn)
IF %ERRORLEVEL% == 1 (ECHO Keine bereits gestarteten QuickScan Instanzen gefunden, fahre fort.) && (SET %ERRORLEVEL% = 0)

:Job1 
SET /a Job=%Job%+1

REM --------------------------------------------------------------
REM --------------------------Job1--------------------------------
REM --------------------------------------------------------------

ECHO -
ECHO Job %Job% von %Jobs% wird abgearbeitet.

ECHO -
ECHO Prüfe ob abzuarbeitende Dateien vorhanden sind.
IF NOT EXIST %InputPfad1%\*.pdf (ECHO Es liegen keine abzuarbeitende PDF-Dateien vor.) && (ECHO Springe zum naechsten Job.) && (goto Job2)

ECHO -
ECHO Erstelle Sicherung der zu verarbeiteneden Datei(en) in %ArchivPfad%.
rem for /r %%I in (%InputPfad1%\*.pdf) do copy "%%~I" "%ArchivPfad%\%%~dpIfolder.pdf"
copy %InputPfad1%\*.pdf %ArchivPfad% /Y
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (SET %ERRORLEVEL% = 0) && (ECHO Gegebenenfalls sind die Dateien gesperrt?!)

ECHO -
ECHO Starte Abarbeitung des QuickScan Profils.
%QuickScanEXE% /scan profile=Eingangsdokumente_per_Scan /exit /delete showclrdlg=0 
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (ECHO Das Programm wird abgebrochen.) && (goto exit)

ECHO -
ECHO Verschiebe verarbeitete Dateien in Unterordner.
move /y E:\windream-Import\Output\Datei\Eingangsrechnung*.pdf E:\windream-Import\Output\Datei\Eingangsrechnung
move /y E:\windream-Import\Output\Datei\Kuendigung*.pdf E:\windream-Import\Output\Datei\Kuendigung
move /y E:\windream-Import\Output\Datei\Arbeitsauftrag*.pdf E:\windream-Import\Output\Datei\Arbeitsauftrag
move /y E:\windream-Import\Output\Datei\Lieferschein*.pdf E:\windream-Import\Output\Datei\Lieferschein
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (SET %ERRORLEVEL% = 0) && (ECHO Gegebenenfalls existieren keine zu verschiebenden Dateien ?!)

REM --------------------------------------------------------------

:Job2 
SET /a Job=%Job%+1

REM --------------------------------------------------------------
REM --------------------------Job2--------------------------------
REM --------------------------------------------------------------

ECHO -
ECHO Job %Job% von %Jobs% wird abgearbeitet.

ECHO -
ECHO Prüfe ob abzuarbeitende Dateien vorhanden sind.
IF NOT EXIST %InputPfad2%\*.pdf (ECHO Es liegen keine abzuarbeitende PDF-Dateien vor.) && (ECHO Springe zum naechsten Job.) && (goto Job3)

ECHO -
ECHO Erstelle Sicherung der zu verarbeiteneden Datei(en) in %ArchivPfad%.
copy %InputPfad2%\*.pdf %ArchivPfad% /Y
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (SET %ERRORLEVEL% = 0) && (ECHO Gegebenenfalls sind die Dateien gesperrt?!)

ECHO -
ECHO Starte Abarbeitung des QuickScan Profils.
%QuickScanEXE% /scan profile=Kuendigungen_per_Fax /exit /delete showclrdlg=0 
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (ECHO Das Programm wird abgebrochen.) && (goto exit)

REM --------------------------------------------------------------

:Job3 
SET /a Job=%Job%+1

REM --------------------------------------------------------------
REM --------------------------Job3--------------------------------
REM --------------------------------------------------------------

ECHO -
ECHO Job %Job% von %Jobs% wird abgearbeitet.

ECHO -
ECHO Prüfe ob abzuarbeitende Dateien vorhanden sind.
IF NOT EXIST %InputPfad3%\*.pdf (ECHO Es liegen keine abzuarbeitende PDF-Dateien vor.) && (ECHO Springe zum naechsten Job.) && (goto Exit)

ECHO -
ECHO Erstelle Sicherung der zu verarbeiteneden Datei(en) in %ArchivPfad%.
copy %InputPfad3%\*.pdf %ArchivPfad% /Y
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (SET %ERRORLEVEL% = 0) && (ECHO Gegebenenfalls sind die Dateien gesperrt?!)

ECHO -
ECHO Starte Abarbeitung des QuickScan Profils.
%QuickScanEXE% /scan profile=Arbeitsauftraege_per_Scan /exit /delete showclrdlg=0 
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (ECHO Das Programm wird abgebrochen.) && (goto exit)

ECHO -
ECHO Verschiebe verarbeitete Dateien in Unterordner.
move /y E:\windream-Import\Output\Datei\0000A*.pdf E:\windream-Import\Output\Datei\Arbeitsauftrag
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (SET %ERRORLEVEL% = 0) && (ECHO Gegebenenfalls existieren keine zu verschiebenden Dateien ?!)


REM --------------------------------------------------------------

REM --------------------------------------------------------------
REM --------------------Abschlussarbeiten-------------------------
REM --------------------------------------------------------------

:exit

ECHO -
ECHO Entferne Archiv-Dateien die aelter sind als %Aufbewahrungszeit% Tage aus Pfad: %ArchivPfad%.
C:\Windows\System32\forfiles /P "%ArchivPfad%" /M *.pdf /C "cmd /c if @isdir==FALSE del @file" /D -%Aufbewahrungszeit% 
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (SET %ERRORLEVEL% = 0) && (ECHO Gegebenenfalls existieren keine zu entfernenden Dateien ?!)

ECHO -
ECHO Entferne temporaere Dateien.
del %TempPfad%\*.pdf /F
IF %ERRORLEVEL% == 1 (ECHO Es ist ein Fehler waehrend der Abarbeitung aufgetreten.) && (SET %ERRORLEVEL% = 0) && (ECHO Gegebenenfalls existieren keine zu entfernenden Dateien ?!)

ECHO -
ECHO Alle Aufgaben wurden abgeschlossen. 
ECHO Das Programm wird beendet.
CHCP 850
exit