Hello Prasad,
Please use below code
stringVar array x := split(Join({?Paramtername},","),",");
Local numberVar i;
Local stringVar outputString := "";
For i:=1 to Count(x) do
(
outputString := outputString + mid(x[i],13,1)+","
);
"Access Level"+outputString;
regards
Niraj