diff options
Diffstat (limited to 'LedgerSMB')
| -rw-r--r-- | LedgerSMB/Batch.pm | 5 | ||||
| -rw-r--r-- | LedgerSMB/IS.pm | 2 | ||||
| -rw-r--r-- | LedgerSMB/Voucher.pm | 5 |
3 files changed, 11 insertions, 1 deletions
diff --git a/LedgerSMB/Batch.pm b/LedgerSMB/Batch.pm new file mode 100644 index 00000000..591f409d --- /dev/null +++ b/LedgerSMB/Batch.pm @@ -0,0 +1,5 @@ + + +package LedgerSMB::Batch; +use base qw(LedgerSMB::DBObject); + diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm index 13f83793..12e6941a 100644 --- a/LedgerSMB/IS.pm +++ b/LedgerSMB/IS.pm @@ -1022,7 +1022,7 @@ sub post_invoice { FROM parts p JOIN assembly a ON (a.parts_id = p.id) - WHERE a.id = $form->{"id_$i"} + WHERE a.id = ? GROUP BY p.assembly|; $sth = $dbh->prepare($query); $sth->execute( $form->{"id_$i"} ) diff --git a/LedgerSMB/Voucher.pm b/LedgerSMB/Voucher.pm new file mode 100644 index 00000000..288e76a9 --- /dev/null +++ b/LedgerSMB/Voucher.pm @@ -0,0 +1,5 @@ + + +package LedgerSMB::Voucher; +use base qw(LedgerSMB::DBObject); + |