Frage Entwicklung Batch & Shell

gelöst Problem bei Ausgabe der Folgezeile bei Abfrage aus .pro Datei

Hallo zusammen,

ich habe ein kleines Problem. Ich möchte mehrere .pro Datein nach bestimmten Einträgen durchsuchen und diese dann in einer CSV Tabelle ausgeben. Das klappt soweit schon ganz gut, sofern die entsprechenden Einträge, nach denen ich suche nur einmal vorkommen. Bei mehrfachnennung wird immer nur der letzte Beitrag ausgegeben... aber das ist hier nicht ganz das Problem...
Problem ist, dass wenn ein Eintrag mehrfach vorkommt dieser in den .pro Dateien selbst durch eine IF anweisung mehrere möglichkeiten der Wertzuweiung hat.
Ich möchte nun auch diese IF - Anweisung in die CSV Tabelle integieren.

Die .pro Datein haben folgenen Aufbau:

meine batch durchsucht schon alle Files und gibts sie wunderbar hübsch aus... ich bekomme auch eine konkrete Zeilenangabe, in der die Werte stehen, die ab und an durch IF - Anweisungen verschachtelt sind... Nun möchte ich einfach auf die vorgängerzeile zugreifen, und da liegt mein Problem:

mir wird hier zwar die richtige Zeilennummer ausgegeben, aber der Inhalt der Zeile fehlt vollkommen, bzw. wird wohl nicht gefunden.

(%1 ist die aktuelle .pro Datei)



Dazu hab ich auch schon google und co. befragt, https://www.administrator.de/index.php?content=148293 das hinter dem Link versteckte ähnliche Problem mehrfach nahezu Zeichen für Zeichen eingetippt... aber es will einfach nicht funktionieren.

Sieht jemand von euch den Fehler, oder hat eine bessere Idee?

for /f "tokens=1* delims=:" %%a in ('findstr /n "^" %1^|findstr /b "%zeile%:"') do >>"%PFile%" echo Eintrag: %%a;%%b

@echo off & setlocal  

set "Verz=D:\Neuer Ordner\Neuer Ordner\Neuer Ordner"  

set "End=*.pro"  

set "M50=LET.Stat"  

del "Ifsuche.txt"  

for /f %%a in ('dir /b /on "%Verz%\%End%"') do call :ProcessFile "%Verz%\%%a"  

start "" "Ifsuche.txt" 

goto :eof  

:ProcessFile  

set "FName=%~n1"   

set "WDPL=%FName:~0,20%  

set "PFile=Ifsuche.txt"  

if exist "%PFile%" goto :WriteLine  

:WriteLine 

echo WDPL_Bez;%WDPL%>>"%PFile%"  

echo Station:>>"%PFile%"  

for /f "delims=:" %%i in ('findstr /i /n "%M50%" %1') do set /a zeile=%%i>nul 

echo Zeile: %zeile%>>"%PFile%" 

for /f "tokens=1,* delims=:" %%a in ('findstr /n "^" %1 | findstr /b "%zeile%:"') do echo Eintrag: %%a;%%b>>"%PFile%" 

echo.>>"%PFile%"

@echo off & setlocal  

set "Verz=D:\Neuer Ordner\Neuer Ordner\Neuer Ordner"  

set "End=*.pro"  

set "M50=LET.Stat"  

set "PFile=Ifsuche.txt"  

del "%PFile%" 2>nul 

for /f %%a in ('dir /b /on "%Verz%\%End%"') do call :ProcessFile "%Verz%\%%a"  

start "" "%PFile%" 

goto :eof  

:ProcessFile  

set "FName=%~n1"   

set "WDPL=%FName:~0,20%  

>>"%PFile%" echo WDPL_Bez;%WDPL% 

>>"%PFile%" echo Station: 

for /f "delims=:" %%i in ('findstr /i /n "%M50%" %1') do set /a zeile=%%i >nul 

>>"%PFile%" echo Zeile: %zeile% 

for /f "tokens=1,* delims=:" %%a in ('findstr /n "^" %1^|findstr /b "%zeile%:"') do >>"%PFile%" echo Eintrag: %%a;%%b 

>>"%PFile%" echo. 

goto :eof

echo %Zahl%>Datei.txt

echo 2>Datei.txt