function loadStatsHome()
 {
     // set the pageCallBack to be without any additional parameters
     // (an AdminBox needs this so Language Switching on a page doesn't
     // pass a previous operations)
     $parameters = array('WEEK_ID' => $this->WEEK_ID);
     //[RAD_CALLBACK_PARAMS]
     $pageCallBack = $this->getCallBack(modulecim_stats::PAGE_STATSHOME, $this->sortBy, $parameters);
     $this->setPageCallBack($pageCallBack);
     $this->pageDisplay = new page_StatsHome($this->moduleRootPath, $this->viewer);
     $parameters = array();
     $viewerID = $this->viewer->getViewerID();
     // TODO make an object to do this work
     $sql = "select * from ( ( cim_hrdb_access inner join cim_hrdb_person on cim_hrdb_access.person_id=cim_hrdb_person.person_id) inner join cim_hrdb_staff on cim_hrdb_staff.person_id=cim_hrdb_person.person_id ) where cim_hrdb_access.viewer_id = " . $viewerID . " limit 1";
     $db = new Database_Site();
     $db->connectToDB(SITE_DB_NAME, SITE_DB_PATH, SITE_DB_USER, SITE_DB_PWORD);
     $db->runSQL($sql);
     // if row retrieved ...
     $staffID = -1;
     if ($row = $db->retrieveRow()) {
         $staffID = $row['staff_id'];
     }
     $parameters['STAFF_ID'] = $staffID;
     // echo print_r($parameters,true);
     $permManager = new PermissionManager($viewerID);
     $isNational = $permManager->isNational();
     // echo 'isNational['.$isNational.']<br/>';
     $isRegional = $permManager->isRegional();
     // echo 'isRegional['.$isRegional.']<br/>';
     $isCD = $permManager->isCD();
     // echo 'isCD['.$isCD.']<br/>';
     $isStatsCoordinator = $permManager->isStatsCoordinator();
     // echo 'isStatsCoordinator['.$isStatsCoordinator.']<br/>';
     $isAllStaff = $permManager->isAllStaff();
     // echo 'isAllStaff['.$isAllStaff.']<br/>';
     $links = array();
     if ($isAllStaff) {
         // GROUP 1: ALL STAFF
         // All staff can access this link
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_STAFFWEEKLYREPORT, '', $parameters);
         $links['[submitWeeklyStats]'] = $requestLink;
         // removed by RM on June 4, 2009 as we are no longer collecting these measurements
         // $requestLink = $this->getCallBack( modulecim_stats::PAGE_STAFFADDITIONALWEEKLYSTATS, '' , $parameters);
         // $links[ '[submitMoreWeeklyStats]' ] = $requestLink;
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_SELECTPRCSEMESTERCAMPUS, '', $parameters);
         $links['[indicatedDecisions]'] = $requestLink;
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_STAFFSEMESTERREPORT, '', $parameters);
         $links['[semesterGlance]'] = $requestLink;
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_CAMPUSYEARSUMMARY, '', $parameters);
         $links['[yearSummary]'] = $requestLink;
     }
     $coordinatorLinks = array();
     if ($isStatsCoordinator || $isAllStaff) {
         // GROUP 2: CAMPUS STATS COORDINATORS
         // removed by RM on June 4, 2009 as we are no longer collecting these measurements
         // $requestLink = $this->getCallBack( modulecim_stats::PAGE_MORESTATS, '' , $parameters);
         // $coordinatorLinks[ '[campusWeeklyStats]' ] = $requestLink;
         // removed by RM on June 4, 2009 as we are no longer collecting these measurements
         // $requestLink = $this->getCallBack( modulecim_stats::PAGE_CAMPUSWEEKLYSTATSREPORT, '' , $parameters);
         // $coordinatorLinks[ '[campusWeeklyStatsReport]' ] = $requestLink;
         // removed by RM on June 4, 2009 as we are no longer collecting these measurements
         // $requestLink = $this->getCallBack( modulecim_stats::PAGE_SEMESTERREPORT, '' , $parameters);
         // $coordinatorLinks[ '[submitSemesterStats]' ] = $requestLink;
     }
     $cdLinks = array();
     if ($isCD) {
         // GROUP 3: CAMPUS DIRECTORS
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_STAFFSEMESTERREPORT, '', $parameters);
         $cdLinks['[semesterGlance]'] = $requestLink;
         $requestLink = 'http://dev.intranet.campusforchrist.org/modules/will/stats.php" target="_blank';
         $cdLinks['[monthlyReport]'] = $requestLink;
     }
     $rtLinks = array();
     if ($isRegional) {
         // GROUP 4: REGIONAL TEAM
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_REGIONALSEMESTERREPORT, '', $parameters);
         $rtLinks['[regionalPersonalMin]'] = $requestLink;
         $requestLink = 'http://dev.intranet.campusforchrist.org/modules/will/regionalstats.php" target="_blank';
         $rtLinks['[regionalReport]'] = $requestLink;
         $requestLink = 'http://dev.intranet.campusforchrist.org/modules/will/weeklystats.php" target="_blank';
         $rtLinks['[regionalReportWeek]'] = $requestLink;
     }
     $ntLinks = array();
     if ($isNational) {
         // GROUP 5: NATIONAL TEAM
         // echo 'Is NATIONAL<br/>';
         // Add these two links later in special admin section
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_PRCMETHOD, '', $parameters);
         // $ntLinks[ '[prcMethod]' ] = $requestLink;
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_EXPOSURETYPES, '', $parameters);
         // $ntLinks[ '[exposureTypes]' ] = $requestLink;
         $requestLink = $this->getCallBack(modulecim_stats::PAGE_PRC_REPORTBYCAMPUS, '', $parameters);
         $ntLinks['[prcReportByCampus]'] = $requestLink;
         $requestLink = 'http://dev.intranet.campusforchrist.org/modules/will/idstats.php" target="_blank';
         $ntLinks['[prcIDStats]'] = $requestLink;
     }
     /*[RAD_LINK_INSERT]*/
     $this->pageDisplay->setMyLinks($links, $coordinatorLinks, $cdLinks, $rtLinks, $ntLinks);
     $this->pageDisplay->setPerms($isNational, $isRegional, $isCD, $isStatsCoordinator, $isAllStaff);
 }