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

(-)a/Koha/Template/Plugin/Borrowers.pm (-10 lines)
Lines 23-29 use Modern::Perl; Link Here
23
use base qw( Template::Plugin );
23
use base qw( Template::Plugin );
24
24
25
use Koha::Borrower::Debarments qw();
25
use Koha::Borrower::Debarments qw();
26
use C4::Members qw(HasOverdues);
27
26
28
=pod
27
=pod
29
28
Lines 49-61 sub IsDebarred { Link Here
49
    return Koha::Borrower::Debarments::IsDebarred($borrower->{borrowernumber});
48
    return Koha::Borrower::Debarments::IsDebarred($borrower->{borrowernumber});
50
}
49
}
51
50
52
sub HasOverdues {
53
    my ( $self, $borrowernumber ) = @_;
54
55
    return unless $borrowernumber;
56
57
    return C4::Members::HasOverdues($borrowernumber);
58
}
59
60
61
1;
51
1;
(-)a/koha-tmpl/intranet-tmpl/prog/en/includes/members-toolbar.inc (-2 / +2 lines)
Lines 167-174 function searchToHold(){ Link Here
167
            <ul class="dropdown-menu">
167
            <ul class="dropdown-menu">
168
                [% IF ( CAN_user_borrowers ) %]<li><a id="printsummary" href="#">Print summary</a></li>[% END %]
168
                [% IF ( CAN_user_borrowers ) %]<li><a id="printsummary" href="#">Print summary</a></li>[% END %]
169
                <li><a id="printslip" href="#">Print slip</a></li>
169
                <li><a id="printslip" href="#">Print slip</a></li>
170
                <li><a id="printquickslip" href="#">Print quick slip[%  Borrowers.HasOverdues( borrowernumber ) %]</a></li>
170
                <li><a id="printquickslip" href="#">Print quick slip</a></li>
171
                [% IF Borrowers.HasOverdues( borrowernumber ) %]
171
                [% IF has_overdues %]
172
                    <li><a id="print_overdues" href="#">Print overdues</a></li>
172
                    <li><a id="print_overdues" href="#">Print overdues</a></li>
173
                [% END %]
173
                [% END %]
174
            </ul>
174
            </ul>
(-)a/members/boraccount.pl (-29 / +30 lines)
Lines 109-143 my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettyp Link Here
109
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
109
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
110
110
111
$template->param(
111
$template->param(
112
    finesview           => 1,
112
    has_overdues               => HasOverdues($borrowernumber),
113
    firstname           => $data->{'firstname'},
113
    finesview                  => 1,
114
    surname             => $data->{'surname'},
114
    firstname                  => $data->{'firstname'},
115
    othernames          => $data->{'othernames'},
115
    surname                    => $data->{'surname'},
116
    borrowernumber      => $borrowernumber,
116
    othernames                 => $data->{'othernames'},
117
    cardnumber          => $data->{'cardnumber'},
117
    borrowernumber             => $borrowernumber,
118
    categorycode        => $data->{'categorycode'},
118
    cardnumber                 => $data->{'cardnumber'},
119
    category_type       => $data->{'category_type'},
119
    categorycode               => $data->{'categorycode'},
120
    categoryname		=> $data->{'description'},
120
    category_type              => $data->{'category_type'},
121
    address             => $address,
121
    categoryname               => $data->{'description'},
122
    address2            => $data->{'address2'},
122
    address                    => $address,
123
    city                => $data->{'city'},
123
    address2                   => $data->{'address2'},
124
    state               => $data->{'state'},
124
    city                       => $data->{'city'},
125
    zipcode             => $data->{'zipcode'},
125
    state                      => $data->{'state'},
126
    country             => $data->{'country'},
126
    zipcode                    => $data->{'zipcode'},
127
    phone               => $data->{'phone'},
127
    country                    => $data->{'country'},
128
    phonepro            => $data->{'phonepro'},
128
    phone                      => $data->{'phone'},
129
    mobile              => $data->{'mobile'},
129
    phonepro                   => $data->{'phonepro'},
130
    email               => $data->{'email'},
130
    mobile                     => $data->{'mobile'},
131
    emailpro            => $data->{'emailpro'},
131
    email                      => $data->{'email'},
132
    branchcode          => $data->{'branchcode'},
132
    emailpro                   => $data->{'emailpro'},
133
	branchname			=> GetBranchName($data->{'branchcode'}),
133
    branchcode                 => $data->{'branchcode'},
134
    total               => sprintf("%.2f",$total),
134
    branchname                 => GetBranchName( $data->{'branchcode'} ),
135
    totalcredit         => $totalcredit,
135
    total                      => sprintf( "%.2f", $total ),
136
    is_child            => ($data->{'category_type'} eq 'C'),
136
    totalcredit                => $totalcredit,
137
    reverse_col         => $reverse_col,
137
    is_child                   => ( $data->{'category_type'} eq 'C' ),
138
    accounts            => $accts,
138
    reverse_col                => $reverse_col,
139
	activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
139
    accounts                   => $accts,
140
    RoutingSerials => C4::Context->preference('RoutingSerials'),
140
    activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
141
    RoutingSerials             => C4::Context->preference('RoutingSerials'),
141
);
142
);
142
143
143
output_html_with_http_headers $input, $cookie, $template->output;
144
output_html_with_http_headers $input, $cookie, $template->output;
(-)a/members/deletemem.pl (-19 / +22 lines)
Lines 105-130 if ($countissues > 0 or $flags->{'CHARGES'} or $data->{'borrowernumber'} or $de Link Here
105
    my ($picture, $dberror) = GetPatronImage($bor->{'borrowernumber'});
105
    my ($picture, $dberror) = GetPatronImage($bor->{'borrowernumber'});
106
    $template->param( picture => 1 ) if $picture;
106
    $template->param( picture => 1 ) if $picture;
107
107
108
    $template->param(borrowernumber => $member,
108
    $template->param(
109
        surname => $bor->{'surname'},
109
        has_overdues               => HasOverdues($borrowernumber),
110
        title => $bor->{'title'},
110
        borrowernumber             => $member,
111
        cardnumber => $bor->{'cardnumber'},
111
        surname                    => $bor->{'surname'},
112
        firstname => $bor->{'firstname'},
112
        title                      => $bor->{'title'},
113
        categorycode => $bor->{'categorycode'},
113
        cardnumber                 => $bor->{'cardnumber'},
114
        category_type => $bor->{'category_type'},
114
        firstname                  => $bor->{'firstname'},
115
        categoryname  => $bor->{'description'},
115
        categorycode               => $bor->{'categorycode'},
116
        address => $bor->{'address'},
116
        category_type              => $bor->{'category_type'},
117
        address2 => $bor->{'address2'},
117
        categoryname               => $bor->{'description'},
118
        city => $bor->{'city'},
118
        address                    => $bor->{'address'},
119
        zipcode => $bor->{'zipcode'},
119
        address2                   => $bor->{'address2'},
120
        country => $bor->{'country'},
120
        city                       => $bor->{'city'},
121
        phone => $bor->{'phone'},
121
        zipcode                    => $bor->{'zipcode'},
122
        email => $bor->{'email'},
122
        country                    => $bor->{'country'},
123
        branchcode => $bor->{'branchcode'},
123
        phone                      => $bor->{'phone'},
124
        branchname => GetBranchName($bor->{'branchcode'}),
124
        email                      => $bor->{'email'},
125
		activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
125
        branchcode                 => $bor->{'branchcode'},
126
        RoutingSerials => C4::Context->preference('RoutingSerials'),
126
        branchname                 => GetBranchName( $bor->{'branchcode'} ),
127
        activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
128
        RoutingSerials             => C4::Context->preference('RoutingSerials'),
127
    );
129
    );
130
128
    if ($countissues >0) {
131
    if ($countissues >0) {
129
        $template->param(ItemsOnIssues => $countissues);
132
        $template->param(ItemsOnIssues => $countissues);
130
    }
133
    }
(-)a/members/files.pl (-1 / +4 lines)
Lines 44-50 my ( $template, $loggedinuser, $cookie ) = get_template_and_user( Link Here
44
        debug           => 1,
44
        debug           => 1,
45
    }
45
    }
46
);
46
);
47
$template->param( 'borrower_files' => 1 );
47
$template->param(
48
    'borrower_files' => 1,
49
    has_overdues     => HasOverdues($borrowernumber),
50
);
48
51
49
my $borrowernumber = $cgi->param('borrowernumber');
52
my $borrowernumber = $cgi->param('borrowernumber');
50
my $bf = Koha::Borrower::Files->new( borrowernumber => $borrowernumber );
53
my $bf = Koha::Borrower::Files->new( borrowernumber => $borrowernumber );
(-)a/members/mancredit.pl (-26 / +28 lines)
Lines 96-126 my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettyp Link Here
96
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
96
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
97
97
98
    $template->param(
98
    $template->param(
99
        finesview => 1,
99
        has_overdues               => HasOverdues($borrowernumber),
100
        borrowernumber => $borrowernumber,
100
        finesview                  => 1,
101
        firstname => $data->{'firstname'},
101
        borrowernumber             => $borrowernumber,
102
        surname  => $data->{'surname'},
102
        firstname                  => $data->{'firstname'},
103
        othernames => $data->{'othernames'},
103
        surname                    => $data->{'surname'},
104
		    cardnumber => $data->{'cardnumber'},
104
        othernames                 => $data->{'othernames'},
105
		    categorycode => $data->{'categorycode'},
105
        cardnumber                 => $data->{'cardnumber'},
106
		    category_type => $data->{'category_type'},
106
        categorycode               => $data->{'categorycode'},
107
		    categoryname  => $data->{'description'},
107
        category_type              => $data->{'category_type'},
108
            address => $address,
108
        categoryname               => $data->{'description'},
109
		    address2 => $data->{'address2'},
109
        address                    => $address,
110
		    city => $data->{'city'},
110
        address2                   => $data->{'address2'},
111
		    state => $data->{'state'},
111
        city                       => $data->{'city'},
112
		    zipcode => $data->{'zipcode'},
112
        state                      => $data->{'state'},
113
		    country => $data->{'country'},
113
        zipcode                    => $data->{'zipcode'},
114
		    phone => $data->{'phone'},
114
        country                    => $data->{'country'},
115
            phonepro => $data->{'phonepro'},
115
        phone                      => $data->{'phone'},
116
            mobile => $data->{'mobile'},
116
        phonepro                   => $data->{'phonepro'},
117
		    email => $data->{'email'},
117
        mobile                     => $data->{'mobile'},
118
            emailpro => $data->{'emailpro'},
118
        email                      => $data->{'email'},
119
		    branchcode => $data->{'branchcode'},
119
        emailpro                   => $data->{'emailpro'},
120
		    branchname => GetBranchName($data->{'branchcode'}),
120
        branchcode                 => $data->{'branchcode'},
121
		    is_child        => ($data->{'category_type'} eq 'C'),
121
        branchname                 => GetBranchName( $data->{'branchcode'} ),
122
			activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
122
        is_child                   => ( $data->{'category_type'} eq 'C' ),
123
            RoutingSerials => C4::Context->preference('RoutingSerials'),
123
        activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
124
        );
124
        RoutingSerials             => C4::Context->preference('RoutingSerials'),
125
    );
126
125
    output_html_with_http_headers $input, $cookie, $template->output;
127
    output_html_with_http_headers $input, $cookie, $template->output;
126
}
128
}
(-)a/members/maninvoice.pl (-26 / +28 lines)
Lines 121-152 if (C4::Context->preference('ExtendedPatronAttributes')) { Link Here
121
my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettype} );
121
my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettype} );
122
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
122
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
123
123
124
	$template->param(
124
    $template->param(
125
                finesview => 1,
125
        has_overdues               => HasOverdues($borrowernumber),
126
                borrowernumber => $borrowernumber,
126
        finesview                  => 1,
127
		firstname => $data->{'firstname'},
127
        borrowernumber             => $borrowernumber,
128
                surname  => $data->{'surname'},
128
        firstname                  => $data->{'firstname'},
129
        othernames => $data->{'othernames'},
129
        surname                    => $data->{'surname'},
130
		cardnumber => $data->{'cardnumber'},
130
        othernames                 => $data->{'othernames'},
131
		categorycode => $data->{'categorycode'},
131
        cardnumber                 => $data->{'cardnumber'},
132
		category_type => $data->{'category_type'},
132
        categorycode               => $data->{'categorycode'},
133
		categoryname  => $data->{'description'},
133
        category_type              => $data->{'category_type'},
134
        address => $address,
134
        categoryname               => $data->{'description'},
135
		address2 => $data->{'address2'},
135
        address                    => $address,
136
		city => $data->{'city'},
136
        address2                   => $data->{'address2'},
137
		state => $data->{'state'},
137
        city                       => $data->{'city'},
138
		zipcode => $data->{'zipcode'},
138
        state                      => $data->{'state'},
139
		country => $data->{'country'},
139
        zipcode                    => $data->{'zipcode'},
140
		phone => $data->{'phone'},
140
        country                    => $data->{'country'},
141
        phonepro => $data->{'phonepro'},
141
        phone                      => $data->{'phone'},
142
        mobile => $data->{'mobile'},
142
        phonepro                   => $data->{'phonepro'},
143
		email => $data->{'email'},
143
        mobile                     => $data->{'mobile'},
144
        emailpro => $data->{'emailpro'},
144
        email                      => $data->{'email'},
145
		branchcode => $data->{'branchcode'},
145
        emailpro                   => $data->{'emailpro'},
146
		branchname => GetBranchName($data->{'branchcode'}),
146
        branchcode                 => $data->{'branchcode'},
147
		is_child        => ($data->{'category_type'} eq 'C'),
147
        branchname                 => GetBranchName( $data->{'branchcode'} ),
148
		activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
148
        is_child                   => ( $data->{'category_type'} eq 'C' ),
149
        RoutingSerials => C4::Context->preference('RoutingSerials'),
149
        activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
150
        RoutingSerials             => C4::Context->preference('RoutingSerials'),
150
    );
151
    );
152
151
    output_html_with_http_headers $input, $cookie, $template->output;
153
    output_html_with_http_headers $input, $cookie, $template->output;
152
}
154
}
(-)a/members/member-flags.pl (-27 / +28 lines)
Lines 175-207 if (C4::Context->preference('ExtendedPatronAttributes')) { Link Here
175
my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $bor->{streettype} );
175
my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $bor->{streettype} );
176
my $address = $bor->{'streetnumber'} . " $roadtype " . $bor->{'address'};
176
my $address = $bor->{'streetnumber'} . " $roadtype " . $bor->{'address'};
177
177
178
$template->param(
178
    $template->param(
179
		borrowernumber => $bor->{'borrowernumber'},
179
        has_overdues               => HasOverdues($borrowernumber),
180
    cardnumber => $bor->{'cardnumber'},
180
        borrowernumber             => $bor->{'borrowernumber'},
181
		surname => $bor->{'surname'},
181
        cardnumber                 => $bor->{'cardnumber'},
182
		firstname => $bor->{'firstname'},
182
        surname                    => $bor->{'surname'},
183
        othernames => $bor->{'othernames'},
183
        firstname                  => $bor->{'firstname'},
184
		categorycode => $bor->{'categorycode'},
184
        othernames                 => $bor->{'othernames'},
185
		category_type => $bor->{'category_type'},
185
        categorycode               => $bor->{'categorycode'},
186
		categoryname => $bor->{'description'},
186
        category_type              => $bor->{'category_type'},
187
        address => $address,
187
        categoryname               => $bor->{'description'},
188
		address2 => $bor->{'address2'},
188
        address                    => $address,
189
		city => $bor->{'city'},
189
        address2                   => $bor->{'address2'},
190
        state => $bor->{'state'},
190
        city                       => $bor->{'city'},
191
		zipcode => $bor->{'zipcode'},
191
        state                      => $bor->{'state'},
192
		country => $bor->{'country'},
192
        zipcode                    => $bor->{'zipcode'},
193
		phone => $bor->{'phone'},
193
        country                    => $bor->{'country'},
194
        phonepro => $bor->{'phonepro'},
194
        phone                      => $bor->{'phone'},
195
        mobile => $bor->{'mobile'},
195
        phonepro                   => $bor->{'phonepro'},
196
		email => $bor->{'email'},
196
        mobile                     => $bor->{'mobile'},
197
        emailpro => $bor->{'emailpro'},
197
        email                      => $bor->{'email'},
198
		branchcode => $bor->{'branchcode'},
198
        emailpro                   => $bor->{'emailpro'},
199
		branchname => GetBranchName($bor->{'branchcode'}),
199
        branchcode                 => $bor->{'branchcode'},
200
		loop => \@loop,
200
        branchname                 => GetBranchName( $bor->{'branchcode'} ),
201
		is_child        => ($bor->{'category_type'} eq 'C'),
201
        loop                       => \@loop,
202
		activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
202
        is_child                   => ( $bor->{'category_type'} eq 'C' ),
203
        RoutingSerials => C4::Context->preference('RoutingSerials'),
203
        activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
204
		);
204
        RoutingSerials             => C4::Context->preference('RoutingSerials'),
205
    );
205
206
206
    output_html_with_http_headers $input, $cookie, $template->output;
207
    output_html_with_http_headers $input, $cookie, $template->output;
207
208
(-)a/members/member-password.pl (-28 / +30 lines)
Lines 104-137 if (C4::Context->preference('ExtendedPatronAttributes')) { Link Here
104
my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $bor->{streettype} );
104
my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $bor->{streettype} );
105
my $address = $bor->{'streetnumber'} . " $roadtype " . $bor->{'address'};
105
my $address = $bor->{'streetnumber'} . " $roadtype " . $bor->{'address'};
106
106
107
    $template->param( othernames => $bor->{'othernames'},
107
    $template->param(
108
	    surname     => $bor->{'surname'},
108
        othernames                 => $bor->{'othernames'},
109
	    firstname   => $bor->{'firstname'},
109
        has_overdues               => HasOverdues($borrowernumber),
110
	    borrowernumber => $bor->{'borrowernumber'},
110
        surname                    => $bor->{'surname'},
111
	    cardnumber => $bor->{'cardnumber'},
111
        firstname                  => $bor->{'firstname'},
112
	    categorycode => $bor->{'categorycode'},
112
        borrowernumber             => $bor->{'borrowernumber'},
113
	    category_type => $bor->{'category_type'},
113
        cardnumber                 => $bor->{'cardnumber'},
114
	    categoryname => $bor->{'description'},
114
        categorycode               => $bor->{'categorycode'},
115
        address => $address,
115
        category_type              => $bor->{'category_type'},
116
	    address2 => $bor->{'address2'},
116
        categoryname               => $bor->{'description'},
117
	    city => $bor->{'city'},
117
        address                    => $address,
118
	    state => $bor->{'state'},
118
        address2                   => $bor->{'address2'},
119
	    zipcode => $bor->{'zipcode'},
119
        city                       => $bor->{'city'},
120
	    country => $bor->{'country'},
120
        state                      => $bor->{'state'},
121
	    phone => $bor->{'phone'},
121
        zipcode                    => $bor->{'zipcode'},
122
        phonepro => $bor->{'phonepro'},
122
        country                    => $bor->{'country'},
123
        mobile => $bor->{'mobile'},
123
        phone                      => $bor->{'phone'},
124
	    email => $bor->{'email'},
124
        phonepro                   => $bor->{'phonepro'},
125
        emailpro => $bor->{'emailpro'},
125
        mobile                     => $bor->{'mobile'},
126
	    branchcode => $bor->{'branchcode'},
126
        email                      => $bor->{'email'},
127
	    branchname => GetBranchName($bor->{'branchcode'}),
127
        emailpro                   => $bor->{'emailpro'},
128
	    userid      => $bor->{'userid'},
128
        branchcode                 => $bor->{'branchcode'},
129
	    destination => $destination,
129
        branchname                 => GetBranchName( $bor->{'branchcode'} ),
130
		is_child        => ($bor->{'category_type'} eq 'C'),
130
        userid                     => $bor->{'userid'},
131
		activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
131
        destination                => $destination,
132
        minPasswordLength => $minpw,
132
        is_child                   => ( $bor->{'category_type'} eq 'C' ),
133
        RoutingSerials => C4::Context->preference('RoutingSerials'),
133
        activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
134
	);
134
        minPasswordLength          => $minpw,
135
        RoutingSerials             => C4::Context->preference('RoutingSerials'),
136
    );
135
137
136
if( scalar(@errors )){
138
if( scalar(@errors )){
137
	$template->param( errormsg => 1 );
139
	$template->param( errormsg => 1 );
(-)a/members/moremember.pl (+1 lines)
Lines 358-363 my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'}; Link Here
358
# in template <TMPL_IF name="I"> => instutitional (A for Adult, C for children) 
358
# in template <TMPL_IF name="I"> => instutitional (A for Adult, C for children) 
359
$template->param( $data->{'categorycode'} => 1 ); 
359
$template->param( $data->{'categorycode'} => 1 ); 
360
$template->param(
360
$template->param(
361
    has_overdues => HasOverdues($borrowernumber),
361
    detailview => 1,
362
    detailview => 1,
362
    AllowRenewalLimitOverride => C4::Context->preference("AllowRenewalLimitOverride"),
363
    AllowRenewalLimitOverride => C4::Context->preference("AllowRenewalLimitOverride"),
363
    CANDELETEUSER    => $candeleteuser,
364
    CANDELETEUSER    => $candeleteuser,
(-)a/members/notices.pl (-8 / +9 lines)
Lines 67-80 my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{'stre Link Here
67
my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'};
67
my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'};
68
68
69
$template->param(
69
$template->param(
70
			QUEUED_MESSAGES 	=> $queued_messages,
70
    has_overdues               => HasOverdues($borrowernumber),
71
			borrowernumber 		=> $borrowernumber,
71
    QUEUED_MESSAGES            => $queued_messages,
72
			sentnotices 		=> 1,
72
    borrowernumber             => $borrowernumber,
73
                        branchname              => GetBranchName($borrower->{'branchcode'}),
73
    sentnotices                => 1,
74
                        categoryname            => $borrower->{'description'},
74
    branchname                 => GetBranchName( $borrower->{'branchcode'} ),
75
                        address                 => $address,
75
    categoryname               => $borrower->{'description'},
76
			activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
76
    address                    => $address,
77
            RoutingSerials => C4::Context->preference('RoutingSerials'),
77
    activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
78
    RoutingSerials             => C4::Context->preference('RoutingSerials'),
78
);
79
);
79
output_html_with_http_headers $input, $cookie, $template->output;
80
output_html_with_http_headers $input, $cookie, $template->output;
80
81
(-)a/members/pay.pl (-3 / +4 lines)
Lines 104-112 for (@names) { Link Here
104
}
104
}
105
105
106
$template->param(
106
$template->param(
107
    finesview => 1,
107
    has_overdues               => HasOverdues($borrowernumber),
108
    activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
108
    finesview                  => 1,
109
    RoutingSerials => C4::Context->preference('RoutingSerials'),
109
    activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
110
    RoutingSerials             => C4::Context->preference('RoutingSerials'),
110
);
111
);
111
112
112
add_accounts_to_template();
113
add_accounts_to_template();
(-)a/members/paycollect.pl (-6 / +7 lines)
Lines 144-155 if ( $total_paid and $total_paid ne '0.00' ) { Link Here
144
borrower_add_additional_fields($borrower);
144
borrower_add_additional_fields($borrower);
145
145
146
$template->param(
146
$template->param(
147
    borrowernumber => $borrowernumber,    # some templates require global
147
    has_overdues   => HasOverdues($borrowernumber),
148
    borrower      => $borrower,
148
    borrowernumber => $borrowernumber,                # some templates require global
149
    total         => $total_due,
149
    borrower       => $borrower,
150
    activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''),
150
    total          => $total_due,
151
    RoutingSerials => C4::Context->preference('RoutingSerials'),
151
    activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
152
    ExtendedPatronAttributes => C4::Context->preference('ExtendedPatronAttributes'),
152
    RoutingSerials             => C4::Context->preference('RoutingSerials'),
153
    ExtendedPatronAttributes   => C4::Context->preference('ExtendedPatronAttributes'),
153
);
154
);
154
155
155
output_html_with_http_headers $input, $cookie, $template->output;
156
output_html_with_http_headers $input, $cookie, $template->output;
(-)a/members/readingrec.pl (-29 / +30 lines)
Lines 128-162 my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettyp Link Here
128
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
128
my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'};
129
129
130
$template->param(
130
$template->param(
131
    readingrecordview => 1,
131
    has_overdues               => HasOverdues($borrowernumber),
132
    title             => $data->{title},
132
    readingrecordview          => 1,
133
    initials          => $data->{initials},
133
    title                      => $data->{title},
134
    surname           => $data->{surname},
134
    initials                   => $data->{initials},
135
    othernames        => $data->{othernames},
135
    surname                    => $data->{surname},
136
    borrowernumber    => $borrowernumber,
136
    othernames                 => $data->{othernames},
137
    firstname         => $data->{firstname},
137
    borrowernumber             => $borrowernumber,
138
    cardnumber        => $data->{cardnumber},
138
    firstname                  => $data->{firstname},
139
    categorycode      => $data->{categorycode},
139
    cardnumber                 => $data->{cardnumber},
140
    category_type     => $data->{category_type},
140
    categorycode               => $data->{categorycode},
141
    categoryname      => $data->{description},
141
    category_type              => $data->{category_type},
142
    address           => $address,
142
    categoryname               => $data->{description},
143
    address2          => $data->{address2},
143
    address                    => $address,
144
    city              => $data->{city},
144
    address2                   => $data->{address2},
145
    state             => $data->{state},
145
    city                       => $data->{city},
146
    zipcode           => $data->{zipcode},
146
    state                      => $data->{state},
147
    country           => $data->{country},
147
    zipcode                    => $data->{zipcode},
148
    phone             => $data->{phone},
148
    country                    => $data->{country},
149
    phonepro          => $data->{phonepro},
149
    phone                      => $data->{phone},
150
    mobile            => $data->{mobile},
150
    phonepro                   => $data->{phonepro},
151
    email             => $data->{email},
151
    mobile                     => $data->{mobile},
152
    emailpro             => $data->{emailpro},
152
    email                      => $data->{email},
153
    branchcode        => $data->{branchcode},
153
    emailpro                   => $data->{emailpro},
154
    is_child          => ( $data->{category_type} eq 'C' ),
154
    branchcode                 => $data->{branchcode},
155
    branchname        => $branches->{ $data->{branchcode} }->{branchname},
155
    is_child                   => ( $data->{category_type} eq 'C' ),
156
    loop_reading      => $issues,
156
    branchname                 => $branches->{ $data->{branchcode} }->{branchname},
157
    activeBorrowerRelationship =>
157
    loop_reading               => $issues,
158
      ( C4::Context->preference('borrowerRelationship') ne '' ),
158
    activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ),
159
    RoutingSerials => C4::Context->preference('RoutingSerials'),
159
    RoutingSerials             => C4::Context->preference('RoutingSerials'),
160
);
160
);
161
161
output_html_with_http_headers $input, $cookie, $template->output;
162
output_html_with_http_headers $input, $cookie, $template->output;
162
163
(-)a/members/routing-lists.pl (-26 / +26 lines)
Lines 106-137 my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{stree Link Here
106
my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'};
106
my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'};
107
107
108
$template->param(
108
$template->param(
109
109
    has_overdues   => HasOverdues($borrowernumber),
110
    findborrower      => $findborrower,
110
    findborrower   => $findborrower,
111
    borrower          => $borrower,
111
    borrower       => $borrower,
112
    borrowernumber    => $borrowernumber,
112
    borrowernumber => $borrowernumber,
113
    branch            => $branch,
113
    branch         => $branch,
114
    branchname        => GetBranchName($borrower->{'branchcode'}),
114
    branchname     => GetBranchName( $borrower->{'branchcode'} ),
115
    title             => $borrower->{'title'},
115
    title          => $borrower->{'title'},
116
    initials          => $borrower->{'initials'},
116
    initials       => $borrower->{'initials'},
117
    firstname         => $borrower->{'firstname'},
117
    firstname      => $borrower->{'firstname'},
118
    surname           => $borrower->{'surname'},
118
    surname        => $borrower->{'surname'},
119
    othernames        => $borrower->{'othernames'},
119
    othernames     => $borrower->{'othernames'},
120
    categorycode      => $borrower->{'categorycode'},
120
    categorycode   => $borrower->{'categorycode'},
121
    categoryname      => $borrower->{description},
121
    categoryname   => $borrower->{description},
122
    address           => $address,
122
    address        => $address,
123
    address2          => $borrower->{'address2'},
123
    address2       => $borrower->{'address2'},
124
    phone             => $borrower->{'phone'},
124
    phone          => $borrower->{'phone'},
125
    phonepro          => $borrower->{'phonepro'},
125
    phonepro       => $borrower->{'phonepro'},
126
    mobile            => $borrower->{'mobile'},
126
    mobile         => $borrower->{'mobile'},
127
    email             => $borrower->{'email'},
127
    email          => $borrower->{'email'},
128
    emailpro          => $borrower->{'emailpro'},
128
    emailpro       => $borrower->{'emailpro'},
129
    borrowernotes     => $borrower->{'borrowernotes'},
129
    borrowernotes  => $borrower->{'borrowernotes'},
130
    city              => $borrower->{'city'},
130
    city           => $borrower->{'city'},
131
    state             => $borrower->{'state'},
131
    state          => $borrower->{'state'},
132
    zipcode           => $borrower->{'zipcode'},
132
    zipcode        => $borrower->{'zipcode'},
133
    country           => $borrower->{'country'},
133
    country        => $borrower->{'country'},
134
    cardnumber        => $borrower->{'cardnumber'},
134
    cardnumber     => $borrower->{'cardnumber'},
135
    RoutingSerials => C4::Context->preference('RoutingSerials'),
135
    RoutingSerials => C4::Context->preference('RoutingSerials'),
136
);
136
);
137
137
(-)a/members/statistics.pl (-8 / +8 lines)
Lines 101-115 my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{stree Link Here
101
my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'};
101
my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'};
102
102
103
$template->param(
103
$template->param(
104
    statisticsview => 1,
104
    has_overdues                => HasOverdues($borrowernumber),
105
    datas          => $datas,
105
    statisticsview              => 1,
106
    address        => $address,
106
    datas                       => $datas,
107
    column_names   => \@statistic_column_names,
107
    address                     => $address,
108
    count_total_issues => $count_total_issues,
108
    column_names                => \@statistic_column_names,
109
    count_total_issues          => $count_total_issues,
109
    count_total_issues_returned => $count_total_issues_returned,
110
    count_total_issues_returned => $count_total_issues_returned,
110
    count_total_precedent_state => $count_total_precedent_state,
111
    count_total_precedent_state => $count_total_precedent_state,
111
    count_total_actual_state => $count_total_actual_state,
112
    count_total_actual_state    => $count_total_actual_state,
112
    RoutingSerials => C4::Context->preference('RoutingSerials'),
113
    RoutingSerials              => C4::Context->preference('RoutingSerials'),
113
);
114
);
114
115
115
output_html_with_http_headers $input, $cookie, $template->output;
116
output_html_with_http_headers $input, $cookie, $template->output;
116
- 

Return to bug 12933