Revision 0bef1104
Von G. Richardson vor mehr als 5 Jahren hinzugefügt
| SL/Dev/Payment.pm | ||
|---|---|---|
| 82 | 82 |
$bank_chart = SL::DB::Manager::Chart->find_by(description => 'Bank') or die "Can't find bank chart"; |
| 83 | 83 |
} |
| 84 | 84 |
my $bank_account = SL::DB::Manager::BankAccount->find_by( chart_id => $bank_chart->id ); |
| 85 |
die "bank account missing" unless $bank_account; |
|
| 85 | 86 |
|
| 86 | 87 |
my $bt = SL::DB::BankTransaction->new( |
| 87 | 88 |
local_bank_account_id => $bank_account->id, |
Auch abrufbar als: Unified diff
SL::Dev::Payment - check if bank account exists