|
Lines 212-218
if ( $orderinfo->{quantity} ne '0' ) {
Link Here
|
| 212 |
my ($biblionumber,$bibitemnum) = AddBiblio($record,''); |
212 |
my ($biblionumber,$bibitemnum) = AddBiblio($record,''); |
| 213 |
# change suggestion status if applicable |
213 |
# change suggestion status if applicable |
| 214 |
if ($$orderinfo{suggestionid}) { |
214 |
if ($$orderinfo{suggestionid}) { |
| 215 |
ModSuggestion( {suggestionid=>$$orderinfo{suggestionid}, status=>'ORDERED', biblionumber=>$biblionumber} ); |
215 |
ModSuggestion( {suggestionid=>$$orderinfo{suggestionid}, STATUS=>'ORDERED', biblionumber=>$biblionumber} ); |
| 216 |
} |
216 |
} |
| 217 |
$orderinfo->{biblioitemnumber}=$bibitemnum; |
217 |
$orderinfo->{biblioitemnumber}=$bibitemnum; |
| 218 |
$orderinfo->{biblionumber}=$biblionumber; |
218 |
$orderinfo->{biblionumber}=$biblionumber; |
| 219 |
- |
|
|