The correct way of passing arguments to DB queries is to use placeholders:
my $SQL = Select tran_seq_nbr, sale_amount
From KCPOS_Tran_Header
Where org_number = ?
And store_number = ?
And tran_number = ?
And terminal_number =?
And tran_Date = ?";
my $sth = $dbh->prepare( $SQL )
or die "Couldn't prepare statement: " . $dbh->errstr;
$sth->execute($ai_div, $ai_store, $al_trans, $ai_reg, $adt_h_date )
or die "Couldn't execute statement: " . $sth->errstr;
That way you can avoid quoting errors which might cause your problem. |