|
Lines 1485-1491
sub GetMarcPrice {
Link Here
|
| 1485 |
|
1485 |
|
| 1486 |
my @listtags; |
1486 |
my @listtags; |
| 1487 |
my $subfield; |
1487 |
my $subfield; |
| 1488 |
|
1488 |
|
| 1489 |
if ( $marcflavour eq "MARC21" ) { |
1489 |
if ( $marcflavour eq "MARC21" ) { |
| 1490 |
@listtags = ('345', '020'); |
1490 |
@listtags = ('345', '020'); |
| 1491 |
$subfield="c"; |
1491 |
$subfield="c"; |
|
Lines 3487-3494
sub get_biblio_authorised_values {
Link Here
|
| 3487 |
|
3487 |
|
| 3488 |
=head2 CountBiblioInOrders |
3488 |
=head2 CountBiblioInOrders |
| 3489 |
|
3489 |
|
| 3490 |
=over 4 |
3490 |
=over |
| 3491 |
$count = &CountBiblioInOrders( $biblionumber); |
3491 |
|
|
|
3492 |
=item $count = &CountBiblioInOrders( $biblionumber); |
| 3492 |
|
3493 |
|
| 3493 |
=back |
3494 |
=back |
| 3494 |
|
3495 |
|
|
Lines 3510-3517
sub CountBiblioInOrders {
Link Here
|
| 3510 |
|
3511 |
|
| 3511 |
=head2 GetSubscriptionsId |
3512 |
=head2 GetSubscriptionsId |
| 3512 |
|
3513 |
|
| 3513 |
=over 4 |
3514 |
=over |
| 3514 |
$subscriptions = &GetSubscriptionsId($biblionumber); |
3515 |
|
|
|
3516 |
=item $subscriptions = &GetSubscriptionsId($biblionumber); |
| 3515 |
|
3517 |
|
| 3516 |
=back |
3518 |
=back |
| 3517 |
|
3519 |
|
|
Lines 3533-3540
sub GetSubscriptionsId {
Link Here
|
| 3533 |
|
3535 |
|
| 3534 |
=head2 GetHolds |
3536 |
=head2 GetHolds |
| 3535 |
|
3537 |
|
| 3536 |
=over 4 |
3538 |
=over |
| 3537 |
$holds = &GetHolds($biblionumber); |
3539 |
|
|
|
3540 |
=item $holds = &GetHolds($biblionumber); |
| 3538 |
|
3541 |
|
| 3539 |
=back |
3542 |
=back |
| 3540 |
|
3543 |
|