Crystal Reports Aparetente Sencillo?

[doolphyy]

Me estoy complicando las cosas o es un erro sencillo;

//{?Pm-TABLA.campo} es una cadena (Ejmp. "11,12,13,"
Local numberVar i;
Local numberVar totalBusca := Length({?Pm-TABLA.campo});
Local stringVar busca := "";
Local stringVar identifica := "";
for i := 1 to totalBusca step +1 do
(
busca := Mid ({?Pm-TABLA.campo}, i, 1);
if busca <> "," then
identifica := identifica + busca
else
//NOTA: apartir de aqui
if {vista.iden} = ToNumber (identifica) then
(
i := totalBusca;
false
)
else
true
);

EL PROBLEMA, ES QUE ESTE CODIGO ME MANDA EL ERROR EN LA FORMULA:

Aqui se requiere una cadena

y me sombrea apartir de donde puse la NOTA.
SI YO LE QUITO A LA LINEA DE ARRIBA (identifica := identifica + busca) LOS DOS PUNTOS QUEDANDO identifica = identifica + busca AL MOMENTO DE DAR GUARDAR NO ME DA NINGUN ERROR, PERO AL MOMENTO DE LLAMAR EL REPORTE, ME MANDA ESTE ERROR:

CRAXDRT Error Ocurred on Server.-2147191667 : La cadena es no numérica.

No tengo ni la menos idea de por que me manda el error al tratar de asignar la concatenación de dos string, si son cadenas?

Agradeceria cualquier información al respecto, gracias.

Saludos.