my $desc = "staticfine";
my $query = "INSERT INTO accountlines
- (borrowernumber,itemnumber,date,amount,description,accounttype,amountoutstanding)
- VALUES (?,?,now(),?,?,'F',?)";
+ (borrowernumber,itemnumber,date,amount,description,accounttype,status,amountoutstanding)
+ VALUES (?,?,now(),?,?,'OVERDUE','RETURNED',?)";
my $sth2 = $dbh->prepare($query);
$bigdebug and warn "query: $query\nw/ args: $borrowernumber, $itemnumber, $amount, $desc, $amount\n";
$sth2->execute( $borrowernumber, $itemnumber, $amount, $desc, $amount );