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 |
- |
|
|