How to get oracle Cursor by AdoCommand?

From: alex.paris (alessandro.paris_at_icc.it)
Date: 05/27/04 

Date: Thu, 27 May 2004 16:56:42 +0200

I have an oracle procedure with 5 parameters:
    1st..4th: Input value
    5th: Output Ref cursor.
I wish to read in delphi recordset oracle cursor by
TADOCommand/TADOStoreprocedure. Is there someone can give me a sample helps
me?

My delphi sample:
============
    V_ADO_comm := TADOCommand.create(nil);
     with V_ADO_comm do begin
       Connection := ADOConnection1;
       CommandText := 'DBGES.RO_P_GET_ART_MACCH_SPEC';
       CommandType := cmdUnknown;

       Parameters.CreateParameter('P_DATE',ftInteger, pdInput , 0,
20040527);
       Parameters.CreateParameter('P_DBGART',ftString, pdInput , 19,
'ARMC40440');
       Parameters.CreateParameter('P_F_BICOL',ftString, pdInput , 1, 'N');
       Parameters.CreateParameter('P_F_CONF',ftString, pdInput , 1, 'N');
       Parameters.CreateParameter('P_MCOSC',ftString, pdInput , 5, '1LAO1');

       Parameters.CreateParameter('P_RSET', ftDataSet, pdInputOutput , 0,
v_variant); //???????
       execute;

     end;

//An error always occurs: Parameter object is improperly defined.
Inconsistent or incomplete information was provided