PageRenderTime 24ms CodeModel.GetById 18ms RepoModel.GetById 0ms app.codeStats 0ms

/Care2007/modules/or_logbook/op-logbuch-material-entry-manual.php

https://repo.or.cz/care2x.git
PHP | 163 lines | 140 code | 20 blank | 3 comment | 16 complexity | c282b861e437b22d9c8d3b9b4af02eb8 MD5 | raw file
Possible License(s): GPL-2.0
  1. <?php
  2. error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
  3. require('./roots.php');
  4. require($root_path.'include/inc_environment_global.php');
  5. define('LANG_FILE','or.php');
  6. $local_user='ck_op_pflegelogbuch_user';
  7. require_once($root_path.'include/inc_front_chain_lang.php');
  8. $globdata="sid=$sid&lang=$lang&op_nr=$op_nr&dept_nr=$dept_nr&saal=$saal&enc_nr=$enc_nr&pday=$pday&pmonth=$pmonth&pyear=$pyear";
  9. require_once($root_path.'include/care_api_classes/class_core.php');
  10. $core = & new Core;
  11. //$db->debug=1;
  12. if(($mode=="force_add") && !empty($artikelname) && !empty($pcs)){
  13. $dbtable='care_encounter_op';
  14. $sql="SELECT material_codedlist FROM $dbtable
  15. WHERE dept_nr='$dept_nr'
  16. AND op_room='$saal'
  17. AND op_nr='$op_nr'
  18. AND op_src_date='$pyear$pmonth$pday'
  19. AND encounter_nr='$enc_nr'";
  20. if($mat_result=$db->Execute($sql)){
  21. if($matrows=$mat_result->RecordCount()){
  22. $matlist=$mat_result->FetchRow();
  23. }
  24. }else{
  25. echo "$LDDbNoRead<br>$sql";
  26. }
  27. $newmat="b=?&a=?$artikelnum&n=$artikelname&g=$generic&i=$industrynum&c=$pcs\r\n";
  28. if(($matrows==1)&&($matlist[0]!="")){
  29. $matlist[0]=$matlist[0]."~".$newmat;
  30. $item_idx=substr_count($matlist[0],"~");
  31. }else{
  32. $matlist[0]=$newmat;
  33. $item_idx=0;
  34. }
  35. $matlist[0]=strtr($matlist[0]," ","+");
  36. $dbtable='care_encounter_op';
  37. $sql="UPDATE $dbtable SET
  38. material_codedlist='$matlist[0]',
  39. history = ".$core->ConcatHistory("Material added ".date('Y-m-d H:i:s')." ".$HTTP_SESSION_VARS['sess_user_name']."\n").",
  40. modify_id = '".$HTTP_SESSION_VARS['sess_user_name']."',
  41. modify_time = '".date('YmdHis')."'
  42. WHERE dept_nr='$dept_nr'
  43. AND op_room='$saal'
  44. AND op_nr='$op_nr'
  45. AND op_src_date='$pyear$pmonth$pday'
  46. AND encounter_nr='$enc_nr'";
  47. //echo $sql;
  48. if($mat_result=$core->Transact($sql)){
  49. header("location:op-logbuch-material-list.php?$globdata&item_idx=$item_idx&chg=1");
  50. exit;
  51. }else{
  52. echo "$LDDbNoSave<br>$sql";
  53. }
  54. }
  55. ?>
  56. <?php html_rtl($lang); ?>
  57. <head>
  58. <?php echo setCharSet(); ?>
  59. <style type="text/css" name="s2">
  60. .v12{ font-family:verdana,arial; color:#000000; font-size:12;}
  61. .v12b{ font-family:verdana,arial; color:#cc0000; font-size:12;}
  62. </style>
  63. <script language="javascript">
  64. <!--
  65. function popinfo(b)
  66. {
  67. urlholder="products-bestellkatalog-popinfo.php?sid=<?php echo $sid; ?>&keyword="+b+"&mode=search&cat=pharma";
  68. ordercatwin=window.open(urlholder,"ordercat","width=850,height=550,menubar=no,resizable=yes,scrollbars=yes");
  69. }
  70. // -->
  71. </script>
  72. <SCRIPT language="JavaScript">
  73. function ssm(menuId){
  74. if (brwsVer>=4) {
  75. if (curSubMenu!='') hsm();
  76. if (document.all) {
  77. eval('document.all.'+menuId).style.visibility='visible';
  78. } else {
  79. eval('document.'+menuId).visibility='show';
  80. }
  81. curSubMenu=menuId;
  82. }
  83. }
  84. function hsm(){
  85. if(curSubMenu=="") return;
  86. else
  87. if (brwsVer>=4) {
  88. if (document.all) {
  89. eval('document.all.'+curSubMenu).style.visibility='hidden';
  90. } else {
  91. eval('document.'+curSubMenu).visibility='hide';
  92. }
  93. curSubMenu='';
  94. }
  95. }
  96. var brwsVer=parseInt(navigator.appVersion);var timer;var curSubMenu='';
  97. </SCRIPT>
  98. </head>
  99. <body leftmargin=0 marginwidth=0>
  100. <form name="plist" action="op-logbuch-material-entry-manual.php" method="post">
  101. <table border=0>
  102. <tr>
  103. <?php
  104. for($i=0;$i<sizeof($LDMaterialElements);$i++)
  105. echo '
  106. <td class="v12b"><b>&nbsp;'.$LDMaterialElements[$i].'</b></td>';
  107. ?>
  108. <!-- <td class="v12b"><b>&nbsp;Art.Nr.</b></td>
  109. <td class="v12b"><b>Art.name</b></td>
  110. <td class="v12b"><b>Generic</b></td>
  111. <td class="v12b"><b>Zul.Nr.</b></td>
  112. <td class="v12b"><b>Anzahl</b></td> -->
  113. </tr>
  114. <tr>
  115. <td colspan=6 bgcolor="#0000ff"></td>
  116. </tr>
  117. <tr>
  118. <td><input type="text" name="artikelnum" size=15 maxlength=20 value="<?php echo $artikelnum ?>"></td>
  119. <td><input type="text" name="artikelname" size=15 maxlength=20></td>
  120. <td>&nbsp;</td>
  121. <td><input type="text" name="generic" size=15 maxlength=20></td>
  122. <td><input type="text" name="industrynum" size=15 maxlength=20></td>
  123. <td><input type="text" name="pcs" size=1 maxlength=3></td>
  124. </tr>
  125. </table>
  126. <input type="hidden" name="sid" value="<?php echo $sid ?>">
  127. <input type="hidden" name="lang" value="<?php echo $lang ?>">
  128. <input type="hidden" name="mode" value="force_add">
  129. <input type="hidden" name="op_nr" value="<?php echo $op_nr ?>">
  130. <input type="hidden" name="enc_nr" value="<?php echo $enc_nr ?>">
  131. <input type="hidden" name="dept_nr" value="<?php echo $dept_nr ?>">
  132. <input type="hidden" name="saal" value="<?php echo $saal ?>">
  133. <input type="hidden" name="pday" value="<?php echo $pday ?>">
  134. <input type="hidden" name="pmonth" value="<?php echo $pmonth ?>">
  135. <input type="hidden" name="pyear" value="<?php echo $pyear ?>">
  136. <p>
  137. <input type="image" <?php echo createLDImgSrc($root_path,'savedisc.gif','0','absmiddle') ?> alt="<?php echo $LDSave ?>">
  138. &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href="javascript:document.plist.reset()" title="<?php echo $LDReset ?>"><img <?php echo createLDImgSrc($root_path,'reset.gif','0','absmiddle') ?>></a>
  139. &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  140. <a href="op-logbuch-material-list.php?<?php echo $globdata ?>"><img <?php echo createLDImgSrc($root_path,'cancel.gif','0','absmiddle') ?> alt="<?php echo $LDCancel ?>"></a>
  141. </form>
  142. </body>
  143. </html>