=cut
use strict;
+use warnings;
+
use C4::Context;
use C4::Auth;
use C4::Output;
}
# get borrower details
-my $data = GetMember( $borrowernumber,'borrowernumber' );
+my $data = GetMember( borrowernumber => $borrowernumber );
my $user = $input->remote_user;
# get account details
$check = 2;
}
}
-my $total = $input->param('total');
+my $total = $input->param('total') || '';
if ( $check == 0 ) {
if ( $total ne '' ) {
recordpayment( $borrowernumber, $total );
address2 => $data->{'address2'},
city => $data->{'city'},
zipcode => $data->{'zipcode'},
+ country => $data->{'country'},
phone => $data->{'phone'},
email => $data->{'email'},
branchcode => $data->{'branchcode'},