summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB')
-rwxr-xr-xLedgerSMB/AA.pm2
-rwxr-xr-xLedgerSMB/Form.pm4
-rwxr-xr-xLedgerSMB/IS.pm4
-rwxr-xr-xLedgerSMB/OE.pm6
4 files changed, 8 insertions, 8 deletions
diff --git a/LedgerSMB/AA.pm b/LedgerSMB/AA.pm
index 16181931..bf6c7224 100755
--- a/LedgerSMB/AA.pm
+++ b/LedgerSMB/AA.pm
@@ -295,7 +295,7 @@ sub post_transaction {
$dbh->prepare($query)->execute(@queryargs) || $form->dberror($query);
- @queries = $form->get_custom_queries($table, 'INSERT');
+ @queries = $form->run_custom_queries($table, 'INSERT');
# update exchangerate
my $buy = $form->{exchangerate};
my $sell = 0;
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 55b563dc..4865e198 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -1296,7 +1296,7 @@ sub db_init {
}
}
-sub get_custom_queries {
+sub run_custom_queries {
my $dbh = $self->{dbh};
my ($self, $tablename, $query_type, $linenum) = @_;
if ($query_type !~ /^(select|insert|update)$/i){
@@ -1374,7 +1374,7 @@ sub get_custom_queries {
$did_insert = 1;
}
} elsif ($query_type eq 'UPDATE'){
- @rc = $self->get_custom_queries(
+ @rc = $self->run_custom_queries(
$tablename, $query_type, $linenum);
} elsif ($query_type eq 'SELECT'){
for (@rc){
diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm
index 1620bb11..a8a7f811 100755
--- a/LedgerSMB/IS.pm
+++ b/LedgerSMB/IS.pm
@@ -634,7 +634,7 @@ sub post_invoice {
($form->{id}) = $sth->fetchrow_array;
$sth->finish;
- @queries = $form->get_custom_queries('ar', 'INSERT');
+ @queries = $form->run_custom_queries('ar', 'INSERT');
}
@@ -1423,7 +1423,7 @@ sub retrieve_invoice {
my $rc = $dbh->commit;
$dbh->disconnect;
- @queries = $form->get_custom_queries('ar', 'SELECT');
+ @queries = $form->run_custom_queries('ar', 'SELECT');
$form->{dbh}->commit;
$rc;
diff --git a/LedgerSMB/OE.pm b/LedgerSMB/OE.pm
index c2b2a283..5ffac31a 100755
--- a/LedgerSMB/OE.pm
+++ b/LedgerSMB/OE.pm
@@ -358,7 +358,7 @@ sub save {
$sth->execute(@queryargs) || $form->dberror($query);
$sth->finish;
- @queries = $form->get_custom_queries('oe', 'INSERT');
+ @queries = $form->run_custom_queries('oe', 'INSERT');
}
@@ -620,7 +620,7 @@ sub save {
$sth->execute(@queryargs) || $form->dberror($query);
if (!$did_insert){
- @queries = $form->get_custom_queries('oe', 'UPDATE');
+ @queries = $form->run_custom_queries('oe', 'UPDATE');
}
@@ -940,7 +940,7 @@ sub retrieve {
# get recurring transaction
$form->get_recurring($dbh);
- @queries = $form->get_custom_queries('oe', 'SELECT');
+ @queries = $form->run_custom_queries('oe', 'SELECT');
$form->{dbh}->commit;
} else {