adding support for subclass and itemcallnumber
This commit is contained in:
parent
0cd1f0f16b
commit
d466e7b207
|
|
@ -48,6 +48,8 @@ $template->param(
|
|||
isbn => $data->{'isbn'},
|
||||
dewey => $data->{'dewey'},
|
||||
class => $data->{'class'},
|
||||
subclass => $data->{'subclass'},
|
||||
itemcallnumber => $data->{'itemcallnumber'},
|
||||
startrow => $data->{'startrow'},
|
||||
|
||||
intranetcolorstylesheet =>
|
||||
|
|
|
|||
|
|
@ -18,6 +18,8 @@ my $itemtype = $query->param('itemtype');
|
|||
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 @@ if ( $op eq 'save_conf' ) {
|
|||
$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;
|
||||
|
||||
|
|
|
|||
|
|
@ -113,8 +113,7 @@ $template->param(
|
|||
|
||||
resultsloop => \@resultsloop,
|
||||
|
||||
|
||||
itemtype_opt => $conf_data->{'itemtype'},
|
||||
itemtype_opt => $conf_data->{'itemtype'},
|
||||
papertype_opt => $conf_data->{'papertype'},
|
||||
author_opt => $conf_data->{'author'},
|
||||
barcode_opt => $conf_data->{'barcode'},
|
||||
|
|
@ -124,6 +123,8 @@ $template->param(
|
|||
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'},
|
||||
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue