See ChangeLog

Monotone-Parent: c4a5b31204ccd4c09e85262d9b5609b788a8380a
Monotone-Revision: 9057f51730136ddbcf1d8e64c8029ea9a4e6c991

Monotone-Author: flachapelle@inverse.ca
Monotone-Date: 2009-04-22T21:02:11
Monotone-Branch: ca.inverse.sogo

SoObjects/Appointments/SOGoAppointmentFolder.m

@@ -1,5 +1,5 @@
 /*
-  Copyright (C) 2007-2008 Inverse inc.
+  Copyright (C) 2007-2009 Inverse inc.
   Copyright (C) 2004-2005 SKYRIX Software AG
 
   This file is part of OpenGroupware.org.
@@ -2290,6 +2290,34 @@ firstInstanceCalendarDateRange: (NGCalendarDateRange *) fir
 	       includeProtectedInformation: NO];
 }
 
+- (NSArray *) fetchAlarmInfosFrom: (NSNumber *) _startUTCDate
+			       to: (NSNumber *) _endUTCDate
+{
+  static NSArray *nameFields = nil;
+  EOQualifier *qualifier;
+  GCSFolder *folder;
+  NSArray *records;
+  NSString *sql;
+
+  if (!nameFields)
+    nameFields = [[NSArray alloc] initWithObjects: @"c_name", @"c_nextalarm", @"c_iscycle", nil];
+  
+  folder = [self ocsFolder];
+  if (!folder)
+    {
+      [self errorWithFormat:@"(%s): missing folder for fetch!",
+            __PRETTY_FUNCTION__];
+      return nil;
+    }
+
+  sql =  [NSString stringWithFormat: @"((c_nextalarm <= %u) AND (c_nextalarm >= %u)) OR ((c_nextalarm > 0) AND (c_enddate > %u))",
+		   [_endUTCDate unsignedIntValue], [_startUTCDate unsignedIntValue], [_startUTCDate unsignedIntValue]];
+  qualifier = [EOQualifier qualifierWithQualifierFormat: sql];
+  records = [folder fetchFields: nameFields matchingQualifier: qualifier];
+  
+  return records;
+}
+
 /* URL generation */
 
 - (NSString *) baseURLForAptWithUID: (NSString *)_uid