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

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tt (+2 lines)
Lines 272-278 Link Here
272
                <tbody>[% FOREACH missingissue IN missingissues %]
272
                <tbody>[% FOREACH missingissue IN missingissues %]
273
                    <tr>
273
                    <tr>
274
                        <td>
274
                        <td>
275
                          [% UNLESS missingissue.cannot_claim %]
275
                            <input type="checkbox" name="serialid" value="[% missingissue.serialid %]" />
276
                            <input type="checkbox" name="serialid" value="[% missingissue.serialid %]" />
277
                          [% END %]
276
                        </td>
278
                        </td>
277
                        <td>
279
                        <td>
278
                        [% missingissue.name %]
280
                        [% missingissue.name %]
(-)a/serials/claims.pl (-2 / +11 lines)
Lines 40-46 my $suppliername = $input->param('suppliername'); Link Here
40
my $order = $input->param('order');
40
my $order = $input->param('order');
41
41
42
# open template first (security & userenv set here)
42
# open template first (security & userenv set here)
43
my ($template, $loggedinuser, $cookie)
43
my ($template, $loggedinuser, $cookie, $flags)
44
= get_template_and_user({template_name => 'serials/claims.tmpl',
44
= get_template_and_user({template_name => 'serials/claims.tmpl',
45
            query => $input,
45
            query => $input,
46
            type => 'intranet',
46
            type => 'intranet',
Lines 72-77 if ($supplierid) { Link Here
72
    @supplierinfo=GetBookSeller($supplierid);
72
    @supplierinfo=GetBookSeller($supplierid);
73
}
73
}
74
74
75
unless( $flags->{superlibrarian} == 1
76
 || $template->{param_map}->{CAN_user_serials_superserials} ){
77
    foreach (@missingissues) {
78
        if( $_->{branchcode}
79
          and $_->{branchcode} ne C4::Context->userenv->{'branch'} ) {
80
            $_->{cannot_claim} = 1;
81
        }
82
    }
83
}
84
75
my $branchloop = GetBranchesLoop();
85
my $branchloop = GetBranchesLoop();
76
86
77
my $preview=0;
87
my $preview=0;
78
- 

Return to bug 8438