PageRenderTime 48ms CodeModel.GetById 19ms RepoModel.GetById 1ms app.codeStats 0ms

/modules/or_logbook/op-care-log-xtsuch-start.php

https://github.com/timschofield/2.8
PHP | 627 lines | 453 code | 107 blank | 67 comment | 62 complexity | 965115c36f239e8c398244d09ea487d4 MD5 | raw file
Possible License(s): LGPL-2.1, BSD-3-Clause, GPL-2.0
  1. <?php
  2. error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
  3. require('./roots.php');
  4. require('../../include/helpers/inc_environment_global.php');
  5. /**
  6. * CARE2X Integrated Hospital Information System Deployment 2.1 - 2004-10-02
  7. * GNU General Public License
  8. * Copyright 2002,2003,2004,2005 Elpidio Latorilla
  9. * elpidio@care2x.org,
  10. *
  11. * See the file "copy_notice.txt" for the licence notice
  12. */
  13. # Default value for the maximum nr of rows per block displayed, define this to the value you wish
  14. # In normal cases this value is derived from the db table "care_config_global" using the "pagin_insurance_list_max_block_rows" element.
  15. define('MAX_BLOCK_ROWS',30);
  16. define('MODULE','or_logbook');
  17. define('LANG_FILE_MODULAR','or_logbook.php');
  18. define('NO_2LEVEL_CHK',1);
  19. require_once($root_path.'include/helpers/inc_front_chain_lang.php');
  20. if (!$internok&&!$_COOKIE['ck_op_pflegelogbuch_user'.$sid]) {header("Location:../language/".$lang."/lang_".$lang."_invalid-access-warning.php"); exit;};
  21. # Initialization
  22. $thisfile=basename(__FILE__);
  23. $breakfile='javascript:window.close()';
  24. # Workaround: Resolve the search key variables
  25. if(empty($srcword)&&!empty($searchkey)) $srcword=$searchkey;
  26. if($srcword!=''||$mode=='paginate'){
  27. # Load the date formatter
  28. include_once($root_path.'include/helpers/inc_date_format_functions.php');
  29. //$db->debug=1;
  30. # Initialize page's control variables
  31. if($mode=='paginate'){
  32. $sql2=$_SESSION['sess_searchkey'];
  33. }else{
  34. # Reset paginator variables
  35. $pgx=0;
  36. $totalcount=0;
  37. $odir='ASC';
  38. $oitem='name_last';
  39. if(is_numeric($srcword)){
  40. $srcword=(int) $srcword;
  41. }else{
  42. # Convert other wildcards
  43. $srcword=strtr($srcword,'*&','%_');
  44. }
  45. # Try converting keyword to DOB
  46. $DOB = formatDate2STD($srcword,$date_format);
  47. $select="SELECT o.*,
  48. e.encounter_class_nr,
  49. p.pid,
  50. p.name_last,
  51. p.name_first,
  52. p.date_birth,
  53. p.addr_str,
  54. p.addr_str_nr,
  55. p.sex,
  56. p.addr_zip,
  57. t.name AS citytown_name,
  58. d.name_formal,
  59. d.LD_var AS \"LD_var\" ";
  60. // Old mysql query
  61. /*
  62. $selectfrom.=" FROM ( care_encounter_op AS o,
  63. care_encounter AS e,
  64. care_person AS p )
  65. LEFT JOIN care_address_citytown AS t ON t.nr=p.addr_citytown_nr
  66. LEFT JOIN care_department AS d ON d.nr= o.dept_nr";
  67. */
  68. $selectfrom= " FROM care_encounter_op AS o LEFT JOIN care_department AS d ON d.nr= o.dept_nr
  69. LEFT JOIN care_encounter AS e ON e.encounter_nr = o.encounter_nr
  70. LEFT JOIN care_person AS p ON p.pid = e.pid
  71. LEFT JOIN care_address_citytown AS t ON t.nr=p.addr_citytown_nr";
  72. # If the search is directed to a single patient
  73. if($mode=='get'||$mode=='getbypid'||$mode=='getbyenc'){
  74. if($mode=='get'){
  75. $sql2=$selectfrom." WHERE o.nr='$nr'
  76. AND o.encounter_nr=e.encounter_nr
  77. AND e.pid=p.pid ";
  78. }elseif($mode=='getbypid'){
  79. $sql2=$selectfrom." WHERE p.pid='$nr'
  80. AND o.encounter_nr=e.encounter_nr
  81. AND e.pid=p.pid ";
  82. }else{
  83. $sql2=$selectfrom." WHERE o.encounter_nr='$nr'
  84. AND o.encounter_nr=e.encounter_nr
  85. AND e.pid=p.pid ";
  86. }
  87. }else{
  88. $sql2=$selectfrom." WHERE o.encounter_nr=e.encounter_nr
  89. AND e.pid=p.pid
  90. AND (p.name_last = '$srcword'
  91. OR p.name_first = '$srcword'";
  92. if($DOB) $sql2.=" OR p.date_birth = '$srcword' ";
  93. if(is_numeric($srcword)){
  94. $sql2.=" OR o.op_nr = $srcword OR e.encounter_nr = $srcword";
  95. }
  96. $sql2.=")";
  97. }
  98. }
  99. #Load and create paginator object
  100. include_once($root_path.'include/core/class_paginator.php');
  101. $pagen=& new Paginator($pgx,$thisfile,$_SESSION['sess_searchkey'],$root_path);
  102. $GLOBAL_CONFIG=array();
  103. include_once($root_path.'include/core/class_globalconfig.php');
  104. $glob_obj=new GlobalConfig($GLOBAL_CONFIG);
  105. # Get the max nr of rows from global config
  106. $glob_obj->getConfig('pagin_patient_search_max_block_rows');
  107. if(empty($GLOBAL_CONFIG['pagin_patient_search_max_block_rows'])) $pagen->setMaxCount(MAX_BLOCK_ROWS); # Last resort, use the default defined at the start of this page
  108. else $pagen->setMaxCount($GLOBAL_CONFIG['pagin_patient_search_max_block_rows']);
  109. # Detect what type of sort item
  110. if($oitem=='encounter_nr') $tab='e';
  111. elseif(stristr($oitem,'op_')) $tab='o';
  112. else $tab='p';
  113. # If the search is directed to a single patient
  114. if($mode=='get'||$mode=='getbypid'||$mode=='getbyenc'){
  115. $sql=$select.$sql2."ORDER BY o.op_date DESC";
  116. if($ergebnis=$db->Execute($sql)){
  117. if($rows=$ergebnis->RecordCount()){
  118. $datafound=1;
  119. }else {
  120. echo "$LDDbNoRead<br>$sql";
  121. }
  122. }
  123. }else{
  124. # Start searching
  125. $sql=$select.$sql2." ORDER BY $tab.$oitem $odir";
  126. if($ergebnis=$db->SelectLimit($sql,$pagen->MaxCount(),$pgx)){
  127. if($rows=$ergebnis->RecordCount()){
  128. if($rows==1) $datafound=1;
  129. $_SESSION['sess_searchkey']=$select.$sql2;
  130. }else{
  131. $select="SELECT o.nr,o.op_nr,o.dept_nr,o.op_room,o.op_date, e.encounter_nr, p.pid, p.name_last, p.name_first, p.date_birth, p.sex";
  132. $sql2 =" FROM
  133. care_encounter_op AS o,
  134. care_encounter AS e,
  135. care_person AS p
  136. WHERE o.encounter_nr=e.encounter_nr
  137. AND e.pid=p.pid
  138. AND ( p.name_last $sql_LIKE '$srcword%'
  139. OR p.name_first $sql_LIKE '$srcword%'";
  140. if(is_numeric($srcword)) $sql2.=" OR o.op_nr $sql_LIKE '$srcword%' OR e.encounter_nr $sql_LIKE '$srcword%'";
  141. if($DOB) $sql2.=" OR p.date_birth $sql_LIKE '$srcword%'";
  142. $sql2.=")";
  143. $sql=$select.$sql2." ORDER BY $tab.$oitem $odir";
  144. if($ergebnis=$db->SelectLimit($sql,$pagen->MaxCount(),$pgx)){
  145. $rows=$ergebnis->RecordCount();
  146. $_SESSION['sess_searchkey']=$select.$sql2;
  147. }else{ echo "$LDDbNoRead<br>$sql"; }
  148. }
  149. }else{
  150. echo "$LDDbNoRead<br>$sql";
  151. }
  152. if($rows){
  153. $pagen->setTotalBlockCount($rows);
  154. # If count more than the max row count
  155. if($rows>1){
  156. # Count per sql
  157. if(isset($totalcount)&&$totalcount){
  158. $pagen->setTotalDataCount($totalcount);
  159. }else{
  160. # Count total available data
  161. //$sql="$sql $tab.$oitem $odir";
  162. $sql = "SELECT COUNT(o.nr) AS maxcount ".$sql2;
  163. if($result=$db->Execute($sql)){
  164. //$totalcount=$result->RecordCount();
  165. $row = $result->FetchRow();
  166. $totalcount = $row['maxcount'];
  167. }
  168. $pagen->setTotalDataCount($totalcount);
  169. }
  170. }else{
  171. $totalcount=1;
  172. $pagen->setTotalDataCount(1);
  173. }
  174. # Set the sort parameters
  175. $pagen->setSortItem($oitem);
  176. $pagen->setSortDirection($odir);
  177. }
  178. } # end of else if mode== get
  179. } # end of if (srcword!="")
  180. //echo $sql;
  181. # Start Smarty templating here
  182. /**
  183. * LOAD Smarty
  184. */
  185. # Note: it is advisable to load this after the inc_front_chain_lang.php so
  186. # that the smarty script can use the user configured template theme
  187. require_once(CARE_BASE.'/include/helpers/smarty_care.class.php');
  188. $smarty = new smarty_care('nursing');
  189. # Title in toolbar
  190. $smarty->assign('sToolbarTitle',"$LDOrLogBook - $LDSearch");
  191. $smarty->assign('LDBack', $LDBack);
  192. $smarty->assign('LDHelp', $LDHelp);
  193. $smarty->assign('LDClose', $LDClose);
  194. # hide return button
  195. $smarty->assign('pbBack',FALSE);
  196. # href for help button
  197. $smarty->assign('pbHelp',CARE_GUI . "modules/" . MODULE . "/help/" . $lang . "/oplog.html");
  198. # href for close button
  199. $smarty->assign('breakfile',$breakfile);
  200. # Window bar title
  201. $smarty->assign('sWindowTitle',"$LDOrLogBook - $LDSearch");
  202. # Body Onload js
  203. $smarty->assign('sOnLoadJs','onLoad="if (window.focus) window.focus();document.suchform.srcword.select();"');
  204. # Body OnUnload js
  205. $smarty->assign('sOnUnloadJs','onUnload="if (wwin) wwin.close();"');
  206. # Collect js code
  207. ob_start();
  208. ?>
  209. <script language="javascript">
  210. <!--
  211. var wwin;
  212. var lock=true;
  213. var nodept=false;
  214. function pruf(f)
  215. {
  216. d=f.srcword.value;
  217. if(d=="") return false;
  218. else return true;
  219. }
  220. function open_such_editwin(filename,y,m,d,dp,sl)
  221. {
  222. url="op-care-log-arch-edit.php?mode=edit&fileid="+filename+"&sid=<?php echo "$sid&lang=$lang"; ?>&user=<?php echo str_replace(" ","+",$user); ?>&pyear="+y+"&pmonth="+m+"&pday="+d+"&dept_nr="+dp+"&saal="+sl;
  223. w=800;
  224. sucheditwin=window.open(url,"sucheditwin","menubar=no,resizable=yes,scrollbars=yes, width=" + (w-15) + ", height=400");
  225. window.sucheditwin.moveTo(0,0);
  226. }
  227. function waitwin()
  228. {
  229. wwin=window.open("waitwin.htm","wait","menubar=no,resizable=no,scrollbars=no,width=400,height=200");
  230. }
  231. function getinfo(pid,dept,pdata){
  232. urlholder="<?php echo $root_path; ?>modules/nursing/nursing-ward-patientdata.php<?php echo URL_REDIRECT_APPEND; ?>&pn="+pid+"&patient=" + pdata + "&station="+dept+"&op_shortcut=<?php echo strtr($ck_op_pflegelogbuch_user," ","+") ?>";
  233. patientwin=window.open(urlholder,pid,"width=700,height=450,menubar=no,resizable=yes,scrollbars=yes");
  234. }
  235. // -->
  236. </script>
  237. <?php
  238. $sTemp = ob_get_contents();
  239. ob_end_clean();
  240. $smarty->append('JavaScript',$sTemp);
  241. # Buffer page output
  242. ob_start();
  243. if((($mode=='get')||($datafound))&&$rows){
  244. if($rows>1) echo $LDPatLogbookMany;
  245. else echo $LDPatLogbook;
  246. echo '
  247. <table cellpadding="0" cellspacing="0" border="0" bgcolor="#999999" width="100%">
  248. <tr><td>
  249. <table cellpadding="3" cellspacing="1" border="0" width="100%">
  250. ';
  251. echo '
  252. <tr class="wardlisttitlerow">';
  253. while(list($x,$v)=each($LDOpMainElements))
  254. {
  255. echo '
  256. <td>'.$v.'</td>';
  257. }
  258. echo '
  259. </tr>';
  260. $img_arrow=createComIcon($root_path,'bul_arrowgrnlrg.gif','0','middle'); // Loads the arrow icon image
  261. $img_info=createComIcon($root_path,'info2.gif','0','middle'); // Loads the arrow icon image
  262. while($pdata=$ergebnis->FetchRow()){
  263. echo '
  264. <tr class="submenu">
  265. <td colspan=9>&nbsp;
  266. <font color="#000033">';
  267. $buffer=$pdata['LD_var'];
  268. if(isset($$buffer)&&!empty($$buffer)) echo $$buffer;
  269. else echo $pdata['name_formal'];
  270. echo ' :: '.strtoupper($pdata[op_room]).'</font></font>
  271. </td></tr>';
  272. if ($toggler==0)
  273. { echo '<tr bgcolor="#fdfdfd">'; $toggler=1;}
  274. else { echo '<tr bgcolor="#eeeeee">'; $toggler=0;}
  275. echo '
  276. <a name="'.$pdata['encounter_nr'].'"></a>';
  277. list($iyear,$imonth,$iday)=explode('-',$pdata['op_date']);
  278. echo '
  279. <td valign=top><font size="1" ><font size=2 color=red><b>'.$pdata['op_nr'].'</b></font><hr>'.formatDate2Local($pdata['op_date'],$date_format).'<br>
  280. '.$tage[date("w",mktime(0,0,0,$imonth,$iday,$iyear))].'<br>
  281. <a href="op-care-log-start.php?sid='.$sid.'&lang='.$lang.'&mode=saveok&enc_nr='.$pdata['encounter_nr'].'&op_nr='.$pdata[op_nr].'&dept_nr='.$pdata[dept_nr].'&saal='.$pdata[op_room].'&thisday='.$pdata['op_date'].'">
  282. <img '.$img_arrow.' alt="'.str_replace("~tagword~",$pdata['name_last'],$LDEditPatientData).'"></a>
  283. </td>';
  284. echo '
  285. <td valign=top><nobr><font size="1" color=blue>
  286. <a href="javascript:getinfo(\''.$pdata[encounter_nr].'\',\''.$pdata[dept_nr].'\')">
  287. <img '.$img_info.' alt="'.str_replace("~tagword~",$pdata['name_last'],$LDOpenPatientFolder).'"></a>&nbsp; ';
  288. echo ($pdata['encounter_class_nr']==1)?($pdata['encounter_nr']+$GLOBAL_CONFIG['patient_inpatient_nr_adder']) : ($pdata['encounter_nr']+$GLOBAL_CONFIG['patient_outpatient_nr_adder']);
  289. echo '<br>
  290. <font color=black><b>'.$pdata['name_last'].', '.$pdata['name_first'].'</b><br>'.formatDate2Local($pdata['date_birth'],$date_format).'<p>
  291. <font color="#000000">'.$pdata['addr_str'].' '.$pdata['addr_str_nr'].'<br>'.$pdata['addr_zip'].' '.$pdata['citytown_name'].'</font><br></td>';
  292. echo '
  293. <td valign=top><font size="1" >';
  294. echo '
  295. <font color="#cc0000">'.$LDOpMainElements[diagnosis].':</font><br>';
  296. echo nl2br($pdata['diagnosis']);
  297. echo '
  298. </td><td valign=top><font size="1" ><nobr>';
  299. $ebuf=array('operator','assistant','scrub_nurse','rotating_nurse');
  300. //$tbuf=array("O","A","I","S");
  301. //$cbuf=array("Operateur","Assistent","Instrumenteur","Springer");
  302. for($n=0;$n<sizeof($ebuf);$n++){
  303. if(!$pdata[$ebuf[$n]]) continue;
  304. echo '<font color="#cc0000">'.$cbuf[$n].'</font><br>';
  305. $dbuf=explode("~",$pdata[$ebuf[$n]]);
  306. for($i=0;$i<sizeof($dbuf);$i++)
  307. {
  308. parse_str(trim($dbuf[$i]),$elems);
  309. if($elems[n]=="") continue;
  310. else echo '&nbsp;'.$elems[n]." ".$tbuf[$n].$elems[x]."<br>";
  311. }
  312. }
  313. echo '
  314. </td>
  315. <td valign=top><font size="1" >'.$LDAnaTypes[$pdata['anesthesia']].'<p>';
  316. if($pdata[an_doctor])
  317. {
  318. echo '<font color="#cc0000">'.$LDAnaDoc.'</font><br><font color="#000000">';
  319. $dbuf=explode("~",$pdata[an_doctor]);
  320. for($i=0;$i<sizeof($dbuf);$i++)
  321. {
  322. parse_str(trim($dbuf[$i]),$elems);
  323. if($elems[n]=="") continue;
  324. else echo '&nbsp;'.$elems[n].' '.$LDAnaPrefix.$elems[x].'<br>';
  325. }
  326. echo '</font>';
  327. }
  328. $eo=explode("~",$pdata[entry_out]);
  329. for($i=0;$i<sizeof($eo);$i++)
  330. {
  331. parse_str($eo[$i],$eobuf);
  332. if(trim($eobuf[s])) break;
  333. }
  334. $cc=explode("~",$pdata[cut_close]);
  335. for($i=0;$i<sizeof($cc);$i++)
  336. {
  337. parse_str($cc[$i],$ccbuf);
  338. if(trim($ccbuf[s])) break;
  339. }
  340. echo '
  341. </td>
  342. <td valign=top><font size="1" >';
  343. echo '<font size="1" color="#cc0000">'.$LDOpCut.':</font><br>'.convertTimeToLocal($ccbuf[s]).'<p>
  344. <font size="1" color="#cc0000">'.$LDOpClose.':</font><br>'.convertTimeToLocal($ccbuf[e]).'</td>';
  345. echo '
  346. <td valign=top><font size="1" color="#cc0000">'.$LDOpMainElements[therapy].':<font color=black><br>'.nl2br($pdata['op_therapy']).'</td>';
  347. echo '
  348. <td valign=top><nobr><font size="1" color="#cc0000">'.$LDOpMainElements[result].':<br>';
  349. echo '<font color=black>'.nl2br($pdata['result_info']).'</td>';
  350. echo '
  351. <td valign=top><font size="1" >';
  352. echo '<font size="1" color="#cc0000">'.$LDOpIn.':</font><br>'.convertTimeToLocal($eobuf[s]).'<p>
  353. <font size="1" color="#cc0000">'.$LDOpOut.':</font><br>'.convertTimeToLocal($eobuf[e]).'</td>';
  354. echo '
  355. </tr>';
  356. }
  357. echo '
  358. </table>
  359. </td>
  360. </tr>
  361. </table>
  362. ';
  363. }elseif($mode=='search'||$mode=='paginate'){
  364. echo '
  365. <ul>
  366. <table cellpadding=0 cellspacing=0 border=0>';
  367. if($rows) echo'
  368. <tr>
  369. <td valign="middle" class="prompt">
  370. '.$LDPatientsFound.'
  371. </td>
  372. </tr>';
  373. echo '
  374. <tr>
  375. <td valign=top colspan=2>';
  376. if ($rows) echo str_replace("~nr~",$totalcount,$LDSearchFound).' '.$LDShowing.' '.$pagen->BlockStartNr().' '.$LDTo.' '.$pagen->BlockEndNr().'.';
  377. else echo str_replace('~nr~','0',$LDSearchFound);
  378. echo'
  379. <table cellpadding=0 cellspacing=0 border=0 >
  380. <tr>
  381. <td bgcolor=#999999>
  382. <table cellpadding=2 cellspacing=1 border=0 >
  383. ';
  384. if($rows){
  385. echo '<tr ><td colspan=8 bgcolor=#eeeee0><p>';
  386. if($rows==1) echo " $LDSimilar ";
  387. else echo $LDPlsClk1;
  388. echo '</td></tr>';
  389. # Loads the arrow icon image
  390. $img_src='<img '.createComIcon($root_path,'arrow.gif','0','middle').'>';
  391. # Load the background image
  392. //$bgc='background="'.$root_path.'gui/img/skin/default/tableHeaderbg3.gif"';
  393. $img_male=createComIcon($root_path,'spm.gif','0');
  394. $img_female=createComIcon($root_path,'spf.gif','0');
  395. $append="&srcword=$srcword";
  396. ?>
  397. <tr class="wardlisttitlerow">
  398. <td><b>
  399. <?php echo $pagen->makeSortLink($LDSex,'sex',$oitem,$odir,$append); ?></b></td>
  400. <td><b>
  401. <?php echo $pagen->makeSortLink($LDLastName,'name_last',$oitem,$odir,$append); ?></b></td>
  402. <td><b>
  403. <?php echo $pagen->makeSortLink($LDName,'name_first',$oitem,$odir,$append); ?></b></td>
  404. <td><b>
  405. <?php echo $pagen->makeSortLink($LDBday,'date_birth',$oitem,$odir,$append); ?></b></td>
  406. <td><b>
  407. <?php echo $pagen->makeSortLink($LDOpRoom,'op_room',$oitem,$odir,$append); ?></b></td>
  408. <td><b>
  409. <?php echo $pagen->makeSortLink($LDSrcListElements[5],'op_date',$oitem,$odir,$append); ?></b></td>
  410. <td><b>
  411. <?php echo $pagen->makeSortLink($LDOpNr,'op_nr',$oitem,$odir,$append); ?></b></td>
  412. <td><b>
  413. <?php echo $pagen->makeSortLink($LDPatientNr,'encounter_nr',$oitem,$odir,$append); ?></b></td>
  414. </tr>
  415. <?php
  416. while($pdata=$ergebnis->FetchRow()){
  417. //echo "
  418. // <a href=\"op-care-log-xtsuch-start.php?sid=$sid&lang=$lang&mode=get&dept_nr=$pdata[dept_nr]&op_nr=$pdata[op_nr]&srcword=".strtr($srcword," ","+")."\">";
  419. echo '
  420. <tr class="submenu"><td>';
  421. switch($pdata['sex']){
  422. case 'f': echo '<img '.$img_female.'>'; break;
  423. case 'm': echo '<img '.$img_male.'>'; break;
  424. default: echo '&nbsp;'; break;
  425. }
  426. echo "</td>
  427. <td>
  428. <a href=\"op-care-log-xtsuch-start.php?sid=$sid&lang=$lang&mode=getbypid&nr=".$pdata['pid']."&dept_nr=$dept_nr&saal=$saal&srcword=".strtr($srcword," ","+")."\">&nbsp;";
  429. //echo $img_src;
  430. if($srcword&&stristr($pdata['name_last'],$srcword)) echo '<b><span style="background:yellow">'.$pdata['name_last'].'</span></b>';
  431. else echo $pdata['name_last'];
  432. echo '</a></td>
  433. <td>&nbsp;';
  434. if($srcword&&stristr($pdata['name_first'],$srcword)) echo '<b><span style="background:yellow">'.$pdata['name_first'].'</span></b>';
  435. else echo $pdata['name_first'];
  436. echo '</td>
  437. <td align="center" >';
  438. if($srcword&&stristr($pdata['date_birth'],$srcword)) echo '<b><span style="background:yellow">'.formatDate2Local($pdata['date_birth'],$date_format).'</span></b>';
  439. else echo formatDate2Local($pdata['date_birth'],$date_format);
  440. echo '
  441. </td>
  442. <td align="center">';
  443. echo "<a href=\"op-care-log-xtsuch-start.php?sid=$sid&lang=$lang&mode=get&nr=".$pdata['nr']."&dept_nr=$dept_nr&saal=$saal&srcword=".strtr($srcword," ","+")."\">&nbsp;";
  444. echo '<b>'.$pdata[op_room].'</b></a></td>
  445. <td align="center" ><b>'.formatDate2Local($pdata['op_date'],$date_format).'</b> </td>
  446. <td align="center" >';
  447. echo "<a href=\"op-care-log-xtsuch-start.php?sid=$sid&lang=$lang&mode=get&nr=".$pdata['nr']."&dept_nr=$dept_nr&saal=$saal&srcword=".strtr($srcword," ","+")."\">&nbsp;";
  448. echo $pdata['op_nr'];
  449. echo '</a>
  450. </td>
  451. <td align="center" >';
  452. echo "<a href=\"op-care-log-xtsuch-start.php?sid=$sid&lang=$lang&mode=getbyenc&nr=".$pdata['encounter_nr']."&dept_nr=$dept_nr&saal=$saal&srcword=".strtr($srcword," ","+")."\">&nbsp;";
  453. echo $pdata['encounter_nr'];
  454. echo '</a>
  455. </td>
  456. </tr>';
  457. }
  458. }
  459. if($totalcount>$pagen->MaxCount()) echo '
  460. <tr bgcolor="#eeeeee"><td colspan=2>'.$pagen->makePrevLink($LDPrevious,$append).'</td>
  461. <td colspan=4>&nbsp;</td>
  462. <td align=right colspan=2>'.$pagen->makeNextLink($LDNext,$append).'</td>
  463. </tr>';
  464. echo '
  465. </table>
  466. </td>
  467. </tr>
  468. </table>
  469. </td>
  470. </tr>
  471. </table>
  472. </ul>
  473. ';
  474. }
  475. ?>
  476. <ul>
  477. <?php echo $LDPromptSearch ?>
  478. <form action="<?php echo $thisfile; ?>" method=post name=suchform onSubmit="return pruf(this)">
  479. <table border=0 cellspacing=0 cellpadding=1 bgcolor=#999999>
  480. <tr>
  481. <td>
  482. <table border=0 cellspacing=0 cellpadding=5 bgcolor=#eeeeee>
  483. <tr>
  484. <td> <font color=maroon size=2><b><?php echo $LDKeyword ?>:</b></font><br>
  485. <input type="text" name="srcword" size=40 maxlength=100 value="<?php echo $srcword; ?>">
  486. <input type="hidden" name="sid" value="<?php echo $sid; ?>">
  487. <input type="hidden" name="lang" value="<?php echo $lang; ?>">
  488. <input type="hidden" name="dept_nr" value="<?php echo $dept_nr; ?>">
  489. <input type="hidden" name="saal" value="<?php echo $saal; ?>">
  490. <input type="hidden" name="child" value="<?php echo $child; ?>">
  491. <input type="hidden" name="user" value="<?php echo str_replace(" ","+",$_COOKIE['ck_op_pflegelogbuch_user'.$sid]); ?>">
  492. <input type="hidden" name="mode" value="search">
  493. </td>
  494. </tr>
  495. <tr>
  496. <td>
  497. <input type="submit" value="<?php echo $LDSearch ?>" align="right">
  498. </td>
  499. </tr>
  500. </table>
  501. </td>
  502. </tr>
  503. </table>
  504. </form>
  505. <p>
  506. <b><?php echo $LDOtherFunctions ?>:</b><br>
  507. <img <?php echo createComIcon($root_path,'varrow.gif','0') ?>> <a href="op-care-log-arch-start.php?sid=<?php echo "$sid&lang=$lang&dept_nr=$dept_nr&saal=$saal&child=$child" ?>"><?php echo "$LDResearchArchive [$LDOrLogBook]" ?></a><br>
  508. <img <?php echo createComIcon($root_path,'varrow.gif','0') ?>> <a href="op-care-log-start.php?sid=<?php echo "$sid&lang=$lang&mode=fresh&dept_nr=$dept_nr&saal=$saal" ?>" <?php if ($child) echo "target=\"_parent\""; ?>><?php echo "$LDStartNewDocu [$LDOrLogBook]" ?></a><br>
  509. <img <?php echo createComIcon($root_path,'varrow.gif','0') ?>> <a href="javascript:gethelp('oplog.php','search','<?php echo $mode ?>','<?php echo $rows ?>','<?php echo $datafound ?>')"><?php echo "$LDHelp" ?></a><br>
  510. </ul>
  511. <?php
  512. $sTemp = ob_get_contents();
  513. ob_end_clean();
  514. # Assign page output to the mainframe template
  515. $smarty->assign('sMainFrameBlockData',$sTemp);
  516. /**
  517. * show Template
  518. */
  519. $smarty->display(CARE_BASE . 'main/view/mainframe.tpl');
  520. ?>