|
Lines 31-39
my ( $template, $loggedinuser, $cookie, $user_flags ) = get_template_and_user(
Link Here
|
| 31 |
); |
31 |
); |
| 32 |
my $logged_in_user = Koha::Patrons->find($loggedinuser) or die "Not logged in"; |
32 |
my $logged_in_user = Koha::Patrons->find($loggedinuser) or die "Not logged in"; |
| 33 |
|
33 |
|
| 34 |
my $library_id = C4::Context->userenv->{'branch'}; |
34 |
my $library_id = C4::Context->userenv->{'branch'}; |
| 35 |
my $registerid = $input->param('registerid'); |
35 |
my $registerid = $input->param('registerid'); |
| 36 |
my $registers = Koha::Cash::Registers->search( |
36 |
my $default_registerid = $input->param('default_register'); |
|
|
37 |
my $registers = Koha::Cash::Registers->search( |
| 37 |
{ branch => $library_id, archived => 0 }, |
38 |
{ branch => $library_id, archived => 0 }, |
| 38 |
{ order_by => { '-asc' => 'name' } } |
39 |
{ order_by => { '-asc' => 'name' } } |
| 39 |
); |
40 |
); |
|
Lines 42-63
if ( !$registers->count ) {
Link Here
|
| 42 |
$template->param( error_registers => 1 ); |
43 |
$template->param( error_registers => 1 ); |
| 43 |
} |
44 |
} |
| 44 |
else { |
45 |
else { |
| 45 |
if ( !$registerid ) { |
46 |
if ( !$default_registerid ) { |
| 46 |
my $default_register = Koha::Cash::Registers->find( |
47 |
my $default_register = Koha::Cash::Registers->find( |
| 47 |
{ branch => $library_id, branch_default => 1 } ); |
48 |
{ branch => $library_id, branch_default => 1 } ); |
| 48 |
$registerid = $default_register->id if $default_register; |
49 |
$default_registerid = |
|
|
50 |
$default_register ? $default_register->id : $registers->next->id; |
| 49 |
} |
51 |
} |
| 50 |
$registerid = $registers->next->id if !$registerid; |
|
|
| 51 |
|
52 |
|
| 52 |
$template->param( |
53 |
$template->param( |
| 53 |
registerid => $registerid, |
54 |
default_register => $default_registerid, |
| 54 |
registers => $registers, |
55 |
registers => $registers, |
| 55 |
); |
56 |
); |
| 56 |
} |
57 |
} |
| 57 |
|
58 |
|
| 58 |
my $invoice_types = |
59 |
my $invoice_types = |
| 59 |
Koha::Account::DebitTypes->search_with_library_limits( |
60 |
Koha::Account::DebitTypes->search_with_library_limits( { can_be_sold => 1 }, |
| 60 |
{ can_be_sold => 1 }, |
|
|
| 61 |
{}, $library_id ); |
61 |
{}, $library_id ); |
| 62 |
$template->param( invoice_types => $invoice_types ); |
62 |
$template->param( invoice_types => $invoice_types ); |
| 63 |
|
63 |
|
| 64 |
- |
|
|