Revision c8e0c77f
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| SL/DB/SepaExportItem.pm | ||
|---|---|---|
| 1 |
# This file has been auto-generated only because it didn't exist. |
|
| 2 |
# Feel free to modify it at will; it will not be overwritten automatically. |
|
| 3 |
|
|
| 4 | 1 |
package SL::DB::SepaExportItem; |
| 5 | 2 |
|
| 6 | 3 |
use strict; |
| ... | ... | |
| 10 | 7 |
# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. |
| 11 | 8 |
__PACKAGE__->meta->make_manager_class; |
| 12 | 9 |
|
| 10 |
sub compare_to {
|
|
| 11 |
my ($self, $other) = @_; |
|
| 12 |
|
|
| 13 |
return 1 if $self->execution_date && !$other->execution_date; |
|
| 14 |
return -1 if !$self->execution_date && $other->execution_date; |
|
| 15 |
|
|
| 16 |
my $result = 0; |
|
| 17 |
$result = $self->execution_date <=> $other->execution_date if $self->execution_date; |
|
| 18 |
return $result || ($self->sepa_export_id <=> $other->sepa_export_id) || ($self->id <=> $other->id); |
|
| 19 |
} |
|
| 20 |
|
|
| 13 | 21 |
1; |
Auch abrufbar als: Unified diff
Verknüpfte Dokumente: Auch SEPA-Überweisungen/-Einzüge anzeigen
Bisher noch nicht bei Debitoren- und Kreditorenbuchungen.
Conflicts:
SL/Presenter.pm