99 |
}); |
}); |
100 |
# change suggestion status if applicable |
# change suggestion status if applicable |
101 |
if ($suggestionid) { |
if ($suggestionid) { |
102 |
changestatus($suggestionid,'ORDERED'); |
changestatus($suggestionid,'ORDERED','',$bibnum); |
103 |
} |
} |
104 |
} else { |
} else { |
105 |
$bibnum=$input->param('biblio'); |
$bibnum=$input->param('biblio'); |
106 |
$bibitemnum=$input->param('bibitemnum'); |
$bibitemnum=$input->param('bibitemnum'); |
107 |
my $oldtype=$input->param('oldtype'); |
my $oldtype=$input->param('oldtype'); |
|
# &modbibitem({biblioitemnumber => $bibitemnum, |
|
|
# isbn => $isbn, |
|
|
# publishercode => $publishercode, |
|
|
# }); |
|
|
# &modbiblio({ |
|
|
# biblionumber => $bibnum, |
|
|
# title => $title?$title:"", |
|
|
# author => $author?$author:"", |
|
|
# copyrightdate => $copyrightdate?$copyrightdate:"", |
|
|
# series => $series?$series:"" }, |
|
|
# ); |
|
108 |
} |
} |
109 |
if ($ordnum) { |
if ($ordnum) { |
110 |
# warn "MODORDER $title / $ordnum / $quantity / $bookfund"; |
# warn "MODORDER $title / $ordnum / $quantity / $bookfund"; |