3 include_once("../../globals.php");
4 include_once("$srcdir/api.inc");
5 include_once("$srcdir/forms.inc");
6 foreach ($_POST as $k => $var) {
7 $_POST[$k] = mysql_escape_string($var);
11 $encounter = date("Ymd");
12 if ($_GET["mode"] == "new"){
13 $newid = formSubmit("form_assessment_intake", $_POST, $_GET["id"], $userauthorized);
14 print 'formSubmitt'; /*debugging */
15 addForm($encounter, "Assessment and Intake", $newid, "assessment_intake", $pid, $userauthorized);
16 }elseif ($_GET["mode"] == "update") {
17 sqlInsert("update form_assessment_intake set pid = {$_SESSION["pid
"]},groupname='".$_SESSION["authProvider"]."',user='".$_SESSION["authUser"]."',authorized=$userauthorized,activity=1, date = NOW(),
18 dcn='".$_POST["dcn"]."',
19 location='".$_POST["location"]."',
20 time_in='".$_POST["time_in"]."',
21 time_out='".$_POST["time_out"]."',
22 referral_source='".$_POST["referral_source"]."',
23 new_client_eval='".$_POST["new_client_eval"]."',
24 readmission='".$_POST["readmission"]."',
25 consultation='".$_POST["consultation"]."',
26 copy_sent_to='".$_POST["copy_sent_to"]."',
27 reason_why='".$_POST["reason_why"]."',
28 behavior_led_to='".$_POST["behavior_led_to"]."',
29 school_work='".$_POST["school_work"]."',
30 personal_relationships='".$_POST["personal_relationships"]."',
31 fatherc='".$_POST["fatherc"]."',
32 motherc='".$_POST["motherc"]."',
33 father_involved='".$_POST["father_involved"]."',
34 mother_involved='".$_POST["mother_involved"]."',
35 number_children='".$_POST["number_children"]."',
36 siblings='".$_POST["siblings"]."',
37 other_relationships='".$_POST["other_relationships"]."',
38 social_relationships='".$_POST["social_relationships"]."',
39 current_symptoms='".$_POST["current_symptoms"]."',
40 personal_strengths='".$_POST["personal_strengths"]."',
41 spiritual='".$_POST["spiritual"]."',
42 legal='".$_POST["legal"]."',
43 prior_history='".$_POST["prior_history"]."',
44 number_admitt='".$_POST["number_admitt"]."',
45 type_admitt='".$_POST["type_admitt"]."',
46 substance_use='".$_POST["substance_use"]."',
47 substance_abuse='".$_POST["substance_abuse"]."',
48 axis1='".$_POST["axis1"]."',
49 axis2='".$_POST["axis2"]."',
50 axis3='".$_POST["axis3"]."',
51 allergies='".$_POST["allergies"]."',
52 ax4_prob_support_group='".$_POST["ax4_prob_support_group"]."',
53 ax4_prob_soc_env='".$_POST["ax4_prob_soc_env"]."',
54 ax4_educational_prob='".$_POST["ax4_educational_prob"]."',
55 ax4_occ_prob='".$_POST["ax4_occ_prob"]."',
56 ax4_housing='".$_POST["ax4_housing"]."',
57 ax4_economic='".$_POST["ax4_economic"]."',
58 ax4_access_hc='".$_POST["ax4_access_hc"]."',
59 ax4_legal='".$_POST["ax4_legal"]."',
60 ax4_other_cb='".$_POST["ax4_other_cb"]."',
61 ax4_other='".$_POST["ax4_other"]."',
62 ax5_current='".$_POST["ax5_current"]."',
63 ax5_past='".$_POST["ax5_past"]."',
64 risk_suicide_na='".$_POST["risk_suicide_na"]."',
65 risk_suicide_nk='".$_POST["risk_suicide_nk"]."',
66 risk_suicide_io='".$_POST["risk_suicide_io"]."',
67 risk_suicide_plan='".$_POST["risk_suicide_plan"]."',
68 risk_suicide_iwom='".$_POST["risk_suicide_iwom"]."',
69 risk_suicide_iwm='".$_POST["risk_suicide_iwm"]."',
70 risk_homocide_na='".$_POST["risk_homocide_na"]."',
71 risk_homocide_nk='".$_POST["risk_homocide_nk"]."',
72 risk_homocide_io='".$_POST["risk_homocide_io"]."',
73 risk_homocide_plan='".$_POST["risk_homocide_plan"]."',
74 risk_homocide_iwom='".$_POST["risk_homocide_iwom"]."',
75 risk_homocide_iwm='".$_POST["risk_homocide_iwm"]."',
76 risk_compliance_na='".$_POST["risk_compliance_na"]."',
77 risk_compliance_fc='".$_POST["risk_compliance_fc"]."',
78 risk_compliance_mc='".$_POST["risk_compliance_mc"]."',
79 risk_compliance_moc='".$_POST["risk_compliance_moc"]."',
80 risk_compliance_var='".$_POST["risk_compliance_var"]."',
81 risk_compliance_no='".$_POST["risk_compliance_no"]."',
82 risk_substance_na ='".$_POST["risk_substance_na"]."',
83 risk_substance_none='".$_POST["risk_substance_none"]."',
84 risk_normal_use='".$_POST["risk_normal_use"]."',
85 risk_substance_ou='".$_POST["risk_substance_ou"]."',
86 risk_substance_dp='".$_POST["risk_substance_dp"]."',
87 risk_substance_ur='".$_POST["risk_substance_ur"]."',
88 risk_substance_ab='".$_POST["risk_substance_ab"]."',
89 risk_sexual_na='".$_POST["risk_sexual_na"]."',
90 risk_sexual_y='".$_POST["risk_sexual_y"]."',
91 risk_sexual_n='".$_POST["risk_sexual_n"]."',
92 risk_sexual_ry='".$_POST["risk_sexual_ry"]."',
93 risk_sexual_rn='".$_POST["risk_sexual_rn"]."',
94 risk_sexual_cv='".$_POST["risk_sexual_cv"]."',
95 risk_sexual_cp='".$_POST["risk_sexual_cp"]."',
96 risk_sexual_b='".$_POST["risk_sexual_b"]."',
97 risk_sexual_nf='".$_POST["risk_sexual_nf"]."',
98 risk_neglect_na='".$_POST["risk_neglect_na"]."',
99 risk_neglect_y='".$_POST["risk_neglect_y"]."',
100 risk_neglect_n='".$_POST["risk_neglect_n"]."',
101 risk_neglect_ry='".$_POST["risk_neglect_ry"]."',
102 risk_neglect_rn='".$_POST["risk_neglect_rn"]."',
103 risk_neglect_cv='".$_POST["risk_neglect_cv"]."',
104 risk_neglect_cp='".$_POST["risk_neglect_cp"]."',
105 risk_neglect_cb='".$_POST["risk_neglect_cb"]."',
106 risk_neglect_cn='".$_POST["risk_neglect_cn"]."',
107 risk_exists_c='".$_POST["risk_exists_c"]."',
108 risk_exists_cn='".$_POST["risk_exists_cn"]."',
109 risk_exists_s='".$_POST["risk_exists_s"]."',
110 risk_exists_o='".$_POST["risk_exists_o"]."',
111 risk_exists_b='".$_POST["risk_exists_b"]."',
112 risk_community='".$_POST["risk_community"]."',
113 recommendations_psy_i='".$_POST["recommendations_psy_i"]."',
114 recommendations_psy_f='".$_POST["recommendations_psy_f"]."',
115 recommendations_psy_m='".$_POST["recommendations_psy_m"]."',
116 recommendations_psy_o='".$_POST["recommendations_psy_o"]."',
117 recommendations_psy_notes='".$_POST["recommendations_psy_notes"]."',
118 refer_date='".$_POST["refer_date"]."',
119 parent ='".$_POST["parent"]."',
120 supervision_level='".$_POST["supervision_level"]."',
121 supervision_type='".$_POST["supervision_type"]."',
122 supervision_res='".$_POST["supervision_res"]."',
123 supervision_services='".$_POST["supervision_services"]."',
124 support_ps='".$_POST["support_ps"]."',
125 support_cs='".$_POST["support_cs"]."',
126 support_sm='".$_POST["support_sm"]."',
127 support_a='".$_POST["support_a"]."',
128 support_o='".$_POST["support_o"]."',
129 support_ol='".$_POST["support_ol"]."',
130 legal_op='".$_POST["legal_op"]."',
131 legal_so='".$_POST["legal_so"]."',
132 legal_sa='".$_POST["legal_sa"]."',
133 legal_ve='".$_POST["legal_ve"]."',
134 legal_ad='".$_POST["legal_ad"]."',
135 legal_adl='".$_POST["legal_adl"]."',
136 legal_o='".$_POST["legal_o"]."',
137 legal_ol='".$_POST["legal_ol"]."',
138 referrals_pepm='".$_POST["referrals_pepm"]."',
139 referrals_mc='".$_POST["referrals_mc"]."',
140 referrals_vt='".$_POST["referrals_vt"]."',
141 referrals_o='".$_POST["referrals_o"]."',
142 referrals_cu='".$_POST["referrals_cu"]."',
143 referrals_docs='".$_POST["referrals_docs"]."',
144 referrals_or='".$_POST["referrals_or"]."' where id=$id");
146 $_SESSION["encounter"] = $encounter;
147 formHeader("Redirecting....");
