Lines 138-149
my $upc = GetNormalizedUPC($record,$marcflavour);
Link Here
|
138 |
my $ean = GetNormalizedEAN($record,$marcflavour); |
138 |
my $ean = GetNormalizedEAN($record,$marcflavour); |
139 |
my $oclc = GetNormalizedOCLCNumber($record,$marcflavour); |
139 |
my $oclc = GetNormalizedOCLCNumber($record,$marcflavour); |
140 |
my $isbn = GetNormalizedISBN(undef,$record,$marcflavour); |
140 |
my $isbn = GetNormalizedISBN(undef,$record,$marcflavour); |
|
|
141 |
my $content_identifier_exists; |
142 |
if ( $isbn or $ean or $oclc or $upc ) { |
143 |
$content_identifier_exists = 1; |
144 |
} |
141 |
|
145 |
|
142 |
$template->param( |
146 |
$template->param( |
143 |
normalized_upc => $upc, |
147 |
normalized_upc => $upc, |
144 |
normalized_ean => $ean, |
148 |
normalized_ean => $ean, |
145 |
normalized_oclc => $oclc, |
149 |
normalized_oclc => $oclc, |
146 |
normalized_isbn => $isbn, |
150 |
normalized_isbn => $isbn, |
|
|
151 |
content_identifier_exists => $content_identifier_exists, |
147 |
); |
152 |
); |
148 |
|
153 |
|
149 |
my $itemtypes = { map { $_->{itemtype} => $_ } @{ Koha::ItemTypes->search->unblessed } }; |
154 |
my $itemtypes = { map { $_->{itemtype} => $_ } @{ Koha::ItemTypes->search->unblessed } }; |