[Koha-cvs] koha/barcodes label-home.pl label-manager.pl la... [rel_2_2]

[Joshua Ferraro]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     Joshua Ferraro <kados>  06/07/20 15:30:16

Modified files:
        barcodes       : label-home.pl label-manager.pl label-print.pl 

Log message:
        adding support for subclass and itemcallnumber

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-home.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.3&r2=1.1.2.4
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-manager.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.2&r2=1.1.2.3
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-print.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.2&r2=1.1.2.3

Patches:
Index: label-home.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-home.pl,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -b -r1.1.2.3 -r1.1.2.4
--- label-home.pl       19 Jul 2006 01:37:23 -0000      1.1.2.3
+++ label-home.pl       20 Jul 2006 15:30:16 -0000      1.1.2.4
@@ -48,6 +48,8 @@
     isbn        => $data->{'isbn'},
     dewey       => $data->{'dewey'},
     class       => $data->{'class'},
+       subclass        => $data->{'subclass'},
+       itemcallnumber => $data->{'itemcallnumber'},
     startrow    => $data->{'startrow'},
 
     intranetcolorstylesheet =>

Index: label-manager.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-manager.pl,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -u -b -r1.1.2.2 -r1.1.2.3
--- label-manager.pl    19 Jul 2006 01:37:23 -0000      1.1.2.2
+++ label-manager.pl    20 Jul 2006 15:30:16 -0000      1.1.2.3
@@ -18,6 +18,8 @@
 my $bcn          = $query->param('bcn');
 my $dcn          = $query->param('dcn');
 my $classif      = $query->param('classif');
+my $itemcallnumber   = $query->param('itemcallnumber');
+my $subclass    = $query->param('subclass');
 my $author       = $query->param('author');
 my $papertype    = $query->param('papertype');
 my $itemnumber   = $query->param('itemnumber');
@@ -46,14 +48,15 @@
     $sth2->finish;
     my $query2 = "INSERT INTO labels_conf 
                        ( barcodetype, title, isbn, itemtype, barcode,  
-                         dewey, class, author, papertype, printingtype, 
+                         dewey, class, subclass, itemcallnumber, author, 
papertype, printingtype, 
                                guidebox, startrow)
-                          values ( ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ? )";
+                          values ( ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ? )";
     my $sth2 = $dbh->prepare($query2);
     $sth2->execute(
         $barcodetype, $title,        $isbn,     $itemtype,
-        $bcn,         $dcn,          $classif,  $author,
-        $papertype,   $printingtype, $guidebox, $startrow
+        $bcn,         $dcn,          $classif,  $subclass,
+               $itemcallnumber,    $author, $papertype,$printingtype,
+               $guidebox, $startrow
     );
     $sth2->finish;
 

Index: label-print.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-print.pl,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -u -b -r1.1.2.2 -r1.1.2.3
--- label-print.pl      19 Jul 2006 01:37:23 -0000      1.1.2.2
+++ label-print.pl      20 Jul 2006 15:30:16 -0000      1.1.2.3
@@ -113,7 +113,6 @@
 
     resultsloop             => address@hidden,
 
-
          itemtype_opt => $conf_data->{'itemtype'},
           papertype_opt => $conf_data->{'papertype'},
           author_opt => $conf_data->{'author'},
@@ -124,6 +123,8 @@
           isbn_opt => $conf_data->{'isbn'},
           dewey_opt => $conf_data->{'dewey'},
           class_opt => $conf_data->{'class'},
+                 subclass_opt => $conf_data->{'subclass'},
+                 itemcallnumber_opt => $conf_data->{'itemcallnumber'},