AYUDA CON Stored Procedure de Oracle y ASP

[kike79]

Hola, tengo el siguiente problema. Ando trabajando con un Sored procedure que tiene 3 parámetros, dos de entrada y uno de salida.
Los parámetros de entreada son de tipo VARCHAR2 y el de salida es TABLE OF NUMBER(2)

Cuando hago la llamada a la página ASP sale el siguiente error:

Código:

  
Error Type: 
ADODB.Command (0x800A0BB9) 
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

El código de la página ASP es el siguiente:

Código:

 
<% 
set objCmd = Server.CreateObject("ADODB.Command") 
objCmd.ActiveConnection = MM_BOSS_STRING 
objCmd.CommandType = 1 
objCmd.CommandText = "{Call actionallowed(?,?,{resultset 500,status})}" 
objCmd.CommandTimeout = 0 
objCmd.Prepared = false 
'set param1=objCmd.CreateParameter("groupname", adVarChar, adParamInput,, grupo) 
set param1=objCmd.CreateParameter("groupname", adVarChar, adParamInput,,grupo) '<----------ERROR  
objCmd.Parameters.Append param1 
set param2=objCmd.CreateParameter("action", adVarChar, adParamInput,,accion) 
objCmd.Parameters.Append param2 

set rs=objCmd.Execute() 
%>

No estoy seguro si deba usar adVarchar como tipo de dato en el CREATEPARAMETER pues no se si ese es el tipo que corresponde al VARCHAR2 de Oracle. También he probado con adBSTR pero tampoco ha funcionado

Por favor si alguno de Uds tiene alguna idea planteela....
Bye...
KIKE

[Nochero]

Seguramente te falto incluir como primera linea :

<!--#include virtual ='tusitio/adovbs.inc'-->

que contiene las constantes entre ellas adVarChar.

Para probar rapido sin esa linea y archivo, reemplaza adVarChar por 200

Lista tipos de datos :
'---- DataTypeEnum Values ----
Const adEmpty = 0
Const adTinyInt = 16
Const adSmallInt = 2
Const adInteger = 3
Const adBigInt = 20
Const adUnsignedTinyInt = 17
Const adUnsignedSmallInt = 18
Const adUnsignedInt = 19
Const adUnsignedBigInt = 21
Const adSingle = 4
Const adDouble = 5
Const adCurrency = 6
Const adDecimal = 14
Const adNumeric = 131
Const adBoolean = 11
Const adError = 10
Const adUserDefined = 132
Const adVariant = 12
Const adIDispatch = 9
Const adIUnknown = 13
Const adGUID = 72
Const adDate = 7
Const adDBDate = 133
Const adDBTime = 134
Const adDBTimeStamp = 135
Const adBSTR = 8
Const adChar = 129
Const adVarChar = 200
Const adLongVarChar = 201
Const adWChar = 130
Const adVarWChar = 202
Const adLongVarWChar = 203
Const adBinary = 128
Const adVarBinary = 204
Const adLongVarBinary = 205

Saludos