Hi joec_,

Take a look at Connecting to Oracle II from the DBD::Oracle documentation, paying attention to the various attributes you can set.

Hope this helps

Martin

$sth_dipp = $dbh_ideas->prepare(q{DECLARE dipp PacProject.dipp_project
+_cur; BEGIN pacproject.get_dipp_projects(:dipp); END;});
$sth_dipp->bind_param_inout(":dipp",\$s_dipp_proj,0,{ora_type => ORA_R
+SET});
$sth_dipp->execute;

my ($name, $code, $RA, $manager);
$sth_dipp->bind_columns(\($name, $code, $RA, $manager));


while ( $sth_dipp->fetch ){
    $name ||= 'Unknown';
    $code ||= 'Unknown';
    $RA ||= 'Unknown';
    $manager ||= 'Unknown';

    print qq|$name,$code,$RA,"$manager"\n|;    
}
[download]

The bind_columns approach is the fastest. You can see benchmarks on some of this here.

Hi

When i try to implement the above code (bind_columns), i get a "DBD::Oracle::st bind_columns failed: Statement has no result columns to bind (perhaps you need to successfully call execute first) [for Statement "DECLARE dipp PacProject.dipp_project_cur; BEGIN pacproject.get_dipp_projects(:dipp); END;" with ParamValues: :dipp=DBI::st=HASH(0x945129c)]".

I am returning a cursor from my PLSQL. Is it possible to bind columns to a cursor?

TIA - Joe.