Mehrere TXT-Files Zeilenweise auslesen, zusammensetzen und in CSV datei schreiben

@echo off&setlocal

REM Darstellung der CPU-Auslastung Windowsserver

title Performance Windowsserver
REM #####################################
REM		Setzen des Datums
REM #####################################
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set Cyear=%%c%%b%%a  
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set DAY=%%a  
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set MON=%%b  
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set YEAR=%%c  

REM #####################################
REM		Setzen der Zeit
REM #####################################
set hh=%TIME:~0,2%
set mm=%TIME:~3,2%
set ss=%TIME:~6,2%

REM #####################################
REM		Setze Serverlist
REM #####################################
set servera=Q4DE8NCO*
set SID=DKS

REM #####################################
REM		Setzen der Pararmeter
REM #####################################
set Java="C:\Program Files\Java\jre6\bin\java.exe"  
set ChartMaker=D:\Charts\bin\
set Datadir=D:\Charts\data\
set PNGdir=D:\Charts\data\PNG\
set INIdir=D:\Charts\ini\
set Quelle=D:\Charts\quelle\"   
set OutFile=aktuell_win.csv
set Output=3^>"%datadir%%Outfile%"  
set PngFile=aktuell_win.png
set IniFile=chart_win.ini
set "inDatei=CPU_Q4DE8NCO*_%cyear%" & set "inDatei1="  

REM #####################################
REM		Check Verzeichnisse
REM #####################################
if not exist %Chartmaker% mkdir %Chartmaker%
if not exist %Datadir% mkdir %Datadir%
if not exist %PNGdir% mkdir %PNGdir%
if not exist %INIdir% mkdir %INIdir%

REM #####################################
REM		Baue OutFile
REM #####################################
pushd "%quelle%"  
del "%Output%" 2>nul  

for /f "delims=" %%i in ('dir /b /on "%inDatei%"') do if not defined inDatei1 set "inDatei1=%%i"  
if not defined inDatei1 echo Keine passende Datei gefunden! & goto :eof

%Output% <nul (
    >&3 set/p="SID;Datum/Zeit"  
    for /f "tokens=2 delims=_" %%d in ('dir /b /on "%inDatei%"') do >&3 set/p=";%%d"  
    >&3 echo(
    for /f skip^=1usebackqtokens^=1-4 %%i in (%inDatei1%) do (
        >&3 set/p="%sid%;%%j %%k;%%l"  
        for /f "skip=1 delims=" %%a in ('dir /b /on "%inDatei%"') do for /f tokens^=4 %%m in (' findstr /c:"%%j %%k" %%a ') do >&3 set/p=";%%m"  
        >&3 echo(
) )
popd
call %ChartMaker%ersetze.bat
REM #####################################
REM		Baue Chart 
REM #####################################
cd %ChartMaker%
%JAVA% -jar %ChartMaker%ChartMaker.jar %Datadir%%Outfile% %PNGdir%%PngFile% %INIdir%%IniFile%
%PNGdir%%PngFile%

@echo off
setlocal enabledelayedexpansion
pushd "D:\Charts\data"  
REM #####################################
REM		Setzen des Datums
REM #####################################
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set Cyear=%%c%%b%%a  
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set DAY=%%a  
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set MON=%%b  
FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set YEAR=%%c  

REM #####################################
REM		Setze Datei
REM #####################################

set "filename=aktuell_win.csv"  
set "tempfile=aktuell_win_.csv"  

REM #####################################
REM		lese erste Zeile aus
REM #####################################

for /F "delims=" %%i in (D:\Charts\data\aktuell_win.csv) do if not defined zeile set "zeile=%%i"  
echo %zeile% >%tempfile%

REM #####################################
REM  lese restliche Zeilen aus und bau um
REM #####################################

for /F "skip=1 tokens=1-13 delims=/;" %%a in (%filename%) do (  
set text=%%a;%%c.%%b.%%d;%%e;%%f;%%g;%%h;%%i;%%j;%%k;%%l;%%m
set text=!text:^|=;!
echo !text!>>%tempfile%
)


REM #####################################
REM  lösche altes File / benenne TEMP um
REM #####################################

del %filename%
ren %tempfile% %filename%
popd

SID;Datum/Zeit;Q4DE8NCOJ23;Q4DE8NCOJ24;Q4DE8NCOJ25;Q4DE8NCOJ26;Q4DE8NCOJ27;Q4DE8NCOJ28 
DKS;12.12.2011 00:10;1;1;2;1;0;2;;;
DKS;12.12.2011 00:20;0;1;4;0;2;0;;;
DKS;12.12.2011 00:30;0;2;2;1;0;0;;;
DKS;12.12.2011 00:40;1;0;3;1;0;1;;;
DKS;12.12.2011 00:50;1;0;1;1;1;0;;;
DKS;12.12.2011 01:00;0;0;2;1;0;1;;;
DKS;12.12.2011 01:10;1;1;2;1;0;3;;;
DKS;12.12.2011 01:20;1;2;2;0;0;1;;;