more work

C4/Output.pm

@@ -280,6 +280,9 @@ sub mkheadr {
   }
   if ($type eq '2'){
     $string="<FONT SIZE=6><em>$text</em></FONT>";
+  }
+    if ($type eq '3'){
+    $string="<FONT SIZE=6><em>$text</em></FONT><p>";
   }
   return ($string);
 }

C4/Search.pm

@@ -360,7 +360,9 @@ sub ItemInfo {
     $class = $class.$dewey;
     $class = $class.$data->{'subclass'};
  #   $results[$i]="$data->{'title'}\t$data->{'barcode'}\t$datedue\t$data->{'branchname'}\t$data->{'dewey'}";
-     $results[$i]="$data->{'title'}\t$data->{'barcode'}\t$datedue\t$data->{'branchname'}\t$class\t$data->{'itemnumber'}";
+    my @temp=split('-',$data->{'datelastseen'});
+    my $date="$temp[2]/$temp[1]/$temp[0]";
+$results[$i]="$data->{'title'}\t$data->{'barcode'}\t$datedue\t$data->{'branchname'}\t$class\t$data->{'itemnumber'}\t$data->{'itemtype'}\t$date";
 
     $i++;
   }

detail.pl

@@ -26,8 +26,13 @@ if ($type eq 'opac'){
 print startpage();
 print startmenu($type);
 my $blah;
-
 my $bib=$input->param('bib');
+print "<a href=request.pl?bib=$bib><img height=42  WIDTH=187 BORDER=0 src=\"/images/place-request.gif\" align=right border=0></a>";
+print mkheadr(3,'Items');
+
+
+
+
 my $title=$input->param('title');
 
 
@@ -37,7 +42,11 @@ my $count=@items;
 my $i=0;
 print center();
 print mktablehdr;
-print mktablerow(5,$main,'Title','Barcode','DateDue','Location','Dewey'); 
+if ($type eq 'opac'){
+  print mktablerow(7,$main,'Title','Itemtype','Class','Location','DateDue','Lastseen','Barcode'); 
+} else {
+  print mktablerow(7,$main,'Title','Itemtype','Class','Location','DateDue','Lastseen','Barcode',"/images/background-mem.gif"); 
+}
 my $colour=1;
 while ($i < $count){
   my @results=split('\t',$items[$i]);
@@ -48,10 +57,10 @@ while ($i < $count){
     $results[2]='Available';
   }
   if ($colour == 1){                                                                          
-    print mktablerow(5,$secondary,$results[0],$results[1],$results[2],$results[3],$results[4]);                                        
+    print mktablerow(7,$secondary,$results[0],$results[6],$results[4],$results[3],$results[2],$results[7],$results[1]);                                        
     $colour=0;                                                                                
   } else{                                                                                     
-    print mktablerow(5,'white',$results[0],$results[1],$results[2],$results[3],$results[4]);                                          
+    print mktablerow(7,'white',$results[0],$results[6],$results[4],$results[3],$results[2],$results[7],$results[1]);                                          
     $colour=1;                                                                                
   }
    $i++;

search.pl

@@ -89,7 +89,7 @@ if ($type ne 'opac'){
   if ($subject ne ''){
    print mktablerow(1,$main,'<b>SUBJECT</b>','/images/background-mem.gif');
   } else {
-   print mktablerow(4,$main,'<b>TITLE</b>','<b>AUTHOR</b>','<b>COUNT</b>',bold('LOCATION'),'/images/background-mem.gif');
+   print mktablerow(5,$main,'<b>TITLE</b>','<b>AUTHOR</b>',bold('&copy;'),'<b>COUNT</b>',bold('LOCATION'),'/images/background-mem.gif');
   }
 } else {
   if ($subject ne ''){