DB2 and Stored Procedures

[Harrington Michael]

Greetings, all!

  I'll try to do this with sucking up too much bandwith....

  My code snippet is : 

$stp_cur = $dbh->prepare('call TESTPROC(?)');

$stp_cur->bind_param_inout(1, \$pin, 5000 );

$ret_code = $stp_cur->execute('$pin');

while ((@row) = $stp_cur->fetchrow_array()) {
        do something
}


Unfortunately, I get the error  : 

DBD::DB2::st fetchrow_array failed: [IBM][CLI Driver] CLI0115E  Invalid
cursor state. SQLSTATE=24000


I've tried many different ways and get pretty much the same error.   This
Stored Procedure works fine from COBOL and is returning just one variable
back.

What simple thing am I missing here?

Many thanks in advance....