[Koha-cvs] CVS: koha/C4/Circulation Returns.pm,1.7,1.8

[Paul POULAIN]

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

Modified Files:
	Returns.pm 
Log Message:
see mail on koha-devel : code cleaning on Search.pm + normalizing API + use of biblionumber everywhere (instead of bn, biblio, ...)

Index: Returns.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Returns.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** Returns.pm	8 Dec 2003 14:24:55 -0000	1.7
--- Returns.pm	22 Sep 2005 15:31:05 -0000	1.8
***************
*** 39,43 ****
  use C4::Scan;
  use C4::Stats;
! use C4::Search;
  use C4::Print;
  
--- 39,43 ----
  use C4::Scan;
  use C4::Stats;
! use C4::Members;
  use C4::Print;
  
***************
*** 91,95 ****
          #if ($resp eq "Returned") {
  	if ($itemno ne "" ) {
! 	  my $item = itemnodata($env,$dbh,$itemno);
  	  # FIXME - This relies on C4::Circulation::Main to have a
  	  # "use C4::Circulation::Issues;" line, which is bogus.
--- 91,95 ----
          #if ($resp eq "Returned") {
  	if ($itemno ne "" ) {
! 	  my $item = getbibliofromitemnumber($env,$dbh,$itemno);
  	  # FIXME - This relies on C4::Circulation::Main to have a
  	  # "use C4::Circulation::Issues;" line, which is bogus.
***************
*** 283,287 ****
  sub find_reserves {
    my ($env,$dbh,$itemno) = @_;
!   my $itemdata = itemnodata($env,$dbh,$itemno);
    my $sth = $dbh->prepare("select * from reserves where found is null
    and biblionumber = ? and cancellationdate is NULL
--- 283,287 ----
  sub find_reserves {
    my ($env,$dbh,$itemno) = @_;
!   my $itemdata = getbibliofromitemnumber($env,$dbh,$itemno);
    my $sth = $dbh->prepare("select * from reserves where found is null
    and biblionumber = ? and cancellationdate is NULL