/* convert a series list into a quoted series list */
_parsefullname(list)
{
local i, len, namelist = "";
i = 1;
do
{
s = strget(i, list, ",");
if (strlen(s) > 0)
{
namelist += '"' + s + '",';
i++;
}
else
{
break;
}
} while(1);
if ((len = strlen(namelist)) > 0)
{
namelist = strextract(namelist, 1, len - 1);
}
if (outargc > 1)
{
return(namelist, i-1);
}
else
{
return(namelist);
}
}