gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed the holding branch insertion code. It was inserting the correct 

homebranch but was still inserting the wrong home branch
This commit is contained in:
rangi 2002-03-31 06:50:08 +00:00
parent fb5d8f5fe9
commit 6b341d91ab
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
acqui.simple/addbooks.pl
View File

@ -261,10 +261,12 @@ sub newitem {
my @datearr=localtime(time);
my $date=(1900+$datearr[5])."-".($datearr[4]+1)."-".$datearr[3];
my $q_homebranch=$dbh->quote($input->param('homebranch'));
$sth=$dbh->prepare("insert into items (itemnumber, biblionumber,
my $query="insert into items (itemnumber, biblionumber,
biblioitemnumber,barcode, itemnotes, holdingbranch, homebranch, dateaccessioned, replacementprice) values ($itemnumber,
$biblionumber, $biblioitemnumber, $barcode, $q_itemnotes, 'STWE', $q_homebranch, '$date', $replacementprice)");
$biblionumber, $biblioitemnumber, $barcode, $q_itemnotes, $q_homebranch, $q_homebranch, '$date', $replacementprice)";
$sth=$dbh->prepare($query);
$sth->execute;
# print $query;
}
if ($isbn) {
@ -321,9 +323,7 @@ EOF
my $branches=getbranches();
foreach my $key (sort(keys %$branches)) {
print "<option value=\"$key\">$branches->{$key}->{'branchname'}</option>";
# $key, '=', $branches->{$key}, "\n";
}
# <option value='STWE'>Stewart Elementary<option value='MEZ'>Meziadin Elementary
}
print << "EOF";
</select></td></tr>
</tr><td colspan=2>Replacement Price: <input name=replacementprice size=10></td></tr>

2
acqui.simple/addbookslccn.pl
View File

@ -259,7 +259,7 @@ sub newitem {
my $q_homebranch=$dbh->quote($input->param('homebranch'));
$sth=$dbh->prepare("insert into items (itemnumber, biblionumber,
biblioitemnumber,barcode, itemnotes, holdingbranch, homebranch, dateaccessioned, replacementprice) values ($itemnumber,
$biblionumber, $biblioitemnumber, $barcode, $q_itemnotes, 'STWE', $q_homebranch, '$date', $replacementprice)");
$biblionumber, $biblioitemnumber, $barcode, $q_itemnotes, $q_homebranch, $q_homebranch, '$date', $replacementprice)");
$sth->execute;
}