예제 #1
0
 function _consult_ccdev()
 {
     //
     // main submodule for ccdev consults
     //
     // always check dependencies
     if ($exitinfo = $this->missing_dependencies('ccdev')) {
         return print $exitinfo;
     }
     if (func_num_args() > 0) {
         $arg_list = func_get_args();
         $menu_id = $arg_list[0];
         $post_vars = $arg_list[1];
         $get_vars = $arg_list[2];
         $validuser = $arg_list[3];
         $isadmin = $arg_list[4];
         //print_r($arg_list);
     }
     $c = new ccdev();
     //$imci = new imci;
     mysql_query("ALTER TABLE `m_patient_ccdev` DROP PRIMARY KEY, ADD PRIMARY KEY(`ccdev_id`)");
     $c->ccdev_menu($menu_id, $post_vars, $get_vars);
     if ($post_vars["submitccdev"]) {
         $c->process_ccdev($menu_id, $post_vars, $get_vars);
     }
     $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
     switch ($get_vars["ccdev"]) {
         case "VISIT1":
             if (!$c->registry_record_exists($patient_id)) {
                 $c->form_ccdev_firstvisit($menu_id, $post_vars, $get_vars, $validuser, $isadmin);
             } else {
                 $c->display_ccdev_firstvisit($menu_id, $post_vars, $get_vars, $validuser, $isadmin);
                 if ($post_vars["ccdev_id"]) {
                     $c->form_ccdev_firstvisit($menu_id, $post_vars, $get_vars, $validuser, $isadmin);
                 }
                 $c->display_form_low_birth_wt($menu_id, $post_vars, $get_vars, $validuser, $isadmin);
             }
             break;
         case "SIBLINGS":
             $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
             $get_vars["family_id"] = family::search_family($patient_id);
             ccdev::form_family_members($menu_id, $post_vars, $get_vars);
             break;
         case "IMCI":
             break;
         case "BFED":
             $c->form_ccdev_breastfeed($menu_id, $post_vars, $get_vars, $validuser, $isadmin);
             break;
         case "SVC":
         default:
             $c->form_ccdev_services($menu_id, $post_vars, $get_vars, $validuser, $isadmin);
             $c->form_ccdev_remarks($menu_id, $post_vars, $get_vars, $validuser, $isadmin);
             break;
     }
 }