|
Lines 1488-1494
sub GetMarcPrice {
Link Here
|
| 1488 |
|
1488 |
|
| 1489 |
my @listtags; |
1489 |
my @listtags; |
| 1490 |
my $subfield; |
1490 |
my $subfield; |
| 1491 |
|
1491 |
|
| 1492 |
if ( $marcflavour eq "MARC21" ) { |
1492 |
if ( $marcflavour eq "MARC21" ) { |
| 1493 |
@listtags = ('345', '020'); |
1493 |
@listtags = ('345', '020'); |
| 1494 |
$subfield="c"; |
1494 |
$subfield="c"; |
|
Lines 3500-3507
sub get_biblio_authorised_values {
Link Here
|
| 3500 |
|
3500 |
|
| 3501 |
=head2 CountBiblioInOrders |
3501 |
=head2 CountBiblioInOrders |
| 3502 |
|
3502 |
|
| 3503 |
=over 4 |
3503 |
=over |
| 3504 |
$count = &CountBiblioInOrders( $biblionumber); |
3504 |
|
|
|
3505 |
=item $count = &CountBiblioInOrders( $biblionumber); |
| 3505 |
|
3506 |
|
| 3506 |
=back |
3507 |
=back |
| 3507 |
|
3508 |
|
|
Lines 3523-3530
sub CountBiblioInOrders {
Link Here
|
| 3523 |
|
3524 |
|
| 3524 |
=head2 GetSubscriptionsId |
3525 |
=head2 GetSubscriptionsId |
| 3525 |
|
3526 |
|
| 3526 |
=over 4 |
3527 |
=over |
| 3527 |
$subscriptions = &GetSubscriptionsId($biblionumber); |
3528 |
|
|
|
3529 |
=item $subscriptions = &GetSubscriptionsId($biblionumber); |
| 3528 |
|
3530 |
|
| 3529 |
=back |
3531 |
=back |
| 3530 |
|
3532 |
|
|
Lines 3546-3553
sub GetSubscriptionsId {
Link Here
|
| 3546 |
|
3548 |
|
| 3547 |
=head2 GetHolds |
3549 |
=head2 GetHolds |
| 3548 |
|
3550 |
|
| 3549 |
=over 4 |
3551 |
=over |
| 3550 |
$holds = &GetHolds($biblionumber); |
3552 |
|
|
|
3553 |
=item $holds = &GetHolds($biblionumber); |
| 3551 |
|
3554 |
|
| 3552 |
=back |
3555 |
=back |
| 3553 |
|
3556 |
|