REM #New:17.12.2025/J.Fes set params for %2
REM #Doc:usage see ToEnvAddParam_Test.cmd
setlocal EnableDelayedExpansion
set DoPrint=%~1
set EnvVar_r=%~2
set Res_r=!%EnvVar_r%!
shift

:NextPara
 shift
 if "%~1" equ "" goto :Done
 Call :addParam %1
 goto :NextPara
:Done
endlocal DisableDelayedExpansion &set %EnvVar_r%=%Res_r%
goto :eof

:addParam
 set $Px=%~1
 set $Px=%$Px:''="%
 if defined Res_r set Res_r=%Res_r% %$Px%
 if /I "%DoPrint%" equ "ON" Call :EchoParam %1
 if not defined Res_r set Res_r=%1
 goto :eof

:EchoParam
 set $Px=%1
 set $Pxs=%~1
 set $Pxs=%$Pxs:~0,3%
 set $Px=%$Px:"='%
 set $Px=%$Px:''=%
 if /i "%$Pxs%" equ "-p=" set $Px=-p=********************
 if not defined Res_r Call Echo2 "set %EnvVar_r% for Prg" "%$Px%"
 if defined Res_r     Call Echo2 "add %EnvVar_r% Parameter" "%$Px%"
 goto :eof