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

(-)a/labels/label-create-pdf.pl (-4 / +6 lines)
Lines 38-50 my ( $template, $loggedinuser, $cookie ) = get_template_and_user({ Link Here
38
								     debug           => 1,
38
								     debug           => 1,
39
								     });
39
								     });
40
40
41
41
my $batch_id;
42
my $batch_id    = $cgi->param('batch_id') if $cgi->param('batch_id');
42
my @label_ids;
43
my @item_numbers;
44
$batch_id    = $cgi->param('batch_id') if $cgi->param('batch_id');
43
my $template_id = $cgi->param('template_id') || undef;
45
my $template_id = $cgi->param('template_id') || undef;
44
my $layout_id   = $cgi->param('layout_id') || undef;
46
my $layout_id   = $cgi->param('layout_id') || undef;
45
my $start_label = $cgi->param('start_label') || 1;
47
my $start_label = $cgi->param('start_label') || 1;
46
my @label_ids   = $cgi->param('label_id') if $cgi->param('label_id');
48
@label_ids   = $cgi->param('label_id') if $cgi->param('label_id');
47
my @item_numbers  = $cgi->param('item_number') if $cgi->param('item_number');
49
@item_numbers  = $cgi->param('item_number') if $cgi->param('item_number');
48
50
49
my $items = undef;
51
my $items = undef;
50
52
(-)a/labels/label-create-xml.pl (-3 / +24 lines)
Lines 1-5 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
2
3
# Copyright Koha development team 2011
4
#
5
# This file is part of Koha.
6
#
7
# Koha is free software; you can redistribute it and/or modify it under the
8
# terms of the GNU General Public License as published by the Free Software
9
# Foundation; either version 2 of the License, or (at your option) any later
10
# version.
11
#
12
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
13
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
15
#
16
# You should have received a copy of the GNU General Public License along with
17
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
18
# Suite 330, Boston, MA  02111-1307 USA
19
#
20
3
use strict;
21
use strict;
4
use warnings;
22
use warnings;
5
23
Lines 13-23 use C4::Labels 1.000000; Link Here
13
31
14
my $cgi = new CGI;
32
my $cgi = new CGI;
15
33
16
my $batch_id    = $cgi->param('batch_id') if $cgi->param('batch_id');
34
my $batch_id;
35
my @labels_id;
36
my @item_numbers;
37
$batch_id    = $cgi->param('batch_id') if $cgi->param('batch_id');
17
my $template_id = $cgi->param('template_id') || undef;
38
my $template_id = $cgi->param('template_id') || undef;
18
my $layout_id   = $cgi->param('layout_id') || undef;
39
my $layout_id   = $cgi->param('layout_id') || undef;
19
my @label_ids   = $cgi->param('label_id') if $cgi->param('label_id');
40
@label_ids   = $cgi->param('label_id') if $cgi->param('label_id');
20
my @item_numbers  = $cgi->param('item_number') if $cgi->param('item_number');
41
@item_numbers  = $cgi->param('item_number') if $cgi->param('item_number');
21
42
22
my $items = undef;
43
my $items = undef;
23
44
(-)a/labels/label-edit-batch.pl (-4 / +6 lines)
Lines 56-65 my $display_columns = [ {_label_number => {label => 'Label Number', link_field Link Here
56
                        {select         => {label => 'Select', value => '_label_id'}},
56
                        {select         => {label => 'Select', value => '_label_id'}},
57
                      ];
57
                      ];
58
my $op = $cgi->param('op') || 'edit';
58
my $op = $cgi->param('op') || 'edit';
59
my @label_ids;
60
my @item_numbers;
61
my $barcode;
59
my $batch_id = $cgi->param('element_id') || $cgi->param('batch_id') || undef;
62
my $batch_id = $cgi->param('element_id') || $cgi->param('batch_id') || undef;
60
my @label_ids = $cgi->param('label_id') if $cgi->param('label_id');
63
@label_ids = $cgi->param('label_id') if $cgi->param('label_id');
61
my @item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
64
@item_numbers = $cgi->param('item_number') if $cgi->param('item_number');
62
my $barcode = $cgi->param('barcode') if $cgi->param('barcode');
65
$barcode = $cgi->param('barcode') if $cgi->param('barcode');
63
66
64
my $branch_code = C4::Context->userenv->{'branch'};
67
my $branch_code = C4::Context->userenv->{'branch'};
65
68
66
- 

Return to bug 6679