[Koha-cvs] CVS: koha/C4 SearchMarc.pm,1.36.2.7,1.36.2.8

Paul POULAIN tipaul at users.sourceforge.net
Fri Mar 25 17:32:29 CET 2005


Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12481/C4

Modified Files:
      Tag: rel_2_2
	SearchMarc.pm 
Log Message:
Also retrieve itemtype description in result array. Now available for templates

Index: SearchMarc.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/SearchMarc.pm,v
retrieving revision 1.36.2.7
retrieving revision 1.36.2.8
diff -C2 -r1.36.2.7 -r1.36.2.8
*** SearchMarc.pm	18 Mar 2005 08:51:26 -0000	1.36.2.7
--- SearchMarc.pm	25 Mar 2005 16:32:27 -0000	1.36.2.8
***************
*** 336,340 ****
  	# HINT : biblionumber as bn is important. The hash is fills biblionumber with items.biblionumber.
  	# so if you dont' has an item, you get a not nice empty value.
! 	$sth = $dbh->prepare("SELECT biblio.biblionumber as bn,biblio.*, biblioitems.*,marc_biblio.bibid,itemtypes.notforloan
  							FROM biblio, marc_biblio 
  							LEFT JOIN biblioitems on biblio.biblionumber = biblioitems.biblionumber
--- 336,340 ----
  	# HINT : biblionumber as bn is important. The hash is fills biblionumber with items.biblionumber.
  	# so if you dont' has an item, you get a not nice empty value.
! 	$sth = $dbh->prepare("SELECT biblio.biblionumber as bn,biblio.*, biblioitems.*,marc_biblio.bibid,itemtypes.notforloan,itemtypes.description
  							FROM biblio, marc_biblio 
  							LEFT JOIN biblioitems on biblio.biblionumber = biblioitems.biblionumber
***************
*** 401,405 ****
  		# if $totalitems == 0, check if it's being ordered.
  		if ($totalitems == 0) {
! 			my $sth = $dbh->prepare("select count(*) from aqorders where biblionumber=?");
  			$sth->execute($biblionumber);
  			my ($ordered) = $sth->fetchrow;
--- 401,405 ----
  		# if $totalitems == 0, check if it's being ordered.
  		if ($totalitems == 0) {
! 			my $sth = $dbh->prepare("select count(*) from aqorders where biblionumber=? and datecancellationprinted is NULL");
  			$sth->execute($biblionumber);
  			my ($ordered) = $sth->fetchrow;





More information about the Koha-cvs mailing list