From 025fd80e331af9a44552efd5be8ae35b4825e7f6 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Fri, 4 Jul 2008 23:04:16 +0000
Subject: Committing David Mora's single payment updates

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2185 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/DBObject/Payment.pm | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

(limited to 'LedgerSMB/DBObject')

diff --git a/LedgerSMB/DBObject/Payment.pm b/LedgerSMB/DBObject/Payment.pm
index 02f3aad5..6cc23f2e 100644
--- a/LedgerSMB/DBObject/Payment.pm
+++ b/LedgerSMB/DBObject/Payment.pm
@@ -105,6 +105,16 @@ sub get_open_accounts {
     return @{$self->{accounts}};
 }
 
+
+sub get_entity_credit_account{
+  my ($self) = @_;
+  @{$self->{entity_accounts}} =
+    $self->exec_method(funcname => 'payment_get_entity_accounts'); 
+   return  @{$self->{entity_accounts}};
+
+}
+
+
 =over
 
 =item $payment->get_all_accounts()
@@ -499,4 +509,15 @@ sub check_job {
     ($self->{job}) = $self->exec_method(funcname => 'job__status');
 }
 
+=item post_payment
+
+This method uses payment_post to store a payment (not a bulk payment) on the database.
+
+=cut
+
+sub post_payment {
+ my ($self) = @_;
+ $self->exec_method(funcname => 'payment_post');
+ $self->{dbh}->commit();
+}
 1;
-- 
cgit v1.2.3