View | Details | Raw Unified | Return to bug 7859
Collapse All | Expand All

(-)a/members/pay.pl (-6 / +5 lines)
Lines 41-47 use C4::Overdues; Link Here
41
use C4::Branch;
41
use C4::Branch;
42
use C4::Members::Attributes qw(GetBorrowerAttributes);
42
use C4::Members::Attributes qw(GetBorrowerAttributes);
43
43
44
my $input = CGI->new;
44
our $input = CGI->new;
45
45
46
our ( $template, $loggedinuser, $cookie ) = get_template_and_user(
46
our ( $template, $loggedinuser, $cookie ) = get_template_and_user(
47
    {   template_name   => 'members/pay.tmpl',
47
    {   template_name   => 'members/pay.tmpl',
Lines 55-72 our ( $template, $loggedinuser, $cookie ) = get_template_and_user( Link Here
55
55
56
my @names = $input->param;
56
my @names = $input->param;
57
57
58
my $borrowernumber = $input->param('borrowernumber');
58
our $borrowernumber = $input->param('borrowernumber');
59
if ( !$borrowernumber ) {
59
if ( !$borrowernumber ) {
60
    $borrowernumber = $input->param('borrowernumber0');
60
    $borrowernumber = $input->param('borrowernumber0');
61
}
61
}
62
62
63
# get borrower details
63
# get borrower details
64
my $borrower = GetMember( borrowernumber => $borrowernumber );
64
our $borrower = GetMember( borrowernumber => $borrowernumber );
65
my $user = $input->remote_user;
65
our $user = $input->remote_user;
66
$user ||= q{};
66
$user ||= q{};
67
67
68
my $branches = GetBranches();
68
my $branches = GetBranches();
69
my $branch = GetBranch( $input, $branches );
69
our $branch = GetBranch( $input, $branches );
70
70
71
my $writeoff_item = $input->param('confirm_writeoff');
71
my $writeoff_item = $input->param('confirm_writeoff');
72
my $paycollect    = $input->param('paycollect');
72
my $paycollect    = $input->param('paycollect');
73
- 

Return to bug 7859