summaryrefslogtreecommitdiff
path: root/LedgerSMB/OE.pm
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-09-29 17:23:22 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-09-29 17:23:22 +0000
commit096858122220c29735f1bb15bdf8118ec0e31e28 (patch)
tree13d097985245a2eebe9337be5bbc9439b2406e69 /LedgerSMB/OE.pm
parent7a2786805e9f7e29050b82a3da03d0fefa7841e7 (diff)
Simplified custom fields API.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@164 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/OE.pm')
-rwxr-xr-xLedgerSMB/OE.pm24
1 files changed, 0 insertions, 24 deletions
diff --git a/LedgerSMB/OE.pm b/LedgerSMB/OE.pm
index a008092a..5d85faa8 100755
--- a/LedgerSMB/OE.pm
+++ b/LedgerSMB/OE.pm
@@ -362,15 +362,6 @@ sub save {
@queries = $form->get_custom_queries('oe', 'INSERT');
- for (@queries){
- $query = shift (@{$_});
- $sth = $dbh->prepare($query)
- || $form->db_error($query);
- $sth->execute(@{$_}, $form->{id})
- || $form->dberror($query);;
- $sth->finish;
- $did_insert = 1;
- }
}
my $amount;
@@ -632,12 +623,6 @@ sub save {
if (!$did_insert){
@queries = $form->get_custom_queries('oe', 'UPDATE');
- for (@queries){
- my $query = shift @{$_};
- $sth = $dbh->prepare($query);
- $sth->execute (@{$_}, $form->{id});
- $sth->finish;
- }
}
@@ -958,15 +943,6 @@ sub retrieve {
$form->get_recurring($dbh);
@queries = $form->get_custom_queries('oe', 'SELECT');
- for (@queries){
- $query = shift @{$_};
- $sth = $form->{dbh}->prepare($query);
- $sth->execute($form->{id});
- $ref = $sth->fetchrow_hashref(NAME_lc);
- for (keys %{$ref}){
- $form->{$_} = $ref->{$_};
- }
- }
$form->{dbh}->commit;
} else {