Lines 683-688
sub extract_gir {
Link Here
|
683 |
LSZ => 'size_code', |
683 |
LSZ => 'size_code', |
684 |
LVC => 'coded_servicing_instruction', |
684 |
LVC => 'coded_servicing_instruction', |
685 |
LVT => 'servicing_instruction', |
685 |
LVT => 'servicing_instruction', |
|
|
686 |
LHC => 'library_holding_code', |
687 |
LRP => 'library_rotation_plan', |
688 |
LSC => 'statistical_category', |
689 |
RIC => 'reader_interest_category', |
686 |
); |
690 |
); |
687 |
|
691 |
|
688 |
my $set_qualifier = $s->elem( 0, 0 ); # copy number |
692 |
my $set_qualifier = $s->elem( 0, 0 ); # copy number |
689 |
- |
|
|