inc/class.eq.inc.php

   1 <?php
   2   /**************************************************************************\
   3   * Application: phpGroupWare - eq                                           *
   4   * Framework: http://www.phpgroupware.org                                   *
   5   * Author: Alan J. Pippin (apippin@pippins.net)                             *
   6   * -----------------------------------------------                          *
   7   *  This program is free software; you can redistribute it and/or modify it *
   8   *  under the terms of the GNU General Public License as published by the   *
   9   *  Free Software Foundation; either version 2 of the License, or (at your  *
  10   *  option) any later version.                                              *
  11   \**************************************************************************/
  12       /* $Id: class.eq.inc.php,v 1.1.1.1 2005/07/20 07:40:32 ajp Exp $ */
  13
  14 class eq
  15 {
  16   var $db;
  17   var $db2;
  18   var $t;
  19   var $nextmatchs;
  20   var $grants;
  21   var $jscal;
  22   var $cal_options;
  23   var $default_ht_num_months;
  24   var $default_ppi_num_months;
  25   var $default_ppi_num_years;
  26   var $default_int_num_quarters;
  27   var $default_int_num_years;
  28   var $default_vis_num_years;
  29   var $default_att_num_quarters;
  30   var $max_num_districts;
  31   var $current_year;
  32   var $current_month;
  33   var $upload_target_path;
  34   var $script_path;
  35   var $max_appointments;
  36   var $max_presidency_members;
  37
  38   var $public_functions = array
  39     (
  40      'ht_view'    => True,
  41      'ht_update'  => True,
  42      'act_list'   => True,
  43      'act_view'   => True,
  44      'act_update' => True,
  45      'par_view'   => True,
  46      'ppi_view'   => True,
  47      'ppi_update' => True,
  48      'ppi_sched'  => True,
  49      'int_view'   => True,
  50      'int_update' => True,
  51      'int_sched'  => True,
  52      'vis_sched'  => True,
  53      'vis_view'   => True,
  54      'vis_update' => True,
  55      'att_view'   => True,
  56      'att_update' => True,
  57      'dir_view'   => True,
  58      'org_view'   => True,
  59      'schedule'   => True,
  60      'admin'      => True,
  61      'email'      => True,
  62      'email_appt' => True,
  63      'willing_view'   => True,
  64      'willing_update' => True,
  65      'send_ical_appt' => True,
  66      'assign_view'    => True,
  67      'assign_update'  => True,
  68      'get_time_selection_form' => True,
  69      );
  70
  71   function eq()
  72     {
  73       if(file_exists("setup/eq_config.local")) {
  74         include("setup/eq_config.local");
  75       } else {
  76         include("setup/eq_config");
  77       }
  78
  79       $this->script_path = "$this->application_path"."/bin";
  80       $this->max_presidency_members = 99;
  81       $this->max_appointments = 32768;
  82
  83       $this->db         = $GLOBALS['phpgw']->db;
  84       $this->db2        = $this->db;
  85       $this->db3        = $this->db;
  86       $this->nextmatchs = CreateObject('phpgwapi.nextmatchs');
  87       $this->t          = $GLOBALS['phpgw']->template;
  88       $this->account    = $GLOBALS['phpgw_info']['user']['account_id'];
  89       $this->grants     = $GLOBALS['phpgw']->acl->get_grants('eq');
  90       $this->grants[$this->account] = PHPGW_ACL_READ + PHPGW_ACL_ADD + PHPGW_ACL_EDIT + PHPGW_ACL_DELETE;
  91
  92       $this->jscal = CreateObject('eq.jscalendar');   // before phpgw_header() !!!
  93       $this->cal_options = 'daFormat    : "%Y-%m-%d",
  94                                 ifFormat    : "%Y-%m-%d",
  95                                 mondayFirst : false,
  96                                 weekNumbers : false';
  97
  98       $GLOBALS['phpgw_info']['flags']['app_header'] = 'Elders Quorum Tools - The 3rd Counselor';
  99       $GLOBALS['phpgw']->common->phpgw_header();
 100
 101       $this->current_day = `date '+%d'`;
 102       $this->current_day = $this->current_day-0; // Make it numeric
 103       $this->current_month = `date '+%m'`;
 104       $this->current_month = $this->current_month-0; // Make it numeric
 105       $this->current_year = `date '+%Y'`;
 106       $this->current_year = $this->current_year-0; // Make it numeric
 107
 108       echo parse_navbar();
 109       $this->display_app_header();
 110     }
 111
 112   function save_sessiondata()
 113     {
 114
 115     }
 116
 117   function display_app_header()
 118     {
 119       $this->t->set_file(array('eq_header' => 'header.tpl'));
 120
 121       if (isset($phpgw_info['user']['preferences']['eq']['eq_font']))
 122         {
 123           $font = $phpgw_info['user']['preferences']['eq']['eq_font'];
 124         }
 125       else
 126         {
 127           $font = 'Arial';
 128         }
 129
 130       $this->t->set_var('bg_color',$phpgw_info['theme']['th_bg']);
 131       $this->t->set_var('font',$font);
 132       $link_data['menuaction'] = 'eq.eq.ht_view';
 133       $this->t->set_var('link_hometeaching',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 134       $this->t->set_var('lang_hometeaching','HomeTeaching');
 135       $link_data['menuaction'] = 'eq.eq.act_list';
 136       $this->t->set_var('link_activity',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 137       $this->t->set_var('lang_activity','Activities');
 138       $link_data['menuaction'] = 'eq.eq.willing_view';
 139       $this->t->set_var('link_willing',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 140       $this->t->set_var('lang_willing','Willingness');
 141       $link_data['menuaction'] = 'eq.eq.assign_view';
 142       $this->t->set_var('link_assignment',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 143       $this->t->set_var('lang_assignment','Assignments');
 144       $link_data['menuaction'] = 'eq.eq.par_view';
 145       $this->t->set_var('link_participation',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 146       $this->t->set_var('lang_participation','Participation');
 147       $link_data['menuaction'] = 'eq.eq.ppi_view';
 148       $this->t->set_var('link_ppi',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 149       $this->t->set_var('lang_ppi','PPIs');
 150       $link_data['menuaction'] = 'eq.eq.int_view';
 151       $this->t->set_var('link_int',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 152       $this->t->set_var('lang_int','Interviews');
 153       $link_data['menuaction'] = 'eq.eq.vis_view';
 154       $this->t->set_var('link_visit',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 155       $this->t->set_var('lang_visit','Visits');
 156       $link_data['menuaction'] = 'eq.eq.att_view';
 157       $this->t->set_var('link_attendance',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 158       $this->t->set_var('lang_attendance','Attendance');
 159       $link_data['menuaction'] = 'eq.eq.dir_view';
 160       $this->t->set_var('link_dir',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 161       $this->t->set_var('lang_dir','Directory');
 162       $link_data['menuaction'] = 'eq.eq.org_view';
 163       $this->t->set_var('link_org',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 164       $this->t->set_var('lang_org','Callings');
 165       $link_data['menuaction'] = 'eq.eq.admin';
 166       $this->t->set_var('link_admin',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 167       $this->t->set_var('lang_admin','Admin');
 168       $link_data['menuaction'] = 'eq.eq.schedule';
 169       $this->t->set_var('link_schedule',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 170       $this->t->set_var('lang_schedule','Scheduling');
 171       $link_data['menuaction'] = 'eq.eq.email';
 172       $this->t->set_var('link_email',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 173       $this->t->set_var('lang_email','Email');
 174
 175       $this->t->pparse('out','eq_header');
 176     }
 177
 178   function ht_view()
 179     {
 180       $this->t->set_file(array('ht_view_t' => 'ht_view.tpl'));
 181       $this->t->set_block('ht_view_t','district_list','list');
 182
 183       $this->t->set_var('linkurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ht_view'));
 184       $num_months = get_var('num_months',array('GET','POST'));
 185       if($num_months == '') { $num_months = $this->default_ht_num_months; }
 186       $this->t->set_var('num_months',$num_months);
 187       $this->t->set_var('lang_filter','Filter');
 188       if($num_months == 1) { $this->t->set_var('lang_num_months','Month of History'); }
 189       else {  $this->t->set_var('lang_num_months','Months of History'); }
 190
 191       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ht_view'));
 192       $this->t->set_var('title','Hometeaching');
 193
 194       $sql = "SELECT * FROM eq_district where valid=1 ORDER BY district ASC";
 195       $this->db->query($sql,__LINE__,__FILE__);
 196       $i=0;
 197       while ($this->db->next_record())
 198         {
 199           $districts[$i]['district'] = $this->db->f('district');
 200           $districts[$i]['name'] = $this->db->f('name');
 201           $districts[$i]['supervisor'] = $this->db->f('supervisor');
 202           $i++;
 203         }
 204
 205       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY elder ASC";
 206       $this->db->query($sql,__LINE__,__FILE__);
 207       $i=0;
 208       while ($this->db->next_record())
 209         {
 210           $elder_id[$i] = $this->db->f('elder');
 211           $elder_name[$i] = $this->db->f('name');
 212           $elder_phone[$elder_id[$i]] = $this->db->f('phone');
 213           $i++;
 214         }
 215       array_multisort($elder_name, $elder_id);
 216
 217       // Make an array mapping elder_ids to elder_names
 218       for($i=0; $i < count($elder_id); $i++) {
 219           $id = $elder_id[$i];
 220           $elders[$id] = $elder_name[$i];
 221       }
 222
 223       $sql = "SELECT * FROM eq_aaronic where valid=1 ORDER BY aaronic ASC";
 224       $this->db->query($sql,__LINE__,__FILE__);
 225       while ($this->db->next_record())
 226         {
 227           $aaronic_id = $this->db->f('aaronic');
 228           $aaronic[$aaronic_id]['name'] = $this->db->f('name');
 229           $aaronic[$aaronic_id]['phone'] = $this->db->f('phone');
 230         }
 231
 232       $this->nextmatchs->template_alternate_row_color(&$this->t);
 233       for($m=$num_months; $m >= 0; $m--) { $total_families[$m]=0; }
 234       for ($i=0; $i < count($districts); $i++) {
 235         $this->t->set_var('district_number',$districts[$i]['district']);
 236         $this->t->set_var('district_name',$districts[$i]['name']);
 237         $supervisor = $districts[$i]['supervisor'];
 238         $unique_companionships='';
 239
 240         // Select all the unique companionship numbers for this district
 241         $sql = "SELECT distinct companionship FROM eq_companionship where valid=1 and district=". $districts[$i]['district'];
 242         $this->db->query($sql,__LINE__,__FILE__);
 243         $j=0;
 244         while ($this->db->next_record())
 245           {
 246             $unique_companionships[$j]['companionship'] = $this->db->f('companionship');
 247             $j++;
 248           }
 249
 250         $comp_width=450; $visit_width=25; $table_width=$comp_width + $num_months*$visit_width;
 251         $table_data=""; $num_companionships = 0;
 252         for($m=$num_months; $m >= 0; $m--) { $visits[$m]=0; $num_families[$m]=0; }
 253         for ($j=0; $j < count($unique_companionships); $j++) {
 254           $companion_table_entry = "";
 255           // Select all the companions in each companionship
 256           $sql = "SELECT * FROM eq_companionship where valid=1 and ".
 257                  "companionship=". $unique_companionships[$j]['companionship'];
 258           $this->db->query($sql,__LINE__,__FILE__);
 259
 260           while ($this->db->next_record())
 261             {
 262               // Get this companions information
 263               if($companion_table_entry != "") { $companion_table_entry .= "<td>&nbsp;/&nbsp;</td>"; }
 264               $companionship = $this->db->f('companionship');
 265               $elder_id = $this->db->f('elder');
 266               $aaronic_id = $this->db->f('aaronic');
 267               if($elder_id) {
 268                 $name = $elders[$elder_id];
 269                 $phone = $elder_phone[$elder_id];
 270               }
 271               else if($aaronic_id) {
 272                 $name = $aaronic[$aaronic_id]['name'];
 273                 $phone = $aaronic[$aaronic_id]['phone'];
 274               }
 275               $companion_table_entry .= "<td title=\"$phone\"><b>$name</b></td>";
 276             }
 277           $table_data.= "<tr bgcolor=#d3dce3><td colspan=20><table><tr>$companion_table_entry</tr></table><hr></td></tr>";
 278
 279           // Get the names of the families assigned this home teaching companionship
 280           $sql = "SELECT * from eq_family where valid=1 AND companionship=".$unique_companionships[$j]['companionship'];
 281           $sql = $sql . " ORDER BY name ASC";
 282           $this->db->query($sql,__LINE__,__FILE__);
 283           $k=0;
 284           while ($this->db->next_record())
 285             {
 286               $family_name = $this->db->f('name');
 287               $family_id = $this->db->f('family');
 288               $this->nextmatchs->template_alternate_row_color(&$this->t);
 289               $table_data.="<tr bgcolor=". $this->t->get_var('tr_color') ."><td>$family_name Family</td>";
 290               // Find out how many times Visits were performed by this companionship
 291               // in the past $num_months for this Family
 292               $header_row="<th width=$comp_width><font size=-2>Families</th>";
 293               for($m=$num_months; $m >= 0; $m--) {
 294                 $month = $this->current_month - $m;
 295                 $year = $this->current_year;
 296                 if($month <= 0) { $remainder = $month; $month = 12 + $remainder; $year=$year-1; }
 297                 if($month < 10) { $month = "0"."$month"; }
 298                 $month_start = "$year"."-"."$month"."-"."01";
 299                 $month_end = "$year"."-"."$month"."-"."31";
 300                 $month = "$month"."/"."$year";
 301
 302                 //print "m: $m month: $month year: $year month_start: $month_start month_end: $month_end<br>";
 303                 // Add this to the query to filter on only visits made by this companionship:
 304                 // " AND companionship=" . $unique_companionships[$j]['companionship'].
 305
 306                 // First check to see if the currently assigned companionship has visited them
 307                 $sql = "SELECT * FROM eq_visit WHERE date >= '$month_start' AND date <= '$month_end' ".
 308                    " AND companionship=".$unique_companionships[$j]['companionship'].
 309                    " AND family=". $family_id;
 310                 $query_id = $this->db2->query($sql,__LINE__,__FILE__);
 311                 if($this->db2->num_rows($query_id) == 0) {
 312                   // We did not find any visits made by the currently assigned companionship,
 313                   // look for visits made by any other companionship other than 0. (0 == EQ Presidency Visit)
 314                   $sql = "SELECT * FROM eq_visit WHERE date >= '$month_start' AND date <= '$month_end' ".
 315                      " AND companionship!=0".
 316                      " AND family=". $family_id;
 317                   $query_id = $this->db2->query($sql,__LINE__,__FILE__);
 318                 }
 319                 $this->db2->query($sql,__LINE__,__FILE__);
 320                 $link_data['menuaction'] = 'eq.eq.ht_update';
 321                 $link_data['date'] = $month_start;
 322                 $link_data['month_start'] = $month_start;
 323                 $link_data['month_end'] = $month_end;
 324                 $link_data['month'] = $month;
 325                 $link_data['district'] = $districts[$i]['district'];
 326                 $link_data['district_name'] = $districts[$i]['name'];
 327                 $link_data['action'] = 'view';
 328                 $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
 329                 $header_row .= "<th width=$visit_width><font size=-2><a href=$link>$month</a></th>";
 330                 if(!$total_visits[$m]) { $total_visits[$m] = 0; }
 331                 if($this->db2->next_record()) {
 332                   if($this->db2->f('visited') == 'y') {
 333                     $visits[$m]++; $total_visits[$m]++;
 334                     $num_families[$m]++; $total_families[$m]++;
 335                     $table_data .= '<td align=center><a href="'.$link.'"><img src="images/checkmark.gif"></a></td>';
 336                   }
 337                   else if($this->db2->f('visited') == 'n') {
 338                     $num_families[$m]++; $total_families[$m]++;
 339                     $table_data .= '<td align=center><a href="'.$link.'"><img src="images/x.gif"></a></td>';
 340                   }
 341                   else {
 342                     //$visits[$m]++; $total_visits[$m]++;
 343                     $table_data .= "<td>&nbsp;</td>";
 344                   }
 345                 }
 346                 else {
 347                   //$visits[$m]++; $total_visits[$m]++;
 348                   $table_data .= "<td>&nbsp;</td>";
 349                 }
 350               }
 351               $table_data .= "</tr>";
 352               $k++;
 353             }
 354           $table_data .= "<tr><td colspan=20></td></tr>";
 355         }
 356         $table_data .= "<tr><td colspan=20><hr></td></tr>";
 357         $stat_data = "<tr><td><b><font size=-2>Families Hometaught:<br>Hometeaching Percentage:</font></b></td>";
 358
 359         for($m=$num_months; $m >=0; $m--) {
 360           if($num_families[$m] > 0) {
 361             $percent = ceil(($visits[$m] / $num_families[$m])*100);
 362           } else {
 363             $percent = 0;
 364           }
 365           $stat_data .= "<td align=center><font size=-2><b>$visits[$m] / $num_families[$m]<br>$percent%</font></b></td>";
 366         }
 367         $stat_data .= "</tr>";
 368
 369         $this->t->set_var('table_width',$table_width);
 370         $this->t->set_var('header_row',$header_row);
 371         $this->t->set_var('table_data',$table_data);
 372         $this->t->set_var('stat_data',$stat_data);
 373         $this->t->fp('list','district_list',True);
 374       }
 375
 376       $totals = "<tr><td><b><font size=-2>Total Families Hometaught:<br>Total Hometeaching Percentage:</font></b></td>";
 377       for($m=$num_months; $m >=0; $m--) {
 378         if($total_families[$m] > 0) {
 379           $percent = ceil(($total_visits[$m] / $total_families[$m])*100);
 380         } else {
 381           $percent = 0;
 382         }
 383         $totals .= "<td align=center><font size=-2><b>$total_visits[$m] / $total_families[$m]<br>$percent%</font></b></td>";
 384       }
 385       $totals .= "</tr>";
 386
 387       $this->t->set_var('totals',$totals);
 388
 389       $this->t->pfp('out','ht_view_t');
 390       $this->save_sessiondata();
 391     }
 392
 393
 394   function ht_update()
 395     {
 396       $this->t->set_file(array('ht_update_t' => 'ht_update.tpl'));
 397       $this->t->set_block('ht_update_t','district_list','list');
 398       $this->t->set_block('ht_update_t','save','savehandle');
 399
 400       $district = get_var('district',array('GET','POST'));
 401       $district_name = get_var('district_name',array('GET','POST'));
 402       $date = get_var('date',array('GET','POST'));
 403       $month = get_var('month',array('GET','POST'));
 404       $month_start = get_var('month_start',array('GET','POST'));
 405       $month_end = get_var('month_end',array('GET','POST'));
 406       $action = get_var('action',array('GET','POST'));
 407
 408       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ht_view'));
 409       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ht_update&action=save'));
 410       $this->t->set_var('lang_done','Cancel');
 411       $this->t->set_var('district_name',$district_name);
 412       $this->t->set_var('district_number',$district);
 413       $this->t->set_var('title','Hometeaching Update ' . $month);
 414       $this->t->set_var('date',$date);
 415
 416       if($action == 'save')
 417         {
 418           // Get a list of all the companionships in this district
 419           $sql = "SELECT distinct companionship FROM eq_companionship where valid=1 and district=". $district;
 420           $this->db->query($sql,__LINE__,__FILE__);
 421           $j=0;
 422           while ($this->db->next_record())
 423             {
 424               $unique_companionships[$j]['companionship'] = $this->db->f('companionship');
 425               $j++;
 426             }
 427           for ($j=0; $j < count($unique_companionships); $j++)
 428             {
 429               //$comp=$unique_companionships[$j]['companionship'];
 430               //print "deleting from eq_visit where companionship=$comp and date=$date and district=$district<br>";
 431               // Delete all the visits that have taken place for all families for this companionsthip for this month
 432               $this->db->query("DELETE from eq_visit where companionship=" . $unique_companionships[$j]['companionship'] .
 433                                " AND " . "date='" . $date . "'",__LINE__,__FILE__);
 434             }
 435
 436           // Now, add the visits that are checked for this month
 437           $new_data = get_var('family_visited',array('POST'));
 438           foreach ($new_data as $family)
 439            {
 440              foreach ($family as $data)
 441                {
 442                  //print "family_visited: $data <br>";
 443                  $data_array = explode("/",$data);
 444                  $family_id = $data_array[0];
 445                  $companionship = $data_array[1];
 446                  $date = $data_array[2];
 447                  $visited = $data_array[3];
 448                  if($visited == "") { $visited = $data_array[4]; }
 449                  //print "family_id: $family_id companionship: $companionship date: $date visited: $visited<br>";
 450                  $this->db->query("INSERT INTO eq_visit (family,companionship,date,notes,visited) "
 451                                   . "VALUES (" . $family_id .",". $companionship .",'". $date ."','','". $visited ."')",__LINE__,__FILE__);
 452                }
 453            }
 454           $this->ht_view();
 455           return false;
 456         }
 457
 458       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY elder ASC";
 459       $this->db->query($sql,__LINE__,__FILE__);
 460       $i=0;
 461       while ($this->db->next_record())
 462         {
 463           $elder_id[$i] = $this->db->f('elder');
 464           $elder_name[$i] = $this->db->f('name');
 465           $elder_phone[$elder_id[$i]] = $this->db->f('phone');
 466           $i++;
 467         }
 468       array_multisort($elder_name, $elder_id);
 469
 470       // Make an array mapping elder_ids to elder_names
 471       for($i=0; $i < count($elder_id); $i++) {
 472           $id = $elder_id[$i];
 473           $elders[$id] = $elder_name[$i];
 474       }
 475
 476       $sql = "SELECT * FROM eq_aaronic where valid=1 ORDER BY aaronic ASC";
 477       $this->db->query($sql,__LINE__,__FILE__);
 478       while ($this->db->next_record())
 479         {
 480           $aaronic_id = $this->db->f('aaronic');
 481           $aaronic[$aaronic_id]['name'] = $this->db->f('name');
 482           $aaronic[$aaronic_id]['phone'] = $this->db->f('phone');
 483         }
 484
 485       // Select all the unique companionship numbers for this district
 486       $sql = "SELECT distinct companionship FROM eq_companionship where valid=1 and district=". $district;
 487       $this->db->query($sql,__LINE__,__FILE__);
 488       $j=0; $unique_companionships='';
 489       while ($this->db->next_record())
 490         {
 491           $unique_companionships[$j]['companionship'] = $this->db->f('companionship');
 492           $j++;
 493         }
 494
 495       $comp_width=300; $visit_width=25; $table_width=$comp_width + $visit_width;
 496       $table_data=""; $num_companionships = 0; $num_families = 0; $visits=0;
 497       for ($j=0; $j < count($unique_companionships); $j++) {
 498         $companion_table_entry = "";
 499         // Select all the companions in each companionship
 500         $sql = "SELECT * FROM eq_companionship where valid=1 and ".
 501                "companionship=". $unique_companionships[$j]['companionship'];
 502         $this->db->query($sql,__LINE__,__FILE__);
 503
 504         while ($this->db->next_record())
 505           {
 506             // Get this companions information
 507             if($companion_table_entry != "") { $companion_table_entry .= "<td>&nbsp;/&nbsp;</td>"; }
 508             $companionship = $this->db->f('companionship');
 509             $elder_id = $this->db->f('elder');
 510             $aaronic_id = $this->db->f('aaronic');
 511             if($elder_id) {
 512               $name = $elders[$elder_id];
 513               $phone = $elder_phone[$elder_id];
 514             }
 515             else if($aaronic_id) {
 516               $name = $aaronic[$aaronic_id]['name'];
 517               $phone = $aaronic[$aaronic_id]['phone'];
 518             }
 519             $companion_table_entry .= "<td title=\"$phone\"><b>$name</b></td>";
 520           }
 521         $table_data.= "<tr bgcolor=#d3dce3><td colspan=20><table><tr>$companion_table_entry</tr></table><hr></td></tr>";
 522
 523         // Get the names of the families assigned this home teaching companionship
 524         $sql = "SELECT * from eq_family where valid=1 AND companionship=".$unique_companionships[$j]['companionship'];
 525         $sql = $sql . " ORDER BY name ASC";
 526         $this->db->query($sql,__LINE__,__FILE__);
 527         while ($this->db->next_record())
 528           {
 529             $family_name = $this->db->f('name');
 530             $family_id = $this->db->f('family');
 531             $this->nextmatchs->template_alternate_row_color(&$this->t);
 532             $table_data.="<tr bgcolor=". $this->t->get_var('tr_color') ."><td>$family_name Family</td>";
 533
 534             $header_row="<th width=$comp_width><font size=-2>Families</th>";
 535
 536             // First check to see if the currently assigned companionship has visited them
 537             $sql = "SELECT * FROM eq_visit WHERE date >= '$month_start' AND date <= '$month_end' ".
 538                    " AND companionship=".$unique_companionships[$j]['companionship'].
 539                    " AND family=". $family_id;
 540             $query_id = $this->db2->query($sql,__LINE__,__FILE__);
 541             if($this->db2->num_rows($query_id) == 0) {
 542               // We did not find any visits made by the currently assigned companionship,
 543               // look for visits made by any other companionship other than 0. (0 == EQ Presidency Visit)
 544               $sql = "SELECT * FROM eq_visit WHERE date >= '$month_start' AND date <= '$month_end' ".
 545                    " AND companionship!=0".
 546                    " AND family=". $family_id;
 547               $query_id = $this->db2->query($sql,__LINE__,__FILE__);
 548             }
 549
 550             $value = $family_id . "/" . $unique_companionships[$j]['companionship'] . "/" . $date;
 551             $header_row .= "<th width=$visit_width><font size=-2><a href=$link>$month</a></th>";
 552             if(!$total_visits) { $total_visits = 0; }
 553             if($this->db2->next_record()) {
 554               if($this->db2->f('visited') == 'y') {
 555                 $visits++; $total_visits++; $num_families++;
 556                 $table_data .= '<td width=100 align=center>';
 557                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/y" checked>Y';
 558                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/n">N';
 559                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/"> ';
 560                 $table_data .= '</td>';
 561               } else if($this->db2->f('visited') == 'n') {
 562                 $num_families++;
 563                 $table_data .= '<td width=100 align=center>';
 564                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/y">Y';
 565                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/n" checked>N';
 566                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/">';
 567                 $table_data .= '</td>';
 568               } else {
 569                 $table_data .= '<td width=100 align=center>';
 570                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/y">Y';
 571                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/n">N';
 572                 $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/" checked> ';
 573                 $table_data .= '</td>';
 574               }
 575             }
 576             else {
 577               $value .= "/";
 578               $table_data .= '<td width=100 align=center>';
 579               $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/y">Y';
 580               $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/n">N';
 581               $table_data .= '<input type="radio" name="family_visited['.$family_id.'][]" value="'.$value.'/" checked> ';
 582               $table_data .= '</td>';
 583             }
 584           }
 585         $table_data .= "</tr>";
 586         $table_data .= "<tr><td colspan=20></td></tr>";
 587       }
 588       $table_data .= "<tr><td colspan=20><hr></td></tr>";
 589       $stat_data = "<tr><td><b><font size=-2>Families Hometaught:<br>Hometeaching Percentage:</font></b></td>";
 590
 591       $percent = ceil(($visits / $num_families)*100);
 592       $stat_data .= "<td align=center><font size=-2><b>$visits / $num_families<br>$percent%</font></b></td>";
 593       $stat_data .= "</tr>";
 594
 595       $this->t->set_var('table_width',$table_width);
 596       $this->t->set_var('header_row',$header_row);
 597       $this->t->set_var('table_data',$table_data);
 598       $this->t->set_var('stat_data',$stat_data);
 599       $this->t->fp('list','district_list',True);
 600
 601       $this->t->set_var('lang_reset','Clear Form');
 602       $this->t->set_var('lang_save','Save Changes');
 603       $this->t->set_var('savehandle','');
 604
 605       $this->t->pfp('out','ht_update_t');
 606       $this->t->pfp('addhandle','save');
 607
 608       $this->save_sessiondata();
 609     }
 610
 611   function act_list()
 612     {
 613       $this->t->set_file(array('act_list_t' => 'act_list.tpl'));
 614       $this->t->set_block('act_list_t','act_list','list');
 615
 616       $this->t->set_var('lang_name','Assignment');
 617       $this->t->set_var('lang_date','Date');
 618       $this->t->set_var('lang_notes','Description');
 619
 620       $sql = "SELECT * FROM eq_activity ORDER BY date DESC";
 621       $this->db->query($sql,__LINE__,__FILE__);
 622       $total_records = $this->db->num_rows();
 623
 624       $i = 0;
 625       while ($this->db->next_record())
 626         {
 627           $activity_list[$i]['activity']  = $this->db->f('activity');
 628           $activity_list[$i]['assignment'] = $this->db->f('assignment');
 629           $activity_list[$i]['date']  = $this->db->f('date');
 630           $activity_list[$i]['notes']  = $this->db->f('notes');
 631
 632           $sql = "SELECT * FROM eq_assignment WHERE assignment='" . $activity_list[$i]['assignment'] . "'";
 633           $this->db2->query($sql,__LINE__,__FILE__);
 634           if($this->db2->next_record())
 635             {
 636               $activity_list[$i]['name'] = $this->db2->f('name');
 637               $activity_list[$i]['code'] = $this->db2->f('code');
 638             }
 639           $i++;
 640         }
 641
 642       for ($i=0; $i < count($activity_list); $i++)
 643         {
 644           $this->nextmatchs->template_alternate_row_color(&$this->t);
 645           $this->t->set_var('name',$activity_list[$i]['name']);
 646           $this->t->set_var('date',$activity_list[$i]['date']);
 647           $activity_notes = $activity_list[$i]['notes'];
 648           if(strlen($activity_notes) > 40) { $activity_notes = substr($activity_notes,0,40) . "..."; }
 649           $this->t->set_var('notes',$activity_notes);
 650
 651           $link_data['menuaction'] = 'eq.eq.act_view';
 652           $link_data['activity'] = $activity_list[$i]['activity'];
 653           $link_data['action'] = 'view';
 654           $this->t->set_var('view',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 655           $this->t->set_var('lang_view','View');
 656
 657           $link_data['menuaction'] = 'eq.eq.act_update';
 658           $link_data['activity'] = $activity_list[$i]['activity'];
 659           $link_data['action'] = 'edit';
 660           $this->t->set_var('edit',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 661           $this->t->set_var('lang_edit','Edit');
 662
 663           $link_data['menuaction'] = 'eq.eq.act_update';
 664           $link_data['activity'] = '0';
 665           $link_data['action'] = 'add';
 666           $this->t->set_var('add','<form method="POST" action="' . $GLOBALS['phpgw']->link('/eq/index.php',$link_data)
 667                            . '"><input type="submit" name="Add" value="' . 'Add Activity' .'"></font></form>');
 668
 669           $this->t->fp('list','act_list',True);
 670         }
 671
 672       $this->t->pfp('out','act_list_t');
 673       $this->save_sessiondata();
 674     }
 675
 676   function act_view()
 677     {
 678       $this->t->set_file(array('act_view_t' => 'act_view.tpl'));
 679       $this->t->set_block('act_view_t','part_list','list');
 680
 681       $sql = "SELECT * FROM eq_activity WHERE activity=" . intval(get_var('activity',array('GET','POST')));
 682       $this->db->query($sql,__LINE__,__FILE__);
 683       $this->db->next_record();
 684       $this->t->set_var('assignment', $this->db->f('assignment'));
 685       $this->t->set_var('date', $this->db->f('date'));
 686       $this->t->set_var('notes', $this->db->f('notes'));
 687
 688       $sql = "SELECT * FROM eq_assignment WHERE assignment='" . $this->db->f('assignment') . "'";
 689       $this->db2->query($sql,__LINE__,__FILE__);
 690       if($this->db2->next_record())
 691         {
 692           $this->t->set_var('name', $this->db2->f('name'));
 693           $this->t->set_var('code', $this->db2->f('code'));
 694         }
 695       $this->t->set_var('lang_name','Assignment');
 696       $this->t->set_var('lang_date','Date');
 697       $this->t->set_var('lang_notes','Description');
 698       $this->t->set_var('lang_done','Done');
 699       $this->t->set_var('lang_action','View');
 700
 701       $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
 702       $this->t->set_var('tr_color',$tr_color);
 703
 704       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.act_list'));
 705
 706       $link_data['menuaction'] = 'eq.eq.act_update';
 707       $link_data['activity'] = get_var('activity',array('GET','POST'));
 708       $link_data['action'] = 'edit';
 709       $this->t->set_var('edit',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 710       $this->t->set_var('lang_edit','Edit');
 711       $this->t->set_var('cal_date',$this->db->f('date'));
 712
 713       // Now find out which elders participated in this activity
 714       $sql = "SELECT * FROM eq_participation WHERE activity=" . intval(get_var('activity',array('GET','POST')));
 715       $this->db->query($sql,__LINE__,__FILE__);
 716       $total_records = $this->db->num_rows();
 717
 718       $i = 0;
 719       while ($this->db->next_record())
 720         {
 721           $part_list[$i]['elder']  = $this->db->f('elder');
 722           $i++;
 723         }
 724
 725       for ($i=0; $i < count($part_list); $i++)
 726         {
 727           $sql = "SELECT * FROM eq_elder WHERE elder=" . $part_list[$i]['elder'];
 728           $this->db->query($sql,__LINE__,__FILE__);
 729           $this->db->next_record();
 730           $names[$i] = $this->db->f('name');
 731         } sort($names);
 732
 733       for ($i=0; $i < count($names); $i++)
 734         {
 735           //$this->nextmatchs->template_alternate_row_color(&$this->t);
 736           $this->t->set_var('elder_name',$names[$i]);
 737           if(($i+1) % 3 == 0) { $this->t->set_var('table_sep',"</td></tr><tr>"); }
 738           else { $this->t->set_var('table_sep',"</td>"); }
 739           if(($i) % 3 == 0) { $this->nextmatchs->template_alternate_row_color(&$this->t); }
 740           $this->t->fp('list','part_list',True);
 741         }
 742
 743       $this->t->pfp('out','act_view_t');
 744       $this->save_sessiondata();
 745     }
 746
 747   function act_update()
 748     {
 749       $this->t->set_file(array('form' => 'act_update.tpl'));
 750       $this->t->set_block('form','elder_list','list');
 751       $this->t->set_block('form','add','addhandle');
 752       $this->t->set_block('form','edit','edithandle');
 753       $this->t->set_var('lang_done','Done');
 754
 755       $action = get_var('action',array('GET','POST'));
 756       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.act_list'));
 757       $activity['activity'] = intval(get_var('activity',array('GET','POST')));
 758
 759       if($action == 'save')
 760         {
 761           $activity['assignment'] = get_var('assignment',array('POST'));
 762           $activity['date'] = get_var('date',array('POST'));
 763           $activity['notes']= get_var('notes',array('POST'));
 764           $this->db->query("UPDATE eq_activity set " .
 765                            "   assignment='" . $activity['assignment'] .
 766                            "', date='" . $activity['date'] . "'" .
 767                            ", notes='" . $activity['notes'] . "'" .
 768                            " WHERE activity=" . $activity['activity'],__LINE__,__FILE__);
 769
 770           // Delete all the elders who have particiapted in this activity
 771           $this->db->query("DELETE from eq_participation where activity=".$activity['activity'],__LINE__,__FILE__);
 772
 773           // Re-add the elders who are checked as having participated in this activity
 774           $elders = get_var('elder_name',array('POST'));
 775           foreach ($elders as $elder)
 776             {
 777               $this->db->query("INSERT INTO eq_participation (elder,activity) "
 778                                . "VALUES (" . $elder . ",". $activity['activity'] . ")",__LINE__,__FILE__);
 779             }
 780
 781           $this->act_list();
 782           return false;
 783         }
 784
 785       if($action == 'insert')
 786         {
 787           $activity['assignment'] = get_var('assignment',array('POST'));
 788           $activity['date'] = get_var('date',array('POST'));
 789           $activity['notes']= get_var('notes',array('POST'));
 790           $this->db->query("INSERT INTO eq_activity (assignment,date,notes) "
 791                            . "VALUES ('" . $activity['assignment'] . "','"
 792                            . $activity['date'] . "','" . $activity['notes'] . "')",__LINE__,__FILE__);
 793
 794           $sql = "SELECT * FROM eq_activity WHERE assignment='".$activity['assignment']."' "
 795              . " AND date='".$activity['date']."' AND notes='".$activity['notes']."'";
 796           $this->db->query($sql,__LINE__,__FILE__);
 797           if($this->db->next_record()) {
 798             //print "activity: " . $this->db->f('activity') . "<br>";
 799             $activity['activity'] = $this->db->f('activity');
 800           }
 801
 802           $elders = get_var('elder_name',array('POST'));
 803           foreach ($elders as $elder)
 804             {
 805               $this->db->query("INSERT INTO eq_participation (elder,activity) "
 806                                . "VALUES (" . $elder . ",". $activity['activity'] . ")",__LINE__,__FILE__);
 807             }
 808
 809           $this->act_list();
 810           return false;
 811         }
 812
 813       if($action == 'add')
 814         {
 815           $activity['activity'] = 0;
 816           $this->t->set_var('cal_date',$this->jscal->input('date','','','','','','',$this->cal_options));
 817           $this->t->set_var('assignment','');
 818           $this->t->set_var('date','');
 819           $this->t->set_var('notes','');
 820           $this->t->set_var('lang_done','Cancel');
 821           $this->t->set_var('lang_action','Adding New Activity');
 822           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.act_update&activity='
 823                                                                 . $activity['activity'] . '&action=' . 'insert'));
 824         }
 825
 826       if($action == 'edit')
 827         {
 828           $sql = "SELECT * FROM eq_activity WHERE activity=" . $activity['activity'];
 829           $this->db->query($sql,__LINE__,__FILE__);
 830           $this->db->next_record();
 831           $this->t->set_var('cal_date',$this->jscal->input('date',$this->db->f('date'),'','','','','',$this->cal_options));
 832           $this->t->set_var('assignment', $this->db->f('assignment'));
 833           $assignment = $this->db->f('assignment');
 834           $this->t->set_var('date', $this->db->f('date'));
 835           $this->t->set_var('notes', $this->db->f('notes'));
 836           $this->t->set_var('lang_done','Cancel');
 837           $this->t->set_var('lang_action','Editing Activity');
 838           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.act_update&activity='
 839                                                                 . $activity['activity'] . '&action=' . 'save'));
 840
 841         }
 842
 843       // Create the assignments drop-down list
 844       $sql = "SELECT * FROM eq_assignment ORDER BY name ASC";
 845       $this->db->query($sql,__LINE__,__FILE__);
 846       $i = 0;
 847       while ($this->db->next_record())
 848         {
 849           $assignments[$i]['assignment']  = $this->db->f('assignment');
 850           $assignments[$i]['name'] = $this->db->f('name');
 851           $assignments[$i]['code'] = $this->db->f('code');
 852           $i++;
 853         }
 854
 855       $assignment_data.= '<select name=assignment>';
 856       $assignment_data.= '<option value=0></option>';
 857       for ($j=0; $j < count($assignments); $j++) {
 858         $id = $assignments[$j]['assignment'];
 859         $name = $assignments[$j]['name'];
 860         if($assignments[$j]['assignment'] == $assignment) { $selected[$id] = 'selected="selected"'; } else { $selected[$id] = ''; }
 861         $assignment_data.= '<option value='.$id.' '.$selected[$id].'>'.$name.'</option>';
 862       }
 863       $assignment_data.='</select>';
 864       $this->t->set_var('assignment_data',$assignment_data);
 865
 866       // Create elder selection boxes
 867       $sql = "SELECT * FROM eq_elder";
 868       $this->db->query($sql,__LINE__,__FILE__);
 869       $i=0;
 870       while ($this->db->next_record())
 871         {
 872           if($this->db->f('valid') == 1 || $action != 'add') {
 873             $elder_name[$i] = $this->db->f('name');
 874             $elder_id[$i] = $this->db->f('elder');
 875             $elder_valid[$i] = $this->db->f('valid');
 876             $i++;
 877           }
 878         }
 879       array_multisort($elder_name, $elder_id, $elder_valid);
 880
 881       $j=0;
 882       for ($i=0; $i < count($elder_id); $i++)
 883         {
 884           //$this->nextmatchs->template_alternate_row_color(&$this->t);
 885           $sql = "SELECT * FROM eq_participation where activity=". $activity['activity'] . " AND elder=" . $elder_id[$i];
 886           $this->db->query($sql,__LINE__,__FILE__);
 887           if($this->db->next_record()) { $this->t->set_var('checked','checked'); $checked=1; }
 888           else { $this->t->set_var('checked',''); $checked=0; }
 889           if($checked || $elder_valid[$i] == 1) {
 890             $this->t->set_var('elder_name',$elder_name[$i]);
 891             $this->t->set_var('elder',$elder_id[$i]);
 892             if(($j+1) % 3 == 0) { $this->t->set_var('table_sep',"</td></tr><tr>"); }
 893             else { $this->t->set_var('table_sep',"</td>"); }
 894             if(($j) % 3 == 0) { $this->nextmatchs->template_alternate_row_color(&$this->t); }
 895             $this->t->fp('list','elder_list',True);
 896             $j++;
 897           }
 898         }
 899
 900       $this->t->set_var('lang_reset','Clear Form');
 901       $this->t->set_var('lang_add','Add Activity');
 902       $this->t->set_var('lang_save','Save Changes');
 903       $this->t->set_var('edithandle','');
 904       $this->t->set_var('addhandle','');
 905
 906       $this->t->pfp('out','form');
 907       if($action == 'edit') { $this->t->pfp('addhandle','edit'); }
 908       if($action == 'add') { $this->t->pfp('addhandle','add'); }
 909
 910       $this->save_sessiondata();
 911     }
 912
 913     function assign_view()
 914     {
 915       $this->t->set_file(array('assign_view_t' => 'assign_view.tpl'));
 916       $this->t->set_block('assign_view_t','assign_view','list');
 917
 918       $this->t->set_var('lang_name','Assignment Name');
 919       $this->t->set_var('lang_code','Code');
 920
 921       $sql = "SELECT * FROM eq_assignment ORDER BY name ASC";
 922       $this->db->query($sql,__LINE__,__FILE__);
 923       $total_records = $this->db->num_rows();
 924
 925       $i = 0;
 926       while ($this->db->next_record())
 927         {
 928           $assignment_list[$i]['assignment']  = $this->db->f('assignment');
 929           $assignment_list[$i]['name'] = $this->db->f('name');
 930           $assignment_list[$i]['code'] = $this->db->f('code');
 931           $i++;
 932         }
 933
 934       for ($i=0; $i < count($assignment_list); $i++)
 935         {
 936           $this->nextmatchs->template_alternate_row_color(&$this->t);
 937           $this->t->set_var('name',$assignment_list[$i]['name']);
 938           $this->t->set_var('code',$assignment_list[$i]['code']);
 939
 940           $link_data['menuaction'] = 'eq.eq.assign_update';
 941           $link_data['assignment'] = $assignment_list[$i]['assignment'];
 942           $link_data['action'] = 'edit';
 943           $this->t->set_var('edit',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
 944           $this->t->set_var('lang_edit','Edit');
 945
 946           $link_data['menuaction'] = 'eq.eq.assign_update';
 947           $link_data['assignment'] = '0';
 948           $link_data['action'] = 'add';
 949           $this->t->set_var('add','<form method="POST" action="' . $GLOBALS['phpgw']->link('/eq/index.php',$link_data)
 950                            . '"><input type="submit" name="Add" value="' . 'Add Assignment' .'"></font></form>');
 951
 952           $this->t->fp('list','assign_view',True);
 953         }
 954
 955       $this->t->pfp('out','assign_view_t');
 956       $this->save_sessiondata();
 957     }
 958
 959     function assign_update()
 960     {
 961       $this->t->set_file(array('form' => 'assign_update.tpl'));
 962       $this->t->set_block('form','add','addhandle');
 963       $this->t->set_block('form','edit','edithandle');
 964       $this->t->set_var('lang_done','Done');
 965
 966       $action = get_var('action',array('GET','POST'));
 967       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.assign_view'));
 968       $assignment['assignment'] = intval(get_var('assignment',array('GET','POST')));
 969
 970       if($action == 'save')
 971         {
 972           $assignment['name'] = get_var('name',array('POST'));
 973           $assignment['code'] = get_var('code',array('POST'));
 974           $this->db->query("UPDATE eq_assignment set " .
 975                            "  name='" . $assignment['name'] . "'" .
 976                            ", code='" . $assignment['code'] . "'" .
 977                            " WHERE assignment=" . $assignment['assignment'],__LINE__,__FILE__);
 978
 979           $this->assign_view();
 980           return false;
 981         }
 982
 983       if($action == 'insert')
 984         {
 985           $assignment['name'] = get_var('name',array('POST'));
 986           $assignment['code'] = get_var('code',array('POST'));
 987           $this->db->query("INSERT INTO eq_assignment (name,code) "
 988                            . "VALUES ('" . $assignment['name'] . "','"
 989                            . $assignment['code'] . "')",__LINE__,__FILE__);
 990           $this->assign_view();
 991           return false;
 992         }
 993
 994       if($action == 'add')
 995         {
 996           $assignment['assignment'] = 0;
 997           $this->t->set_var('name','');
 998           $this->t->set_var('code','');
 999           $this->t->set_var('lang_done','Cancel');
1000           $this->t->set_var('lang_action','Adding New Assignment');
1001           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.assign_update&assignment='
1002                                                                 . $assignment['assignment'] . '&action=' . 'insert'));
1003         }
1004
1005       if($action == 'edit')
1006         {
1007           $sql = "SELECT * FROM eq_assignment WHERE assignment=" . $assignment['assignment'];
1008           $this->db->query($sql,__LINE__,__FILE__);
1009           $this->db->next_record();
1010           $this->t->set_var('name', $this->db->f('name'));
1011           $this->t->set_var('code', $this->db->f('code'));
1012           $this->t->set_var('lang_done','Cancel');
1013           $this->t->set_var('lang_action','Editing Assignment');
1014           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.assign_update&assignment='
1015                                                                 . $assignment['assignment'] . '&action=' . 'save'));
1016
1017         }
1018
1019       $this->t->set_var('lang_reset','Clear Form');
1020       $this->t->set_var('lang_add','Add Assignment');
1021       $this->t->set_var('lang_save','Save Changes');
1022       $this->t->set_var('edithandle','');
1023       $this->t->set_var('addhandle','');
1024
1025       $this->t->pfp('out','form');
1026       if($action == 'edit') { $this->t->pfp('addhandle','edit'); }
1027       if($action == 'add') { $this->t->pfp('addhandle','add'); }
1028
1029       $this->save_sessiondata();
1030     }
1031
1032   function par_view()
1033     {
1034       $this->t->set_file(array('par_view_t' => 'par_view.tpl'));
1035       $this->t->set_block('par_view_t','header_list','list1');
1036       $this->t->set_block('par_view_t','elder_list','list2');
1037
1038       $sql = "SELECT * FROM eq_elder where valid=1";
1039       $this->db->query($sql,__LINE__,__FILE__);
1040       $i=0;
1041       while ($this->db->next_record())
1042         {
1043           $elder_name[$i] = $this->db->f('name');
1044           $elder_id[$i] = $this->db->f('elder');
1045           $i++;
1046         }
1047       array_multisort($elder_name, $elder_id);
1048
1049       $sql = "SELECT * FROM eq_activity ORDER BY date DESC";
1050       $this->db->query($sql,__LINE__,__FILE__);
1051       $total_records = $this->db->num_rows();
1052
1053       $i = 0;
1054       while ($this->db->next_record())
1055         {
1056           $activity_list[$i]['assignment'] = $this->db->f('assignment');
1057           $activity_list[$i]['date'] = $this->db->f('date');
1058           $activity_list[$i]['activity']  = $this->db->f('activity');
1059           $i++;
1060         }
1061
1062       $sql = "SELECT * FROM eq_assignment ORDER BY name ASC";
1063       $this->db->query($sql,__LINE__,__FILE__);
1064       $i=0;
1065       while($this->db->next_record())
1066         {
1067           $assignment_list[$i]['assignment'] = $this->db->f('assignment');
1068           $assignment_list[$i]['name'] = $this->db->f('name');
1069           $assignment_list[$i]['code'] = $this->db->f('code');
1070           $i++;
1071         }
1072
1073       $elder_width=300; $part_width=25; $assignment_width=50;
1074       $total_width=$elder_width+$part_width;
1075       for ($i=0; $i < count($assignment_list); $i++) {
1076         $this->t->set_var('assignment_name',$assignment_list[$i]['name']);
1077         $this->t->set_var('assignment_code',$assignment_list[$i]['code']);
1078         $this->t->fp('list1','header_list',True);
1079         $total_width += $assignment_width;
1080       }
1081
1082       for ($i=0; $i < count($elder_id); $i++) {
1083         $participated=0; $part_table = '';
1084         $this->nextmatchs->template_alternate_row_color(&$this->t);
1085         $this->t->set_var('elder_name',$elder_name[$i]);
1086         for ($j=0; $j < count($assignment_list); $j++) {
1087           $date = "0000-00-00"; $checkmark=0; $num_matches=0;
1088           for ($k=0; $k < count($activity_list); $k++) {
1089             if($assignment_list[$j]['assignment'] == $activity_list[$k]['assignment']) {
1090               $sql = "SELECT * FROM eq_participation where "
1091                  . " activity=" . $activity_list[$k]['activity']
1092                  . " AND elder=" . $elder_id[$i];
1093               $this->db->query($sql,__LINE__,__FILE__);
1094               while($this->db->next_record()) {
1095                 if($activity_list[$k]['date'] > $date) {
1096                   $date = $activity_list[$k]['date'];
1097                 }
1098                 $checkmark=1;
1099                 $num_matches++;
1100                 $participated++;
1101               }
1102             }
1103           }
1104           if($checkmark) {
1105             $part_table .= '<td align=center><img src="images/checkmark.gif">';
1106             $part_table .= '<font size=-2>'.$num_matches.'</font><br>';
1107             $part_table .= '<font size=-2>'.$date.'</font></td>';
1108           } else {
1109             $part_table .= '<td>&nbsp;</td>';
1110           }
1111         }
1112         if($participated) { $part_table .= '<td align=center><img src="images/checkmark.gif">'.$participated.'</td>'; }
1113         else { $part_table .= '<td>&nbsp;</td>'; }
1114         $this->t->set_var('part_table',$part_table);
1115         $this->t->fp('list2','elder_list',True);
1116       }
1117       $this->t->set_var('total_width',$total_width);
1118       $this->t->set_var('elder_width',$elder_width);
1119       $this->t->set_var('part_width',$part_width);
1120       $this->t->set_var('act_width',$act_width);
1121       $this->t->pfp('out','par_view_t');
1122       $this->save_sessiondata();
1123     }
1124
1125     function willing_view()
1126     {
1127       $this->t->set_file(array('willing_view_t' => 'willing_view.tpl'));
1128       $this->t->set_block('willing_view_t','header_list','list1');
1129       $this->t->set_block('willing_view_t','elder_list','list2');
1130
1131       $this->t->set_var('lang_filter','Filter');
1132       $this->t->set_var('lang_filter_unwilling','Filter out unwilling Elders:');
1133
1134       $filter_unwilling = get_var('filter_unwilling',array('POST'));
1135       $this->t->set_var('filter_unwilling',$filter_unwilling);
1136
1137       if($filter_unwilling == 'y' || $filter_unwilling == '') {
1138         $filter_input = "<input type=\"radio\" name=\"filter_unwilling\" value=\"y\" checked>Y";
1139         $filter_input.= "<input type=\"radio\" name=\"filter_unwilling\" value=\"n\">N";
1140         $filter_input.= "&nbsp;&nbsp;";
1141       } else {
1142         $filter_input = "<input type=\"radio\" name=\"filter_unwilling\" value=\"y\">Y";
1143         $filter_input.= "<input type=\"radio\" name=\"filter_unwilling\" value=\"n\" checked>N";
1144         $filter_input.= "&nbsp;&nbsp;";
1145       }
1146       $this->t->set_var('filter_input',$filter_input);
1147
1148       $sql = "SELECT * FROM eq_elder where valid=1";
1149       $this->db->query($sql,__LINE__,__FILE__);
1150       $i=0;
1151       while ($this->db->next_record())
1152         {
1153           $elder_name[$i] = $this->db->f('name');
1154           $elder_id[$i] = $this->db->f('elder');
1155           $elder_phone[$elder_id[$i]] = $this->db->f('phone');
1156           $i++;
1157         }
1158       array_multisort($elder_name, $elder_id);
1159
1160       $sql = "SELECT * FROM eq_assignment ORDER BY name ASC";
1161       $this->db->query($sql,__LINE__,__FILE__);
1162       $i=0;
1163       while($this->db->next_record())
1164         {
1165           $assignment_list[$i]['assignment'] = $this->db->f('assignment');
1166           $assignment_list[$i]['name'] = $this->db->f('name');
1167           $assignment_list[$i]['code'] = $this->db->f('code');
1168           $i++;
1169         }
1170
1171       $sql = "SELECT * FROM eq_activity ORDER BY date DESC";
1172       $this->db->query($sql,__LINE__,__FILE__);
1173       $total_records = $this->db->num_rows();
1174
1175       $i = 0;
1176       while ($this->db->next_record())
1177         {
1178           $activity_list[$i]['assignment'] = $this->db->f('assignment');
1179           $activity_list[$i]['date'] = $this->db->f('date');
1180           $activity_list[$i]['activity']  = $this->db->f('activity');
1181           $i++;
1182         }
1183
1184       $elder_width=275; $willing_width=40; $assignment_width=50;
1185       $total_width=$elder_width+$willing_width;
1186
1187       for ($i=0; $i < count($assignment_list); $i++) {
1188         $this->t->set_var('assignment_name',$assignment_list[$i]['name']);
1189         $this->t->set_var('assignment_code',$assignment_list[$i]['code']);
1190         $this->t->fp('list1','header_list',True);
1191         $total_width += $assignment_width;
1192         $total_willing[$i] = 0;
1193       }
1194
1195       for ($i=0; $i < count($elder_id); $i++) {
1196         $willing_table = ''; $elder_willing=0;
1197         $this->t->set_var('elder_name',$elder_name[$i]);
1198         $this->t->set_var('elder_phone',$elder_phone[$elder_id[$i]]);
1199         $this->t->set_var('editurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.willing_update&elder_id='
1200                                                             . $elder_id[$i] . '&action=' . 'edit'));
1201         for ($j=0; $j < count($assignment_list); $j++) {
1202           $found_willingness=0;
1203           $sql = "SELECT * FROM eq_willingness where "
1204              . " assignment=" . $assignment_list[$j]['assignment']
1205              . " AND elder=" . $elder_id[$i];
1206           $this->db->query($sql,__LINE__,__FILE__);
1207           while($this->db->next_record()) {
1208             $found_willingness=1;
1209             $date_part="";
1210             $sql = "SELECT * FROM eq_activity where "
1211                . " assignment=". $assignment_list[$j]['assignment']
1212                . " ORDER by date DESC";
1213             $this->db2->query($sql,__LINE__,__FILE__);
1214             if($this->db2->next_record()) {
1215               $activity = $this->db2->f('activity');
1216               $date = $this->db2->f('date');
1217               $sql = "SELECT * FROM eq_participation where "
1218                  . " activity=" . $activity
1219                  . " AND elder=". $elder_id[$i];
1220               $this->db3->query($sql,__LINE__,__FILE__);
1221               if($this->db3->next_record()) {
1222                 $date_part = $date;
1223               }
1224             }
1225
1226             if($this->db->f('willing') == 'y') {
1227               $total_willing[$j]++;
1228               $elder_willing=1;
1229               $willing_table .= '<td align=center><img src="images/checkmark.gif"><br><font size=-2>'.$date_part.'</font></td></td>';
1230             }
1231             else if($this->db->f('willing') == 'n') {
1232               $willing_table .= '<td align=center><img src="images/x.gif"></td>';
1233             }
1234             else {
1235               $elder_willing=1;
1236               $willing_table .= "<td>&nbsp;</td>";
1237             }
1238           }
1239           if(!$found_willingness) {
1240             $elder_willing=1;
1241             $willing_table .= "<td>&nbsp;</td>";
1242           }
1243         }
1244         if(($elder_willing == 1) || ($filter_unwilling == 'n')) {
1245           $this->t->set_var('willing_table',$willing_table);
1246           $this->t->fp('list2','elder_list',True);
1247           $this->nextmatchs->template_alternate_row_color(&$this->t);
1248         }
1249       }
1250
1251       $stat_table = '<td><b>Total Willing to Serve</b></td>';
1252       for ($j=0; $j < count($assignment_list); $j++) {
1253         $stat_table .= "<td align=center><b>".$total_willing[$j]."</b></td>";
1254       }
1255       $this->t->set_var('stat_table',$stat_table);
1256
1257       $this->t->set_var('total_width',$total_width);
1258       $this->t->set_var('elder_width',$elder_width);
1259       $this->t->set_var('willing_width',$willing_width);
1260       $this->t->pfp('out','willing_view_t');
1261       $this->save_sessiondata();
1262     }
1263
1264   function willing_update()
1265     {
1266       //print "<font color=red>Willingness Update Under Constrcution</font>";
1267       //$this->willing_view();
1268       //return false;
1269
1270       $this->t->set_file(array('willing_update_t' => 'willing_update.tpl'));
1271       $this->t->set_block('willing_update_t','assignment_list','list');
1272       $this->t->set_block('willing_update_t','save','savehandle');
1273
1274       $elder_id = get_var('elder_id',array('GET','POST'));
1275       $this->t->set_var('elder_id',$elder_id);
1276       $action = get_var('action',array('GET','POST'));
1277
1278       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.willing_view'));
1279       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.willing_update&action=save'));
1280       $this->t->set_var('lang_done','Cancel');
1281       $this->t->set_var('title','Willingness Update ');
1282
1283       if($action == 'save')
1284         {
1285           // Delete all the previous willingness entries for this elder
1286           $this->db->query("DELETE from eq_willingness where elder=" . $elder_id ,__LINE__,__FILE__);
1287
1288           // Now, add the assignment willingness that is checked for this elder
1289           $new_data = get_var('willingness',array('POST'));
1290           foreach ($new_data as $data)
1291             {
1292               $data_array = explode("/",$data);
1293               $assignment = $data_array[0];
1294               $willing = $data_array[1];
1295               //print "elder_id: $elder_id assignment: $assignment willing: $willing<br>";
1296               $this->db->query("INSERT INTO eq_willingness (elder,assignment,willing) "
1297                                . "VALUES (" . $elder_id .",". $assignment .",'". $willing . "')",__LINE__,__FILE__);
1298             }
1299           $this->willing_view();
1300           return false;
1301         }
1302
1303       $assignment_width=300; $willing_width=25; $table_width=$assignment_width + $willing_width;
1304       $table_data="";
1305
1306       // Find out the elder's name
1307       $sql = "SELECT * FROM eq_elder WHERE elder=".$elder_id." AND valid=1";
1308       $this->db->query($sql,__LINE__,__FILE__);
1309       if($this->db->next_record()) {
1310         $elder_name = $this->db->f('name');
1311         $this->t->set_var('elder_name',$elder_name);
1312       }
1313
1314       // Select all the assignments
1315       $sql = "SELECT * FROM eq_assignment ORDER by name ASC";
1316       $this->db->query($sql,__LINE__,__FILE__);
1317
1318       while ($this->db->next_record())
1319         {
1320           $assignment = $this->db->f('assignment');
1321           $assignment_name = $this->db->f('name');
1322           $assignment_code = $this->db->f('code');
1323
1324           $this->nextmatchs->template_alternate_row_color(&$this->t);
1325           $table_data.="<tr bgcolor=". $this->t->get_var('tr_color') ."><td>$assignment_name</td>";
1326
1327           $header_row="<th width=$comp_width><font size=-2>Assignments</th><th>Willingness</th>";
1328           $sql = "SELECT * FROM eq_willingness WHERE elder=".$elder_id." AND assignment=".$assignment;
1329           $this->db2->query($sql,__LINE__,__FILE__);
1330           $value = $assignment;
1331
1332           if($this->db2->next_record()) {
1333               if($this->db2->f('willing') == 'y') {
1334                 $table_data .= '<td width=100 align=center>';
1335                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/y" checked>Y';
1336                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/n">N';
1337                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/"> ';
1338                 $table_data .= '</td>';
1339               } else if($this->db2->f('willing') == 'n') {
1340                 $table_data .= '<td width=100 align=center>';
1341                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/y">Y';
1342                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/n" checked>N';
1343                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/">';
1344                 $table_data .= '</td>';
1345               } else {
1346                 $table_data .= '<td width=100 align=center>';
1347                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/y">Y';
1348                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/n">N';
1349                 $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/" checked> ';
1350                 $table_data .= '</td>';
1351               }
1352             }
1353           else {
1354             $table_data .= '<td width=100 align=center>';
1355             $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/y">Y';
1356             $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/n">N';
1357             $table_data .= '<input type="radio" name="willingness['.$assignment.']" value="'.$value.'/" checked> ';
1358             $table_data .= '</td>';
1359           }
1360
1361           $table_data .= "\n";
1362           $table_data .= "</tr>";
1363           $table_data .= "<tr><td colspan=20></td></tr>";
1364         }
1365
1366       $table_data .= "<tr><td colspan=20><hr></td></tr>";
1367
1368       $this->t->set_var('table_width',$table_width);
1369       $this->t->set_var('header_row',$header_row);
1370       $this->t->set_var('table_data',$table_data);
1371       $this->t->fp('list','assignment_list',True);
1372
1373       $this->t->set_var('lang_reset','Clear Form');
1374       $this->t->set_var('lang_save','Save Changes');
1375       $this->t->set_var('savehandle','');
1376
1377       $this->t->pfp('out','willing_update_t');
1378       $this->t->pfp('addhandle','save');
1379
1380       $this->save_sessiondata();
1381     }
1382
1383
1384     function ppi_sched()
1385       {
1386       $this->t->set_file(array('ppi_sched_t' => 'ppi_sched.tpl'));
1387       $this->t->set_block('ppi_sched_t','elder_list','elderlist');
1388       $this->t->set_block('ppi_sched_t','appt_list','apptlist');
1389       $action = get_var('action',array('GET','POST'));
1390
1391       $this->t->set_var('lang_save','Save Appt / Pri / Notes');
1392       $this->t->set_var('lang_reset','Clear Changes');
1393
1394       $this->t->set_var('ppi_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_view'));
1395       $this->t->set_var('ppi_link_title','Yearly PPIs');
1396
1397       $this->t->set_var('schedule_ppi_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_sched'));
1398       $this->t->set_var('schedule_ppi_link_title','Schedule Yearly PPIs');
1399
1400       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_sched&action=save'));
1401       $this->t->set_var('title','Yearly PPI Scheduler');
1402
1403       $elder_width=500; $phone_width=25; $pri_width=10; $notes_width=128; $ppi_date_width=20;
1404       $table_width=$elder_width + $phone_width + $pri_width + $notes_width + $ppi_date_width;
1405       $header_row = "<th width=$elder_width><font size=-2>Elder Name</th>";
1406       $header_row.= "<th width=$phone_width><font size=-2>Phone</th>";
1407       $header_row.= "<th width=$pri_width><font size=-2>Priority</th>";
1408       $header_row.= "<th width=$ppi_date_width><font size=-2>Last PPI</th>";
1409       $header_row.= "<th width=$notes_width><font size=-2>Scheduling Notes</th>";
1410       $table_data=""; $completed_data=""; $totals_data="";
1411
1412       $year = date('Y');
1413
1414       // Get the EQ President
1415       $sql = "SELECT * FROM eq_presidency where president=1 and valid=1";
1416       $this->db->query($sql,__LINE__,__FILE__);
1417       if($this->db->next_record()) {
1418         $president_name = $this->db->f('name');
1419         $president_name_array = explode(",",$president_name);
1420         $president_last_name = $president_name_array[0];
1421         $president_id = $this->db->f('elder');
1422         $presidency_id = $this->db->f('presidency');
1423         $interviewer = $this->db->f('elder');
1424         $district_number = '*';
1425         $district_name = $president_name;
1426         $sql = "SELECT * FROM eq_elder where elder='$president_id'";
1427         $this->db2->query($sql,__LINE__,__FILE__);
1428         if($this->db2->next_record()) {
1429           $indiv_id = $this->db2->f('indiv_id');
1430         }
1431         $sql = "SELECT * FROM eq_parent where indiv_id='$indiv_id'";
1432         $this->db2->query($sql,__LINE__,__FILE__);
1433         if($this->db2->next_record()) {
1434           $president_address = $this->db2->f('address');
1435         }
1436       } else {
1437         print "<hr><font color=red><h3>-E- Unable to locate EQ President in eq_presidency table</h3></font></hr>";
1438         return;
1439       }
1440
1441       if($action == 'save')
1442         {
1443           // Save any changes made to the appointment table
1444           $new_data = get_var('appt_notes',array('POST'));
1445           if($new_data != "") {
1446             foreach ($new_data as $entry)
1447               {
1448                 $elder = $entry['elder'];
1449                 $appointment = $entry['appointment'];
1450                 $location = $entry['location'];
1451                 if($location == "") { $location = "$president_last_name"." home ($president_address)"; }
1452                 if($elder == 0) { $location = ""; }
1453
1454                 //Only perform a database update if we have made a change to this appointment
1455                 $sql = "SELECT * FROM eq_appointment where appointment='$appointment' and elder='$elder' and location='$location'";
1456                 $this->db->query($sql,__LINE__,__FILE__);
1457                 if(!$this->db->next_record()) {
1458                   // Perform database save actions here
1459                   $this->db->query("UPDATE eq_appointment set " .
1460                                    " elder='" . $elder . "'" .
1461                                    ",location='" . $location . "'" .
1462                                    " WHERE appointment=" . $appointment,__LINE__,__FILE__);
1463                   // Email the appointment
1464                   $this->email_appt($appointment);
1465                 }
1466
1467               }
1468           }
1469
1470           // Save any changes made to the ppi notes table
1471           $new_data = get_var('ppi_notes',array('POST'));
1472           foreach ($new_data as $entry)
1473            {
1474              $ppi_notes = $entry['notes'];
1475              $elder_id = $entry['elder_id'];
1476              $ppi_pri = $entry['pri'];
1477
1478              // Perform database save actions here
1479              $this->db->query("UPDATE eq_elder set " .
1480                               " ppi_notes='" . $ppi_notes . "'" .
1481                               ",ppi_pri='" . $ppi_pri . "'" .
1482                               " WHERE elder=" . $elder_id,__LINE__,__FILE__);
1483
1484            }
1485
1486           $take_me_to_url = $GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_sched');
1487           //Header('Location: ' . $take_me_to_url);
1488         }
1489
1490       // create the elder id -> elder name mapping
1491       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY name ASC";
1492       $this->db->query($sql,__LINE__,__FILE__);
1493       $i=0;
1494       $elder_id = NULL;
1495       $elder_name = NULL;
1496       while ($this->db->next_record())
1497         {
1498           $elder_name[$i] = $this->db->f('name');
1499           $elder_id[$i] = $this->db->f('elder');
1500           $i++;
1501         }
1502       array_multisort($elder_name, $elder_id);
1503
1504       // APPOINTMENT TABLE
1505       $date_width=250; $time_width=100; $elder_width=200; $location_width=100;
1506       $appt_table_width=$date_width + $time_width + $elder_width + $location_width;
1507       $appt_header_row = "<th width=$date_width><font size=-2>Date</th>";
1508       $appt_header_row.= "<th width=$time_width><font size=-2>Time</th>";
1509       $appt_header_row.= "<th width=$elder_width><font size=-2>Elder</th>";
1510       $appt_header_row.= "<th width=$location_width><font size=-2>Location</th>";
1511       $appt_table_data = "";
1512
1513       $total_elders=0; $elders_with_yearly_ppi=0;
1514
1515       // Display a scheduling table for the EQ President
1516       $table_data=""; $appt_table_data="";
1517       $table_title = "District ".$district_number.": ".$district_name.": All Elders with Yearly PPI Not Completed";
1518       $appt_table_title = "District ".$district_number.": ".$district_name.": Yearly PPI Appointment Slots";
1519       $this->t->set_var('table_title',$table_title);
1520       $this->t->set_var('appt_table_title',$appt_table_title);
1521
1522       // query the database for all the appointments
1523       $sql = "SELECT * FROM eq_appointment where presidency=".$presidency_id." and date>=CURDATE() ORDER BY date ASC, time ASC";
1524       $this->db->query($sql,__LINE__,__FILE__);
1525
1526       while ($this->db->next_record())
1527         {
1528           $appointment = $this->db->f('appointment');
1529           $elder = $this->db->f('elder');
1530           $location = $this->db->f('location');
1531           if(($location == "") && ($elder > 0)) { $location = "$president_last_name"." home ($president_address)"; }
1532
1533           $date = $this->db->f('date');
1534           $date_array = explode("-",$date);
1535           $year = $date_array[0]; $month = $date_array[1]; $day = $date_array[2];
1536           $day_string = date("l d-M-Y", mktime(0,0,0,$month,$day,$year));
1537
1538           $time = $this->db->f('time');
1539           $time_array = explode(":",$time);
1540           $time_string = date("g:i a", mktime($time_array[0], $time_array[1], $time_array[2]));
1541
1542           $appt_table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
1543           $appt_table_data.= "<td align=center>$day_string</td>";
1544           $appt_table_data.= "<td align=center>$time_string</td>";
1545
1546           $appt_table_data.= '<td align=center><select name=appt_notes['.$appointment.'][elder]>';
1547           $appt_table_data.= '<option value=0></option>';
1548           for ($i=0; $i < count($elder_id); $i++) {
1549             $id = $elder_id[$i];
1550             $name = $elder_name[$i];
1551             if($elder_id[$i] == $elder) { $selected[$id] = 'selected="selected"'; } else { $selected[$id] = ''; }
1552             $appt_table_data.= '<option value='.$id.' '.$selected[$id].'>'.$name.'</option>';
1553           }
1554           $appt_table_data.='</select></td>';
1555
1556           $appt_table_data.= '<td align=center><input type=text size="35" maxlength="120" ';
1557           $appt_table_data.= 'name="appt_notes['.$appointment.'][location]" value="'.$location.'">';
1558
1559           $appt_table_data.= '<input type=hidden name="appt_notes['.$appointment.'][appointment]" value="'.$appointment.'">';
1560
1561           $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
1562           $this->t->set_var('tr_color',$tr_color);
1563         }
1564
1565       $this->t->set_var('appt_table_data',$appt_table_data);
1566       $this->t->set_var('appt_header_row',$appt_header_row);
1567       $this->t->set_var('appt_table_width',$appt_table_width);
1568
1569       // PPI SCHEDULING TABLE
1570       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY ppi_pri ASC";
1571       $this->db->query($sql,__LINE__,__FILE__);
1572
1573       $i=0;
1574       $elder_id = NULL;
1575       while ($this->db->next_record())
1576         {
1577           $elder_id[$i] = $this->db->f('elder');
1578           $elder_name[$i] = $this->db->f('name');
1579           $elder_phone[$elder_id[$i]] = $this->db->f('phone');
1580           $elder_ppi_pri[$elder_id[$i]] = $this->db->f('ppi_pri');
1581           $elder_ppi_notes[$elder_id[$i]] = $this->db->f('ppi_notes');
1582           $i++;
1583           $total_elders++;
1584         }
1585
1586       $max = count($elder_id);
1587
1588       for($i=0; $i < $max; $i++) {
1589           $id = $elder_id[$i];
1590           $name = $elder_name[$i];
1591           $phone = $elder_phone[$id];
1592           $ppi_pri = $elder_ppi_pri[$id];
1593           $ppi_notes = $elder_ppi_notes[$id];
1594
1595           // If this elder has had a yearly PPI this year, don't show him on the schedule list
1596           $year_start = $year - 1 . "-12-31"; $year_end = $year + 1 . "-01-01";
1597           $sql = "SELECT * FROM eq_ppi WHERE date > '$year_start' AND date < '$year_end' ".
1598              "AND elder=" . $id . " AND eqpresppi=1";
1599           $this->db2->query($sql,__LINE__,__FILE__);
1600
1601           if(!$this->db2->next_record()) {
1602             $sql = "SELECT * FROM eq_ppi WHERE elder=" . $id . " AND eqpresppi=1 ORDER BY date DESC";
1603             $this->db->query($sql,__LINE__,__FILE__);
1604             if($this->db->next_record()) { $date = $this->db->f('date'); } else { $date = ""; }
1605             $link_data['menuaction'] = 'eq.eq.ppi_update';
1606             $link_data['elder'] = $id;
1607             $link_data['name'] = $name;
1608             $link_data['ppi'] = '';
1609             $link_data['eqpresppi'] = 1;
1610             $link_data['action'] = 'add';
1611             $link_data['interviewer'] = $interviewer;
1612             $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
1613             $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
1614             $this->t->set_var('tr_color',$tr_color);
1615             $table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') ."><td title=\"$phone\"><a href=$link>$name</a></td>";
1616             $table_data.= "<td align=center>$phone</td>";
1617             //$table_data.= "<td align=center>$ppi_pri</td>";
1618             $table_data.= "<td align=center>";
1619             $table_data.= '<select name=ppi_notes['.$i.'][pri]>';
1620             foreach(range(0,6) as $num) {
1621               if($num == 0) { $num = 1; } else {$num = $num*5; }
1622               if($ppi_pri == $num) { $selected[$num] = 'selected="selected"'; } else { $selected[$num] = ''; }
1623               $table_data.= '<option value='.$num.' '.$selected[$num].'>'.$num.'</option>';
1624             }
1625             $table_data.= '</select></td>';
1626             $table_data.= "<td align=center>$date</td>";
1627             $table_data.= '<td><input type=text size="50" maxlength="128" name="ppi_notes['.$i.'][notes]" value="'.$ppi_notes.'">';
1628             $table_data.= '<input type=hidden name="ppi_notes['.$i.'][elder_id]" value="'.$id.'">';
1629             $table_data.= '<input type=hidden name="ppi_notes['.$i.'][elder_name]" value="'.$name.'">';
1630             $table_data.= '</td>';
1631             $table_data.= '</tr>';
1632           } else {
1633             $link_data['menuaction'] = 'eq.eq.ppi_update';
1634             $link_data['interviewer'] = $this->db2->f('interviewer');
1635             $link_data['elder'] = $this->db2->f('elder');
1636             $link_data['name'] = $name;
1637             $link_data['ppi'] = $this->db2->f('ppi');
1638             $link_data['eqpresppi'] = $this->db2->f('eqpresppi');
1639             $link_data['action'] = 'view';
1640             $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
1641             $elders_with_yearly_ppi++;
1642             $date = $this->db2->f('date');
1643             $ppi_notes = $this->db2->f('notes');
1644             if(strlen($ppi_notes) > 40) { $ppi_notes = substr($ppi_notes,0,40) . "..."; }
1645             $tr_color2 = $this->nextmatchs->alternate_row_color($tr_color2);
1646             $this->t->set_var('tr_color2',$tr_color2);
1647             $completed_data.= "<tr bgcolor=". $this->t->get_var('tr_color2') ."><td title=\"$phone\"><a href=$link>$name</a></td>";
1648             $completed_data.= "<td align=center>$phone</td>";
1649             $completed_data.= "<td align=center><a href=".$link.">$date</a></td>";
1650             $completed_data.= "<td align=left>$ppi_notes</td>";
1651             $completed_data.= '</tr>';
1652           }
1653       } // End for Elders Loop
1654
1655       $name_width=175; $phone_width=100; $date_width=100; $notes_width=300;
1656       $completed_table_width=$name_width + $phone_width + $date_width + $notes_width;
1657       $completed_header_row = "<th width=$name_width><font size=-2>Elder Name</th>";
1658       $completed_header_row.= "<th width=$phone_width><font size=-2>Phone</th>";
1659       $completed_header_row.= "<th width=$date_width><font size=-2>Date</th>";
1660       $completed_header_row.= "<th width=$notes_width><font size=-2>PPI Notes</th>";
1661
1662       $this->t->set_var('table_width',$table_width);
1663       $this->t->set_var('header_row',$header_row);
1664       $this->t->set_var('table_data',$table_data);
1665       $this->t->set_var('completed_header_row',$completed_header_row);
1666       $this->t->set_var('completed_table_width',$completed_table_width);
1667       $this->t->set_var('completed',$completed_data);
1668       $this->t->fp('elderlist','elder_list',True);
1669
1670       $elders_width=300; $totals_width=100;
1671       $totals_table_width=$elders_width + $totals_width;
1672       $totals_header_row = "<th width=$elders_width><font size=-2>Elders</th>";
1673       $totals_header_row.= "<th width=$totals_width><font size=-2>$year</th>";
1674       $totals_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
1675       $totals_data.= "<td align=left><font size=-2><b>Total Elders with yearly PPIs completed:</b></font></td>";
1676       $totals_data.= "<td align=center><font size=-2><b>$elders_with_yearly_ppi / $total_elders</b></font></td>";
1677       $percent = ceil(($elders_with_yearly_ppi / $total_elders)*100);
1678       $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
1679       $this->t->set_var('tr_color',$tr_color);
1680       $totals_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
1681       $totals_data.= "<td align=left><font size=-2><b>Percentage:</b></font></td>";
1682       $totals_data.= "<td align=center><font size=-2><b>$percent%</b></font></td>";
1683       $totals_data.= "</tr>";
1684
1685       $this->t->set_var('totals',$totals_data);
1686       $this->t->set_var('totals_header_row',$totals_header_row);
1687       $this->t->set_var('totals_table_width',$totals_table_width);
1688
1689       $this->t->pfp('out','ppi_sched_t');
1690       $this->save_sessiondata();
1691
1692     }
1693
1694   function int_sched()
1695     {
1696       $this->t->set_file(array('int_sched_t' => 'int_sched.tpl'));
1697       $this->t->set_block('int_sched_t','elder_list','elderlist');
1698       $this->t->set_block('int_sched_t','appt_list','apptlist');
1699       $action = get_var('action',array('GET','POST'));
1700
1701       $this->t->set_var('lang_save','Save Appt / Pri / Notes');
1702       $this->t->set_var('lang_reset','Clear Changes');
1703
1704       $this->t->set_var('int_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_view'));
1705       $this->t->set_var('int_link_title','Hometeaching Interviews');
1706
1707       $this->t->set_var('schedule_int_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_sched'));
1708       $this->t->set_var('schedule_int_link_title','Schedule Hometeaching Interviews');
1709
1710       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_sched&action=save'));
1711       $this->t->set_var('title','Hometeaching Interviews Scheduler');
1712
1713       $elder_width=500; $phone_width=25; $pri_width=10; $notes_width=128; $int_date_width=20;
1714       $table_width=$elder_width + $phone_width + $pri_width + $notes_width + $int_date_width;
1715       $header_row = "<th width=$elder_width><font size=-2>Elder Name</th>";
1716       $header_row.= "<th width=$phone_width><font size=-2>Phone</th>";
1717       $header_row.= "<th width=$pri_width><font size=-2>Priority</th>";
1718       $header_row.= "<th width=$int_date_width><font size=-2>Last Interview</th>";
1719       $header_row.= "<th width=$notes_width><font size=-2>Scheduling Notes</th>";
1720       $table_data=""; $completed_data=""; $totals_data="";
1721
1722       $year = date('Y');
1723       $month = date('m');
1724       $nextyear = $year + 1;
1725       if($month >= 1 && $month <= 3) { $quarter_start=$year."-01-01"; $quarter_end=$year."-04-01"; }
1726       if($month >= 4 && $month <= 6) { $quarter_start=$year."-04-01"; $quarter_end=$year."-07-01"; }
1727       if($month >= 7 && $month <= 9) { $quarter_start=$year."-07-01"; $quarter_end=$year."-10-01"; }
1728       if($month >= 10 && $month <= 12) { $quarter_start=$year."-10-01"; $quarter_end=$nextyear."-01-01"; }
1729       //print "year: $year month: $month quarter_start: $quarter_start quarter_end: $quarter_end<br>";
1730
1731       // create the elder id -> elder name mapping
1732       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY name ASC";
1733       $this->db->query($sql,__LINE__,__FILE__);
1734       $i=0;
1735       $elder_id_data = NULL;
1736       $elder_name_data = NULL;
1737       while ($this->db->next_record())
1738         {
1739           $elder_name_data[$i] = $this->db->f('name');
1740           $elder_id_data[$i] = $this->db->f('elder');
1741           $elderid2name[$elder_id_data[$i]] = $elder_name_data[$i];
1742           $i++;
1743         }
1744       array_multisort($elder_name_data, $elder_id_data);
1745
1746       if($action == 'save')
1747         {
1748           // Save any changes made to the appointment table
1749           $new_data = get_var('appt_notes',array('POST'));
1750           if($new_data != "") {
1751             foreach ($new_data as $entry)
1752               {
1753                 $elder = $entry['elder'];
1754                 $appointment = $entry['appointment'];
1755                 $location = $entry['location'];
1756                 if($location == "") {
1757                   $supervisor = $entry['supervisor'];
1758                   $supervisor_array = explode(",", $elderid2name[$supervisor]);
1759                   $supervisor_last_name = $supervisor_array[0];
1760                   $sql = "SELECT * FROM eq_elder where elder='$supervisor'";
1761                   $this->db2->query($sql,__LINE__,__FILE__);
1762                   if($this->db2->next_record()) {
1763                     $indiv_id = $this->db2->f('indiv_id');
1764                   }
1765                   $sql = "SELECT * FROM eq_parent where indiv_id='$indiv_id'";
1766                   $this->db2->query($sql,__LINE__,__FILE__);
1767                   if($this->db2->next_record()) {
1768                     $supervisor_address = $this->db2->f('address');
1769                   }
1770                   $location = "$supervisor_last_name"." home ($supervisor_address)";
1771                 }
1772                 if($elder == 0) { $location = ""; }
1773
1774                 //print "elder: $elder appointment: $appointment <br>";
1775                 //Only perform a database update if we have made a change to this appointment
1776                 $sql = "SELECT * FROM eq_appointment where appointment='$appointment' and elder='$elder' and location='$location'";
1777                 $this->db->query($sql,__LINE__,__FILE__);
1778                 if(!$this->db->next_record()) {
1779                   // Perform database save actions here
1780                   $this->db->query("UPDATE eq_appointment set " .
1781                                    " elder='" . $elder . "'" .
1782                                    ",location='" . $location . "'" .
1783                                    " WHERE appointment=" . $appointment,__LINE__,__FILE__);
1784
1785                   // Email the appointment
1786                   $this->email_appt($appointment);
1787                 }
1788               }
1789           }
1790
1791           // Save any changes made to the int notes table
1792           $new_data = get_var('int_notes',array('POST'));
1793           foreach ($new_data as $entry)
1794            {
1795              $int_notes = $entry['notes'];
1796              $elder_id = $entry['elder_id'];
1797              $elder_name = $entry['elder_name'];
1798              $int_pri = $entry['pri'];
1799              $aaronic = $entry['aaronic'];
1800              //print "int_notes: $int_notes elder_name: $elder_name aaronic: $aaronic <Br>";
1801              if($aaronic == 0) {
1802                // Perform database save actions here
1803                $this->db->query("UPDATE eq_elder set " .
1804                                 " int_notes='" . $int_notes . "'" .
1805                                 ",int_pri='" . $int_pri . "'" .
1806                                 " WHERE elder=" . $elder_id,__LINE__,__FILE__);
1807              }
1808
1809            }
1810
1811           $take_me_to_url = $GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_sched');
1812           //Header('Location: ' . $take_me_to_url);
1813         }
1814
1815       // Get the Districts
1816       $sql = "SELECT * FROM eq_district where valid=1 ORDER BY district ASC";
1817       $this->db->query($sql,__LINE__,__FILE__);
1818       $i=0;
1819       while ($this->db->next_record())
1820         {
1821           $district = $this->db->f('district');
1822           $districts[$i]['district'] = $this->db->f('district');
1823           $districts[$i]['name'] = $this->db->f('name');
1824           $districts[$i]['supervisor'] = $this->db->f('supervisor');
1825           $sql = "SELECT * FROM eq_presidency where district=$district and valid=1";
1826           $this->db2->query($sql,__LINE__,__FILE__);
1827           if($this->db2->next_record()) {
1828             $districts[$i]['presidency'] = $this->db2->f('presidency');
1829           }
1830           $i++;
1831         }
1832
1833       // APPOINTMENT TABLE
1834       $district = 1;
1835       $date_width=250; $time_width=100; $elder_width=200; $location_width=100;
1836       $appt_table_width=$date_width + $time_width + $elder_width + $location_width;
1837       $appt_header_row = "<th width=$date_width><font size=-2>Date</th>";
1838       $appt_header_row.= "<th width=$time_width><font size=-2>Time</th>";
1839       $appt_header_row.= "<th width=$elder_width><font size=-2>Elder</th>";
1840       $appt_header_row.= "<th width=$location_width><font size=-2>Location</th>";
1841       $appt_table_data = "";
1842
1843       $total_comps=0; $comps_with_quarterly_int=0;
1844
1845       // Display a scheduling table for each district
1846       for ($d=0; $d < count($districts); $d++) {
1847       $table_data=""; $appt_table_data="";
1848       $this->t->set_var('district_number',$districts[$d]['district']);
1849       $this->t->set_var('district_name',$districts[$d]['name']);
1850       $supervisor = $districts[$d]['supervisor'];
1851       $supervisor_array = explode(",", $supervisor);
1852       $supervisor_last_name = $supervisor_array[0];
1853       $sql = "SELECT * FROM eq_elder where elder='$supervisor'";
1854       $this->db2->query($sql,__LINE__,__FILE__);
1855       if($this->db2->next_record()) {
1856         $indiv_id = $this->db2->f('indiv_id');
1857       }
1858       $sql = "SELECT * FROM eq_parent where indiv_id='$indiv_id'";
1859       $this->db2->query($sql,__LINE__,__FILE__);
1860       if($this->db2->next_record()) {
1861         $supervisor_address = $this->db2->f('address');
1862       }
1863       $location = "$supervisor_last_name"." home ($supervisor_address)";
1864       $table_title = "District ".$districts[$d]['district'].": ".$districts[$d]['name'].": All Elders with Interviews Not Completed";
1865       $appt_table_title = "District ".$districts[$d]['district'].": ".$districts[$d]['name'].": Interview Appointment Slots";
1866       $this->t->set_var('table_title',$table_title);
1867       $this->t->set_var('appt_table_title',$appt_table_title);
1868
1869       // query the database for all the appointments
1870       $sql = "SELECT * FROM eq_appointment where presidency=".$districts[$d]['presidency']." and date>=CURDATE() ORDER BY date ASC, time ASC";
1871       $this->db->query($sql,__LINE__,__FILE__);
1872
1873       while ($this->db->next_record())
1874         {
1875           $appointment = $this->db->f('appointment');
1876           $elder = $this->db->f('elder');
1877           $location = $this->db->f('location');
1878           if(($location == "") && ($elder > 0)) { $location = "$supervisor_last_name"." home ($supervisor_address)"; }
1879
1880           $date = $this->db->f('date');
1881           $date_array = explode("-",$date);
1882           $year = $date_array[0]; $month = $date_array[1]; $day = $date_array[2];
1883           $day_string = date("l d-M-Y", mktime(0,0,0,$month,$day,$year));
1884
1885           $time = $this->db->f('time');
1886           $time_array = explode(":",$time);
1887           $time_string = date("g:i a", mktime($time_array[0], $time_array[1], $time_array[2]));
1888
1889           $appt_table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
1890           $appt_table_data.= "<td align=center>$day_string</td>";
1891           $appt_table_data.= "<td align=center>$time_string</td>";
1892
1893           $appt_table_data.= '<td align=center><select name=appt_notes['.$appointment.'][elder]>';
1894           $appt_table_data.= '<option value=0></option>';
1895           for ($i=0; $i < count($elder_id_data); $i++) {
1896             $id = $elder_id_data[$i];
1897             $name = $elder_name_data[$i];
1898             if($elder_id_data[$i] == $elder) { $selected[$id] = 'selected="selected"'; } else { $selected[$id] = ''; }
1899             $appt_table_data.= '<option value='.$id.' '.$selected[$id].'>'.$name.'</option>';
1900           }
1901           $appt_table_data.='</select></td>';
1902
1903           $appt_table_data.= '<td align=center><input type=text size="35" maxlength="120" ';
1904           $appt_table_data.= 'name="appt_notes['.$appointment.'][location]" value="'.$location.'">';
1905
1906           $appt_table_data.= '<input type=hidden name="appt_notes['.$appointment.'][appointment]" value="'.$appointment.'">';
1907           $appt_table_data.= '<input type=hidden name="appt_notes['.$appointment.'][supervisor]" value="'.$supervisor.'">';
1908
1909           $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
1910           $this->t->set_var('tr_color',$tr_color);
1911         }
1912
1913       $this->t->set_var('appt_table_data',$appt_table_data);
1914       $this->t->set_var('appt_header_row',$appt_header_row);
1915       $this->t->set_var('appt_table_width',$appt_table_width);
1916
1917       // INTERVIEW SCHEDULING TABLE
1918
1919       // Select all the unique companionship numbers for this district
1920       $sql = "SELECT distinct companionship FROM eq_companionship where valid=1 and district=". $districts[$d]['district'];
1921       $this->db->query($sql,__LINE__,__FILE__);
1922       $j=0;
1923       while ($this->db->next_record())
1924         {
1925           $unique_companionships[$j]['companionship'] = $this->db->f('companionship');
1926           $j++;
1927         }
1928
1929       $i=0;
1930       for ($j=0; $j < count($unique_companionships); $j++) {
1931         // Select all the companions from each companionship
1932         $sql = "SELECT * FROM eq_companionship where valid=1 and ".
1933            "companionship=". $unique_companionships[$j]['companionship'];
1934         $this->db->query($sql,__LINE__,__FILE__);
1935         $k=0; $int_completed=0;
1936         $comp = $unique_companionships[$j]['companionship'];
1937         $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
1938         $this->t->set_var('tr_color',$tr_color);
1939         $total_comps++;
1940         while ($this->db->next_record())
1941             {
1942               // Get this companions information
1943               $elder_id = $this->db->f('elder');
1944               $aaronic_id = $this->db->f('aaronic');
1945
1946               $sql = "SELECT * FROM eq_elder where elder=$elder_id";
1947               $this->db2->query($sql,__LINE__,__FILE__);
1948               if($this->db2->next_record())
1949                 {
1950                   $elder_id = $this->db2->f('elder');
1951                   $elder_name = $this->db2->f('name');
1952                   $elder_phone[$elder_id] = $this->db2->f('phone');
1953                   $elder_int_pri[$elder_id] = $this->db2->f('int_pri');
1954                   $elder_int_notes[$elder_id] = $this->db2->f('int_notes');
1955                   $elder_aaronic = 0;
1956                 }
1957               else {
1958                 $sql = "SELECT * FROM eq_aaronic where aaronic=$aaronic_id";
1959                 $this->db2->query($sql,__LINE__,__FILE__);
1960                 if($this->db2->next_record())
1961                   {
1962                     $elder_id = $this->db2->f('aaronic');
1963                     $elder_name = $this->db2->f('name');
1964                     $elder_phone[$elder_id] = $this->db2->f('phone');
1965                     $elder_aaronic = 1;
1966                   }
1967               }
1968
1969               $id = $elder_id;
1970               $name = $elder_name;
1971               $phone = $elder_phone[$id];
1972               $int_pri = $elder_int_pri[$id];
1973               $int_notes = $elder_int_notes[$id];
1974               $aaronic = $elder_aaronic;
1975
1976               // If the companionship has already had its quarterly interview,
1977               // Skip the other companion in the companionship.
1978               if($int_completed == 1) {
1979                 $completed_data.= "<tr bgcolor=". $this->t->get_var('tr_color2') ."><td title=\"$phone\"><a href=$link>$name</a></td>";
1980                 $completed_data.= "<td align=center>$phone</td>";
1981                 $completed_data.= "<td align=center><a href=".$link.">$date</a></td>";
1982                 $completed_data.= "<td align=left>$int_notes</td>";
1983                 $completed_data.= '</tr>';
1984                 $tr_color2 = $this->nextmatchs->alternate_row_color($tr_color2);
1985                 $this->t->set_var('tr_color2',$tr_color2);
1986                 $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
1987                 $this->t->set_var('tr_color',$tr_color);
1988                 continue;
1989               }
1990
1991               // If this companionship has had a hometeaching interview this quarter, don't show them on the schedule list
1992               $sql = "SELECT * FROM eq_ppi WHERE date >= '$quarter_start' AND date < '$quarter_end' ".
1993                  "AND elder=" . $id;
1994               $this->db2->query($sql,__LINE__,__FILE__);
1995
1996               if(!$this->db2->next_record()) {
1997                 $sql = "SELECT * FROM eq_ppi WHERE elder=" . $id . " ORDER BY date DESC";
1998                 $this->db3->query($sql,__LINE__,__FILE__);
1999                 if($this->db3->next_record()) { $date = $this->db3->f('date'); } else { $date = ""; }
2000                 $link_data['menuaction'] = 'eq.eq.int_update';
2001                 $link_data['elder'] = $id;
2002                 $link_data['aaronic'] = 0;
2003                 $link_data['name'] = $name;
2004                 $link_data['ppi'] = '';
2005                 $link_data['action'] = 'add';
2006                 $link_data['interviewer'] = $districts[$d]['supervisor'];
2007                 $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2008                 $table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') ."><td title=\"$phone\"><a href=$link>$name</a></td>";
2009                 $table_data.= "<td align=center>$phone</td>";
2010                 $table_data.= "<td align=center>";
2011                 if($aaronic == 0) {
2012                   $table_data.= '<select name=int_notes['.$i.'][pri]>';
2013                   foreach(range(0,6) as $num) {
2014                     if($num == 0) { $num = 1; } else {$num = $num*5; }
2015                     if($int_pri == $num) { $selected[$num] = 'selected="selected"'; } else { $selected[$num] = ''; }
2016                     $table_data.= '<option value='.$num.' '.$selected[$num].'>'.$num.'</option>';
2017                   }
2018                   $table_data.= '</select></td>';
2019                 }
2020                 $table_data.= "<td align=center>$date</td>";
2021                 if($aaronic == 0) {
2022                   $table_data.= '<td><input type=text size="50" maxlength="128" name="int_notes['.$i.'][notes]" value="'.$int_notes.'">';
2023                 }
2024                 $table_data.= '<input type=hidden name="int_notes['.$i.'][elder_id]" value="'.$id.'">';
2025                 $table_data.= '<input type=hidden name="int_notes['.$i.'][elder_name]" value="'.$name.'">';
2026                 $table_data.= '<input type=hidden name="int_notes['.$i.'][aaronic]" value="'.$aaronic.'">';
2027                 $table_data.= '</td>';
2028                 $table_data.= '</tr>'."\n";
2029                 $i++;
2030               } else {
2031                 $link_data['menuaction'] = 'eq.eq.int_update';
2032                 $link_data['interviewer'] = $this->db2->f('interviewer');
2033                 $link_data['elder'] = $this->db2->f('elder');
2034                 $link_data['aaronic'] = $this->db2->f('aaronic');
2035                 $link_data['name'] = $name;
2036                 $link_data['ppi'] = $this->db2->f('ppi');
2037                 $link_data['action'] = 'view';
2038                 $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2039                 $comps_with_quarterly_int++;
2040                 $int_completed=1;
2041                 $date = $this->db2->f('date');
2042                 $int_notes = $this->db2->f('notes');
2043                 if(strlen($int_notes) > 40) { $int_notes = substr($int_notes,0,40) . "..."; }
2044                 $completed_data.= "<tr bgcolor=". $this->t->get_var('tr_color2') ."><td title=\"$phone\"><a href=$link>$name</a></td>";
2045                 $completed_data.= "<td align=center>$phone</td>";
2046                 $completed_data.= "<td align=center><a href=".$link.">$date</a></td>";
2047                 $completed_data.= "<td align=left>$int_notes</td>";
2048                 $completed_data.= '</tr>';
2049               }
2050             }
2051       }
2052
2053       $name_width=175; $phone_width=100; $date_width=100; $notes_width=300;
2054       $completed_table_width=$name_width + $phone_width + $date_width + $notes_width;
2055       $completed_header_row = "<th width=$name_width><font size=-2>Elder Name</th>";
2056       $completed_header_row.= "<th width=$phone_width><font size=-2>Phone</th>";
2057       $completed_header_row.= "<th width=$date_width><font size=-2>Date</th>";
2058       $completed_header_row.= "<th width=$notes_width><font size=-2>Interview Notes</th>";
2059
2060       $this->t->set_var('table_width',$table_width);
2061       $this->t->set_var('header_row',$header_row);
2062       $this->t->set_var('table_data',$table_data);
2063       $this->t->set_var('completed_header_row',$completed_header_row);
2064       $this->t->set_var('completed_table_width',$completed_table_width);
2065       $this->t->set_var('completed',$completed_data);
2066       $this->t->fp('elderlist','elder_list',True);
2067
2068       } // End for each district loop
2069
2070
2071       $elders_width=300; $totals_width=100;
2072       $totals_table_width=$elders_width + $totals_width;
2073       $totals_header_row = "<th width=$elders_width><font size=-2>Elders</th>";
2074       $totals_header_row.= "<th width=$totals_width><font size=-2>$year</th>";
2075       $totals_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
2076       $totals_data.= "<td align=left><font size=-2><b>Total Companionships with interviews completed:</b></font></td>";
2077       $totals_data.= "<td align=center><font size=-2><b>$comps_with_quarterly_int / $total_comps</b></font></td>";
2078       $percent = ceil(($comps_with_quarterly_int / $total_comps)*100);
2079       $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
2080       $this->t->set_var('tr_color',$tr_color);
2081       $totals_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
2082       $totals_data.= "<td align=left><font size=-2><b>Percentage:</b></font></td>";
2083       $totals_data.= "<td align=center><font size=-2><b>$percent%</b></font></td>";
2084       $totals_data.= "</tr>";
2085
2086       $this->t->set_var('totals',$totals_data);
2087       $this->t->set_var('totals_header_row',$totals_header_row);
2088       $this->t->set_var('totals_table_width',$totals_table_width);
2089
2090       $this->t->pfp('out','int_sched_t');
2091       $this->save_sessiondata();
2092
2093     }
2094
2095   function vis_sched()
2096     {
2097       $this->t->set_file(array('vis_sched_t' => 'vis_sched.tpl'));
2098       $this->t->set_block('vis_sched_t','family_list','familylist');
2099       $this->t->set_block('vis_sched_t','appt_list','apptlist');
2100       $action = get_var('action',array('GET','POST'));
2101
2102       $this->t->set_var('lang_save','Save Appt / Pri / Notes');
2103       $this->t->set_var('lang_reset','Clear Changes');
2104
2105       $this->t->set_var('vis_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_view'));
2106       $this->t->set_var('vis_link_title','View Yearly Visits');
2107
2108       $this->t->set_var('schedule_vis_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_sched'));
2109       $this->t->set_var('schedule_vis_link_title','Schedule Yearly Visits');
2110
2111       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_sched&action=save'));
2112       $this->t->set_var('title','EQ Presidency Yearly Visit Scheduler');
2113
2114       $family_width=500; $phone_width=40; $pri_width=10; $notes_width=128; $visit_date_width=20;
2115       $table_width=$family_width + $phone_width + $pri_width + $notes_width + $visit_date_width;
2116       $header_row = "<th width=$family_width><font size=-2>Family Name</th>";
2117       $header_row.= "<th width=$phone_width><font size=-2>Phone</th>";
2118       $header_row.= "<th width=$pri_width><font size=-2>Priority</th>";
2119       $header_row.= "<th width=$visit_date_width><font size=-2>Last Visit</th>";
2120       $header_row.= "<th width=$notes_width><font size=-2>Scheduling Notes</th>";
2121       $table_data=""; $completed_data=""; $totals_data="";
2122
2123       $year = date('Y');
2124
2125       // create the family id -> family name mapping
2126       $sql = "SELECT * FROM eq_family where valid=1 and elder_id != 0 ORDER BY name ASC";
2127       $this->db->query($sql,__LINE__,__FILE__);
2128       $i=0;
2129       $family_id = NULL;
2130       while ($this->db->next_record())
2131         {
2132           $family_id[$i] = $this->db->f('family');
2133           $family_name[$i] = $this->db->f('name');
2134           $familyid2name[$family_id[$i]] = $family_name[$i];
2135           $sql = "SELECT * FROM eq_parent where family='$family_id[$i]'";
2136           $this->db2->query($sql,__LINE__,__FILE__);
2137           if($this->db2->next_record()) {
2138             $familyid2address[$family_id[$i]] = $this->db2->f('address');
2139           }
2140           $i++;
2141         }
2142       array_multisort($family_name, $family_id);
2143
2144       if($action == 'save')
2145         {
2146           // Save any changes made to the appointment table
2147           $new_data = get_var('appt_notes',array('POST'));
2148           if($new_data != "") {
2149             foreach ($new_data as $entry)
2150               {
2151                 $family = $entry['family'];
2152                 $appointment = $entry['appointment'];
2153                 $location = $entry['location'];
2154                 if($location == "") {
2155                   $family_name_array = explode(",", $familyid2name[$family]);
2156                   $family_last_name = $family_name_array[0];
2157                   $family_address = $familyid2address[$family];
2158                   $location = "$family_last_name"." home ($family_address)";
2159                 }
2160                 if($family == 0) { $location = ""; }
2161
2162                 //Only perform a database update if we have made a change to this appointment
2163                 $sql = "SELECT * FROM eq_appointment where appointment='$appointment' and family='$family' and location='$location'";
2164                 $this->db->query($sql,__LINE__,__FILE__);
2165                 if(!$this->db->next_record()) {
2166                   // Perform database save actions here
2167                   $this->db->query("UPDATE eq_appointment set " .
2168                                    " family='" . $family . "'" .
2169                                    ",location='" . $location . "'" .
2170                                    " WHERE appointment=" . $appointment,__LINE__,__FILE__);
2171
2172                   // Email the appointment
2173                   $this->email_appt($appointment);
2174                 }
2175               }
2176           }
2177
2178           // Save any changes made to the visit notes table
2179           $new_data = get_var('vis_notes',array('POST'));
2180           foreach ($new_data as $entry)
2181            {
2182              $visit_notes = $entry['notes'];
2183              $family = $entry['family_id'];
2184              $visit_pri = $entry['pri'];
2185
2186              // Perform database save actions here
2187              $this->db->query("UPDATE eq_family set " .
2188                               " visit_notes='" . $visit_notes . "'" .
2189                               ",visit_pri='" . $visit_pri . "'" .
2190                               " WHERE family=" . $family,__LINE__,__FILE__);
2191
2192            }
2193
2194           $take_me_to_url = $GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_sched');
2195           //Header('Location: ' . $take_me_to_url);
2196         }
2197
2198       // APPOINTMENT TABLE
2199       $date_width=250; $time_width=100; $family_width=250; $location_width=100;
2200       $appt_table_width=$date_width + $time_width + $family_width + $location_width;
2201       $appt_header_row = "<th width=$date_width><font size=-2>Date</th>";
2202       $appt_header_row.= "<th width=$time_width><font size=-2>Time</th>";
2203       $appt_header_row.= "<th width=$family_width><font size=-2>Family</th>";
2204       $appt_header_row.= "<th width=$location_width><font size=-2>Location</th>";
2205       $appt_table_data = "";
2206
2207       // Find out what the EQ Presidency ID is
2208       $sql = "SELECT * FROM eq_presidency where eqpres=1 and valid=1";
2209       $this->db->query($sql,__LINE__,__FILE__);
2210       if($this->db->next_record()) {
2211         $presidency_name = $this->db->f('name');
2212         $presidency_id = $this->db->f('presidency');
2213       } else {
2214         print "<hr><font color=red><h3>-E- Unable to locate EQ Presidency in eq_presidency table</h3></font></hr>";
2215         return;
2216       }
2217
2218       // query the database for all the appointments
2219       $sql = "SELECT * FROM eq_appointment where presidency=$presidency_id and date>=CURDATE() ORDER BY date ASC, time ASC";
2220       $this->db->query($sql,__LINE__,__FILE__);
2221
2222       while ($this->db->next_record())
2223         {
2224           $appointment = $this->db->f('appointment');
2225           $family = $this->db->f('family');
2226           $location = $this->db->f('location');
2227           $family_name_array = explode(",", $familyid2name[$family]);
2228           $family_last_name = $family_name_array[0];
2229           $family_address = $familyid2address[$family];
2230           if(($location == "") && ($family > 0)) { $location = "$family_last_name"." home ($family_address)"; }
2231
2232           $date = $this->db->f('date');
2233           $date_array = explode("-",$date);
2234           $year = $date_array[0]; $month = $date_array[1]; $day = $date_array[2];
2235           $day_string = date("l d-M-Y", mktime(0,0,0,$month,$day,$year));
2236
2237           $time = $this->db->f('time');
2238           $time_array = explode(":",$time);
2239           $time_string = date("g:i a", mktime($time_array[0], $time_array[1], $time_array[2]));
2240
2241           $appt_table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
2242           $appt_table_data.= "<td align=center>$day_string</td>";
2243           $appt_table_data.= "<td align=center>$time_string</td>";
2244
2245           $appt_table_data.= '<td align=center><select name=appt_notes['.$appointment.'][family]>';
2246           $appt_table_data.= '<option value=0></option>';
2247           for ($i=0; $i < count($family_id); $i++) {
2248             $id = $family_id[$i];
2249             $name = $family_name[$i];
2250             if($family_id[$i] == $family) { $selected[$id] = 'selected="selected"'; } else { $selected[$id] = ''; }
2251             $appt_table_data.= '<option value='.$id.' '.$selected[$id].'>'.$name.' Family</option>';
2252           }
2253           $appt_table_data.='</select></td>';
2254
2255           $appt_table_data.= '<td align=center><input type=text size="35" maxlength="120" ';
2256           $appt_table_data.= 'name="appt_notes['.$appointment.'][location]" value="'.$location.'">';
2257
2258           $appt_table_data.= '<input type=hidden name="appt_notes['.$appointment.'][appointment]" value="'.$appointment.'">';
2259
2260           $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
2261           $this->t->set_var('tr_color',$tr_color);
2262         }
2263
2264       $this->t->set_var('appt_table_data',$appt_table_data);
2265       $this->t->set_var('appt_header_row',$appt_header_row);
2266       $this->t->set_var('appt_table_width',$appt_table_width);
2267
2268
2269       // VISIT SCHEDULING TABLE
2270       $sql = "SELECT * FROM eq_family where valid=1 and elder_id != 0 ORDER BY visit_pri ASC";
2271       $this->db->query($sql,__LINE__,__FILE__);
2272
2273       $total_families=0; $families_with_yearly_visit=0;
2274
2275       $i=0;
2276       $family_id = NULL;
2277       $family_name = NULL;
2278       $family_phone = NULL;
2279       $family_visit_pri = NULL;
2280       $family_visit_notes = NULL;
2281       while ($this->db->next_record())
2282         {
2283           $family_id[$i] = $this->db->f('family');
2284           $family_name[$i] = $this->db->f('name');
2285           $family_phone[$family_id[$i]] = $family_id[$i] . " ERROR";
2286           $family_visit_pri[$family_id[$i]] = $this->db->f('visit_pri');
2287           $family_visit_notes[$family_id[$i]] = $this->db->f('visit_notes');
2288           $i++;
2289           $total_families++;
2290         }
2291
2292       $sql = "SELECT * FROM eq_parent where valid=1";
2293       $this->db->query($sql,__LINE__,__FILE__);
2294       while ($this->db->next_record())
2295         {
2296           $family = $this->db->f('family');
2297           $phone = $this->db->f('phone');
2298           $family_phone[$family] = $phone;
2299         }
2300
2301       $max = count($family_id);
2302
2303       for($i=0; $i < $max; $i++) {
2304           $id = $family_id[$i];
2305           $name = $family_name[$i];
2306           $phone = $family_phone[$id];
2307           $vis_pri = $family_visit_pri[$id];
2308           $vis_notes = $family_visit_notes[$id];
2309
2310           // If this family has had a yearly visit this year, don't show them on the schedule list
2311           $year_start = $year - 1 . "-12-31"; $year_end = $year + 1 . "-01-01";
2312           $sql = "SELECT * FROM eq_visit WHERE date > '$year_start' AND date < '$year_end' ".
2313              "AND family=" . $id . " AND companionship=0";
2314           $this->db2->query($sql,__LINE__,__FILE__);
2315
2316           if(!$this->db2->next_record()) {
2317             $sql = "SELECT * FROM eq_visit WHERE family=" . $id . " AND companionship=0 ORDER BY date DESC";
2318             $this->db->query($sql,__LINE__,__FILE__);
2319             if($this->db->next_record()) { $date = $this->db->f('date'); } else { $date = ""; }
2320             $link_data['menuaction'] = 'eq.eq.vis_update';
2321             $link_data['visit'] = '';
2322             $link_data['family'] = $id;
2323             $link_data['name'] = $name;
2324             $link_data['action'] = 'add';
2325             $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2326             $table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') ."><td title=\"$phone\"><a href=$link>$name Family</a></td>";
2327             $table_data.= "<td align=center>$phone</td>";
2328             $table_data.= "<td align=center>";
2329             $table_data.= '<select name=vis_notes['.$i.'][pri]>';
2330             foreach(range(0,6) as $num) {
2331               if($num == 0) { $num = 1; } else {$num = $num*5; }
2332               if($vis_pri == $num) { $selected[$num] = 'selected="selected"'; } else { $selected[$num] = ''; }
2333               $table_data.= '<option value='.$num.' '.$selected[$num].'>'.$num.'</option>';
2334             }
2335             $table_data.= '</select></td>';
2336             $table_data.= "<td align=center>$date</td>";
2337             $table_data.= '<td><input type=text size="50" maxlength="128" name="vis_notes['.$i.'][notes]" value="'.$vis_notes.'">';
2338             $table_data.= '<input type=hidden name="vis_notes['.$i.'][family_id]" value="'.$id.'">';
2339             $table_data.= '<input type=hidden name="vis_notes['.$i.'][family_name]" value="'.$name.'">';
2340             $table_data.= '</td>';
2341             $table_data.= '</tr>';
2342             $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
2343             $this->t->set_var('tr_color',$tr_color);
2344           } else {
2345             $link_data['menuaction'] = 'eq.eq.vis_update';
2346             $link_data['visit'] = $this->db2->f('visit');
2347             $link_data['family'] = $this->db2->f('family');
2348             $link_data['name'] = $name;
2349             $link_data['date'] = $this->db2->f('date');
2350             $link_data['action'] = 'view';
2351             $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2352             $families_with_yearly_visit++;
2353             $date = $this->db2->f('date');
2354             $vis_notes = $this->db2->f('notes');
2355             if(strlen($vis_notes) > 40) { $vis_notes = stripslashes(substr($vis_notes,0,40) . "..."); }
2356             $completed_data.= "<tr bgcolor=". $this->t->get_var('tr_color2') ."><td title=\"$phone\"><a href=$link>$name Family</a></td>";
2357             $completed_data.= "<td align=center>$phone</td>";
2358             $completed_data.= "<td align=center><a href=".$link.">$date</a></td>";
2359             $completed_data.= "<td align=left>$vis_notes</td>";
2360             $completed_data.= '</tr>';
2361             $tr_color2 = $this->nextmatchs->alternate_row_color($tr_color2);
2362             $this->t->set_var('tr_color2',$tr_color2);
2363           }
2364       }
2365
2366       $name_width=190; $phone_width=100; $date_width=100; $notes_width=300;
2367       $completed_table_width=$name_width + $phone_width + $date_width + $notes_width;
2368       $completed_header_row = "<th width=$name_width><font size=-2>Family Name</th>";
2369       $completed_header_row.= "<th width=$phone_width><font size=-2>Phone</th>";
2370       $completed_header_row.= "<th width=$date_width><font size=-2>Date</th>";
2371       $completed_header_row.= "<th width=$notes_width><font size=-2>Visit Notes</th>";
2372
2373       $family_width=300; $totals_width=100;
2374       $totals_table_width=$family_width + $totals_width;
2375       $totals_header_row = "<th width=$family_width><font size=-2>Families</th>";
2376       $totals_header_row.= "<th width=$totals_width><font size=-2>$year</th>";
2377       $totals_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
2378       $totals_data.= "<td align=left><font size=-2><b>Total Families with yearly Visits completed:</b></font></td>";
2379       $totals_data.= "<td align=center><font size=-2><b>$families_with_yearly_visit / $total_families</b></font></td>";
2380       $percent = ceil(($families_with_yearly_visit / $total_families)*100);
2381       $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
2382       $this->t->set_var('tr_color',$tr_color);
2383       $totals_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
2384       $totals_data.= "<td align=left><font size=-2><b>Percentage:</b></font></td>";
2385       $totals_data.= "<td align=center><font size=-2><b>$percent%</b></font></td>";
2386       $totals_data.= "</tr>";
2387
2388       $this->t->set_var('table_width',$table_width);
2389       $this->t->set_var('header_row',$header_row);
2390       $this->t->set_var('table_data',$table_data);
2391       $this->t->set_var('totals_header_row',$totals_header_row);
2392       $this->t->set_var('totals_table_width',$totals_table_width);
2393       $this->t->set_var('completed_header_row',$completed_header_row);
2394       $this->t->set_var('completed_table_width',$completed_table_width);
2395       $this->t->set_var('completed',$completed_data);
2396       $this->t->set_var('totals',$totals_data);
2397       $this->t->fp('familylist','family_list',True);
2398       $this->t->fp('apptlist','appt_list',True);
2399
2400       $this->t->pfp('out','vis_sched_t');
2401       $this->save_sessiondata();
2402
2403     }
2404
2405   function ppi_view()
2406     {
2407       $this->t->set_file(array('ppi_view_t' => 'ppi_view.tpl'));
2408       $this->t->set_block('ppi_view_t','district_list','list');
2409
2410       $this->t->set_var('linkurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_view'));
2411       $num_months = get_var('num_months',array('GET','POST'));
2412       if($num_months == '') { $num_months = $this->default_ppi_num_months; }
2413       $this->t->set_var('num_months',$num_months);
2414       if($num_months == 1) { $this->t->set_var('lang_num_months','Month of History'); }
2415       else {  $this->t->set_var('lang_num_months','Months of History'); }
2416       $this->t->set_var('lang_filter','Filter');
2417       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_view'));
2418
2419       $this->t->set_var('ppi_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_view'));
2420       $this->t->set_var('ppi_link_title','Yearly PPIs');
2421
2422       $this->t->set_var('schedule_ppi_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_sched'));
2423       $this->t->set_var('schedule_ppi_link_title','Schedule Yearly PPIs');
2424
2425       $this->t->set_var('title','Yearly PPIs');
2426       $num_months = get_var('num_months',array('GET','POST'));
2427       if($num_months == '') { $num_months = $this->default_ppi_num_years; }
2428       $this->t->set_var('num_months',$num_months);
2429       if($num_months == 1) { $this->t->set_var('lang_num_months','Year of History'); }
2430       else { $this->t->set_var('lang_num_months','Years of History'); }
2431
2432       $sql = "SELECT * FROM eq_presidency where president=1 and valid=1";
2433       $this->db->query($sql,__LINE__,__FILE__);
2434       if($this->db->next_record()) {
2435         $president_name = $this->db->f('name');
2436         $interviewer = $this->db->f('elder');
2437         $eqpresppi = 1;
2438       } else {
2439         print "<hr><font color=red><h3>-E- Unable to locate EQ President in eq_presidency table</h3></font></hr>";
2440         return;
2441       }
2442       $this->t->set_var('district_number','*');
2443       $this->t->set_var('district_name',$president_name);
2444
2445       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY elder ASC";
2446       $this->db->query($sql,__LINE__,__FILE__);
2447       $i=0;
2448       while ($this->db->next_record())
2449         {
2450           $elder_id[$i] = $this->db->f('elder');
2451           $elder_name[$i] = $this->db->f('name');
2452           $elder_phone[$elder_id[$i]] = $this->db->f('phone');
2453           $elder_ppi_pri[$elder_id[$i]] = $this->db->f('ppi_pri');
2454           $elder_ppi_notes[$elder_id[$i]] = $this->db->f('ppi_notes');
2455           $i++;
2456         }
2457       $total_elders=$i;
2458       array_multisort($elder_name, $elder_id);
2459       //var_dump($elder_name); print "<br><br>"; var_dump($elder_id);
2460
2461       $header_row="<th width=$comp_width><font size=-2>Elder Name</th>";
2462
2463       $elder_width=400; $ppi_width=75; $table_width=$elder_width + $num_months*$ppi_width;
2464       $table_data="";
2465       for($m=$num_months; $m >= 0; $m--) {
2466         $year = date('Y') - $m;
2467         $header_row .= "<th width=150><font size=-2>$year</th>";
2468         $ppis[$m] = 0;
2469       }
2470
2471       for ($j=0; $j < count($elder_id); $j++) {
2472         $id = $elder_id[$j];
2473         $name = $elder_name[$j];
2474         $phone = $elder_phone[$id];
2475
2476         $link_data['menuaction'] = 'eq.eq.ppi_update';
2477         $link_data['interviewer'] = $interviewer;
2478         $link_data['elder'] = $id;
2479         $link_data['name'] = $name;
2480         $link_data['ppi'] = '';
2481         $link_data['eqpresppi'] = $eqpresppi;
2482         $link_data['action'] = 'add';
2483         $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2484         $this->nextmatchs->template_alternate_row_color(&$this->t);
2485         $table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') ."><td title=\"$phone\"><a href=$link>$name</a></td>";
2486
2487         // Find out how many times PPIs were performed in the past $num_months for this Elder
2488         for($m=$num_months; $m >= 0; $m--) {
2489           $year = date('Y') - $m;
2490           $year_start = $year - 1 . "-12-31"; $year_end = $year + 1 . "-01-01";
2491           $sql = "SELECT * FROM eq_ppi WHERE date > '$year_start' AND date < '$year_end' ".
2492              "AND elder=" . $id . " AND eqpresppi=1";
2493           $this->db2->query($sql,__LINE__,__FILE__);
2494
2495           if(!$total_ppis[$m]) { $total_ppis[$m] = 0; }
2496           if($this->db2->next_record()) {
2497             $ppis[$m]++; $total_ppis[$m]++; $ppi_recorded[$companionship][$m]=1;
2498             $link_data['menuaction'] = 'eq.eq.ppi_update';
2499             $link_data['companionship'] = $companionship;
2500             $link_data['interviewer'] = $this->db2->f('interviewer');
2501             $link_data['elder'] = $id;
2502             $link_data['name'] = $name;
2503             $link_data['ppi'] = $this->db2->f('ppi');
2504             $link_data['eqpresppi'] = $eqpresppi;
2505             $link_data['action'] = 'view';
2506             $date = $this->db2->f('date');
2507             $date_array = explode("-",$date);
2508             $month = $date_array[1];
2509             $day   = $date_array[2];
2510             $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2511             $table_data .= '<td align=center><a href='.$link.'><img src="images/checkmark.gif">&nbsp;'.$month.'-'.$day.'</a></td>';
2512           }
2513           else { $table_data .= "<td>&nbsp;</td>"; }
2514         }
2515         $table_data .= "</tr>\n";
2516       }
2517       $table_data .= "<tr><td colspan=20><hr></td></tr>";
2518
2519       $stat_data = "<tr><td><b><font size=-2>$total_elders Elders<br>PPI Totals:</font></b></td>";
2520       for($m=$num_months; $m >=0; $m--) {
2521         $percent = ceil(($ppis[$m] / $total_elders)*100);
2522         $stat_data .= "<td align=center><font size=-2><b>$ppis[$m]<br>$percent%</font></b></td>";
2523       }
2524       $stat_data .= "</tr>";
2525
2526       $this->t->set_var('table_width',$table_width);
2527       $this->t->set_var('header_row',$header_row);
2528       $this->t->set_var('table_data',$table_data);
2529       $this->t->set_var('stat_data',$stat_data);
2530       $this->t->pfp('out','ppi_view_t');
2531       $this->save_sessiondata();
2532     }
2533
2534   function ppi_update()
2535     {
2536       $this->t->set_file(array('form' => 'ppi_update.tpl'));
2537       $this->t->set_block('form','interviewer_list','int_list');
2538       $this->t->set_block('form','add','addhandle');
2539       $this->t->set_block('form','edit','edithandle');
2540
2541       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_view'));
2542       $this->t->set_var('readonly','');
2543       $this->t->set_var('disabled','');
2544
2545       $action = get_var('action',array('GET','POST'));
2546       $companionship = get_var('companionship',array('GET','POST'));
2547       $interviewer = get_var('interviewer',array('GET','POST'));
2548       $name = get_var('name',array('GET','POST'));
2549       $ppi = get_var('ppi',array('GET','POST'));
2550       $elder = get_var('elder',array('GET','POST'));
2551       $aaronic = get_var('aaronic',array('GET','POST'));
2552       $date = get_var('date',array('GET','POST'));
2553       $notes = get_var('notes',array('GET','POST'));
2554       $eqpresppi = get_var('eqpresppi',array('GET','POST'));
2555
2556       $sql = "SELECT * FROM eq_elder WHERE elder=" . $interviewer;
2557       $this->db2->query($sql,__LINE__,__FILE__);
2558       $this->db2->next_record();
2559       $interviewer_name = $this->db2->f('name');
2560       $this->t->set_var('interviewer',$interviewer . ' selected');
2561       $this->t->set_var('interviewer_name',$interviewer_name);
2562       $this->t->set_var('eqpresppi_checked','');
2563       $this->t->fp('int_list','interviewer_list',True);
2564
2565       if($action == 'save')
2566         {
2567           $notes = get_var('notes',array('POST'));
2568           $this->db->query("UPDATE eq_ppi set " .
2569                            "   ppi='" . $ppi . "'" .
2570                     ", interviewer='" . $interviewer . "'" .
2571                           ", elder='" . $elder . "'" .
2572                         ", aaronic='" . $aaronic . "'" .
2573                            ", date='" . $date . "'" .
2574                           ", notes='" . $notes . "'" .
2575                       ", eqpresppi='" . $eqpresppi . "'" .
2576                            " WHERE ppi=" . $ppi,__LINE__,__FILE__);
2577           $this->ppi_view();
2578           return false;
2579         }
2580
2581       if($action == 'insert')
2582         {
2583           $notes = get_var('notes',array('POST'));
2584           $this->db->query("INSERT INTO eq_ppi (interviewer,elder,aaronic,date,notes,eqpresppi) "
2585                            . "VALUES ('" . $interviewer . "','" . $elder . "','" . $aaronic . "','"
2586                            . $date . "','" . $notes . "','" . $eqpresppi  ."')",__LINE__,__FILE__);
2587           $this->ppi_view();
2588           return false;
2589         }
2590
2591       if($action == 'add')
2592         {
2593           $this->t->set_var('cal_date',$this->jscal->input('date','','','','','','',$this->cal_options));
2594           $this->t->set_var('ppi', '');
2595           $this->t->set_var('interviewer', $interviewer);
2596           $this->t->set_var('name',$name);
2597           $this->t->set_var('elder',$elder);
2598           $this->t->set_var('date','');
2599           $this->t->set_var('notes','');
2600           $this->t->set_var('eqpresppi',$eqpresppi);
2601           $this->t->set_var('eqpresppi_checked','checked');
2602           $this->t->set_var('lang_done','Cancel');
2603           $this->t->set_var('lang_action','Adding New PPI');
2604           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_update&ppi='
2605                                                                 . $ppi . '&action=' . 'insert'));
2606         }
2607
2608       if($action == 'edit' || $action == 'view')
2609         {
2610           $sql = "SELECT * FROM eq_ppi WHERE ppi=".$ppi;
2611           $this->db->query($sql,__LINE__,__FILE__);
2612           $this->db->next_record();
2613           $this->t->set_var('ppi',$ppi);
2614           $this->t->set_var('name',$name);
2615           $this->t->set_var('interviewer', $this->db->f('interviewer'));
2616           $this->t->set_var('elder',$this->db->f('elder'));
2617           $this->t->set_var('date',$this->db->f('date'));
2618           $this->t->set_var('notes',$this->db->f('notes'));
2619           $this->t->set_var('eqpresppi',$this->db->f('eqpresppi'));
2620           if($this->db->f('eqpresppi') == 1) { $this->t->set_var('eqpresppi_checked','checked'); }
2621         }
2622
2623       if($action == 'edit')
2624         {
2625           $this->t->set_var('cal_date',$this->jscal->input('date',$date,'','','','','',$this->cal_options));
2626           $this->t->set_var('lang_done','Cancel');
2627           $this->t->set_var('lang_action','Editing PPI');
2628           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_update&ppi='
2629                                                                 . $ppi . '&action=' . 'save'));
2630         }
2631
2632       if($action == 'view')
2633         {
2634           $date = $this->db->f('date');
2635           $this->t->set_var('cal_date','<input type=text size="10" maxlength="10" name="date" value="'.$date.'" readonly>');
2636           $this->t->set_var('readonly','READONLY');
2637           $this->t->set_var('disabled','DISABLED');
2638           $this->t->set_var('lang_done','Done');
2639           $this->t->set_var('lang_action','Viewing PPI');
2640           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_update&ppi='
2641                                                                 . $ppi . '&action=' . 'edit'));
2642         }
2643
2644       $this->t->set_var('lang_reset','Clear Form');
2645       $this->t->set_var('lang_add','Add PPI');
2646       $this->t->set_var('lang_save','Save Changes');
2647       $this->t->set_var('edithandle','');
2648       $this->t->set_var('addhandle','');
2649
2650       $this->t->pfp('out','form');
2651
2652       if($action == 'view') { $this->t->set_var('lang_save','Edit PPI'); }
2653       if($action == 'edit' || $action == 'view') { $this->t->pfp('addhandle','edit'); }
2654       if($action == 'add') { $this->t->pfp('addhandle','add'); }
2655
2656       $this->save_sessiondata();
2657     }
2658
2659     function int_view()
2660     {
2661       $this->t->set_file(array('int_view_t' => 'int_view.tpl'));
2662       $this->t->set_block('int_view_t','district_list','list');
2663
2664       $this->t->set_var('linkurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_view'));
2665       $num_quarters = get_var('num_quarters',array('GET','POST'));
2666       if($num_quarters == '') { $num_quarters = $this->default_int_num_quarters; }
2667       $this->t->set_var('num_quarters',$num_quarters);
2668       if($num_quarters == 1) { $this->t->set_var('lang_num_quarters','Quarter of History'); }
2669       else {  $this->t->set_var('lang_num_quarters','Quarters of History'); }
2670       $this->t->set_var('lang_filter','Filter');
2671
2672       $this->t->set_var('int_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_view'));
2673       $this->t->set_var('int_link_title','Hometeaching Interviews');
2674
2675       $this->t->set_var('schedule_int_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_sched'));
2676       $this->t->set_var('schedule_int_link_title','Schedule Hometeaching Interviews');
2677
2678       $this->t->set_var('title','Hometeaching Interviews');
2679
2680       $num_months = $num_quarters * 3 - 1;
2681       $current_month = $this->current_month;
2682       if($current_month >= 1 && $current_month <= 3) { $current_month=3; }
2683       else if($current_month >= 4 && $current_month <= 6) { $current_month=6; }
2684       else if($current_month >= 7 && $current_month <= 9) { $current_month=9; }
2685       else if($current_month >= 10 && $current_month <= 12) { $current_month=12; }
2686
2687       $sql = "SELECT * FROM eq_district where valid=1 ORDER BY district ASC";
2688       $this->db->query($sql,__LINE__,__FILE__);
2689       $i=0;
2690       while ($this->db->next_record())
2691         {
2692           $districts[$i]['district'] = $this->db->f('district');
2693           $districts[$i]['name'] = $this->db->f('name');
2694           $districts[$i]['supervisor'] = $this->db->f('supervisor');
2695           $i++;
2696         }
2697
2698       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY elder ASC";
2699       $this->db->query($sql,__LINE__,__FILE__);
2700       $i=0;
2701       while ($this->db->next_record())
2702         {
2703           $elder_id[$i] = $this->db->f('elder');
2704           $elder_name[$i] = $this->db->f('name');
2705           $elder_phone[$elder_id[$i]] = $this->db->f('phone');
2706           $i++;
2707         }
2708       array_multisort($elder_name, $elder_id);
2709       for($i=0; $i < count($elder_id); $i++) {
2710           $id = $elder_id[$i];
2711           $elders[$id] = $elder_name[$i];
2712       }
2713
2714       $sql = "SELECT * FROM eq_aaronic where valid=1 ORDER BY aaronic ASC";
2715       $this->db->query($sql,__LINE__,__FILE__);
2716       while ($this->db->next_record())
2717         {
2718           $aaronic_id = $this->db->f('aaronic');
2719           $aaronic[$aaronic_id]['name'] = $this->db->f('name');
2720           $aaronic[$aaronic_id]['phone'] = $this->db->f('phone');
2721         }
2722
2723       $total_companionships = 0;
2724       $this->nextmatchs->template_alternate_row_color(&$this->t);
2725       for ($i=0; $i < count($districts); $i++) {
2726         $this->t->set_var('district_number',$districts[$i]['district']);
2727         $this->t->set_var('district_name',$districts[$i]['name']);
2728         $supervisor = $districts[$i]['supervisor'];
2729         $unique_companionships='';
2730
2731         // Select all the unique companionship numbers for this district
2732         $sql = "SELECT distinct companionship FROM eq_companionship where valid=1 and district=". $districts[$i]['district'];
2733
2734         $this->db->query($sql,__LINE__,__FILE__);
2735         $j=0;
2736         while ($this->db->next_record())
2737           {
2738             $unique_companionships[$j]['companionship'] = $this->db->f('companionship');
2739             $j++;
2740           }
2741
2742         $comp_width=250; $int_width=75; $table_width=$comp_width + $num_months*$int_width;
2743         $table_data=""; $num_companionships = $j; $num_elders = 0;
2744         for($m=$num_months; $m >= 0; $m--) { $ints[$m] = 0; }
2745         for ($j=0; $j < count($unique_companionships); $j++) {
2746           // Select all the companions in each companionship
2747           $sql = "SELECT * FROM eq_companionship where valid=1 and ".
2748              "companionship=". $unique_companionships[$j]['companionship'];
2749           $this->db->query($sql,__LINE__,__FILE__);
2750           $k=0;
2751           $comp = $unique_companionships[$j]['companionship'];
2752           for($m=$num_months; $m >= 0; $m--) { $int_recorded[$comp][$m] = 0; }
2753           while ($this->db->next_record())
2754             {
2755               // Get this companions information
2756               $num_elders++;
2757               $companionship = $this->db->f('companionship');
2758               $elder_id = $this->db->f('elder');
2759               $aaronic_id = $this->db->f('aaronic');
2760               if($elder_id) {
2761                 $name = $elders[$elder_id];
2762                 $phone = $elder_phone[$elder_id];
2763               }
2764               else if($aaronic_id) {
2765                 $name = $aaronic[$aaronic_id]['name'];
2766                 $phone = $aaronic[$aaronic_id]['phone'];
2767               }
2768               $link_data['menuaction'] = 'eq.eq.int_update';
2769               $link_data['companionship'] = $companionship;
2770               $link_data['interviewer'] = $supervisor;
2771               $link_data['elder'] = $elder_id;
2772               $link_data['aaronic'] = $aaronic_id;
2773               $link_data['name'] = $name;
2774               $link_data['ppi'] = '';
2775               $link_data['action'] = 'add';
2776               $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2777               $table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') ."><td title=\"$phone\"><a href=$link>$name</a></td>";
2778
2779               // Find out how many times Interviews were performed in the past $num_months for this Elder
2780               $header_row="<th width=$comp_width><font size=-2>Companionship</th>";
2781               for($m=$num_months; $m >= 0; $m--) {
2782                 $month = $current_month - $m;
2783                 $year = $this->current_year;
2784                 if($month <= 0) { $remainder = $month; $month = 12 + $remainder; $year=$year-1; }
2785                 if($month < 10) { $month = "0"."$month"; }
2786                 $month_start = "$year"."-"."$month"."-"."01";
2787                 $month_end = "$year"."-"."$month"."-"."31";
2788                 $month = "$month"."/"."$year";
2789                 $sql = "SELECT * FROM eq_ppi WHERE date >= '$month_start' AND date <= '$month_end' ".
2790                    "AND elder=" . $elder_id . " AND aaronic=" . $aaronic_id;
2791                 $this->db2->query($sql,__LINE__,__FILE__);
2792                 $header_row .= "<th width=$int_width><font size=-2>$month</th>";
2793
2794                 if(!$total_ints[$m]) { $total_ints[$m] = 0; }
2795                 if($this->db2->next_record()) {
2796                   if(!$int_recorded[$companionship][$m]) {
2797                     $ints[$m]++; $total_ints[$m]++; $int_recorded[$companionship][$m]=1;
2798                   }
2799                   $link_data['menuaction'] = 'eq.eq.int_update';
2800                   $link_data['companionship'] = $companionship;
2801                   $link_data['interviewer'] = $this->db2->f('interviewer');
2802                   $link_data['elder'] = $elder_id;
2803                   $link_data['aaronic'] = $aaronic_id;
2804                   $link_data['name'] = $name;
2805                   $link_data['ppi'] = $this->db2->f('ppi');
2806                   $link_data['action'] = 'view';
2807                   $date = $this->db2->f('date');
2808                   $date_array = explode("-",$date);
2809                   $month = $date_array[1];
2810                   $day   = $date_array[2];
2811                   $link = $GLOBALS['phpgw']->link('/eq/index.php',$link_data);
2812                   $table_data .= '<td align=center><a href='.$link.'><img src="images/checkmark.gif">&nbsp;'.$month.'-'.$day.'</a></td>';
2813                 }
2814                 else { $table_data .= "<td>&nbsp;</td>"; }
2815               }
2816               $table_data .= "</tr>";
2817               $k++;
2818             }
2819           $table_data .= "<tr><td colspan=20><hr></td></tr>";
2820         }
2821         $total_companionships += $num_companionships;
2822         $stat_data = "<tr><td><b><font size=-2>$num_companionships Companionships<br>Interview Totals:</font></b></td>";
2823
2824         // Print the hometeaching interview stats
2825         for($m=$num_months; $m >=0; $m--) {
2826           $month = $current_month - $m;
2827           if($month < 0) { $month = 12 + $month; } // Handle going backwards over a year boundary
2828           $month_begins = $month % $this->monthly_hometeaching_interview_stats;
2829           //print "$month % $this->monthly_hometeaching_interview_stats = $month_begins <br>";
2830           if($this->monthly_hometeaching_interview_stats == 1) { $month_begins = 1; }
2831           if(($month_begins) == 1) { $total = $ints[$m]; }
2832           else { $total += $ints[$m]; }
2833           $percent = ceil(($total / $num_companionships)*100);
2834           $stat_data .= "<td align=center><font size=-2><b>$total<br>$percent%</font></b></td>";
2835         }
2836         $stat_data .= "</tr>";
2837
2838         $this->t->set_var('table_width',$table_width);
2839         $this->t->set_var('header_row',$header_row);
2840         $this->t->set_var('table_data',$table_data);
2841         $this->t->set_var('stat_data',$stat_data);
2842         $this->t->fp('list','district_list',True);
2843       }
2844
2845       // Display the totals
2846       $total = 0;
2847       $totals = "<tr><td><b><font size=-2>$total_companionships Total Comps<br>Interview Totals:</font></b></td>";
2848       for($m=$num_months; $m >=0; $m--) {
2849         $month = $current_month - $m;
2850         if($month < 0) { $month = 12 + $month; } // Handle going backwards over a year boundary
2851         $month_begins = $month % $this->monthly_hometeaching_interview_stats;
2852         if($this->monthly_hometeaching_interview_stats == 1) { $month_begins = 1; }
2853         if(($month_begins) == 1) { $total = $total_ints[$m]; }
2854         else { $total += $total_ints[$m]; }
2855         $percent = ceil(($total / $total_companionships)*100);
2856         $totals .= "<td align=center><font size=-2><b>$total<br>$percent%</font></b></td>";
2857       }
2858       $totals .= "</tr>";
2859
2860       $this->t->set_var('totals',$totals);
2861       $this->t->pfp('out','int_view_t');
2862       $this->save_sessiondata();
2863     }
2864
2865   function int_update()
2866     {
2867       $this->t->set_file(array('form' => 'int_update.tpl'));
2868       $this->t->set_block('form','interviewer_list','int_list');
2869       $this->t->set_block('form','add','addhandle');
2870       $this->t->set_block('form','edit','edithandle');
2871
2872       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_view'));
2873       $this->t->set_var('readonly','');
2874       $this->t->set_var('disabled','');
2875       $this->t->set_var('eqpresppi_checked','');
2876
2877       $action = get_var('action',array('GET','POST'));
2878       $companionship = get_var('companionship',array('GET','POST'));
2879       $interviewer = get_var('interviewer',array('GET','POST'));
2880       $name = get_var('name',array('GET','POST'));
2881       $ppi = get_var('ppi',array('GET','POST'));
2882       $elder = get_var('elder',array('GET','POST'));
2883       $aaronic = get_var('aaronic',array('GET','POST'));
2884       $date = get_var('date',array('GET','POST'));
2885       $notes = get_var('notes',array('GET','POST'));
2886       $eqpresppi = get_var('eqpresppi',array('GET','POST'));
2887
2888       $sql = "SELECT * FROM eq_district where valid=1 ORDER BY district ASC";
2889       $this->db->query($sql,__LINE__,__FILE__);
2890       while ($this->db->next_record())
2891         {
2892           $supervisor = $this->db->f('supervisor');
2893           $sql = "SELECT * FROM eq_elder WHERE elder=" . $supervisor;
2894           $this->db2->query($sql,__LINE__,__FILE__);
2895           $this->db2->next_record();
2896           $interviewer_name = $this->db2->f('name');
2897
2898           if($supervisor == $interviewer) {
2899             $this->t->set_var('interviewer',$supervisor . ' selected');
2900           } else {
2901             $this->t->set_var('interviewer',$interviewer);
2902           }
2903           $this->t->set_var('interviewer_name',$interviewer_name);
2904           $this->t->fp('int_list','interviewer_list',True);
2905         }
2906
2907       if($action == 'save')
2908         {
2909           $notes = get_var('notes',array('POST'));
2910           $this->db->query("UPDATE eq_ppi set " .
2911                            "   ppi='" . $ppi . "'" .
2912                     ", interviewer='" . $interviewer . "'" .
2913                           ", elder='" . $elder . "'" .
2914                         ", aaronic='" . $aaronic . "'" .
2915                            ", date='" . $date . "'" .
2916                           ", notes='" . $notes . "'" .
2917                       ", eqpresppi='" . $eqpresppi . "'" .
2918                            " WHERE ppi=" . $ppi,__LINE__,__FILE__);
2919           $this->int_view();
2920           return false;
2921         }
2922
2923       if($action == 'insert')
2924         {
2925           $notes = get_var('notes',array('POST'));
2926           $this->db->query("INSERT INTO eq_ppi (interviewer,elder,aaronic,date,notes,eqpresppi) "
2927                            . "VALUES ('" . $interviewer . "','" . $elder . "','" . $aaronic . "','"
2928                            . $date . "','" . $notes ."','" . $eqpresppi . "')",__LINE__,__FILE__);
2929           $this->int_view();
2930           return false;
2931         }
2932
2933       if($action == 'add')
2934         {
2935           $this->t->set_var('cal_date',$this->jscal->input('date','','','','','','',$this->cal_options));
2936           $this->t->set_var('ppi', '');
2937           $this->t->set_var('interviewer', $interviewer);
2938           $this->t->set_var('name',$name);
2939           $this->t->set_var('elder',$elder);
2940           $this->t->set_var('aaronic',$aaronic);
2941           $this->t->set_var('date','');
2942           $this->t->set_var('notes','');
2943           $this->t->set_var('lang_done','Cancel');
2944           $this->t->set_var('lang_action','Adding New Interview');
2945           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_update&ppi='
2946                                                                 . $ppi . '&action=' . 'insert'));
2947         }
2948
2949       if($action == 'edit' || $action == 'view')
2950         {
2951           $sql = "SELECT * FROM eq_ppi WHERE ppi=".$ppi;
2952           $this->db->query($sql,__LINE__,__FILE__);
2953           $this->db->next_record();
2954           $this->t->set_var('ppi',$ppi);
2955           $this->t->set_var('name',$name);
2956           $this->t->set_var('interviewer', $this->db->f('interviewer'));
2957           $this->t->set_var('elder',$this->db->f('elder'));
2958           $this->t->set_var('aaronic',$this->db->f('aaronic'));
2959           $this->t->set_var('date',$this->db->f('date'));
2960           $this->t->set_var('notes',$this->db->f('notes'));
2961           if($this->db->f('eqpresppi') == 1) { $this->t->set_var('eqpresppi_checked','checked'); }
2962         }
2963
2964       if($action == 'edit')
2965         {
2966           $this->t->set_var('cal_date',$this->jscal->input('date',$date,'','','','','',$this->cal_options));
2967           $this->t->set_var('lang_done','Cancel');
2968           $this->t->set_var('lang_action','Editing Interview');
2969           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_update&ppi='
2970                                                                 . $ppi . '&action=' . 'save'));
2971         }
2972
2973       if($action == 'view')
2974         {
2975           $date = $this->db->f('date');
2976           $this->t->set_var('cal_date','<input type=text size="10" maxlength="10" name="date" value="'.$date.'" readonly>');
2977           $this->t->set_var('readonly','READONLY');
2978           $this->t->set_var('disabled','DISABLED');
2979           $this->t->set_var('lang_done','Done');
2980           $this->t->set_var('lang_action','Viewing Interview');
2981           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_update&ppi='
2982                                                                 . $ppi . '&action=' . 'edit'));
2983         }
2984
2985       $this->t->set_var('lang_reset','Clear Form');
2986       $this->t->set_var('lang_add','Add Interview');
2987       $this->t->set_var('lang_save','Save Changes');
2988       $this->t->set_var('edithandle','');
2989       $this->t->set_var('addhandle','');
2990
2991       $this->t->pfp('out','form');
2992
2993       if($action == 'view') { $this->t->set_var('lang_save','Edit Interview'); }
2994       if($action == 'edit' || $action == 'view') { $this->t->pfp('addhandle','edit'); }
2995       if($action == 'add') { $this->t->pfp('addhandle','add'); }
2996
2997       $this->save_sessiondata();
2998     }
2999
3000   function vis_view()
3001     {
3002       $this->t->set_file(array('vis_view_t' => 'vis_view.tpl'));
3003       $this->t->set_block('vis_view_t','visit_list','list1');
3004       $this->t->set_block('vis_view_t','family_list','list2');
3005
3006       $this->t->set_var('lang_name','Family Name');
3007       $this->t->set_var('lang_date','Date');
3008
3009       $this->t->set_var('vis_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_view'));
3010       $this->t->set_var('vis_link_title','View Yearly Visits');
3011
3012       $this->t->set_var('schedule_vis_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_sched'));
3013       $this->t->set_var('schedule_vis_link_title','Schedule Yearly Visits');
3014
3015       $this->t->set_var('linkurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_view'));
3016       $num_years = get_var('num_years',array('GET','POST'));
3017       if($num_years == '') { $num_years = $this->default_vis_num_years; }
3018       $this->t->set_var('num_years',$num_years);
3019       if($num_years == 1) { $this->t->set_var('lang_num_years','Year of History'); }
3020       else {  $this->t->set_var('lang_num_years','Years of History'); }
3021       $this->t->set_var('lang_filter','Filter');
3022
3023       $year = date('Y') - $num_years + 1;
3024       $year_start = $year - 1 . "-12-31"; $year_end = $year + 1 . "-01-01";
3025
3026       $sql = "SELECT * FROM eq_visit WHERE companionship=0 and date > '$year_start' ORDER BY date DESC";
3027       $this->db->query($sql,__LINE__,__FILE__);
3028       $total_records = $this->db->num_rows();
3029
3030       $i = 0;
3031       while ($this->db->next_record())
3032         {
3033           $visit_list[$i]['visit'] = $this->db->f('visit');
3034           $visit_list[$i]['family'] = $this->db->f('family');
3035           $visit_list[$i]['date']  = $this->db->f('date');
3036           $i++;
3037         }
3038
3039       for ($i=0; $i < count($visit_list); $i++)
3040         {
3041           $this->nextmatchs->template_alternate_row_color(&$this->t);
3042
3043           $sql = "SELECT * FROM eq_family WHERE family=".$visit_list[$i]['family'];
3044           $this->db->query($sql,__LINE__,__FILE__);
3045           $this->db->next_record();
3046
3047           $this->t->set_var('family',$visit_list[$i]['family']);
3048           $this->t->set_var('family_name',$this->db->f('name'));
3049           $this->t->set_var('date',$visit_list[$i]['date']);
3050
3051           $link_data['menuaction'] = 'eq.eq.vis_update';
3052           $link_data['visit'] = $visit_list[$i]['visit'];
3053           $link_data['name'] = $this->db->f('name');
3054           $link_data['date'] = $visit_list[$i]['date'];
3055           $link_data['action'] = 'view';
3056           $this->t->set_var('view',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
3057           $this->t->set_var('lang_view','View');
3058
3059           $link_data['menuaction'] = 'eq.eq.vis_update';
3060           $link_data['visit'] = $visit_list[$i]['visit'];
3061           $link_data['name'] = $this->db->f('name');
3062           $link_data['date'] = $visit_list[$i]['date'];
3063           $link_data['action'] = 'edit';
3064           $this->t->set_var('edit',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
3065           $this->t->set_var('lang_edit','Edit');
3066
3067           $this->t->fp('list1','visit_list',True);
3068         }
3069
3070       // List the families that are available to record a visit against
3071       $sql = "SELECT * FROM eq_family WHERE valid=1";
3072       $this->db->query($sql,__LINE__,__FILE__);
3073       $total_records = $this->db->num_rows();
3074
3075       $i = 0;
3076       while ($this->db->next_record())
3077         {
3078           $family_names[$i] = $this->db->f('name');
3079           $family_ids[$i] = $this->db->f('family');
3080           $i++;
3081         } array_multisort($family_names, $family_ids);
3082
3083       for ($i=0; $i < count($family_names); $i++)
3084         {
3085           $link_data['menuaction'] = 'eq.eq.vis_update';
3086           $link_data['visit'] = '';
3087           $link_data['family'] = $family_ids[$i];
3088           $link_data['action'] = 'add';
3089           $link_data['name'] = $family_names[$i];
3090           $this->t->set_var('add',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
3091
3092           $this->t->set_var('name',$family_names[$i]);
3093           if(($i+1) % 3 == 0) { $this->t->set_var('table_sep',"</td></tr><tr>"); }
3094           else { $this->t->set_var('table_sep',"</td>"); }
3095           if(($i) % 3 == 0) { $this->nextmatchs->template_alternate_row_color(&$this->t); }
3096
3097           $this->t->fp('list2','family_list',True);
3098         }
3099
3100       $this->t->pfp('out','vis_view_t');
3101       $this->save_sessiondata();
3102     }
3103
3104   function vis_update()
3105     {
3106       $this->t->set_file(array('form' => 'vis_update.tpl'));
3107       $this->t->set_block('form','add','addhandle');
3108       $this->t->set_block('form','edit','edithandle');
3109
3110       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_view'));
3111       $this->t->set_var('readonly','');
3112       $this->t->set_var('disabled','');
3113
3114       $action = get_var('action',array('GET','POST'));
3115       $visit = get_var('visit',array('GET','POST'));
3116       $family = get_var('family',array('GET','POST'));
3117       $name = get_var('name',array('GET','POST'));
3118       $date = get_var('date',array('GET','POST'));
3119       $notes = get_var('notes',array('GET','POST'));
3120       $companionship = 0;
3121
3122       if($action == 'save')
3123         {
3124           $notes = get_var('notes',array('POST'));
3125           $this->db->query("UPDATE eq_visit set " .
3126                            "  date='" . $date . "'" .
3127                           ", notes='" . $notes . "'" .
3128                            " WHERE visit=" . $visit,__LINE__,__FILE__);
3129           $this->vis_view();
3130           return false;
3131         }
3132
3133       if($action == 'insert')
3134         {
3135           $notes = get_var('notes',array('POST'));
3136           $this->db->query("INSERT INTO eq_visit (family,companionship,date,notes) "
3137                            . "VALUES ('" . $family . "','" . $companionship . "','"
3138                            . $date . "','" . $notes . "')",__LINE__,__FILE__);
3139           $this->vis_view();
3140           return false;
3141         }
3142
3143       if($action == 'add')
3144         {
3145           $this->t->set_var('cal_date',$this->jscal->input('date','','','','','','',$this->cal_options));
3146           $this->t->set_var('family', $family);
3147           $this->t->set_var('visit', '');
3148           $this->t->set_var('name', $name);
3149           $this->t->set_var('date','');
3150           $this->t->set_var('notes','');
3151           $this->t->set_var('lang_done','Cancel');
3152           $this->t->set_var('lang_action','Adding New Visit');
3153           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_update&family='
3154                                                                 . $family . '&action=' . 'insert'));
3155         }
3156
3157       if($action == 'edit' || $action == 'view')
3158         {
3159           $sql = "SELECT * FROM eq_visit WHERE visit=".$visit;
3160           $this->db->query($sql,__LINE__,__FILE__);
3161           $this->db->next_record();
3162           $this->t->set_var('visit',$visit);
3163           $this->t->set_var('name',$name);
3164           $this->t->set_var('family', $family);
3165           $this->t->set_var('date',$this->db->f('date'));
3166           $this->t->set_var('notes',$this->db->f('notes'));
3167         }
3168
3169       if($action == 'edit')
3170         {
3171           $this->t->set_var('cal_date',$this->jscal->input('date',$date,'','','','','',$this->cal_options));
3172           $this->t->set_var('lang_done','Cancel');
3173           $this->t->set_var('lang_action','Editing Visit');
3174           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_update&visit='
3175                                                                 . $visit . '&action=' . 'save'));
3176         }
3177
3178       if($action == 'view')
3179         {
3180           $date = $this->db->f('date');
3181           $this->t->set_var('cal_date','<input type=text size="10" maxlength="10" name="date" value="'.$date.'" readonly>');
3182           $this->t->set_var('readonly','READONLY');
3183           $this->t->set_var('disabled','DISABLED');
3184           $this->t->set_var('lang_done','Done');
3185           $this->t->set_var('lang_action','Viewing Visit');
3186           $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_update&visit='
3187                                                                 . $visit . '&action=' . 'edit'));
3188         }
3189
3190       $this->t->set_var('lang_reset','Clear Form');
3191       $this->t->set_var('lang_add','Add Visit');
3192       $this->t->set_var('lang_save','Save Changes');
3193       $this->t->set_var('edithandle','');
3194       $this->t->set_var('addhandle','');
3195
3196       $this->t->pfp('out','form');
3197
3198       if($action == 'view') { $this->t->set_var('lang_save','Edit Visit'); }
3199       if($action == 'edit' || $action == 'view') { $this->t->pfp('addhandle','edit'); }
3200       if($action == 'add') { $this->t->pfp('addhandle','add'); }
3201
3202       $this->save_sessiondata();
3203     }
3204
3205   function att_view()
3206     {
3207       $monthnum['Jan']=1; $monthnum['Feb']=2; $monthnum['Mar']=3; $monthnum['Apr']=4;
3208       $monthnum['May']=5; $monthnum['Jun']=6; $monthnum['Jul']=7; $monthnum['Aug']=8;
3209       $monthnum['Sep']=9; $monthnum['Oct']=10; $monthnum['Nov']=11; $monthnum['Dec']=12;
3210
3211       $this->t->set_file(array('att_view_t' => 'att_view.tpl'));
3212       $this->t->set_block('att_view_t','act_list','list');
3213
3214       $this->t->set_block('att_view_t','month_list','list1');
3215       $this->t->set_block('att_view_t','header_list','list2');
3216       $this->t->set_block('att_view_t','elder_list','list3');
3217
3218       $this->t->set_var('linkurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.att_view'));
3219       $num_quarters = get_var('num_quarters',array('GET','POST'));
3220       if($num_quarters == '') { $num_quarters = $this->default_att_num_quarters; }
3221       $this->t->set_var('num_quarters',$num_quarters);
3222       $this->t->set_var('lang_filter','Filter');
3223       if($num_quarters == 1) { $this->t->set_var('lang_num_quarters','Quarter of History'); }
3224       else { $this->t->set_var('lang_num_quarters','Quarters of History'); }
3225
3226       $num_months = $num_quarters * 3;
3227       $current_month = $this->current_month;
3228       if($current_month >= 1 && $current_month <= 3) { $current_month=3; }
3229       else if($current_month >= 4 && $current_month <= 6) { $current_month=6; }
3230       else if($current_month >= 7 && $current_month <= 9) { $current_month=9; }
3231       else if($current_month >= 10 && $current_month <= 12) { $current_month=12; }
3232
3233       $sql = "SELECT * FROM eq_elder where valid=1";
3234       $this->db->query($sql,__LINE__,__FILE__);
3235       $i=0;
3236       while ($this->db->next_record())
3237         {
3238           $elder_name[$i] = $this->db->f('name');
3239           $elder_id[$i] = $this->db->f('elder');
3240           $i++;
3241         }
3242       array_multisort($elder_name, $elder_id);
3243
3244       // Create a list of sunday dates for a window of 3 months back and current month
3245       $i=0;
3246       $last_time = 0;
3247       $found_sunday = 0;
3248       $sunday_list[0]['date'] = date("Y-m-d", mktime(0, 0, 0, ($current_month-$num_months)+1, 1, date("y")));
3249       $last_date = explode("-",$sunday_list[0]['date']);
3250       $last_time = mktime(0, 0, 0, $last_date[1], $last_date[2], $last_date[0]);
3251       $time_limit = mktime(0, 0, 0, $current_month, 31, date("y"));
3252       while($last_time < $time_limit)
3253       {
3254         $day = date("w",$last_time);
3255         if(date("w",$last_time) == 0) {
3256           $sunday_list[$i]['date'] = date("Y-m-d", $last_time);
3257           $last_date = explode("-",$sunday_list[$i]['date']);
3258           $last_time = mktime(0, 0, 0, $last_date[1], $last_date[2], $last_date[0]);
3259           $sunday_list[$i]['day'] = $last_date[2];
3260           $sunday_list[$i]['month'] = date("M",$last_time);
3261           $sunday_list[$i]['year'] = $last_date[0];
3262           $found_sunday = 1;
3263           $last_date = $sunday_list[$i]['date'];
3264         }
3265         $last_time += 90000;
3266         if($found_sunday) { $i++; $found_sunday=0; }
3267       }
3268
3269       $total_elders = count($elder_id);
3270       $old_month=$sunday_list[0]['month']; $span=0;
3271       for ($i=0; $i < count($sunday_list); $i++) {
3272         $date = $sunday_list[$i]['date'];
3273         $this->t->set_var('date',$sunday_list[$i]['date']);
3274         $this->t->set_var('day',$sunday_list[$i]['day']);
3275         if(($old_month != $sunday_list[$i]['month']) || $i == count($sunday_list)-1) {
3276           if($i == count($sunday_list)-1) { $span++; }
3277           $cur_month = $sunday_list[$i]['month'];
3278           $old_month = $sunday_list[$i]['month'];
3279           $link_data['menuaction'] = 'eq.eq.att_update';
3280           $link_data['month'] = $sunday_list[$i-1]['month'];
3281           $link_data['year'] = $sunday_list[$i-1]['year'];
3282           $link_data['action'] = 'update_month';
3283           $cur_month = $sunday_list[$i-1]['month'];
3284           $cur_year = $sunday_list[$i-1]['year'];
3285           $header_row .= "<th><font size=-3>$cur_month&nbsp;$cur_year</font></th>";
3286           $this->t->set_var('update_month',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
3287           $this->t->set_var('month',$sunday_list[$i-1]['month']);
3288           $this->t->set_var('year',$sunday_list[$i-1]['year']);
3289           $this->t->set_var('span',$span); $span=0;
3290           $this->t->fp('list1','month_list',True);
3291         } $span++;
3292       }
3293       $this->t->set_var('total_elders',$total_elders);
3294       $this->t->set_var('header_row',$header_row);
3295
3296       $elder_width=200; $att_width=25; $total_width=$elder_width;
3297       for ($i=0; $i < count($sunday_list); $i++) {
3298         $link_data['menuaction'] = 'eq.eq.att_update';
3299         $link_data['month'] = $sunday_list[$i]['month'];
3300         $link_data['year'] = $sunday_list[$i]['year'];
3301         $link_data['day'] = $sunday_list[$i]['day'];
3302         $link_data['date'] = $sunday_list[$i]['date'];
3303         $link_data['action'] = 'update_day';
3304         $this->t->set_var('update_day',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
3305         $this->t->set_var('date',$sunday_list[$i]['date']);
3306         $this->t->set_var('day',$sunday_list[$i]['day']);
3307         $this->t->set_var('month',$sunday_list[$i]['month']);
3308         $this->t->set_var('year',$sunday_list[$i]['year']);
3309         $this->t->fp('list2','header_list',True);
3310         $total_width += $att_width;
3311         $attendance[$monthnum[$sunday_list[$i]['month']]]=0;
3312       }
3313
3314       for ($i=0; $i < count($elder_id); $i++) {
3315         $att_table = "";
3316         $this->nextmatchs->template_alternate_row_color(&$this->t);
3317         $this->t->set_var('elder_name',$elder_name[$i]);
3318         #print "checking for elder: " . $elder_id[$i] . "<br>";
3319         for ($j=0; $j < count($sunday_list); $j++) {
3320           #print "checking for date: " .  $sunday_list[$j]['date'] . "<br>";
3321           #print "SELECT * FROM eq_attendance WHERE date='"
3322           #  . $sunday_list[$j]['date'] . "' AND elder=" . $elder_id[$i] . "<br>";
3323           $sql = "SELECT * FROM eq_attendance WHERE date='"
3324              . $sunday_list[$j]['date'] . "' AND elder=" . $elder_id[$i];
3325           $this->db->query($sql,__LINE__,__FILE__);
3326           if($this->db->next_record()) {
3327             $cur_month = $sunday_list[$j]['month'];
3328             if($attended[$i][$cur_month] != 1) {
3329               $attended[$i][$cur_month]=1;
3330               $attendance[$monthnum[$cur_month]]++;
3331             }
3332             $att_table .= '<td align=center><img src="images/checkmark.gif"></td>';
3333           } else {
3334             $att_table .= '<td>&nbsp;</td>';
3335           }
3336         }
3337         $this->t->set_var('att_table',$att_table);
3338         $this->t->fp('list3','elder_list',True);
3339       }
3340       $this->t->set_var('total_width',$total_width);
3341       $this->t->set_var('elder_width',$elder_width);
3342       $this->t->set_var('att_width',$att_width);
3343
3344       # Now calculate attendance for these months
3345       $attendance_str = "";
3346       $nonattendance_str = "";
3347       $aveattendance_str = "";
3348       $avenonattendance_str = "";
3349       $num_months=0;
3350       $ave_total_attended=0;
3351       ksort($attendance);
3352       foreach($attendance as $att => $value) {
3353         $total_attended = $attendance[$att];
3354         $ave_total_attended += $attendance[$att]; $num_months++;
3355         $percent = ceil(($total_attended / $total_elders)*100);
3356         $attendance_str.="<td align=center><font size=-2><b>$total_attended ($percent%)</b></font></td>";
3357         $total_nonattended = $total_elders - $total_attended;
3358         $percent = ceil(($total_nonattended / $total_elders)*100);
3359         $nonattendance_str.="<td align=center><font size=-2><b>$total_nonattended ($percent%)</b></font></td>";
3360
3361         $total_attended = ceil(($ave_total_attended / $num_months));
3362         $percent = ceil(($total_attended / $total_elders)*100);
3363         $aveattendance_str .= "<td align=center><font size=-2><b>$total_attended ($percent%)</b></font></td>";
3364         $total_attended = $total_elders - ceil(($ave_total_attended / $num_months));
3365         $percent = ceil(($total_attended / $total_elders)*100);
3366         $avenonattendance_str .= "<td align=center><font size=-2><b>$total_attended ($percent%)</b></font></td>";
3367       }
3368
3369       $this->t->set_var('attendance',$attendance_str);
3370       $this->t->set_var('aveattendance',$aveattendance_str);
3371       $this->t->set_var('nonattendance',$nonattendance_str);
3372       $this->t->set_var('avenonattendance',$avenonattendance_str);
3373
3374       $this->t->pfp('out','att_view_t');
3375       $this->save_sessiondata();
3376     }
3377
3378   function att_update()
3379     {
3380       $monthnum['Jan']=1; $monthnum['Feb']=2; $monthnum['Mar']=3; $monthnum['Apr']=4;
3381       $monthnum['May']=5; $monthnum['Jun']=6; $monthnum['Jul']=7; $monthnum['Aug']=8;
3382       $monthnum['Sep']=9; $monthnum['Oct']=10; $monthnum['Nov']=11; $monthnum['Dec']=12;
3383
3384       $this->t->set_file(array('form' => 'att_update.tpl'));
3385       $this->t->set_block('form','edit','edithandle');
3386
3387       $this->t->set_block('form','month_list','list1');
3388       $this->t->set_block('form','header_list','list2');
3389       $this->t->set_block('form','elder_list','list3');
3390
3391       $this->t->set_var('done_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.att_view'));
3392
3393       $action = get_var('action',array('GET','POST'));
3394       $month = get_var('month',array('GET','POST'));
3395       $year = get_var('year',array('GET','POST'));
3396       $day = get_var('day',array('GET','POST'));
3397       $date = get_var('date',array('GET','POST'));
3398
3399       if($action == 'save_month' || $action == 'save_day')
3400         {
3401            $new_data = get_var('elders_attended',array('POST'));
3402            $month = $monthnum[$month]; if($month < 10) { $month = "0" . $month; }
3403
3404            if($action == 'save_month') {
3405              $this->db->query("DELETE from eq_attendance where date LIKE '".$year."-".$month."-%'",__LINE__,__FILE__);
3406            }
3407
3408            if($action == 'save_day') {
3409              $this->db->query("DELETE from eq_attendance where date LIKE '".$year."-".$month."-".$day."'",__LINE__,__FILE__);
3410            }
3411
3412            foreach ($new_data as $data)
3413            {
3414               $data_array = explode("-",$data);
3415               $elder = $data_array[0];
3416               $date  = "$data_array[1]-$data_array[2]-$data_array[3]";
3417               $this->db->query("INSERT INTO eq_attendance (elder,date) "
3418                                . "VALUES (" . $elder . ",'". $date . "')",__LINE__,__FILE__);
3419            }
3420
3421          $this->att_view();
3422          return false;
3423         }
3424
3425       $sql = "SELECT * FROM eq_elder where valid=1";
3426       $this->db->query($sql,__LINE__,__FILE__);
3427       $i=0;
3428       while ($this->db->next_record())
3429         {
3430           $elder_name[$i] = $this->db->f('name');
3431           $elder_id[$i] = $this->db->f('elder');
3432           $elder_attending[$elder_id[$i]] = $this->db->f('attending');
3433           $i++;
3434         }
3435       array_multisort($elder_name, $elder_id);
3436
3437       if($action == 'update_month')
3438       {
3439         $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.att_update&action=save_month'));
3440         $i=0;
3441         $last_time = 0;
3442         $found_sunday = 0;
3443         $sunday_list[0]['date'] = date("Y-m-d", mktime(0, 0, 0, $monthnum[$month], 1, $year));
3444         $last_date = explode("-",$sunday_list[0]['date']);
3445         $last_time = mktime(0, 0, 0, $last_date[1], $last_date[2], $last_date[0]);
3446         $time_limit = mktime(0, 0, 0, $monthnum[$month], 31, $year);
3447         while($last_time <= $time_limit)
3448         {
3449           $day = date("w",$last_time);
3450           if(date("w",$last_time) == 0) {
3451             $sunday_list[$i]['date'] = date("Y-m-d", $last_time);
3452             $last_date = explode("-",$sunday_list[$i]['date']);
3453             $last_time = mktime(0, 0, 0, $last_date[1], $last_date[2], $last_date[0]);
3454             $sunday_list[$i]['day'] = $last_date[2];
3455             $sunday_list[$i]['month'] = date("M",$last_time);
3456             $sunday_list[$i]['year'] = $last_date[0];
3457             $found_sunday = 1;
3458           }
3459           $last_time += 90000;
3460           if($found_sunday) { $i++; $found_sunday=0; }
3461         }
3462
3463         $this->t->set_var('span', $i);
3464         $this->t->set_var('month',$sunday_list[$i-1]['month']);
3465         $this->t->set_var('year',$sunday_list[$i-1]['year']);
3466         $this->t->fp('list1','month_list',True);
3467         $elder_width=200; $att_width=25; $total_width=$elder_width;
3468         for ($i=0; $i < count($sunday_list); $i++) {
3469           $link_data['menuaction'] = 'eq.eq.att_update';
3470           $link_data['month'] = $sunday_list[$i]['month'];
3471           $link_data['year'] = $sunday_list[$i]['year'];
3472           $link_data['day'] = $sunday_list[$i]['day'];
3473           $link_data['date'] = $sunday_list[$i]['date'];
3474           $link_data['action'] = 'update_day';
3475           $this->t->set_var('update_day',$GLOBALS['phpgw']->link('/eq/index.php',$link_data));
3476           $this->t->set_var('date',$sunday_list[$i]['date']);
3477           $this->t->set_var('day',$sunday_list[$i]['day']);
3478           $this->t->set_var('month',$sunday_list[$i]['month']);
3479           $this->t->set_var('year',$sunday_list[$i]['year']);
3480           $this->t->fp('list2','header_list',True);
3481           $total_width += $att_width;
3482         }
3483       }
3484
3485       if($action == 'update_day')
3486       {
3487         $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.att_update&action=save_day'));
3488         $sunday_list[0]['date'] = date("Y-m-d", mktime(0, 0, 0, $monthnum[$month], $day, $year));
3489         $this->t->set_var('month',$month);
3490         $this->t->set_var('year',$year);
3491         $this->t->fp('list1','month_list',True);
3492         $this->t->set_var('date',$date);
3493         $this->t->set_var('day',$day);
3494         $this->t->set_var('month',$month);
3495         $this->t->set_var('year',$year);
3496         $this->t->fp('list2','header_list',True);
3497       }
3498
3499       for ($i=0; $i < count($elder_id); $i++) {
3500         $att_table = "";
3501         $this->nextmatchs->template_alternate_row_color(&$this->t);
3502         $this->t->set_var('elder_name',$elder_name[$i]);
3503         for ($j=0; $j < count($sunday_list); $j++) {
3504           $sql = "SELECT * FROM eq_attendance WHERE date='"
3505              . $sunday_list[$j]['date'] . "' AND elder=" . $elder_id[$i];
3506           $this->db->query($sql,__LINE__,__FILE__);
3507           $value = $elder_id[$i] . "-" . $sunday_list[$j]['date'];
3508           if($this->db->next_record()) {
3509             $att_table .= '<td align=center><input type="checkbox" name="elders_attended[]" value="'.$value.'" checked></td>';
3510           } else if($elder_attending[$elder_id[$i]] == 1) {
3511             $att_table .= '<td align=center><input type="checkbox" name="elders_attended[]" value="'.$value.'" checked></td>';
3512           } else {
3513             $att_table .= '<td align=center><input type="checkbox" name="elders_attended[]" value="'.$value.'"></td>';
3514           }
3515         }
3516         $this->t->set_var('att_table',$att_table);
3517         $this->t->fp('list3','elder_list',True);
3518       }
3519
3520       $this->t->set_var('lang_done', 'Cancel');
3521       $this->t->set_var('lang_reset','Clear Form');
3522       $this->t->set_var('lang_save','Save Changes');
3523
3524       $this->t->pfp('out','form');
3525       $this->t->pfp('addhandle','edit');
3526
3527       $this->save_sessiondata();
3528     }
3529
3530   function dir_view()
3531     {
3532       $this->t->set_file(array('dir_view_t' => 'dir_view.tpl'));
3533       $this->t->set_block('dir_view_t','dir_list','list');
3534
3535       $sql = "SELECT * FROM eq_parent where valid=1 ORDER BY name ASC";
3536       $this->db->query($sql,__LINE__,__FILE__);
3537       $i=0;
3538       while ($this->db->next_record())
3539         {
3540           $parent[$i]['id'] = $this->db->f('parent');
3541           $parent[$i]['name'] = $this->db->f('name');
3542           $parent[$i]['phone'] = $this->db->f('phone');
3543           $parent[$i]['address'] = $this->db->f('address');
3544           $i++;
3545         }
3546
3547       for ($i=0; $i < count($parent); $i++)
3548       {
3549         $name = $parent[$i]['name'];
3550         $phone = $parent[$i]['phone'];
3551         $address = $parent[$i]['address'];
3552         $this->t->set_var('name', $name);
3553         $this->t->set_var('address', $address);
3554         $this->t->set_var('phone', $phone);
3555         $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
3556         $this->t->set_var('tr_color',$tr_color);
3557         $this->t->fp('list','dir_list',True);
3558         //print "$phone $name $address<br>";
3559       }
3560       $this->t->pfp('out','dir_view_t');
3561       $this->save_sessiondata();
3562     }
3563
3564   function org_view()
3565     {
3566       $this->t->set_file(array('org_view_t' => 'org_view.tpl'));
3567       $this->t->set_block('org_view_t','calling_list','list1');
3568       $this->t->set_block('org_view_t','org_list','list2');
3569
3570       # Display a list ordered alphabetically
3571       $sql = "SELECT * FROM eq_calling ORDER BY name ASC";
3572       $this->db->query($sql,__LINE__,__FILE__);
3573       $i=0;
3574       while ($this->db->next_record())
3575         {
3576           $calling[$i]['id'] = $this->db->f('indiv_id');
3577           $calling[$i]['name'] = $this->db->f('name');
3578           $calling[$i]['position'] = $this->db->f('position');
3579           $calling[$i]['sustained'] = $this->db->f('sustained');
3580           $calling[$i]['organization'] = $this->db->f('organization');
3581           $i++;
3582         }
3583       for ($i=0; $i < count($calling); $i++)
3584       {
3585         $name = $calling[$i]['name'];
3586         $position = $calling[$i]['position'];
3587         $sustained = $calling[$i]['sustained'];
3588         $organization = $calling[$i]['organization'];
3589         $this->t->set_var('name', $name);
3590         $this->t->set_var('position', $position);
3591         $this->t->set_var('sustained', $sustained);
3592         $this->t->set_var('organization', $organization);
3593         $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
3594         $this->t->set_var('tr_color',$tr_color);
3595         $this->t->fp('list1','calling_list',True);
3596       }
3597
3598       # Display a list ordered by organization
3599       $sql = "SELECT * FROM eq_calling ORDER BY sequence ASC";
3600       $this->db->query($sql,__LINE__,__FILE__);
3601       $i=0;
3602       while ($this->db->next_record())
3603         {
3604           $calling[$i]['id'] = $this->db->f('indiv_id');
3605           $calling[$i]['name'] = $this->db->f('name');
3606           $calling[$i]['position'] = $this->db->f('position');
3607           $calling[$i]['sustained'] = $this->db->f('sustained');
3608           $calling[$i]['organization'] = $this->db->f('organization');
3609           $i++;
3610         }
3611       for ($i=0; $i < count($calling); $i++)
3612       {
3613         $name = $calling[$i]['name'];
3614         $position = $calling[$i]['position'];
3615         $sustained = $calling[$i]['sustained'];
3616         $organization = $calling[$i]['organization'];
3617         $this->t->set_var('name', $name);
3618         $this->t->set_var('position', $position);
3619         $this->t->set_var('sustained', $sustained);
3620         $this->t->set_var('organization', $organization);
3621         $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
3622         $this->t->set_var('tr_color',$tr_color);
3623         $this->t->fp('list2','org_list',True);
3624       }
3625
3626       $this->t->pfp('out','org_view_t');
3627       $this->save_sessiondata();
3628     }
3629
3630   function schedule()
3631     {
3632       $this->t->set_file(array('sched_t' => 'schedule.tpl'));
3633       $this->t->set_block('sched_t','presidency_list','list');
3634
3635       $action = get_var('action',array('GET','POST'));
3636
3637       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.schedule&action=save'));
3638       $this->t->set_var('title','EQ Scheduling Tool');
3639
3640       $this->t->set_var('lang_save','Save Schedule');
3641       $this->t->set_var('lang_reset','Cancel');
3642
3643       $this->t->set_var('schedule_vis_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.vis_sched'));
3644       $this->t->set_var('schedule_vis_link_title','Schedule Yearly Visits');
3645
3646       $this->t->set_var('schedule_int_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.int_sched'));
3647       $this->t->set_var('schedule_int_link_title','Schedule Hometeaching Interviews');
3648
3649       $this->t->set_var('schedule_ppi_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.ppi_sched'));
3650       $this->t->set_var('schedule_ppi_link_title','Schedule Yearly PPIs');
3651
3652       $date_width=150; $time_width=220; $elder_width=170; $family_width=180; $location_width=100;
3653       $table_width=$date_width + $time_width + $elder_width + $family_width + $location_width;
3654       $header_row = "<th width=$date_width><font size=-2>Date</th>";
3655       $header_row.= "<th width=$time_width><font size=-2>Time</th>";
3656       $header_row.= "<th width=$elder_width><font size=-2>Elder</th>";
3657       $header_row.= "<th width=$family_width><font size=-2>Family</th>";
3658       $header_row.= "<th width=$location_width><font size=-2>Location</th>";
3659       $table_data = "";
3660
3661       $sql = "SELECT * FROM eq_presidency where valid=1";
3662       $this->db->query($sql,__LINE__,__FILE__);
3663       $i=0;
3664       while ($this->db->next_record())
3665         {
3666           $presidency_data[$i]['id'] = $this->db->f('presidency');
3667           $presidency_data[$i]['name'] = $this->db->f('name');
3668           $presidency_data[$i]['elder'] = $this->db->f('elder');
3669           $presidency2name[$presidency_data[$i]['id']] = $presidency_data[$i]['name'];
3670           $presidency2elder[$presidency_data[$i]['id']] = $presidency_data[$i]['elder'];
3671           $i++;
3672         }
3673
3674       $sql = "SELECT * FROM eq_family where valid=1 and elder_id != 0 ORDER BY name ASC";
3675       $this->db->query($sql,__LINE__,__FILE__);
3676       $i=0;
3677       while ($this->db->next_record())
3678         {
3679           $family_id[$i] = $this->db->f('family');
3680           $family_name[$i] = $this->db->f('name');
3681           $familyid2name[$family_id[$i]] = $family_name[$i];
3682           $sql = "SELECT * FROM eq_parent where family='$family_id[$i]'";
3683           $this->db2->query($sql,__LINE__,__FILE__);
3684           if($this->db2->next_record()) {
3685             $familyid2address[$family_id[$i]] = $this->db2->f('address');
3686           }
3687           $i++;
3688         }
3689       array_multisort($family_name, $family_id);
3690
3691       if($action == 'save')
3692         {
3693           $new_data = get_var('sched',array('POST'));
3694           foreach ($new_data as $presidency_array)
3695            {
3696              foreach ($presidency_array as $entry)
3697                {
3698                  $presidency = $entry['presidency'];
3699                  $appointment = $entry['appointment'];
3700                  $location = $entry['location'];
3701                  $date = $entry['date'];
3702                  $hour = $entry['hour'];
3703                  $minute = $entry['minute'];
3704                  $pm = $entry['pm'];
3705                  $elder = $entry['elder'];
3706                  $family = $entry['family'];
3707                  $location = $entry['location'];
3708                  if($pm) { $hour = $hour + 12; }
3709                  $time = $hour.':'.$minute.':'.'00';
3710                  $uid = 0;
3711
3712                  // Update our location
3713                  if($location == "") {
3714                    if($family > 0) {
3715                      $family_name_array = explode(",", $familyid2name[$family]);
3716                      $family_last_name = $family_name_array[0];
3717                      $family_address = $familyid2address[$family];
3718                      $location = "$family_last_name"." home ($family_address)";
3719                    }
3720                    else if($elder > 0) {
3721                      $supervisor_name_array = explode(",",$presidency2name[$presidency]);
3722                      $supervisor_last_name = $supervisor_name_array[0];
3723                      $sql = "SELECT * FROM eq_elder where elder='$presidency2elder[$presidency]'";
3724                      $this->db2->query($sql,__LINE__,__FILE__);
3725                      if($this->db2->next_record()) {
3726                        $indiv_id = $this->db2->f('indiv_id');
3727                      }
3728                      $sql = "SELECT * FROM eq_parent where indiv_id='$indiv_id'";
3729                      $this->db2->query($sql,__LINE__,__FILE__);
3730                      if($this->db2->next_record()) {
3731                        $supervisor_address = $this->db2->f('address');
3732                      }
3733                      $location = "$supervisor_last_name"." home ($supervisor_address)";
3734                    }
3735                  }
3736
3737                  // Zero out the family or elder if date = NULL
3738                  if($date == "") {
3739                    $elder = 0;
3740                    $family = 0;
3741                    $location = "";
3742                  }
3743
3744                  if(($elder == 0) && ($family == 0)) { $location = ""; }
3745
3746                  // Update an existing appointment
3747                  if($appointment < $this->max_appointments)
3748                    {
3749                      //Only perform a database update if we have made a change to this appointment
3750                      $sql = "SELECT * FROM eq_appointment where " .
3751                         "appointment='$appointment'" .
3752                         " and presidency='$presidency'" .
3753                         " and elder='$elder'" .
3754                         " and family='$family'" .
3755                         " and date='$date'" .
3756                         " and time='$time'" .
3757                         " and location='$location'";
3758                      $this->db->query($sql,__LINE__,__FILE__);
3759                      if(!$this->db->next_record()) {
3760                        $old_date = $this->db->f('date');
3761                        $old_time = $this->db->f('time');
3762                        $this->db2->query("UPDATE eq_appointment set" .
3763                                         " family=" . $family .
3764                                         " ,elder=" . $elder .
3765                                         " ,date='" . $date . "'" .
3766                                         " ,time='" . $time . "'" .
3767                                         " ,location='" . $location . "'" .
3768                                         " ,presidency='" . $presidency . "'" .
3769                                         " WHERE appointment=" . $appointment,__LINE__,__FILE__);
3770
3771                        // Email the appointment
3772                        $this->email_appt($appointment);
3773                      }
3774                    }
3775
3776                  // Add a new appointment
3777                  else if(($appointment >= $this->max_appointments) && ($date != "") && ($time != ""))
3778                    {
3779                      //print "adding entry: appt=$appointment date: $date time: $time elder: $elder family: $family<br>";
3780                      $this->db2->query("INSERT INTO eq_appointment (appointment,presidency,family,elder,date,time,location,uid) "
3781                            . "VALUES (NULL,'" . $presidency . "','" . $family . "','" . $elder . "','"
3782                            . $date . "','" . $time  . "','" . $location . "','" . $uid ."')",__LINE__,__FILE__);
3783
3784                      // Now reselect this entry from the database to see if we need
3785                      // to send an appointment out for it.
3786                      $sql = "SELECT * FROM eq_appointment where " .
3787                         "elder='$elder'" .
3788                         " and family='$family'" .
3789                         " and presidency='$presidency'" .
3790                         " and date='$date'" .
3791                         " and time='$time'" .
3792                         " and uid='$uid'" .
3793                         " and location='$location'";
3794                      $this->db3->query($sql,__LINE__,__FILE__);
3795                      if($this->db3->next_record()) {
3796                        // Email the appointment if warranted
3797                        if(($date != "") && ($time != "") && (($elder > 0) || $family > 0)) {
3798                          $this->email_appt($this->db3->f('appointment'));
3799                        }
3800                      }
3801                    }
3802                }
3803            }
3804
3805           $take_me_to_url = $GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.schedule');
3806           //Header('Location: ' . $take_me_to_url);
3807         }
3808
3809       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY elder ASC";
3810       $this->db->query($sql,__LINE__,__FILE__);
3811       $i=0;
3812       while ($this->db->next_record())
3813         {
3814           $elder_id[$i] = $this->db->f('elder');
3815           $elder_name[$i] = $this->db->f('name');
3816           $elder_phone[$elder_id[$i]] = $this->db->f('phone');
3817           $i++;
3818         }
3819       array_multisort($elder_name, $elder_id);
3820
3821       for ($i=0; $i < count($presidency_data); $i++) {
3822         $presidency = $presidency_data[$i]['id'];
3823         $interviewer = $presidency_data[$i]['elder'];
3824         $name = $presidency_data[$i]['name'];
3825         $this->t->set_var('presidency_name',$name);
3826         $table_data="";
3827
3828         // query the database for all the appointments
3829         $sql = "SELECT * FROM eq_appointment where presidency=$presidency and date>=CURDATE() ORDER BY date ASC, time ASC";
3830         $this->db->query($sql,__LINE__,__FILE__);
3831
3832         // Prefill any existing appointment slots
3833         while ($this->db->next_record())
3834           {
3835             $appointment = $this->db->f('appointment');
3836             $elder = $this->db->f('elder');
3837             $family = $this->db->f('family');
3838             $location = $this->db->f('location');
3839
3840             if($location == "") {
3841               if($family > 0) {
3842                 $family_name_array = explode(",", $familyid2name[$family]);
3843                 $family_last_name = $family_name_array[0];
3844                 $family_address = $familyid2address[$family];
3845                 $location = "$family_last_name"." home ($family_address)";
3846               }
3847               else if($elder > 0) {
3848                 $supervisor_name_array = explode(",",$presidency2name[$presidency]);
3849                 $supervisor_last_name = $supervisor_name_array[0];
3850                 $sql = "SELECT * FROM eq_elder where elder='$presidency2elder[$presidency]'";
3851                 $this->db2->query($sql,__LINE__,__FILE__);
3852                 if($this->db2->next_record()) {
3853                   $indiv_id = $this->db2->f('indiv_id');
3854                 }
3855                 $sql = "SELECT * FROM eq_parent where indiv_id='$indiv_id'";
3856                 $this->db2->query($sql,__LINE__,__FILE__);
3857                 if($this->db2->next_record()) {
3858                   $supervisor_address = $this->db2->f('address');
3859                 }
3860                 $location = "$supervisor_last_name"." home ($supervisor_address)";
3861               }
3862             }
3863
3864             $date = $this->db->f('date');
3865             $date_array = explode("-",$date);
3866             $year = $date_array[0]; $month = $date_array[1]; $day = $date_array[2];
3867             $day_string = date("l d-M-Y", mktime(0,0,0,$month,$day,$year));
3868
3869             $time = $this->db->f('time');
3870             $time_array = explode(":",$time);
3871             $hour = $time_array[0];
3872             $minute = $time_array[1];
3873             $pm = 0;
3874             if($hour > 12) { $pm=1; $hour = $hour - 12; }
3875             $time_string = date("g:i a", mktime($time_array[0], $time_array[1], $time_array[2]));
3876
3877             $table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
3878
3879             // Date selection
3880             $table_data.= '<td align=left>';
3881             $table_data.= $this->jscal->input('sched['.$presidency.']['.$appointment.'][date]',$date,'','','','','',$this->cal_options);
3882             $table_data.= '</td>';
3883
3884             // Hour & Minutes selection
3885             $table_data.= "<td align=center>";
3886             $table_data .= $this->get_time_selection_form($hour, $minute, $pm, $presidency, $appointment);
3887             $table_data.= "</td>";
3888
3889             // Elder drop down list (for PPIs)
3890             $table_data.= '<td align=center><select name=sched['.$presidency.']['.$appointment.'][elder] STYLE="font-size : 8pt">';
3891             $table_data.= '<option value=0></option>';
3892             for ($j=0; $j < count($elder_id); $j++) {
3893               $id = $elder_id[$j];
3894               $name = $elder_name[$j];
3895               if($elder_id[$j] == $elder) { $selected[$id] = 'selected="selected"'; } else { $selected[$id] = ''; }
3896               $table_data.= '<option value='.$id.' '.$selected[$id].'>'.$name.'</option>';
3897             }
3898             $table_data.='</select></td>';
3899
3900             // Family drop down list (for Visits)
3901             $table_data.= '<td align=center><select name=sched['.$presidency.']['.$appointment.'][family] STYLE="font-size : 8pt">';
3902             $table_data.= '<option value=0></option>';
3903             for ($j=0; $j < count($elder_id); $j++) {
3904               $id = $family_id[$j];
3905               $name = $family_name[$j];
3906               if($family_id[$j] == $family) { $selected[$id] = 'selected="selected"'; } else { $selected[$id] = ''; }
3907               $table_data.= '<option value='.$id.' '.$selected[$id].'>'.$name.' Family</option>';
3908             }
3909             $table_data.='</select></td>';
3910
3911             // Location text box
3912             $table_data.= '<td align=center><input type=text size="25" maxlength="120" ';
3913             $table_data.= 'name="sched['.$presidency.']['.$appointment.'][location]" value="'.$location.'" STYLE="font-size : 8pt">';
3914
3915             $table_data.= '<input type=hidden name="sched['.$presidency.']['.$appointment.'][appointment]" value="'.$appointment.'">';
3916             $table_data.= '<input type=hidden name="sched['.$presidency.']['.$appointment.'][presidency]" value="'.$presidency.'">';
3917
3918             $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
3919             $this->t->set_var('tr_color',$tr_color);
3920
3921           }
3922
3923         // Create blank appointment slot
3924         for ($b=0; $b < 4; $b++) {
3925           $appointment = $this->max_appointments + $b;
3926           $table_data.= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
3927
3928           // Date selection
3929           $table_data.= '<td align=left>';
3930           $table_data.= $this->jscal->input('sched['.$presidency.']['.$appointment.'][date]','','','','','','',$this->cal_options);
3931           $table_data.= '</td>';
3932
3933           // Time selection
3934           $table_data.= "<td align=center>";
3935           $table_data .= $this->get_time_selection_form(0, 0, 0, $presidency, $appointment);
3936           $table_data.= "</td>";
3937
3938           // Elder drop down list
3939           $table_data.= '<td align=center><select name=sched['.$presidency.']['.$appointment.'][elder] STYLE="font-size : 8pt">';
3940           $table_data.= '<option value=0></option>';
3941           for ($j=0; $j < count($elder_id); $j++) {
3942             $id = $elder_id[$j];
3943             $name = $elder_name[$j];
3944             $table_data.= '<option value='.$id.'>'.$name.'</option>';
3945           }
3946           $table_data.='</select></td>';
3947
3948           // Family drop down list
3949           $table_data.= '<td align=center><select name=sched['.$presidency.']['.$appointment.'][family] STYLE="font-size : 8pt">';
3950           $table_data.= '<option value=0></option>';
3951           for ($j=0; $j < count($elder_id); $j++) {
3952             $id = $family_id[$j];
3953             $name = $family_name[$j];
3954             $table_data.= '<option value='.$id.'>'.$name.' Family</option>';
3955           }
3956           $table_data.='</select></td>';
3957
3958           // Location text box
3959           $table_data.= '<td align=center><input type=text size="25" maxlength="120" ';
3960           $table_data.= 'name="sched['.$presidency.']['.$appointment.'][location]" value="" STYLE="font-size : 8pt">';
3961
3962           $table_data.= '<input type=hidden name="sched['.$presidency.']['.$appointment.'][appointment]" value="'.$appointment.'">';
3963           $table_data.= '<input type=hidden name="sched['.$presidency.']['.$appointment.'][presidency]" value="'.$presidency.'">';
3964
3965           $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
3966           $this->t->set_var('tr_color',$tr_color);
3967         }
3968
3969         $this->t->set_var('table_data',$table_data);
3970         $this->t->set_var('header_row',$header_row);
3971         $this->t->set_var('table_width',$table_width);
3972         $this->t->fp('list','presidency_list',True);
3973
3974       }
3975
3976       $this->t->pfp('out','sched_t');
3977       $this->save_sessiondata();
3978     }
3979
3980   function email()
3981     {
3982       $this->t->set_file(array('email_t' => 'email.tpl'));
3983       $this->t->set_block('email_t','elder_list','list');
3984
3985       $action = get_var('action',array('GET','POST'));
3986
3987       $this->t->set_var('actionurl',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.email'));
3988       $this->t->set_var('title','EQ Email Tool');
3989
3990       $this->t->set_var('lang_email','Send Email');
3991       $this->t->set_var('lang_reset','Cancel');
3992
3993       $this->t->set_var('email_member_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.email&action=member'));
3994       $this->t->set_var('email_member_link_title','Email Quorum Member');
3995
3996       $this->t->set_var('email_quorum_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.email&action=quorum'));
3997       $this->t->set_var('email_quorum_link_title','Email Quorum');
3998
3999       $this->t->set_var('email_reminder_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.email&action=reminder'));
4000       $this->t->set_var('email_reminder_link_title','Email Reminders');
4001
4002       $this->t->set_var('email_edit_link',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.email&action=edit'));
4003       $this->t->set_var('email_edit_link_title','Edit Email Addresses');
4004
4005       $table_width=600;
4006       $this->t->set_var('table_width',$table_width);
4007
4008       $this->t->pfp('out','email_t');
4009       $this->save_sessiondata();
4010     }
4011
4012   function admin()
4013     {
4014       $this->t->set_file(array('admin_t' => 'admin.tpl'));
4015       $this->t->set_block('admin_t','upload','uploadhandle');
4016       $this->t->set_block('admin_t','admin','adminhandle');
4017       $this->t->set_block('admin_t','cmd','cmdhandle');
4018       $this->t->set_block('admin_t','presidency','presidencyhandle');
4019
4020       $this->t->set_var('upload_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.admin&action=upload'));
4021       $this->t->set_var('presidency_action',$GLOBALS['phpgw']->link('/eq/index.php','menuaction=eq.eq.admin&action=presidency'));
4022
4023       $action = get_var('action',array('GET','POST'));
4024
4025       $this->t->pfp('out','admin_t');
4026
4027       $sql = "SELECT * FROM eq_elder where valid=1 ORDER BY elder ASC";
4028       $this->db->query($sql,__LINE__,__FILE__);
4029       $i=0;
4030       while ($this->db->next_record())
4031         {
4032           $elder_id[$i] = $this->db->f('elder');
4033           $elder_name[$i] = $this->db->f('name');
4034           $elder2name[$elder_id[$i]] = $elder_name[$i];
4035           $i++;
4036         }
4037       array_multisort($elder_name, $elder_id);
4038
4039       if($action == 'upload')
4040         {
4041           $target_path = $this->upload_target_path . '/' . basename( $_FILES['uploadedfile']['name']);
4042
4043           if(($_FILES['uploadedfile']['type'] == "application/zip") ||
4044              ($_FILES['uploadedfile']['type'] == "application/x-zip-compressed") ||
4045              ($_FILES['uploadedfile']['type'] == "application/x-zip") ||
4046              ($_FILES['uploadedfile']['type'] == "application/octet-stream")) {
4047
4048             if(!move_uploaded_file($_FILES['uploadedfile']['tmp_name'], $target_path)) {
4049               $uploadstatus = "<b><font color=red> -E- Unable to move the uploaded file to ";
4050               $uploadstatus.= "the target path (check the path and permissions) of: $target_path</font></b>";
4051               $this->t->set_var('uploadstatus',$uploadstatus);
4052               $this->t->pfp('uploadhandle','upload',True);
4053               return 0;
4054             }
4055
4056             $uploadstatus = "<b>The following file was uploaded successfully: </b><br><br>";
4057             $uploadstatus.= "Filename : " . $_FILES['uploadedfile']['name'] . "<br>";
4058             $uploadstatus.= "Type     : " . $_FILES['uploadedfile']['type'] . "<br>";
4059             $uploadstatus.= "Size     : " . $_FILES['uploadedfile']['size'] . "<br>";
4060             $this->t->set_var('uploadstatus',$uploadstatus);
4061             $this->t->pfp('uploadhandle','upload');
4062             $this->t->set_var('uploadhandle','');
4063             print "<table border=1 width=80%><tr><td>\n<pre>";
4064
4065             # make a directory for this data to be stored in
4066             $date="data_" . date("Y_m_d");
4067             $data_dir = $this->upload_target_path . '/' . $date;
4068             print "-> Making the data directory: $date<br>\n";
4069             exec('mkdir -p ' . $data_dir . ' 2>&1', $result, $return_code);
4070             if($return_code != 0) {
4071               print implode('\n',$result) . "<br>";
4072               print "<b><font color=red>";
4073               print "-E- Unable to create the data directory. Aborting import.";
4074               print "</font></b>";
4075               return 0;
4076             }
4077
4078             # move the file uploaded into this directory
4079             print "-> Moving the uploaded file into the data dir<br>\n";
4080             exec('mv ' . $target_path . ' ' . $data_dir . '/' . ' 2>&1', $result, $return_code);
4081             if($return_code != 0) {
4082               print implode('\n',$result) . "<br>";
4083               print "<b><font color=red>";
4084               print "-E- Unable to move the uploaded file into the data dir. Aborting import.";
4085               print "</font></b>";
4086               return 0;
4087             }
4088
4089             # unzip the data into this directory
4090             print "-> Unzipping the data<br>\n";
4091             exec($this->unzip_path .' -u '. $data_dir . '/*.zip -d ' . $data_dir . ' 2>&1', $result, $return_code);
4092             if($return_code != 0) {
4093               print implode('\n',$result) . "<br>";
4094               print "<b><font color=red>";
4095               print "-E- Unable to unzip the uploaded file into the data dir: $data_dir. Aborting import.";
4096               print "</font></b>";
4097               return 0;
4098             }
4099             exec('mv ' . $data_dir . '/*/* '. $data_dir . ' 2>&1', $result, $return_code);
4100
4101             # update the data_latest link to point to this new directory
4102             print "-> Updating the latest data dir link<br>\n";
4103             $data_latest = $this->upload_target_path . '/data_latest';
4104             exec('rm ' . $data_latest. '; ln -s ' . $data_dir .' '. $data_latest .' 2>&1', $result, $return_code);
4105             if($return_code != 0) {
4106               print implode('\n',$result) . "<br>";
4107               print "<b><font color=red>";
4108               print "-E- Unable to update the data latest link. Aborting import.";
4109               print "</font></b>";
4110               return 0;
4111             }
4112
4113             # run the import perl script to encorporate it into the DB
4114             ob_start('ob_logstdout', 2);
4115             print "-> Importing the data into the EQ database<br>\n";
4116             ob_flush(); flush(); sleep(1);
4117             $import_log = $this->upload_target_path . '/import.log';
4118             $data_log = $this->upload_target_path . '/data.log';
4119             $import_cmd = $this->script_path . '/import_ward_data ' . $data_latest . ' 2>&1 | tee ' . $import_log;
4120             $parse_cmd = $this->script_path . '/parse_ward_data -v ' . $data_latest . ' > ' . $data_log . '2>&1';
4121             #print "import_cmd: $import_cmd<br>";
4122             #print "parse_cmd: $parse_cmd<br>";
4123             ob_start('ob_logstdout', 2);
4124             passthru($import_cmd);
4125             passthru($parse_cmd);
4126             ob_flush(); flush(); sleep(1);
4127
4128             # fix the permissions of the data dir
4129             exec('chmod -R o-rwx ' . $data_dir, $result, $return_code);
4130
4131             $this->t->pfp('cmdhandle','cmd');
4132             print "</pre></td></tr></table>";
4133
4134           } else if(($_FILES['uploadedfile']['type'] != "application/zip") &&
4135                     ($_FILES['uploadedfile']['type'] != "application/x-zip-compressed") &&
4136                     ($_FILES['uploadedfile']['type'] != "application/x-zip") &&
4137                     ($_FILES['uploadedfile']['type'] != "application/octet-stream")) {
4138             $uploadstatus = "<b><font color=red>The file format must be a .zip file, please try again! </font></b>";
4139             $uploadstatus.= "<br><br><b>Detected file format: " . $_FILES['uploadedfile']['type'] . "</b>";
4140             $this->t->set_var('uploadstatus',$uploadstatus);
4141             $this->t->pfp('uploadhandle','upload',True);
4142           } else {
4143             $uploadstatus = "<b><font color=red> There was an error (" . $_FILES['uploadedfile']['error'];
4144             $uploadstatus.= ") uploading the file, please try again! </font></b>";
4145             $this->t->set_var('uploadstatus',$uploadstatus);
4146             $this->t->pfp('uploadhandle','upload',True);
4147           }
4148         }
4149       else if($action == "presidency")
4150         {
4151           $new_data = get_var('eqpres',array('POST'));
4152           foreach ($new_data as $entry)
4153            {
4154              $id = $entry['id'];
4155              $email = $entry['email'];
4156              $elder = $entry['elder'];
4157              $name = $entry['name'];
4158              $district = $entry['district'];
4159              $president = $entry['president'];
4160              $counselor = $entry['counselor'];
4161              $secretary = $entry['secretary'];
4162              $eqpresidency = $entry['eqpresidency'];
4163              // Set the elder id to 0 for EQ Presidency tagged entry
4164              if($eqpresidency == 1) { $elder="0"; }
4165              // Re-look up the elder name for the ID if we aren't an EQ Presidency tagged entry
4166              else { $name = $elder2name[$elder]; }
4167              //print "id=$id elder=$elder name=$name email=$email district=$district president=$president ";
4168              //print "counselor=$counselor secretary=$secretary eqpres=$eqpresidency<br>";
4169
4170              if(($elder > 0) || ($name != "")) {
4171                if($id < $this->max_presidency_members) {
4172                  //print "Updating Existing Entry<br>";
4173                  $this->db2->query("UPDATE eq_presidency set" .
4174                                    " elder=" . $elder .
4175                                    " ,district=" . $district .
4176                                    " ,name='" . $name . "'" .
4177                                    " ,email='" . $email . "'" .
4178                                    " ,president='" . $president . "'" .
4179                                    " ,counselor='" . $counselor . "'" .
4180                                    " ,secretary='" . $secretary . "'" .
4181                                    " ,eqpres='" . $eqpresidency . "'" .
4182                                    " WHERE presidency=" . $id,__LINE__,__FILE__);
4183
4184                } else {
4185                  //print "Adding New Entry<br>";
4186                  $this->db2->query("INSERT INTO eq_presidency (presidency,elder,district,name,"
4187                                    . "email,president,counselor,secretary,eqpres,valid) "
4188                                    . "VALUES (NULL,'" . $elder . "','" . $district . "','"
4189                                    . $name . "','" . $email . "','" . $president  . "','"
4190                                    . $counselor . "','" . $secretary . "','" . $eqpres  . "','1'"
4191                                    .")",__LINE__,__FILE__);
4192                }
4193              } else {
4194                //print "Ignoring Blank Entry<br>";
4195              }
4196            }
4197
4198           // Now update the eq_district table appropriately
4199
4200           // Delete all the previous district entries from the table
4201           $this->db->query("DELETE from eq_district where valid=1",__LINE__,__FILE__);
4202           $this->db->query("DELETE from eq_district where valid=0",__LINE__,__FILE__);
4203
4204           // Always add a "District 0" assigned to the High Priests Group
4205           $district = 0;
4206           $name = "High Priests";
4207           $elder = 0;
4208           $valid = 0;
4209           $this->db2->query("INSERT INTO eq_district (district,name,supervisor,valid) "
4210                             . "VALUES ('" . $district . "','" . $name . "','"
4211                             . $elder . "','" . $valid . "'"
4212                             .")",__LINE__,__FILE__);
4213
4214
4215           // Requery the eq_presidency table
4216           $sql = "SELECT * FROM eq_presidency where valid=1";
4217           $this->db->query($sql,__LINE__,__FILE__);
4218           while ($this->db->next_record())
4219             {
4220               // Extract the data for each presidency record
4221               $id = $this->db->f('presidency');
4222               $elder = $this->db->f('elder');
4223               $name = $this->db->f('name');
4224               $district = $this->db->f('district');
4225               $name = $this->db->f('name');
4226               $valid = 1;
4227
4228               // If we have a valid district, add it to the district table
4229               if($district > 0) {
4230                 $this->db2->query("INSERT INTO eq_district (district,name,supervisor,valid) "
4231                                   . "VALUES ('" . $district . "','" . $name . "','"
4232                                   . $elder . "','" . $valid . "'"
4233                                   .")",__LINE__,__FILE__);
4234               }
4235
4236             }
4237
4238           $this->t->set_var('adminhandle','');
4239           $this->t->pfp('adminhandle','admin');
4240         }
4241       else
4242         {
4243           $this->t->set_var('adminhandle','');
4244           $this->t->pfp('adminhandle','admin');
4245         }
4246
4247       // Now save off the data needed for an EQ Presidency Table Update
4248
4249       $sql = "SELECT * FROM eq_presidency where valid=1";
4250       $this->db->query($sql,__LINE__,__FILE__);
4251       $table_data = "";
4252       $header_row = "<th>Elder</th><th>Email</th><th>District</th><th>President</th><th>Counselor</th><th>Secretary</th><th>EQ Presidency</th>";
4253       while ($this->db->next_record())
4254         {
4255           // Extract the data for each presidency record
4256           $id = $this->db->f('presidency');
4257           $elder = $this->db->f('elder');
4258           $district = $this->db->f('district');
4259           $name = $this->db->f('name');
4260           $email = $this->db->f('email');
4261           $president = $this->db->f('president');
4262           $counselor = $this->db->f('counselor');
4263           $secretary = $this->db->f('secretary');
4264           $eqpresidency = $this->db->f('eqpres');
4265
4266           // Create the forms needed in the table
4267           $table_data .= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
4268
4269           // Presidency ID
4270           $table_data .= '<input type=hidden name="eqpres['.$id.'][id]" value="'.$id.'">';
4271
4272           // Elder
4273           if($eqpresidency == 0) {
4274             $table_data.= '<td align=center><select name="eqpres['.$id.'][elder]">';
4275             $table_data.= '<option value=0></option>';
4276             for ($j=0; $j < count($elder_id); $j++) {
4277               $tmp_id = $elder_id[$j];
4278               $name = $elder_name[$j];
4279               if($elder_id[$j] == $elder) { $eldername = $name; $selected = 'selected="selected"'; } else { $selected = ''; }
4280               $table_data.= '<option value='.$tmp_id.' '.$selected.'>'.$name.'</option>';
4281             }
4282             $table_data.='</select></td>';
4283             $table_data.='<input type=hidden name="eqpres['.$id.'][name]" value="'.$eldername.'">';
4284           } else {
4285             $table_data.= '<td align=left><input type=text size="20" name="eqpresname" value="EQ Presidency"></td>';
4286             $table_data.= '<input type=hidden name="eqpres['.$id.'][name]" value="EQ Presidency">';
4287           }
4288
4289           // Email Address
4290           $table_data .= '<td><input type="text" size="50" name="eqpres['.$id.'][email]" value="'.$email.'"></td>';
4291
4292           // District
4293           $table_data.= '<td align=center><select name="eqpres['.$id.'][district]">';
4294           $table_data.= '<option value=0></option>';
4295           for ($j=0; $j <= $this->max_num_districts; $j++) {
4296             if($district == $j) { $selected = 'selected="selected"'; } else { $selected = ''; }
4297             $table_data.= '<option value='.$j.' '.$selected.'>'.$j.'</option>';
4298           }
4299           $table_data.='</select></td>';
4300
4301           // President
4302           $table_data.= '<td align=center><select name="eqpres['.$id.'][president]">';
4303           if($president == 1) { $table_data .= '<option value=0>0</option><option value=1 selected="selected">1</option>'; }
4304           else { $table_data .= '<option value=0 selected="selected">0</option><option value=1>1</option>'; }
4305           $table_data.='</select></td>';
4306
4307           // Counselor
4308           $table_data.= '<td align=center><select name="eqpres['.$id.'][counselor]">';
4309           if($counselor == 1) { $table_data .= '<option value=0>0</option><option value=1 selected="selected">1</option>'; }
4310           else { $table_data .= '<option value=0 selected="selected">0</option><option value=1>1</option>'; }
4311           $table_data.='</select></td>';
4312
4313           // Secretary
4314           $table_data.= '<td align=center><select name="eqpres['.$id.'][secretary]">';
4315           if($secretary == 1) { $table_data .= '<option value=0>0</option><option value=1 selected="selected">1</option>'; }
4316           else { $table_data .= '<option value=0 selected="selected">0</option><option value=1>1</option>'; }
4317           $table_data.='</select></td>';
4318
4319           // EQ Presidency
4320           $table_data.= '<td align=center><select name="eqpres['.$id.'][eqpresidency]">';
4321           if($eqpresidency == 1) { $table_data .= '<option value=0>0</option><option value=1 selected="selected">1</option>'; }
4322           else { $table_data .= '<option value=0 selected="selected">0</option><option value=1>1</option>'; }
4323           $table_data.='</select></td>';
4324
4325           // End of ROW
4326           $table_data .= "</tr>\n";
4327           $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
4328           $this->t->set_var('tr_color',$tr_color);
4329         }
4330
4331       // Now create 1 blank row to always have a line available to add a new elder with
4332       $id = $this->max_presidency_members;
4333       $table_data .= "<tr bgcolor=". $this->t->get_var('tr_color') .">";
4334       // Presidency ID
4335       $table_data .= '<input type=hidden name="eqpres['.$id.'][id]" value="'.$id.'">';
4336       // Elder
4337       $table_data.= '<td align=center><select name="eqpres['.$id.'][elder]">';
4338       $table_data.= '<option value=0></option>';
4339       for ($j=0; $j < count($elder_id); $j++) {
4340         $tmp_id = $elder_id[$j];
4341         $name = $elder_name[$j];
4342         $table_data.= '<option value='.$tmp_id.'>'.$name.'</option>';
4343       }
4344       $table_data.='</select></td>';
4345       $table_data.='<input type=hidden name="eqpres['.$id.'][name]" value="">';
4346       // Email Address
4347       $table_data.='<td><input type="text" size="50" name="eqpres['.$id.'][email]" value=""></td>';
4348       // District
4349       $table_data.= '<td align=center><select name="eqpres['.$id.'][district]">';
4350       $table_data.= '<option value=0></option>';
4351       for ($j=0; $j <= $this->max_num_districts; $j++) {
4352         if($j == 0) { $selected = 'selected="selected"'; } else { $selected = ''; }
4353         $table_data.= '<option value='.$j.' '.$selected.'>'.$j.'</option>';
4354       }
4355       $table_data.='</select></td>';
4356       // President
4357       $table_data.= '<td align=center><select name="eqpres['.$id.'][president]">';
4358       $table_data.= '<option value=0>0</option><option value=1>1</option>';
4359       $table_data.='</select></td>';
4360       // Counselor
4361       $table_data.= '<td align=center><select name="eqpres['.$id.'][counselor]">';
4362       $table_data.= '<option value=0>0</option><option value=1>1</option>';
4363       $table_data.='</select></td>';
4364       // Secretary
4365       $table_data.= '<td align=center><select name="eqpres['.$id.'][secretary]">';
4366       $table_data.= '<option value=0>0</option><option value=1>1</option>';
4367       $table_data.='</select></td>';
4368       // EQ Presidency
4369       $table_data.= '<td align=center><select name="eqpres['.$id.'][eqpresidency]">';
4370       $table_data.= '<option value=0>0</option><option value=1>1</option>';
4371       $table_data.='</select></td>';
4372       // End of ROW
4373       $table_data .= "</tr>\n";
4374       $tr_color = $this->nextmatchs->alternate_row_color($tr_color);
4375       $this->t->set_var('tr_color',$tr_color);
4376
4377       $this->t->set_var('header_row',$header_row);
4378       $this->t->set_var('table_data',$table_data);
4379       $this->t->pfp('presidencyhandle','presidency',True);
4380
4381       $this->save_sessiondata();
4382     }
4383
4384   function email_appt($appointment)
4385     {
4386       //print "Emailing notification of appointment: $appointment <br>";
4387
4388       $sql = "SELECT * FROM eq_appointment where appointment='$appointment'";
4389       $this->db->query($sql,__LINE__,__FILE__);
4390
4391       while ($this->db->next_record())
4392         {
4393           $appointment = $this->db->f('appointment');
4394           $presidency = $this->db->f('presidency');
4395           $location = $this->db->f('location');
4396           $interviewer = "";
4397           $email = "";
4398           $elder = $this->db->f('elder');
4399           $elder_name = "";
4400           $family = $this->db->f('family');
4401           $family_name = "";
4402           $appt_name = "";
4403           $phone = "";
4404           $uid = $this->db->f('uid');
4405
4406           // Extract the year, month, day, hours, minutes, seconds from the appointment time
4407           $appt_date = $this->db->f('date');
4408           $date_array = explode("-",$appt_date);
4409           $year = $date_array[0]; $month = $date_array[1]; $day = $date_array[2];
4410           $appt_time = $this->db->f('time');
4411           $time_array = explode(":",$appt_time);
4412           $hour = $time_array[0]; $minute = $time_array[1]; $seconds = $time_array[2];
4413
4414           // Format the appointment time into an iCal UTC equivalent
4415           $dtstamp = gmdate("Ymd"."\T"."His"."\Z");
4416           $dtstart = gmdate("Ymd"."\T"."His"."\Z", mktime($hour,$minute,$seconds,$month,$day,$year));
4417           $dtstartstr = date("l, F d, o g:i A", mktime($hour,$minute,$seconds,$month,$day,$year));
4418
4419           // Set the email address of the person making the appointment
4420           $from = $GLOBALS['phpgw_info']['user']['fullname'] . "<" .
4421                   $GLOBALS['phpgw_info']['user']['preferences']['email']['address'] . ">";
4422
4423           $sql = "SELECT * FROM eq_presidency where presidency='$presidency'";
4424           $this->db2->query($sql,__LINE__,__FILE__);
4425           if($this->db2->next_record()) {
4426             $email = $this->db2->f('email');
4427             $interviewer = $this->db2->f('name');
4428           }
4429
4430           if($elder > 0) {
4431             $sql = "SELECT * FROM eq_elder where elder='$elder'";
4432             $this->db2->query($sql,__LINE__,__FILE__);
4433             if($this->db2->next_record()) {
4434               $elder_name = $this->db2->f('name');
4435               $phone = $this->db2->f('phone');
4436               $appt_name = $elder_name . " Interview";
4437               $duration = $this->default_ppi_appt_duration * 60;
4438             }
4439           }
4440
4441           if($family > 0) {
4442             $sql = "SELECT * FROM eq_family where family='$family'";
4443             $this->db2->query($sql,__LINE__,__FILE__);
4444             if($this->db2->next_record()) {
4445               $family_name = $this->db2->f('name');
4446               $phone = $this->db2->f('phone');
4447               $elder_id = $this->db2->f('elder_id');
4448               $appt_name = $family_name . " Family Visit";
4449               $sql = "SELECT * FROM eq_elder where elder='$elder_id'";
4450               $this->db3->query($sql,__LINE__,__FILE__);
4451               if($this->db3->next_record()) {
4452                 $phone = $this->db3->f('phone');
4453               }
4454               $duration = $this->default_visit_appt_duration * 60;
4455             }
4456           }
4457
4458           $dtend = gmdate("Ymd"."\T"."His"."\Z", mktime($hour,$minute,$seconds+$duration,$month,$day,$year));
4459           $dtendstr = date("g:i A", mktime($hour,$minute,$seconds+$duration,$month,$day,$year));
4460           $date = $dtstartstr . "-" . $dtendstr;
4461           $description = "$appt_name : $phone";
4462
4463           if(($uid == 0) && ($appt_name != "")) {
4464             // Create a new calendar item for this appointment, since this must be the first time we
4465             // are sending it out.
4466             print "Sent new appointment to " . $interviewer . " at " . $email . " for " . $appt_name . "<br>";
4467             $uid = rand() . rand(); // Generate a random identifier for this appointment
4468             $subject = "Created: $appt_name";
4469
4470             $this->db->query("UPDATE eq_appointment set" .
4471                              " uid=" . $uid .
4472                              " WHERE appointment=" . $appointment,__LINE__,__FILE__);
4473
4474             $action = "PUBLISH";
4475             $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
4476                                   $dtend, $date, $location, $appt_name, $description, $uid);
4477
4478           } else if(($uid != 0) && ($appt_name == "")) {
4479             // Remove the calendar item for this appointment since it has already been sent
4480             // and there is no name we have changed it to.
4481             print "Sent deleted appointment to " . $interviewer . " at " . $email . " for " . $appt_date . " " . $appt_time . "<br>";
4482             $subject = "Canceled: $appt_date $appt_time";
4483
4484             $this->db->query("UPDATE eq_appointment set" .
4485                              " uid=0" .
4486                              " WHERE appointment=" . $appointment,__LINE__,__FILE__);
4487
4488             $action = "CANCEL";
4489             $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
4490                                   $dtend, $date, $location, $subject, $subject, $uid);
4491
4492           } else if($uid != 0) {
4493             // Update the existing appointment since we have changed it
4494             print "Sent updated appointment to " . $interviewer . " at " . $email . " for " . $appt_name . "<br>";
4495
4496             $subject = "Canceled: $appt_date $appt_time";
4497             $action = "CANCEL";
4498             $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
4499                                   $dtend, $date, $location, $subject, $subject, $uid);
4500
4501             $uid = rand() . rand(); // Generate a random identifier for this appointment
4502             $this->db->query("UPDATE eq_appointment set" .
4503                              " uid=" . $uid .
4504                              " WHERE appointment=" . $appointment,__LINE__,__FILE__);
4505
4506             $subject = "Updated: $appt_name";
4507             $action = "PUBLISH";
4508             $this->send_ical_appt($action, $email, $from, $subject, $dtstamp, $dtstart,
4509                                   $dtend, $date, $location, $appt_name, $description, $uid);
4510           }
4511
4512         }
4513
4514       return true;
4515     }
4516
4517   function send_ical_appt($action, $to, $from, $subject, $dtstamp, $dtstart, $dtend, $date, $location, $summary, $description, $uid)
4518     {
4519       // Initialize our local variables
4520       $boundary = "=MIME_APPOINTMENT_BOUNDARY";
4521       $message = "";
4522       $headers = "";
4523
4524       // Form the headers for the email message
4525       $headers.="X-Mailer: PHP/" . phpversion() . "\n";
4526       $headers.="Mime-Version: 1.0\n";
4527       $headers.="Content-Type: multipart/mixed; boundary=\"$boundary\"\n";
4528       $headers.="Content-Disposition: inline\n";
4529       $headers.="Reply-To: $from\n";
4530       $headers.="From: $from\n";
4531
4532       // Print the plaintext version of the appointment
4533       $message.="--$boundary\n";
4534       $message.="Content-Type: text/plain; charset=us-ascii\n";
4535       $message.="Content-Disposition: inline\n";
4536       $message.="\n";
4537       $message.="What: $description\n";
4538       $message.="When: $date\n";
4539       $message.="Where: $location\n";
4540       $message.="\n";
4541
4542       // Print the .ics attachment version of the appointment
4543       $message.="--$boundary\n";
4544       $message.="Content-Type: text/calendar; charset=us-ascii\n";
4545       $message.="Content-Disposition: attachment; filename=\"appointment.ics\"\n";
4546       $message.="\n";
4547       $message.="BEGIN:VCALENDAR" . "\n";
4548       $message.="VERSION:2.0" . "\n";
4549       $message.="PRODID:-//Microsoft Corporation//Outlook 11.0 MIMEDIR//EN" . "\n";
4550       $message.="METHOD:$action" . "\n";
4551       $message.="BEGIN:VEVENT" . "\n";
4552       $message.="ORGANIZER:MAILTO:$from". "\n";
4553       $message.="DTSTAMP:$dtstamp" . "\n";
4554       $message.="DTSTART:$dtstart" . "\n";
4555       $message.="DTEND:$dtend" . "\n";
4556       $message.="SUMMARY:$summary" . "\n";
4557       $message.="DESCRIPTION:$description" . "\n";
4558       $message.="LOCATION:$location" . "\n";
4559       $message.="UID:$uid" ."\n";
4560       $message.="TRANSP:OPAQUE" . "\n";
4561       $message.="SEQUENCE:0" . "\n";
4562       $message.="CLASS:PUBLIC" . "\n";
4563       $message.="END:VEVENT" . "\n";
4564       $message.="END:VCALENDAR" . "\n";
4565
4566       // Complete the message
4567       $message.="--$boundary\n";
4568
4569       // Send the message
4570       mail($to, $subject, $message, $headers);
4571
4572     }
4573
4574   function get_time_selection_form($hour, $minute, $pm, $presidency, $appointment)
4575     {
4576       $form_data = "";
4577       $blank = 0;
4578
4579       if($hour == 0) { $blank = 1; }
4580
4581       if($this->time_drop_down_lists == 1) {
4582         // Create drop down lists to get the time
4583         $form_data.= '<select name=sched['.$presidency.']['.$appointment.'][hour]>';
4584         if($blank == 1) { $form_data.= '<option value=""></option>'; }
4585         foreach(range(1,12) as $num) {
4586           if($hour == $num) { $selected = 'selected="selected"'; } else { $selected = ''; }
4587           $form_data.= '<option value='.$num.' '.$selected.'>'.$num.'</option>';
4588         }
4589         $form_data.= '</select>';
4590         $form_data.= '&nbsp;:&nbsp;';
4591         $form_data.= '<select name=sched['.$presidency.']['.$appointment.'][minute]>';
4592         if($blank == 1) { $form_data.= '<option value=""></option>'; }
4593         $num = 0;
4594         while($num < 60) {
4595           if($num < 10) { $num = "0" . "$num"; }
4596           if($minute == $num) { $selected = 'selected="selected"'; } else { $selected = ''; }
4597           if($blank == 1) { $selected = ""; }
4598           $form_data.= '<option value='.$num.' '.$selected.'>'.$num.'</option>';
4599           $num = $num + $this->time_drop_down_list_inc;
4600         }
4601         $form_data.= '</select>';
4602       } else {
4603         // Use free form text fields to get the time
4604         if($blank == 1) { $hour = ""; $minute = ""; $ampm = ""; }
4605         $form_data.= '<input type=text size=2 name=sched['.$presidency.']['.$appointment.'][hour] value='.$hour.'>';
4606         $form_data.= ':';
4607         $form_data.= '<input type=text size=2 name=sched['.$presidency.']['.$appointment.'][minute] value='.$minute.'>';
4608         $form_data.= '&nbsp;';
4609       }
4610       // Always use a drop-down select form for am/pm
4611       $form_data.= '<select name=sched['.$presidency.']['.$appointment.'][pm]>';
4612       if($blank == 0) {
4613         if($pm == 0) { $form_data.= '<option value=0 selected>am</option>'; $form_data.= '<option value=1>pm</option>'; }
4614         if($pm == 1) { $form_data.= '<option value=0>am</option>'; $form_data.= '<option value=1 selected>pm</option>'; }
4615       } else {
4616         $form_data.= '<option value=""></option>';
4617         $form_data.= '<option value=0>am</option>';
4618         $form_data.= '<option value=1>pm</option>';
4619       }
4620       $form_data.= '</select>';
4621
4622       return $form_data;
4623     }
4624 }
4625
4626 ?>