[Foreigner]

Одни и те же грабли, каждый божий день. Либо выносите блок кода из-за скобок, либо применяйте инструкцию:

Код:

setlocal enabledelayedexpansion

Код:

@echo off
setlocal enabledelayedexpansion

....

FOR /L %%B in (1,1,31) DO (
	IF NOT EXIST "%Srv%\backup" (MD "%Srv%\backup" 1>Nul 2>&1)
	IF %%B LSS 10 (SET Db=0%%B) ELSE (SET Db=%%B)
	SET bName=backup_%Y%.%M%.!Db!.7z
	SET bNameR=backup_FED_%Y%.%M%.!Db!.WRK.7z
pause
	Call :_ChkRzm
	REN "%Srv%\backup\!bName!" "!bNameR!" 1>Nul 2>&1
	FORFILES /P "%Srv%\backup" /M *.* /S /D -31 /C "CMD /c DEL /q @PATH"
)

.....