Code to allow the associated borrowers to work

This commit is contained in:
rangi 2006-06-20 22:35:47 +00:00
parent 4a46a986e2
commit f30b030af8
2 changed files with 8 additions and 0 deletions

View File

@ -89,6 +89,7 @@ my %env; # FIXME env is used as an "environment" variable. Could be dropped prob
my $print;
$env{'branchcode'}= $branch;
$env{'printer'}= $printer;
$env{'organisation'} = $organisation;
# $env{'queue'}=$printer;
my @datearr = localtime(time());

View File

@ -175,6 +175,10 @@ my %requiretables = (
datereviewed datetime,
PRIMARY KEY (reviewid)
)",
borrowers_to_borrowers => "(
borrower1 integer,
borrower2 integer
)",
);
@ -1793,6 +1797,9 @@ sub MARCgetitem {
exit;
# $Log$
# Revision 1.149 2006/06/20 22:35:47 rangi
# Code to allow the associated borrowers to work
#
# Revision 1.148 2006/06/17 22:12:01 rangi
# Adding id field to reviews table
#