PDF mit bestimmter Seitenzahl in Ordner verschieben

@echo off & setlocal enabledelayedexpansion

set "Quelle=C:\temp"  
set "DateienK1=*_K1.pdf"  
set "Ziel=C:\temp\big"  
set "PgCt=F:\Programme\pdfcount.exe"  

for %%i in ("%Quelle%\%DateienK1%") do (  
REM    echo "%%~ni"  
REM    for /f "tokens=1 delims=_K" %%a in ("%%~ni.pdf") do (  
REM        echo "%%~na"  
REM    )
   echo Datei: "%%~ni.pdf"  
   call :Auswertung "%Quelle%\%%~ni.pdf"  
)
goto :eof

:Auswertung
REM SEITENZAHL GROESSER ALS ANGEGEBENE ZAHL -> VERSCHIEBE IN KOMPAKT!!
set /a "seitenzahl=4"  

for /f "tokens=2 delims=: " %%n in ('call "%PgCt%" "%~1"^|findstr /c:"PageCount:"') do (  
        echo Seiten: %%n
        if "%%n" GTR "%seitenzahl%" (  
		echo verschiebe Dateien
                move %1 "%Ziel%">nul  
                for /f "delims=K" %%f in ("%~n1") do (  
                        if exist "%Quelle%\%%fK2.pdf" move "%Quelle%\%%fK2.pdf" "%ziel%">nul  
                )
        )
)
goto :eof