@echo off

rem ドライブ名を記述。

set drive=D

rem 展開先パスを指定
rem （半角スペースが入るパスは、subst コマンド等でいい感じにしてください。）

set ext=Z:\APPS

rem KCAP.exe のプログラムパス。
rem  sony_exp.cmd と同じパスにある場合は、変更不要。

set kcap=kcap.exe

del /f /q %ext%\list.txt > out.log 2>&1

for %%i in ( APR APR2 APR3 ) do (
    for %%j in ( %drive%:\%%i\*.* ) do (
        %kcap% %%j %ext%
        echo -- %%~nj --
        echo -- %%~nj -- >> %ext%\list.txt
        for /f "tokens=4 delims=," %%k in ( %ext%\%%~nj\BAT\JPN.csv ) do (
            move %ext%\%%~nj "%ext%\%%~nj - %%k" > %ext%\out.log 2>&1
            echo %%k
            echo %%k >> %ext%\list.txt
        )
    )
)

del /q /f %ext%\out.log

exit