=head3 add_cashup
+ my $action = $cash_register->add_cashup(
+ {
+ manager_id => $logged_in_user->id,
+ amount => $cash_register->outstanding_accountlines->total
+ }
+ );
+
Add a new cashup action to the till, returns the added action.
=cut
my $rs = $self->_result->add_to_cash_register_actions(
{
code => 'CASHUP',
- manager_id => $params->{staff_id},
+ manager_id => $params->{manager_id},
amount => $params->{amount}
}
)->discard_changes;
if ( $op eq 'cashup' ) {
$cash_register->add_cashup(
{
- staff_id => $logged_in_user->id,
- amount => $cash_register->outstanding_accountlines->total
+ manager_id => $logged_in_user->id,
+ amount => $cash_register->outstanding_accountlines->total
}
);
}
use Modern::Perl;
-use Test::More tests => 8;
+use Test::More tests => 11;
use Test::Exception;
use C4::Circulation qw/AddIssue AddReturn/;
ok(
$cashup1 = $register->add_cashup(
- { user_id => $patron->id, amount => '12.00' }
+ { manager_id => $patron->id, amount => '12.00' }
),
'call successfull'
);
plan tests => 3;
my $cashup2 =
- $register->add_cashup( { user_id => $patron->id, amount => '6.00' } );
+ $register->add_cashup( { manager_id => $patron->id, amount => '6.00' } );
my $last_cashup = $register->last_cashup;
is(
is( $accountlines->count, 2, 'No cashup, all accountlines returned' );
my $cashup3 =
- $register->add_cashup( { user_id => $patron->id, amount => '2.50' } );
+ $register->add_cashup( { manager_id => $patron->id, amount => '2.50' } );
$accountlines = $register->outstanding_accountlines;
is( $accountlines->count, 0, 'Cashup added, no accountlines returned' );