[Koha-devel] CVS: koha/misc fines2.pl,1.3,1.4

[Chris Cormack]

Update of /cvsroot/koha/koha/misc
In directory usw-pr-cvs1:/tmp/cvs-serv21040/misc

Modified Files:
	fines2.pl 
Log Message:
Just added some comments for Pat
(Is this a good way of doing it? if not let me know)


Index: fines2.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/fines2.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** fines2.pl	9 Apr 2002 22:08:15 -0000	1.3
--- fines2.pl	9 Apr 2002 23:30:48 -0000	1.4
***************
*** 4,7 ****
--- 4,9 ----
  #  and updates the total amount of fines due by each user.  It relies on 
  #  the existence of /tmp/fines, which is created by ???
+ # Doesnt really rely on it, it relys on being able to write to /tmp/
+ # It creates the fines file
  #
  #  This script is meant to be run nightly out of cron.
***************
*** 25,28 ****
--- 27,31 ----
  # FIXME
  # delete this?
+ # yep just a debuging thing
  #$numOverdueItems=1000;
  
***************
*** 35,38 ****
--- 38,43 ----
  # FIXME
  # delete this?
+ # another debugging thing, and yep it can go (you can make the script fake a day, say u want to rerun the overdues for
+ # a day when for some reason the script didnt run)
  #my $date=Date_DaysSince1BC(1,24,2002);
  print $date if $DEBUG;
***************
*** 50,53 ****
--- 55,59 ----
  # defined in a central place
  #
+ # Yep
  my $maxFine=5;
  
***************
*** 127,131 ****
  	  description,accounttype,amountoutstanding) values
  	  ($data->[$i]->{'borrowernumber'},$data->[$i]->{'itemnumber'},
! 	  '$accountno',now(),'$cost','Lost item $item->{'title'} $item->{'barcode'}','L','$cost')";
  	  my $sth=$dbh->prepare($query);
  	  $sth->execute;
--- 133,137 ----
  	  description,accounttype,amountoutstanding) values
  	  ($data->[$i]->{'borrowernumber'},$data->[$i]->{'itemnumber'},
! 	  '$accountno',now(),'$cost','Lost item $item->{'title'} $item->{'barcode'} $due','L','$cost')";
  	  my $sth=$dbh->prepare($query);
  	  $sth->execute;