[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.58,1.59

[Jerome Vizcaino]

Update of /cvsroot/koha/koha/C4/Circulation
In directory sc8-pr-cvs1:/tmp/cvs-serv12669

Modified Files:
	Circ2.pm 
Log Message:
FIX: Incorrect parameters given to function Stats::UpdateStats in
issuebook and returnbook functions


Index: Circ2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.58
retrieving revision 1.59
diff -C2 -r1.58 -r1.59
*** Circ2.pm	5 Jun 2003 17:03:34 -0000	1.58
--- Circ2.pm	20 Jun 2003 12:48:09 -0000	1.59
***************
*** 629,633 ****
  						$iteminformation->{'charge'} = $charge;
  					}
! 					&UpdateStats($env,$env->{'branchcode'},'renew',$charge,'',$iteminformation->{'itemnumber'},$iteminformation->{'itemtype'});
  					renewbook($env,$dbh, $patroninformation->{'borrowernumber'}, $iteminformation->{'itemnumber'});
  					$noissue=1;
--- 629,633 ----
  						$iteminformation->{'charge'} = $charge;
  					}
! 					&UpdateStats($env,$env->{'branchcode'},'renew',$charge,'',$iteminformation->{'itemnumber'},$iteminformation->{'itemtype'},$patroninformation->{'borrowernumber'});
  					renewbook($env,$dbh, $patroninformation->{'borrowernumber'}, $iteminformation->{'itemnumber'});
  					$noissue=1;
***************
*** 761,765 ****
  		}
  		# Record the fact that this book was issued.
! 		&UpdateStats($env,$env->{'branchcode'},'issue',$charge,'',$iteminformation->{'itemnumber'},$iteminformation->{'itemtype'});
  	}
  
--- 761,765 ----
  		}
  		# Record the fact that this book was issued.
! 		&UpdateStats($env,$env->{'branchcode'},'issue',$charge,'',$iteminformation->{'itemnumber'},$iteminformation->{'itemtype'},$patroninformation->{'borrowernumber'});
  	}
  
***************
*** 893,897 ****
  	# update stats?
  	# Record the fact that this book was returned.
! 	UpdateStats(\%env, $branch ,'return','0','',$iteminformation->{'itemnumber'});
  	return ($doreturn, $messages, $iteminformation, $borrower);
  }
--- 893,897 ----
  	# update stats?
  	# Record the fact that this book was returned.
! 	UpdateStats(\%env, $branch ,'return','0','',$iteminformation->{'itemnumber'},$iteminformation->{'itemtype'},$borrower->{'borrowernumber'});
  	return ($doreturn, $messages, $iteminformation, $borrower);
  }