準備命令不DBI

Question

我試圖做到這一點的工作，但它不工作

my $sql2 = "SELECT CODE_ID,NAME_CODE,SUM(INR_COL + OUT_COL) AS \"TOTAL SUM\" FROM nwsa WHERE trunc(REPORT_DATE) = to_date('?','dd-mm-yyyy')AND CODE_ID IN (?,?,?,?,?,?,?,?,?,?,?)GROUP BY CODE_ID,NAME_CODE"; 
    $sth ->prepare($sql2); 
    my $t= "06-01-2017"; 

    $sth->execute($t,'A12A','A12B','A12C','A12D','A12E','A12EB','A12F','A12G','A12I','A12O','A12U'); 

Answer 1

您有：

$sth ->prepare($sql2); 

你需要：

my $sth = $dbh->prepare($sql2); 

https://metacpan.org/pod/DBI#prepare

另外考慮prepare_cached方法，這取決於你實際上是在做什麼：

https://metacpan.org/pod/DBI#prepare_cached