diff options
Diffstat (limited to 'LedgerSMB')
| -rw-r--r-- | LedgerSMB/Reconciliation.pm | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/LedgerSMB/Reconciliation.pm b/LedgerSMB/Reconciliation.pm index f12251e5..6dca96d2 100644 --- a/LedgerSMB/Reconciliation.pm +++ b/LedgerSMB/Reconciliation.pm @@ -65,6 +65,16 @@ arrayref of entries in the table for the given report_id. Returns undef in the event of no records found. +=item get_corrections($self, $report_id, $entry_id) + +Returns the corrections made for the selected report and entry. +Returns undef in the event of no corrections found. + +=item entry ($self,$report_id,$entry_id) + +Returns a single entry from the pending reports table, either cleared or +uncleared. + =back =head1 Copyright (C) 2007, The LedgerSMB core team. @@ -155,4 +165,18 @@ sub get_report { return $self->report($self->{report_id}); } +sub get_corrections { + + my $self = shift @_; + + return $self->corrections($self->{report_id},$self->{entry_id}); +} + +sub entry { + + my $self = shift @_; + + return $self->single_entry($self->{report_id},$self->{entry_id}); +} + 1;
\ No newline at end of file |