diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-09-29 17:23:22 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-09-29 17:23:22 +0000 |
commit | 096858122220c29735f1bb15bdf8118ec0e31e28 (patch) | |
tree | 13d097985245a2eebe9337be5bbc9439b2406e69 /LedgerSMB/IS.pm | |
parent | 7a2786805e9f7e29050b82a3da03d0fefa7841e7 (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/IS.pm')
-rwxr-xr-x | LedgerSMB/IS.pm | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm index c88d527e..1620bb11 100755 --- a/LedgerSMB/IS.pm +++ b/LedgerSMB/IS.pm @@ -635,13 +635,6 @@ sub post_invoice { $sth->finish; @queries = $form->get_custom_queries('ar', '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; - } } @@ -1431,15 +1424,6 @@ sub retrieve_invoice { $dbh->disconnect; @queries = $form->get_custom_queries('ar', '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; $rc; |