+ + [% IF ( error_registers ) %] +

+ You must have at least one cash register associated with this branch before you can record payments. +

+ [% ELSE %] + + +

Register transaction details for [% register.name | html %]

+ +

Summary

Last cashup: [% register.last_cashup.timestamp | $KohaDates with_hours => 1 %]
Float: [% register.starting_float | $Price %]
Total income (cash): [% accountlines.credits_total * -1 | $Price %] ([% accountlines.credits_total(payment_type => 'CASH') * -1 | $Price %])
Total outgoing (cash): [% accountlines.debits_total * -1 | $Price %] ([% accountlines.debits_total( payment_type => 'CASH') * -1 | $Price %])
Total bankable: [% accountlines.total( payment_type => 'CASH') * -1 | $Price %]

+ + [% IF register.last_cashup %] +

Transactions since [% register.last_cashup.timestamp | $KohaDates with_hours => 1 %]

+ [% ELSE %] +

Transactions to date

+ [% END %] + + + + + + + + + + [% FOREACH accountline IN accountlines %] + [% IF accountline.is_credit %] + + + + + + + + [% FOREACH credit IN accountline.credit_offsets %] + + + + + + + + [% END %] + [% END %] + [% END %] + + + + + + + + +

+ Receipt ID +	+ Description of charges +	+ Item +	+ Transaction +	+ Actions +
[% accountline.accountlines_id %]	+ [%- PROCESS account_type_description account=accountline -%] ([% accountline.payment_type \| html %]) +		+ [% accountline.amount * -1 \| $Price %] +	+ +
[% accountline.accountlines_id %]	[%- PROCESS account_type_description account=credit.debit -%]	[% credit.debit.amount \| $Price %]
Total income:			[% accountlines.total * -1 \| $Price %]

+ [% END %] +

+ +

+ +[% MACRO jsinclude BLOCK %] + +[% END %] + +[% INCLUDE 'intranet-bottom.inc' %] diff --git a/pos/register.pl b/pos/register.pl new file mode 100755 index 0000000000..9a32fdf934 --- /dev/null +++ b/pos/register.pl @@ -0,0 +1,83 @@ +#!/usr/bin/perl +# +# c 2015 PTFS-Europe Ltd +# +# This file is part of Koha. +# +# Koha is free software; you can redistribute it and/or modify it under the +# terms of the GNU General Public License as published by the Free Software +# Foundation; either version 2 of the License, or (at your option) any later +# version. +# +# Koha is distributed in the hope that it will be useful, but WITHOUT ANY +# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR +# A PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, +# Suite 330, Boston, MA 02111-1307 USA +# + +use Modern::Perl; +use CGI; +use C4::Auth; +use C4::Output; +use C4::Context; + +use Koha::Cash::Registers; +use Koha::Database; + +my $q = CGI->new(); + +my ( $template, $loggedinuser, $cookie, $user_flags ) = get_template_and_user( + { + template_name => 'pos/register.tt', + query => $q, + type => 'intranet', + authnotrequired => 0, + } +); +my $logged_in_user = Koha::Patrons->find($loggedinuser) or die "Not logged in"; + +my $library_id = C4::Context->userenv->{'branch'}; +my $registerid = $q->param('registerid'); +my $registers = Koha::Cash::Registers->search( + { branch => $library_id, archived => 0 }, + { order_by => { '-asc' => 'name' } } +); + +if ( !$registers->count ) { + $template->param( error_registers => 1 ); +} +else { + if ( !$registerid ) { + my $default_register = Koha::Cash::Registers->find( + { branch => $library_id, branch_default => 1 } ); + $registerid = $default_register->id if $default_register; + } + $registerid = $registers->next->id if !$registerid; + + $template->param( + registerid => $registerid, + registers => $registers, + ); +} + +my $cash_register = Koha::Cash::Registers->find( { id => $registerid } ); +my $accountlines = $cash_register->outstanding_accountlines(); +$template->param( + register => $cash_register, + accountlines => $accountlines +); + +my $op = $q->param('op') // ''; +if ( $op eq 'cashup' ) { + $cash_register->add_cashup( + { + user_id => $logged_in_user->id, + amount => $cash_register->outstanding_accountlines->total + } + ); +} + +output_html_with_http_headers( $q, $cookie, $template->output ); -- 2.20.1

Point of sale

Administration

Register transaction details for [% register.name | html %]

Summary

Transactions since [% register.last_cashup.timestamp | $KohaDates with_hours => 1 %]

Transactions to date