- print mktablerow(7,$main,'Itemtype','Class','Location','Date Due','Last Seen','Barcode',"","/images/background-mem.gif");
- if ($dat->{'url'} ne '') {
- $dat->{'url'} =~ s/^http:\/\///;
- print mktablerow(7, $colour, 'WEB', '', 'Online', 'Available', "<a href=\"http://$dat->{'url'}\">$dat->{'url'}</a>");
- } # if
-} # else
-
-$colour = 'white';
-for (my $i = 0; $i < $count; $i ++) {
-
- my @results = split('\t', $items[$i]);
-
- if ($type ne 'opac') {
- $results[1] = mklink("/cgi-bin/koha/moredetail.pl?item=$results[5]&bib=$bib&bi=$results[8]&type=$type",$results[1]);
- } # if
-
- if ($results[2] eq '') {
- $results[2] = 'Available';
- } # if
-
- if ($type eq 'catmain'){
- $results[10] = mklink("/cgi-bin/koha/maint/catmaintain.pl?type=fixitemtype&bi=$results[8]&item=$results[6]","Fix Itemtype");
- } # if
-
- if ($type ne 'opac'){
- if ($type eq 'catmain'){
- print mktablerow(8,$colour,$results[6],$results[4],$results[3],$results[2],$results[7],$results[1],$results[9],$results[10]);
- } else {
- print mktablerow(7,$colour,$results[6],$results[4],$results[3],$results[2],$results[7],$results[1],$results[9]);
- } # else
- } else {
- $results[6] = ItemType($results[6]);
- print mktablerow(6,$colour,$results[6],$results[4],$results[3],$results[2],$results[7],$results[9]);
- } # else
-
- if ($colour eq $secondary) {
- $colour = 'white';
- } else {
- $colour = $secondary;
- } # else
-
-} # for
-
-print mktableft();
-print "<p>";
-print mktablehdr();
-
-if ($type ne 'opac') {
- print << "EOF";
-<tr valign="top">
-<td bgcolor="99cc33" background="/images/background-mem.gif" colspan="2"><p><b>HELP</b><br>
-<b>Update Biblio for all Items:</b> Click on the <b>Modify</b> button [left] to amend the biblio. Any changes you make will update the record for <b>all</b> the items listed above. <p>
-<b>Updating the Biblio for only ONE or SOME Items:</b>
-EOF
-
- if ($type eq 'catmain') {
- print << "EOF";
-If some of the items listed above need a different biblio,
-you need to click on the wrong item, then shift the group it belongs to, to the correct biblio.
-You will need to know the correct biblio number
-<p />
-</tr>
-EOF
-
- } else {
- print << "EOF";
-If some of the items listed above need a different biblio, or are on the wrong biblio, you must use the <a href="acquisitions/">acquisitions</a> process to fix this. You will need to "re-order" the items, and delete them from this biblio.
-<p />
-</tr>
-EOF