|
Lines 334-339
sub SearchAuthorities {
Link Here
|
| 334 |
$newline{summary} = $summary; |
334 |
$newline{summary} = $summary; |
| 335 |
$newline{even} = $counter % 2; |
335 |
$newline{even} = $counter % 2; |
| 336 |
$newline{reported_tag} = $reported_tag; |
336 |
$newline{reported_tag} = $reported_tag; |
|
|
337 |
$newline{origincode} = CalculateOriginCode( $authrecord, $authtypecode ); |
| 337 |
} |
338 |
} |
| 338 |
$counter++; |
339 |
$counter++; |
| 339 |
push @finalresult, \%newline; |
340 |
push @finalresult, \%newline; |
| 340 |
- |
|
|