+
+ function email_appt($appointment)
+ {
+ //print "Emailing notification of appointment: $appointment <br>";
+
+ $sql = "SELECT * FROM eq_appointment where appointment='$appointment'";
+ $this->db->query($sql,__LINE__,__FILE__);
+
+ while ($this->db->next_record())
+ {
+ $appointment = $this->db->f('appointment');
+ $presidency = $this->db->f('presidency');
+ $interviewer = "";
+ $email = "";
+ $elder = $this->db->f('elder');
+ $elder_name = "";
+ $family = $this->db->f('family');
+ $family_name = "";
+ $appt_name = "";
+ $phone = "";
+ $location = "";
+ $uid = $this->db->f('uid');
+
+ // Extract the year, month, day, hours, minutes, seconds from the appointment time
+ $appt_date = $this->db->f('date');
+ $date_array = explode("-",$appt_date);
+ $year = $date_array[0]; $month = $date_array[1]; $day = $date_array[2];
+ $appt_time = $this->db->f('time');
+ $time_array = explode(":",$appt_time);
+ $hour = $time_array[0]; $minute = $time_array[1]; $seconds = $time_array[2];
+
+ // Format the appointment time into an iCal UTC equivalent
+ $dtstamp = gmdate("Ymd"."\T"."His"."\Z");
+ $dtstart = gmdate("Ymd"."\T"."His"."\Z", mktime($hour,$minute,$seconds,$month,$day,$year));
+ $dtstartstr = date("l, F d, o g:i A", mktime($hour,$minute,$seconds,$month,$day,$year));
+
+ // Set the email address of the person making the appointment
+ $from = $GLOBALS['phpgw_info']['user']['fullname'] . "<" .
+ $GLOBALS['phpgw_info']['user']['preferences']['email']['address'] . ">";
+
+ $sql = "SELECT * FROM eq_presidency where presidency='$presidency'";
+ $this->db2->query($sql,__LINE__,__FILE__);
+ if($this->db2->next_record()) {
+ $email = $this->db2->f('email');
+ $interviewer = $this->db2->f('name');
+ }
+
+ if($elder > 0) {
+ $sql = "SELECT * FROM eq_elder where elder='$elder'";
+ $this->db2->query($sql,__LINE__,__FILE__);
+ if($this->db2->next_record()) {
+ $elder_name = $this->db2->f('name');
+ $phone = $this->db2->f('phone');
+ $appt_name = $elder_name . " Interview";
+ $location = "$interviewer"."'s home";
+ $duration = $this->default_ppi_appt_duration * 60;
+ }
+ }
+
+ if($family > 0) {
+ $sql = "SELECT * FROM eq_family where family='$family'";
+ $this->db2->query($sql,__LINE__,__FILE__);
+ if($this->db2->next_record()) {
+ $family_name = $this->db2->f('name');
+ $phone = $this->db2->f('phone');
+ $elder_id = $this->db2->f('elder_id');
+ $appt_name = $family_name . " Family Visit";
+ $sql = "SELECT * FROM eq_elder where elder='$elder_id'";
+ $this->db3->query($sql,__LINE__,__FILE__);
+ if($this->db3->next_record()) {
+ $phone = $this->db3->f('phone');
+ }
+ $sql = "SELECT * FROM eq_parent where family='$family'";
+ $this->db3->query($sql,__LINE__,__FILE__);
+ if($this->db3->next_record()) {
+ $location=$this->db3->f('address');
+ }
+ $duration = $this->default_visit_appt_duration * 60;
+ }
+ }
+
+ $dtend = gmdate("Ymd"."\T"."His"."\Z", mktime($hour,$minute,$seconds+$duration,$month,$day,$year));
+ $dtendstr = date("g:i A", mktime($hour,$minute,$seconds+$duration,$month,$day,$year));
+ $date = $dtstartstr . "-" . $dtendstr;
+ $description = "$appt_name : $phone";
+
+ if(($uid == 0) && ($appt_name != "")) {
+ // Create a new calendar item for this appointment, since this must be the first time we
+ // are sending it out.
+ print "Sent new appointment to " . $interviewer . " at " . $email . " for " . $appt_name . "<br>";
+ $uid = rand() . rand(); // Generate a random identifier for this appointment
+ $subject = "Created: $appt_name";
+
+ $this->db->query("UPDATE eq_appointment set" .
+ " uid=" . $uid .
+ " WHERE appointment=" . $appointment,__LINE__,__FILE__);
+
+ $action = "PUBLISH";
+ $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
+ $dtend, $date, $location, $appt_name, $description, $uid);
+
+ } else if(($uid != 0) && ($appt_name == "")) {
+ // Remove the calendar item for this appointment since it has already been sent
+ // and there is no name we have changed it to.
+ print "Sent deleted appointment to " . $interviewer . " at " . $email . " for " . $appt_date . " " . $appt_time . "<br>";
+ $subject = "Canceled: $appt_date $appt_time";
+
+ $this->db->query("UPDATE eq_appointment set" .
+ " uid=0" .
+ " WHERE appointment=" . $appointment,__LINE__,__FILE__);
+
+ $action = "CANCEL";
+ $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
+ $dtend, $date, $location, $subject, $subject, $uid);
+
+ } else if($uid != 0) {
+ // Update the existing appointment since we have changed it
+ print "Sent updated appointment to " . $interviewer . " at " . $email . " for " . $appt_name . "<br>";
+
+ $subject = "Canceled: $appt_date $appt_time";
+ $action = "CANCEL";
+ $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
+ $dtend, $date, $location, $subject, $subject, $uid);
+
+ $uid = rand() . rand(); // Generate a random identifier for this appointment
+ $this->db->query("UPDATE eq_appointment set" .
+ " uid=" . $uid .
+ " WHERE appointment=" . $appointment,__LINE__,__FILE__);
+
+ $subject = "Updated: $appt_name";
+ $action = "PUBLISH";
+ $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
+ $dtend, $date, $location, $appt_name, $description, $uid);
+ }
+
+ }
+
+ return true;
+ }
+
+ function send_ical_appt($action, $to, $from, $subject, $dtstamp, $dtstart, $dtend, $date, $location, $summary, $description, $uid)
+ {
+ // Initialize our local variables
+ $boundary = "=MIME_APPOINTMENT_BOUNDARY";
+ $message = "";
+ $headers = "";
+
+ // Form the headers for the email message
+ $headers.="X-Mailer: PHP/" . phpversion() . "\n";
+ $headers.="Mime-Version: 1.0\n";
+ $headers.="Content-Type: multipart/mixed; boundary=\"$boundary\"\n";
+ $headers.="Content-Disposition: inline\n";
+ $headers.="Reply-To: $from\n";
+ $headers.="From: $from\n";
+
+ // Print the plaintext version of the appointment
+ $message.="--$boundary\n";
+ $message.="Content-Type: text/plain; charset=us-ascii\n";
+ $message.="Content-Disposition: inline\n";
+ $message.="\n";
+ $message.="What: $description\n";
+ $message.="When: $date\n";
+ $message.="Where: $location\n";
+ $message.="\n";
+
+ // Print the .ics attachment version of the appointment
+ $message.="--$boundary\n";
+ $message.="Content-Type: text/calendar; charset=us-ascii\n";
+ $message.="Content-Disposition: attachment; filename=\"appointment.ics\"\n";
+ $message.="\n";
+ $message.="BEGIN:VCALENDAR" . "\n";
+ $message.="VERSION:2.0" . "\n";
+ $message.="PRODID:-//Microsoft Corporation//Outlook 11.0 MIMEDIR//EN" . "\n";
+ $message.="METHOD:$action" . "\n";
+ $message.="BEGIN:VEVENT" . "\n";
+ $message.="ORGANIZER:MAILTO:$from". "\n";
+ $message.="DTSTAMP:$dtstamp" . "\n";
+ $message.="DTSTART:$dtstart" . "\n";
+ $message.="DTEND:$dtend" . "\n";
+ $message.="SUMMARY:$summary" . "\n";
+ $message.="DESCRIPTION:$description" . "\n";
+ $message.="LOCATION:$location" . "\n";
+ $message.="UID:$uid" ."\n";
+ $message.="TRANSP:OPAQUE" . "\n";
+ $message.="SEQUENCE:0" . "\n";
+ $message.="CLASS:PUBLIC" . "\n";
+ $message.="END:VEVENT" . "\n";
+ $message.="END:VCALENDAR" . "\n";
+
+ // Complete the message
+ $message.="--$boundary\n";
+
+ // Send the message
+ mail($to, $subject, $message, $headers);
+
+ }
+
+ function get_time_selection_form($hour, $minute, $pm, $presidency, $appointment)
+ {
+ $form_data = "";
+ $blank = 0;
+
+ if($hour == 0) { $blank = 1; }
+
+ if($this->time_drop_down_lists == 1) {
+ // Create drop down lists to get the time
+ $form_data.= '<select name=sched['.$presidency.']['.$appointment.'][hour]>';
+ if($blank == 1) { $form_data.= '<option value=""></option>'; }
+ foreach(range(1,12) as $num) {
+ if($hour == $num) { $selected = 'selected="selected"'; } else { $selected = ''; }
+ $form_data.= '<option value='.$num.' '.$selected.'>'.$num.'</option>';
+ }
+ $form_data.= '</select>';
+ $form_data.= ' : ';
+ $form_data.= '<select name=sched['.$presidency.']['.$appointment.'][minute]>';
+ if($blank == 1) { $form_data.= '<option value=""></option>'; }
+ $num = 0;
+ while($num < 60) {
+ if($num < 10) { $num = "0" . "$num"; }
+ if($minute == $num) { $selected = 'selected="selected"'; } else { $selected = ''; }
+ if($blank == 1) { $selected = ""; }
+ $form_data.= '<option value='.$num.' '.$selected.'>'.$num.'</option>';
+ $num = $num + $this->time_drop_down_list_inc;
+ }
+ $form_data.= '</select>';
+ } else {
+ // Use free form text fields to get the time
+ if($blank == 1) { $hour = ""; $minute = ""; $ampm = ""; }
+ $form_data.= '<input type=text size=2 name=sched['.$presidency.']['.$appointment.'][hour] value='.$hour.'>';
+ $form_data.= ':';
+ $form_data.= '<input type=text size=2 name=sched['.$presidency.']['.$appointment.'][minute] value='.$minute.'>';
+ $form_data.= ' ';
+ }
+ // Always use a drop-down select form for am/pm
+ $form_data.= '<select name=sched['.$presidency.']['.$appointment.'][pm]>';
+ if($blank == 0) {
+ if($pm == 0) { $form_data.= '<option value=0 selected>am</option>'; $form_data.= '<option value=1>pm</option>'; }
+ if($pm == 1) { $form_data.= '<option value=0>am</option>'; $form_data.= '<option value=1 selected>pm</option>'; }
+ } else {
+ $form_data.= '<option value=""></option>';
+ $form_data.= '<option value=0>am</option>';
+ $form_data.= '<option value=1>pm</option>';
+ }
+ $form_data.= '</select>';
+
+ return $form_data;
+ }