2 ////////////////////////////////////////////////////////////////////
3 // Form: brief_aan_verwijzer
4 // Package: letter to verwijzer - Dutch specific form
5 // Created by: Larry Lart
6 // Version: 1.0 - 30-03-2008
7 ////////////////////////////////////////////////////////////////////
9 include_once("../../globals.php");
10 include_once("$srcdir/api.inc");
11 include_once("$srcdir/patient.inc");
13 formHeader("Form: brief_aan_verwijzer");
14 $returnurl = $GLOBALS['concurrent_layout'] ?
'encounter_top.php' : 'patient_encounter.php';
16 $result = getPatientData($pid, "fname,lname,pid,pubpid,phone_home,sex,pharmacy_id,DOB,DATE_FORMAT(DOB,'%Y%m%d') as DOB_YMD");
17 $provider_results = sqlQuery("select * from users where username='" . $_SESSION{"authUser"} . "'");
19 ////////////////////////////////////////////////////////////////////
20 // Function: getPatientDateOfLastEncounter
21 function getPatientDateOfLastEncounter( $nPid )
23 // get date of last encounter no codes
24 $strEventDate = sqlQuery("SELECT MAX(pc_eventDate) AS max
25 FROM openemr_postcalendar_events
27 AND pc_apptstatus = '@'
28 AND pc_eventDate >= '2007-01-01'");
30 // now check if there was a previous encounter
31 if( $strEventDate['max'] != "" )
32 return( $strEventDate['max'] );
34 return( "00-00-0000" );
37 $m_strEventDate = getPatientDateOfLastEncounter( $result['pid'] );
39 // get last saved id for intakeverslag
40 $vectIntakeverslagQuery = sqlQuery( "SELECT id FROM form_intakeverslag
41 WHERE pid = ".$_SESSION["pid"].
42 " AND groupname='".$_SESSION["authProvider"].
43 "' AND user='".$_SESSION["authUser"]."' AND
44 authorized=$userauthorized AND activity=1
46 ORDER by id DESC limit 1" );
48 // get autosave id for Psychiatrisch Onderzoek
49 $vectPO = sqlQuery( "SELECT id FROM form_psychiatrisch_onderzoek
50 WHERE pid = ".$_SESSION["pid"].
51 " AND groupname='".$_SESSION["authProvider"].
52 "' AND user='".$_SESSION["authUser"]."' AND
53 authorized=$userauthorized AND activity=1
55 ORDER by id DESC limit 1" );
57 // get autosave id for Psychiatrisch Onderzoek
58 $vectAutosaveBAV = sqlQuery( "SELECT id, autosave_flag, autosave_datetime FROM form_brief_aan_verwijzer
59 WHERE pid = ".$_SESSION["pid"].
60 " AND groupname='".$_SESSION["authProvider"].
61 "' AND user='".$_SESSION["authUser"]."' AND
62 authorized=$userauthorized AND activity=1
64 ORDER by id DESC limit 1" );
66 //fetch data from INTAKE-VERSLAG
67 $obj_iv = formFetch( "form_intakeverslag", $vectIntakeverslagQuery['id'] );
68 // fetch data from PSYCHIATRISCH ONDERZOEK
69 $obj_po = formFetch( "form_psychiatrisch_onderzoek", $vectPO['id'] );
70 // fetch data from brief_aan_verwijzer
71 $obj_bav = formFetch( "form_brief_aan_verwijzer", $vectAutosaveBAV['id'] );
74 // here we mix the data
76 // Introductie - local
77 if( $result['sex'] == 'Male' )
78 $strGender = 'patient';
80 $strGender = 'patiente';
81 // create the inroductie form
82 if( $obj_bav['introductie'] != '' )
83 $obj['introductie'] = $obj_bav['introductie'];
85 $obj['introductie'] = "Sinds $m_strEventDate zien wij uw bovengenoemde $strGender voor diagnostiek en behandeladvies op onze polikliniek psychiatrie. Onze dank voor uw verwijzing.";
88 // Reden van aanmelding
89 if( $obj_bav['reden_van_aanmelding'] != '' )
90 $obj['reden_van_aanmelding'] = $obj_bav['reden_van_aanmelding'];
91 elseif( $obj_iv['reden_van_aanmelding'] != '' )
92 $obj['reden_van_aanmelding'] = $obj_iv['reden_van_aanmelding'];
94 $obj['reden_van_aanmelding'] = '';
97 if( $obj_bav['anamnese'] != '' )
98 $obj['anamnese'] = $obj_bav['anamnese'];
99 elseif( $obj_iv['klachten_probleemgebieden'] != '' )
100 $obj['anamnese'] = $obj_iv['klachten_probleemgebieden'];
102 $obj['anamnese'] = '';
104 // Psychiatrisch onderzoek
105 if( $obj_bav['psychiatrisch_onderzoek'] != '' )
106 $obj['psychiatrisch_onderzoek'] = $obj_bav['psychiatrisch_onderzoek'];
107 elseif( $obj_po['psychiatrisch_onderzoek'] != '' )
108 $obj['psychiatrisch_onderzoek'] = $obj_po['psychiatrisch_onderzoek'];
110 $obj['psychiatrisch_onderzoek'] = '';
112 // Beschrijvend conclusie
113 if( $obj_bav['beschrijvend_conclusie'] != '' )
114 $obj['beschrijvend_conclusie'] = $obj_bav['beschrijvend_conclusie'];
115 elseif( $obj_po['beschrijvende_conclusie'] != '' )
116 $obj['beschrijvend_conclusie'] = $obj_po['beschrijvende_conclusie'];
118 $obj['beschrijvend_conclusie'] = '';
121 if( $obj_bav['advies_beleid'] != '' )
122 $obj['advies_beleid'] = $obj_bav['advies_beleid'];
123 elseif( $obj_po['behandelvoorstel'] != '' )
124 $obj['advies_beleid'] = $obj_po['behandelvoorstel'];
126 $obj['advies_beleid'] = '';
133 <link rel
=stylesheet href
="<?echo $css_header;?>" type
="text/css">
134 <meta http
-equiv
="Content-Type" content
="text/html; charset=utf-8" />
139 <body
<?
echo $top_bg_line;?
> topmargin
=0 rightmargin
=0 leftmargin
=2 bottommargin
=0 marginwidth
=2 marginheight
=0>
141 <style type
="text/css">@import
url(../../../library
/dynarch_calendar
.css
);</style
>
143 <style type
="text/css">
144 body
{ font
-family
:sans
-serif
; font
-size
:10pt
; font
-weight
:normal
}
145 .dehead
{ color
:#000000; font-family:sans-serif; font-size:10pt; font-weight:bold;
146 padding
-left
:3px
; padding
-right
:3px
; }
147 .detail
{ color
:#000000; font-family:sans-serif; font-size:10pt; font-weight:normal;
148 padding
-left
:3px
; padding
-right
:3px
; }
151 <style type
="text/css">@import
url(../../../library
/dynarch_calendar
.css
);</style
>
152 <script type
="text/javascript" src
="../../../library/dialog.js"></script
>
153 <script type
="text/javascript" src
="../../../library/textformat.js"></script
>
154 <script type
="text/javascript" src
="../../../library/dynarch_calendar.js"></script
>
155 <script type
="text/javascript" src
="../../../library/dynarch_calendar_en.js"></script
>
156 <script type
="text/javascript" src
="../../../library/dynarch_calendar_setup.js"></script
>
158 <script type
="text/javascript" src
="../../../library/js/jquery121.js"></script
>
162 if( $vectAutosaveBAV['id'] )
163 $brief_aan_verwijzer_id = $vectAutosaveBAV['id'];
165 $brief_aan_verwijzer_id = "0";
168 <script type
="text/javascript">
169 $
(document
).ready(function(){
173 function delete_autosave( )
175 if( confirm('Are you sure you want to completely remove this form?') )
180 url
: "../../forms/brief_aan_verwijzer/delete_autosave.php",
181 data
: "id=" +
<?php
echo $brief_aan_verwijzer_id ?
>
184 success
: function( message
)
186 $
("#timestamp").empty().append(message
);
200 var t
= setTimeout("autosave()", 20000);
202 var a_introductie
= $
("#introductie").val();
203 var a_reden_van_aanmelding
= $
("#reden_van_aanmelding").val();
204 var a_anamnese
= $
("#anamnese").val();
205 var a_psychiatrisch_onderzoek
= $
("#psychiatrisch_onderzoek").val();
206 var a_beschrijvend_conclusie
= $
("#beschrijvend_conclusie").val();
207 var a_advies_beleid
= $
("#advies_beleid").val();
209 if( a_introductie
.length
> 0 || a_reden_van_aanmelding
.length
> 0 )
214 url
: "../../forms/brief_aan_verwijzer/autosave.php",
215 data
: "id=" +
<?php
echo $brief_aan_verwijzer_id ?
> +
216 "&introductie=" + $
("#introductie").val() +
217 "&reden_van_aanmelding=" + a_reden_van_aanmelding +
218 "&anamnese=" + a_anamnese +
219 "&psychiatrisch_onderzoek=" + a_psychiatrisch_onderzoek +
220 "&beschrijvend_conclusie=" + a_beschrijvend_conclusie +
221 "&advies_beleid=" + a_advies_beleid
224 success
: function( message
)
226 $
("#timestamp").empty().append(message
);
235 <div id
="overDiv" style
="position:absolute; visibility:hidden; z-index:1000;"></div
>
236 <form method
=post action
="<?echo $rootdir;?>/forms/brief_aan_verwijzer/save.php?mode=new&saveid=<?php echo $brief_aan_verwijzer_id; ?>" name
="my_form">
237 <span
class="title">BRIEF AAN VERWIJZER
</span
><br
><br
>
239 <br
><span
class=text
>Introductie
</span
><br
>
240 <textarea cols
=80 rows
=3 wrap
=virtual name
="introductie" id
="introductie"><?php
echo stripslashes($obj{"introductie"});?
></textarea
><br
>
242 <br
><span
class=text
>Reden van aanmelding
</span
><br
>
243 <textarea cols
=80 rows
=5 wrap
=virtual name
="reden_van_aanmelding" id
="reden_van_aanmelding"><?php
echo stripslashes($obj{"reden_van_aanmelding"});?
></textarea
><br
>
244 <br
><span
class=text
>Anamnese
:</span
><br
>
245 <textarea cols
=80 rows
=5 wrap
=virtual name
="anamnese" id
="anamnese"><?php
echo stripslashes($obj{"anamnese"});?
></textarea
><br
>
246 <br
><span
class=text
>Psychiatrisch onderzoek
:</span
><br
>
247 <textarea cols
=80 rows
=5 wrap
=virtual name
="psychiatrisch_onderzoek" id
="psychiatrisch_onderzoek"><?php
echo stripslashes($obj{"psychiatrisch_onderzoek"});?
></textarea
><br
>
248 <br
><span
class=text
>Beschrijvend conclusie
:</span
><br
>
249 <textarea cols
=80 rows
=5 wrap
=virtual name
="beschrijvend_conclusie" id
="beschrijvend_conclusie"><?php
echo stripslashes($obj{"beschrijvend_conclusie"});?
></textarea
><br
>
250 <br
><span
class=text
>Advies
/beleid
</span
><br
>
251 <textarea cols
=80 rows
=5 wrap
=virtual name
="advies_beleid" id
="advies_beleid"><?php
echo stripslashes($obj{"advies_beleid"});?
></textarea
><br
>
256 // here we fill in the header above with patient name etc ? ??? - move above
261 <br
><br
><span style
="margin: 5px; border: 1px solid green; font-size: 0.8em; padding: 3px;">add note here ???
</span
>
264 <a href
="javascript:document.my_form.submit();" class="link_submit">[<?php
xl('Save','e'); ?
>]</a
>
266 <a href
="<?echo "$rootdir/patient_file
/encounter
/$returnurl";?>" class="link_submit" onclick
="delete_autosave();top.restoreSession()">[<?php
xl('Don\'t Save','e'); ?
>]</a
>
270 <div id
="timestamp"></div
>