[Kick-developers] CVS: kick status,1.6,1.7

[Michael R. <mr...@us...>]

Update of /cvsroot/kick/kick
In directory usw-pr-cvs1:/tmp/cvs-serv10291

Modified Files:
	status 
Log Message:

Tools wird nicht mehr gebunden
Quote-Anpassung im Datumsformat (unterschiedliche Behandlung MySql und MS Access)


Index: status
===================================================================
RCS file: /cvsroot/kick/kick/status,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** status	14 Oct 2001 21:55:02 -0000	1.6
--- status	19 Mar 2002 09:08:43 -0000	1.7
***************
*** 11,15 ****
  use Date::Calc qw(check_date Date_to_Days Add_Delta_Days);
  use GetOption;
- use Tools;
  use Text::ParseWords;
  use strict;
--- 11,14 ----
***************
*** 53,57 ****
  my ($jahr, $monat, $tag);
  
! &Sql ( sql => (sprintf 'SELECT MIN(datum) FROM abschluss WHERE datum >= %s', &DBDate(&ParseDate($opt { datum }))));
  if (&ParseDBDate (&Sql_Zelle(0))) {
      ($jahr, $monat, $tag) = &ParseDBDate (&Sql_Zelle(0));
--- 52,56 ----
  my ($jahr, $monat, $tag);
  
! &Sql ( sql => (sprintf 'SELECT MIN(datum) FROM abschluss WHERE datum >= %s', &Quote(&DBDate(&ParseDate($opt { datum })))));
  if (&ParseDBDate (&Sql_Zelle(0))) {
      ($jahr, $monat, $tag) = &ParseDBDate (&Sql_Zelle(0));
***************
*** 71,75 ****
      my $com = sprintf 'tauszg -bis "%s" -summe -csv',
                  &LongDate($jahr, $monat, $tag);
- 
      my @result = `perl $com`;
      shift @result;
--- 70,73 ----
***************
*** 262,265 ****
--- 260,268 ----
  
      $Log$
+     Revision 1.7  2002/03/19 09:08:43  mrau
+ 
+     Tools wird nicht mehr gebunden
+     Quote-Anpassung im Datumsformat (unterschiedliche Behandlung MySql und MS Access)
+ 
      Revision 1.6  2001/10/14 21:55:02  mrau
      Bugfix SQL-Statement zur Selektion des 'nächsten' Abschlusses