Listing 2: CommentReplace.bat

Set LGgLoc=D:\LG.exe
For /f "tokens=1,* delims=:" %%i in 
:: BEGIN CALLOUT A
  ('%LGgLoc% \\work1 -comment -q ^| Find "555-234-1234"') 
:: BEGIN CALLOUT A
  Do (Set Group=%%i) & (Set Comment=%%j) & (Call :ChangeCom)
Goto :EOF

:ChangeCom
Set Group="%Group%"
Set Group=%Group: "="%
:: BEGIN CALLOUT B
Set NewComment=%Comment:555-234-1234=505-234-1234%
:: END CALLOUT B
%LGgLoc% %Group% -setcomment "%NewComment%"
Goto :EOF