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