Parametros a Crystal

[laulaurys]

Hola, estoy tratando de pasar una cadena de codigo que excde los 255 caracteres por lo cual procedi a hacer lo siguiente:
(yo no se exactamente cuantos seran los caracteres)

EL tema comienza en el parametro 16,el error que me tira es :25503, invalidad parameter name, pero los parametros estan todos definidos, en que puedo estar fallando?


CR.StoredProcParam(0) = pre_desde
CR.StoredProcParam(1) = pre_hasta
CR.StoredProcParam(2) = cle_desde
CR.StoredProcParam(3) = cle_hasta
CR.StoredProcParam(4) = cie_desde
CR.StoredProcParam(5) = cie_hasta
CR.StoredProcParam(6) = Format(Left(CmbAdministradora.Text, 2))
CR.StoredProcParam(7) = CStr(Left(CmbAdministradora.Text, 25))
CR.StoredProcParam(8) = Format(Left(CmbEntidades.Text, 2))
CR.StoredProcParam(9) = CStr(Left(CmbEntidades.Text, 25))


If CmbCartera.ListIndex = 0 Then
CR.StoredProcParam(10) = -1
Else
CR.StoredProcParam(10) = Format(Left(CmbCartera.Text, 2))
End If

CR.StoredProcParam(11) = CStr(Left(CmbCartera.Text, 25))
CR.StoredProcParam(12) = CInt(pMovimientos)
CR.StoredProcParam(13) = CStr(pDes_mov)
CR.StoredProcParam(14) = CStr(sCod_sin)
CR.StoredProcParam(15) = sCods_conciliacion

itera = CInt(Len(sCods_conciliacion) / 250)
Do While i <= itera
CR.StoredProcParam(16 + i) = Mid(sCods_conciliacion, 250 * i + 1, 250)
i = i + 1
Loop
parametro = 10 - i
cantidad = 16 + i
Do While X <= parametro
CR.StoredProcParam(cantidad + X) = " "
X = X + 1
Loop
CR.Action = 1