function form_mc_services() {
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);
}
// get most recent pregnancy id
$patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
$mc_id = mc::registry_record_exists($patient_id);
if ($mc_id) {
print "<table width='300'>";
print "<form action = '".$_SERVER["SELF"]."?page=".$get_vars["page"]."&menu_id=$menu_id&consult_id=".$get_vars["consult_id"]."&ptmenu=".$get_vars["ptmenu"]."&module=".$get_vars["module"]."&mc=SVC' name='form_mc_services' method='post'>";
print "<tr valign='top'><td>";
print "<b>".FTITLE_MC_SERVICES."</b><br/><br/>";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>REGISTRY INFORMATION</span><br/>";
print "<span class='tinylight'>";
print "REGISTRY ID: <font color='red'>".module::pad_zero($mc_id, 7)."</font><br/>";
print "</span>";
print "</td></tr>";
print "<tr valign='top'><td>";
// SERVICE
print "<table bgcolor='#FFFF66' width='300' cellpadding='3'>";
print "<tr><td>";
print "<span class='boxtitle'>".LBL_VISIT_TYPE."</span><br> ";
print "<input type='radio' name='visit_type' value='HOME'/> Home ";
print "<input type='radio' name='visit_type' value='CLINIC'/> Clinic ";
print "</td></tr>";
print "<tr><td>";
print "<span class='boxtitle'>".LBL_SERVICES."</span><br> ";
print mc::checkbox_services();
print "</td></tr>";
print "</table>";
print "</td></tr>";
print "<tr valign='top'><td>";
// VACCINE DATA
print "<table bgcolor='#CCCCFF' width='300' cellpadding='3'><tr><td>";
print "<span class='boxtitle'>".LBL_VACCINATIONS."</span><br> ";
print mc::checkbox_vaccines($patient_id);
print "</td></tr>";
print "</table>";
print "</td></tr>";
print "<tr><td><br/>";
if ($_SESSION["priv_add"]) {
print "<input type='hidden' name='mc_id' value='$mc_id'>";
print "<input type='submit' value = 'Update Services' class='textbox' name='submitmc' style='border: 1px solid #000000'> ";
}
print "</td></tr>";
print "</form>";
print "</table><br>";
} else {
print "<font color='red'>No valid Registry ID. Please create a new one.</font>";
}
}
