rosalin, нашёл и устранил проблему. Привожу отредактированный код для обоих пакетных файлов.
Код:

@echo off
setlocal enabledelayedexpansion
for %%i in (*.msg) do (
for /f "delims=" %%j in ('
findstr /irc:"for <.*@" "%%~i"^| findstr /n "^"^| findstr /b 1:
') do (
set "string=%%j"
set "string=!string:*for <=!"
for /f "delims=@" %%k in ("!string!") do (
md "%%k" 2>nul
copy "%%~i" "%%k">nul
)
)
)
endlocal
exit /b
Код:

@echo off
call:# "adm" "info" "ivanov" "petrov" "sidorov"
exit /b
:#
for %%i in (*.msg) do (
for /f "delims=" %%j in ('
findstr /irc:"for <.*@" "%%~i"^| findstr /n "^"^| findstr /b 1:
') do (
for %%k in (%*) do call:## "%%j" %%k "%%~i"
)
)
exit /b
:##
echo %1| >nul (
findstr /ilc:"for <%~2@"&& (
md %2 2>&1
copy %3 %2
))
exit /b