[Koha-cvs] CVS: koha/acqui finishreceive.pl,1.3,1.4

[Gynn Lomax]

Update of /cvsroot/koha/koha/acqui
In directory usw-pr-cvs1:/tmp/cvs-serv11435/acqui

Modified Files:
	finishreceive.pl 
Log Message:
Changes to allow modifications to the website biblioitems
Changes to way that website biblioitems are shown on the details page


Index: finishreceive.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui/finishreceive.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** finishreceive.pl	9 May 2002 03:01:40 -0000	1.3
--- finishreceive.pl	12 May 2002 18:08:19 -0000	1.4
***************
*** 68,73 ****
    receiveorder($biblionumber,$ordnum,$quantrec,$user,$cost,$invoiceno,$bibitemno,$freight,$bookfund);
    modbiblio($biblio);
!   modbibitem($bibitemno,$itemtype,$isbn,$publisher,$pubdate,$class,$dewey,$subclass,$illus,$pages,$volinf,$notes,$size);
!   #print $notes;
    my $barcode=$input->param('barcode');
    my @barcodes;
--- 68,86 ----
    receiveorder($biblionumber,$ordnum,$quantrec,$user,$cost,$invoiceno,$bibitemno,$freight,$bookfund);
    modbiblio($biblio);
!   &modbibitem({
!       biblioitemnumber => $bibitemno,
!       itemtype         => $itemtype?$itemtype:"",
!       isbn             => $isbn?$isbn:"",
!       publisher        => $publisher?$publisher:"",
!       publicationyear  => $pubdate?$pubdate:"",
!       class            => $class?$class:"",
!       dewey            => $dewey?$dewey:"",
!       subclass         => $subclass?$subclass:"",
!       illus            => $illus?$illus:"",
!       pages            => $pages?$pages:"",
!       volumeddesc      => $volinf?$volinf:"",
!       notes            => $notes?$notes:"",
!       size             => $size?$size:"" });
! 
    my $barcode=$input->param('barcode');
    my @barcodes;