Revision: 6442
http://care2002.svn.sourceforge.net/care2002/?rev=6442&view=rev
Author: mizuko
Date: 2010-06-30 09:19:58 +0000 (Wed, 30 Jun 2010)
Log Message:
-----------
see #54
Added Paths:
-----------
care2x/branches/gettext/modules/medstock/
care2x/branches/gettext/modules/medstock/index.htm
care2x/branches/gettext/modules/medstock/index.php
care2x/branches/gettext/modules/medstock/medstock-database-functions.php
care2x/branches/gettext/modules/medstock/medstock-orderbot-pass.php
care2x/branches/gettext/modules/medstock/medstock-pass.php
care2x/branches/gettext/modules/medstock/medstock-report.php
care2x/branches/gettext/modules/medstock/medstock.php
care2x/branches/gettext/modules/medstock/roots.php
Added: care2x/branches/gettext/modules/medstock/index.htm
===================================================================
--- care2x/branches/gettext/modules/medstock/index.htm
(rev 0)
+++ care2x/branches/gettext/modules/medstock/index.htm 2010-06-30 09:19:58 UTC
(rev 6442)
@@ -0,0 +1 @@
+<meta http-equiv="refresh" content="0; url=../../">
Added: care2x/branches/gettext/modules/medstock/index.php
===================================================================
--- care2x/branches/gettext/modules/medstock/index.php
(rev 0)
+++ care2x/branches/gettext/modules/medstock/index.php 2010-06-30 09:19:58 UTC
(rev 6442)
@@ -0,0 +1,4 @@
+<?php
+header('location:../../index.php');
+exit;
+?>
Added: care2x/branches/gettext/modules/medstock/medstock-database-functions.php
===================================================================
--- care2x/branches/gettext/modules/medstock/medstock-database-functions.php
(rev 0)
+++ care2x/branches/gettext/modules/medstock/medstock-database-functions.php
2010-06-30 09:19:58 UTC (rev 6442)
@@ -0,0 +1,127 @@
+<?php
+error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
+require('./roots.php');
+require($root_path.'include/helpers/inc_environment_global.php');
+/**
+* CARE2X Integrated Hospital Information System Deployment 2.1 - 2004-10-02
+* GNU General Public License
+* Copyright 2002,2003,2004,2005 Elpidio Latorilla
+* elpi...@care2x.org,
+*
+* See the file "copy_notice.txt" for the licence notice
+*/
+define('LANG_FILE','products.php');
+$local_user='ck_prod_db_user';
+require_once($root_path.'include/helpers/inc_front_chain_lang.php');
+$breakfile='medstock.php '.URL_APPEND;
+?>
+<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 3.0//EN" "html.dtd">
+<?php html_rtl($lang); ?>
+<HEAD>
+<?php echo setCharSet(); ?>
+
+<?php
+require($root_path.'include/helpers/inc_js_gethelp.php');
+require($root_path.'include/helpers/inc_css_a_hilitebu.php');
+?></HEAD>
+
+<BODY topmargin=0 leftmargin=0 marginwidth=0 marginheight=0
+<?php if (!$cfg['dhtml']){ echo 'link='.$cfg['body_txtcolor'].'
alink='.$cfg['body_alink'].' vlink='.$cfg['body_txtcolor']; } ?>>
+
+<table width=100% border=0 height=100% cellpadding="0" cellspacing="0">
+<tr valign=top>
+<td bgcolor="<?php echo $cfg['top_bgcolor']; ?>" >
+<FONT COLOR="<?php echo $cfg['top_txtcolor']; ?>" SIZE=+2 FACE="Arial">
+<STRONG> <?php echo "$LDMedDepot $LDPharmaDb" ?></STRONG></FONT></td>
+<td bgcolor="<?php echo $cfg['top_bgcolor']; ?>" height="10" align=right>
+<?php if($cfg['dhtml'])echo'<a href="javascript:window.history.back()"><img
'.createLDImgSrc($root_path,'back2.gif','0').' class="fadeOut" >';?></a><a
href="javascript:gethelp('submenu1.php','<?php echo "$LDMedDepot $LDPharmaDb"
?>')"><img <?php echo createLDImgSrc($root_path,'hilfe-r.gif','0') ?> <?php
if($cfg['dhtml'])echo'class="fadeOut" >';?></a><a href="<?php echo
$breakfile;?>"><img <?php echo createLDImgSrc($root_path,'close2.gif','0') ?>
alt="<?php echo $LDClose ?>" <?php if($cfg['dhtml'])echo'class="fadeOut"
>';?></a></td>
+</tr>
+<tr valign=top >
+<td bgcolor=<?php echo $cfg['body_bgcolor']; ?> valign=top colspan=2>
+<ul>
+<FONT face="Verdana,Helvetica,Arial" size=3 color="#990000">
+<?php if($from=="dbankpass")
+{
+echo '<img
'.createMascot($root_path,'mascot1_r.gif','0','bottom','absmiddle').'> ';
+$curtime=date("H.i");
+if ($curtime<"9.00") echo $LDGoodMorning;
+if (($curtime>"9.00")and($curtime<"18.00")) echo $LDGoodDay;
+if ($curtime>"18.00") echo $LDGoodEvening;
+echo " $ck_prod_db_user!";
+}
+?><p><br>
+ <TABLE cellSpacing=0 cellPadding=0 bgColor=#999999 border=0>
+ <TBODY>
+ <TR>
+ <TD>
+ <TABLE cellSpacing=1 cellPadding=3 bgColor=#999999
+ border=0>
+ <TBODY>
+ <TR bgColor=#eeeeee><td align=center><img <?php echo
createComIcon($root_path,'settings_tree.gif','0','',FALSE) ?>></td>
+ <TD vAlign=top width=150><FONT
+ face="Verdana,Helvetica,Arial" size=2><B><nobr>
+ <a href="<?php echo $root_path
?>modules/products/products-datenbank-functions-eingabe.php<?php echo
URL_APPEND."&userck=$userck"?>&cat=medstock"><?php echo $LDNewProduct ?></a>
+ </nobr></B></FONT></TD>
+ <TD><FONT face="Verdana,Helvetica,Arial"
+ size=2><?php echo $LDNewProductTxt ?></FONT></TD>
+ <TR bgColor=#dddddd height=1>
+ <TD colSpan=3><IMG height=1
+ src="../../gui/img/common/default/pixel.gif"
+ width=5></TD></TR>
+ <TR bgColor=#eeeeee><td align=center><img <?php echo
createComIcon($root_path,'eyeglass.gif','0','',FALSE) ?>></td>
+ <TD vAlign=top width=150><FONT
+ face="Verdana,Helvetica,Arial" size=2><B>
+ <a href="<?php echo $root_path
?>modules/products/products-datenbank-functions-such.php<?php echo
URL_APPEND."&userck=$userck"?>&cat=medstock"><?php echo $LDSearch
?></a></B></FONT></TD>
+ <TD><FONT face="Verdana,Helvetica,Arial"
+ size=2><nobr><?php echo $LDSearchDb
?></nobr></FONT></TD></TR>
+
+ <TR bgColor=#dddddd height=1>
+ <TD colSpan=3><IMG height=1
+ src="../../gui/img/common/default/pixel.gif"
+ width=5></TD></TR>
+ <TR bgColor=#eeeeee><td align=center><img <?php echo
createComIcon($root_path,'discussions.gif','0','',FALSE) ?>></td>
+ <TD vAlign=top width=150><FONT
+ face="Verdana,Helvetica,Arial" size=2><B>
+ <a href="<?php echo $root_path
?>modules/products/products-datenbank-functions-manage.php<?php echo
URL_APPEND."&userck=$userck"?>&cat=medstock"><nobr><?php echo $LDManage
?></nobr></a>
+ </B></FONT></TD>
+ <TD><FONT face="Verdana,Helvetica,Arial"
+ size=2><?php echo $LDPharmaDbTxt ?></FONT></TD></TR>
+ <TR bgColor=#dddddd height=1>
+ <TD colSpan=3><IMG height=1
+ src="../../gui/img/common/default/pixel.gif"
+ width=5></TD></TR>
+
+ <TR bgColor=#eeeeee> <td align=center><img <?php echo
createComIcon($root_path,'icn_rad.gif','0','',FALSE) ?>></td>
+ <TD vAlign=top width=150><FONT
+ face="Verdana,Helvetica,Arial" size=2><B><nobr>
+ <a href="medstock-report.php<?php echo
URL_APPEND."&userck=$userck"?>"><?php echo $LDReports ?></a></nobr>
+ </B></FONT></TD>
+ <TD><FONT face="Verdana,Helvetica,Arial"
+ size=2><nobr><?php echo $LDReportsTxt
?></nobr></FONT></TD></TR>
+
+ </TBODY>
+ </TABLE>
+ </TD></TR>
+ </TBODY>
+ </TABLE>
+<p>
+<a href="<?php echo "$breakfile" ?>"><img <?php echo
createLDImgSrc($root_path,'close2.gif','0','',FALSE) ?> alt="<?php echo
$LDClose ?>" align="middle"></a>
+<p>
+</ul>
+
+</FONT>
+<p>
+</td>
+</tr>
+<tr>
+<td bgcolor=<?php echo $cfg['bot_bgcolor']; ?> height=70 colspan=2>
+<?php
+require($root_path.'include/helpers/inc_load_copyrite.php');
+?>
+</td>
+</tr>
+</table>
+
+</FONT>
+</BODY>
+</HTML>
Added: care2x/branches/gettext/modules/medstock/medstock-orderbot-pass.php
===================================================================
--- care2x/branches/gettext/modules/medstock/medstock-orderbot-pass.php
(rev 0)
+++ care2x/branches/gettext/modules/medstock/medstock-orderbot-pass.php
2010-06-30 09:19:58 UTC (rev 6442)
@@ -0,0 +1,63 @@
+<?php
+error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
+require('./roots.php');
+require($root_path.'include/helpers/inc_environment_global.php');
+/**
+* CARE2X Integrated Hospital Information System Deployment 2.1 - 2004-10-02
+* GNU General Public License
+* Copyright 2002,2003,2004,2005 Elpidio Latorilla
+* elpi...@care2x.org,
+*
+* See the file "copy_notice.txt" for the licence notice
+*/
+define('LANG_FILE','stdpass.php');
+define('NO_2LEVEL_CHK',1);
+require_once($root_path.'include/helpers/inc_front_chain_lang.php');
+
+require_once($root_path.'global_conf/areas_allow.php');
+//gjergji
+//$allowedarea=&$allow_area['depot'];
+$userck="ck_medstock_user";
+$breakfile="medstock.php ".URL_APPEND."&userck=$userck";
+$fileforward="medstock.php ".URL_REDIRECT_APPEND."&userck=$userck&stb=1";
+$title=$LDMediBotActivate;
+$thisfile="medstock-orderbot-pass.php";
+$lognote="$title ok";
+
+//reset cookie;
+// reset all 2nd level lock cookies
+setcookie($userck.$sid,'');
+require($root_path.'include/helpers/inc_2level_reset.php');
+setcookie('ck_2level_sid'.$sid,'',0,'/');
+
+require($root_path.'include/helpers/inc_passcheck_internchk.php');
+//gjergji
+unset($allowedarea);
+$allowedarea[] = '_a_2_meddepotreception';
+if ($pass=='check') include($root_path.'include/helpers/inc_passcheck.php');
+//end gjergji
+
+$errbuf=$title;
+
+$minimal=1;
+require($root_path.'include/helpers/inc_passcheck_head.php');
+?>
+
+<BODY <?php if (!$nofocus) echo
'onLoad="document.passwindow.userid.focus()"'; echo '
bgcolor='.$cfg['body_bgcolor'];
+ if (!$cfg['dhtml']){ echo ' link='.$cfg['body_txtcolor'].'
alink='.$cfg['body_alink'].' vlink='.$cfg['body_txtcolor']; }
+?>>
+
+<P>
+<img src="../../gui/img/common/default/box_arrow.gif" border=0 align="middle">
+<FONT COLOR="<?php echo $cfg[top_txtcolor] ?>" SIZE=5 FACE="verdana"> <b>
<?php echo $title; ?></b></font>
+<p>
+<table width=100% border=0 cellpadding="0" cellspacing="0">
+
+<?php require($root_path.'include/helpers/inc_passcheck_mask.php') ?>
+
+<?php
+require($root_path.'include/helpers/inc_load_copyrite.php');
+?>
+
+</BODY>
+</HTML>
Added: care2x/branches/gettext/modules/medstock/medstock-pass.php
===================================================================
--- care2x/branches/gettext/modules/medstock/medstock-pass.php
(rev 0)
+++ care2x/branches/gettext/modules/medstock/medstock-pass.php 2010-06-30
09:19:58 UTC (rev 6442)
@@ -0,0 +1,107 @@
+<?php
+error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
+require('./roots.php');
+require($root_path.'include/helpers/inc_environment_global.php');
+/**
+* CARE2X Integrated Hospital Information System Deployment 2.1 - 2004-10-02
+* GNU General Public License
+* Copyright 2002,2003,2004,2005 Elpidio Latorilla
+* elpi...@care2x.org,
+*
+* See the file "copy_notice.txt" for the licence notice
+*/
+
+define('LANG_FILE','stdpass.php');
+define('NO_2LEVEL_CHK',1);
+require_once($root_path.'include/helpers/inc_front_chain_lang.php');
+
+require_once($root_path.'global_conf/areas_allow.php');
+
+//$allowedarea=&$allow_area['depot'];
+
+$append=URL_REDIRECT_APPEND."&cat=medstock&from=$src&userck=";
+
+switch($mode) {
+ case "archive":$title=$LDOrderArchive;
+ $allowedarea[] =
'_a_1_meddepotdbadmin';
+ $src="archivepass";
+ $userck="ck_prod_arch_user";
+
$fileforward=$root_path."modules/products/products-archive.php".$append.$userck;
+ break;
+/* case "dbank": $title="$LDPharmaDb";
+ $src="dbankpass";
+ $userck="ck_prod_db_user";
+
$fileforward="medstock-database-functions.php".$append.$userck;
+ break;*/
+ case "bot": $title="$LDMediBotActivate";
+ $allowedarea[] =
'_a_1_meddepotdbadmin';
+ $src="medibotpass";
+ $userck="ck_prod_bot_user";
+
$fileforward=$root_path."modules/products/products-bestellbot.php".$append.$userck;
+ break;
+ case "catalog": $title=$LDOrderCat;
+ $allowedarea[] =
'_a_1_meddepotdbadmin';
+ $src="catalogpass";
+ $userck="ck_prod_order_user";
+
$fileforward=$root_path."modules/products/products-bestellkatalog-edit.php".$append.$userck."&target=catalog&from=".$src;
+ break;
+ case "supplier": $title=$LDSupplier;
+ $allowedarea[] =
'_a_1_meddepotdbadmin';
+ $src="catalogpass";
+ $userck="ck_supplier_db_user";
+
$fileforward=$root_path."modules/supplier/supplier.php".$append.$userck;
+ break;
+ case "supply" : $title=$LDSupply;
+ $allowedarea[] =
'_a_1_meddepotdbadmin';
+
$append=URL_REDIRECT_APPEND."&cat=supply&from=$src&userck=";
+ $src="catalogpass";
+ $userck="ck_supply_db_user";
+
$fileforward=$root_path."modules/supplier/supply.php".$append.$userck;
+ break;
+ default: $title=$LDPharmaOrder;
+ $allowedarea[] =
'_a_3_meddepotorder';
+ $src="orderpass";
+ $mode="order";
+ $userck="ck_prod_order_user";
+
$fileforward=$root_path."modules/products/products-bestellung.php".$append.$userck;
+}
+
+$thisfile=basename(__FILE__);
+$breakfile='medstock.php '.URL_APPEND;
+
+$lognote="$LDMedDepot $title ok";
+
+// reset all 2nd level lock cookies
+setcookie($userck.$sid,'');
+require($root_path.'include/helpers/inc_2level_reset.php');
setcookie('ck_2level_sid'.$sid,'',0,'/');
+
+require($root_path.'include/helpers/inc_passcheck_internchk.php');
+if ($pass=='check')
+ include($root_path.'include/helpers/inc_passcheck.php');
+
+$errbuf="$LDMedDepot $title";
+$minimal=1;
+require($root_path.'include/helpers/inc_passcheck_head.php');
+?>
+
+<BODY <?php if (!$nofocus) echo
'onLoad="document.passwindow.userid.select()"'; echo '
bgcolor='.$cfg['body_bgcolor'];?>>
+
+<p>
+<FONT SIZE=-1 FACE="Arial">
+<img src="../../gui/img/common/default/soft.png" border=0 width=64 height=64
align="middle">
+<FONT COLOR="<?php echo $cfg[top_txtcolor] ?>" SIZE=5 FACE="verdana">
<b><?php echo "$LDMedDepot :: $title" ?></b></font>
+<p>
+<table width=100% border=0 cellpadding="0" cellspacing="0">
+
+<?php require($root_path.'include/helpers/inc_passcheck_mask.php') ?>
+
+<?php
+require($root_path.'include/helpers/inc_load_copyrite.php');
+?>
+
+
+</FONT>
+
+
+</BODY>
+</HTML>
Added: care2x/branches/gettext/modules/medstock/medstock-report.php
===================================================================
--- care2x/branches/gettext/modules/medstock/medstock-report.php
(rev 0)
+++ care2x/branches/gettext/modules/medstock/medstock-report.php
2010-06-30 09:19:58 UTC (rev 6442)
@@ -0,0 +1,235 @@
+<?php
+error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
+require('./roots.php');
+require($root_path.'include/helpers/inc_environment_global.php');
+/**
+* CARE2X Integrated Hospital Information System Deployment 2.1 - 2004-10-02
+* GNU General Public License
+* Copyright 2002,2003,2004,2005 Elpidio Latorilla
+* elpi...@care2x.org,
+*
+* See the file "copy_notice.txt" for the licence notice
+*/
+define('LANG_FILE','products.php');
+$local_user='ck_prod_db_user';
+require_once($root_path.'include/helpers/inc_front_chain_lang.php');
+
+/* Load the date formatter */
+require_once($root_path.'include/helpers/inc_date_format_functions.php');
+
+# Create a core object
+require_once($root_path.'include/core/class_core.php');
+$core = & new Core;
+
+$thisfile='medstock-report.php';
+
+if($mode=='sent') $breakfile=$thisfile; else
$breakfile='medstock-database-functions.php';
+
+//$db->debug=1;
+
+if(($report!=NULL)||($mode!=''))
+{
+ $dbtable='care_med_report';
+
+ switch($mode)
+ {
+ case 'save':
+ $sql="INSERT INTO ".$dbtable."
+ (
+ report,
+ reporter,
+ id_nr,
+ report_date,
+ report_time,
+ status,
+ history,
+ create_id,
+ create_time
+ )
+ VALUES
+ (
+
'".htmlspecialchars($report)."',
+ '$reporter',
+ '$id_nr',
+ '$report_date',
+ '$report_time',
+ 'pending',
+ 'Created:
".$_SESSION['sess_user_name']." ".date('Y-m-d H:i:s')."\n\r',
+
'".$_SESSION['sess_user_name']."',
+ '".date('YmdHis')."'
+ )";
+
+ if($core->Transact($sql))
+ {
+ $oid=$db->Insert_ID();
+
$core->coretable=$dbtable;
+ $report_nr =
$core->LastInsertPK('report_nr',$oid);
+ header("Location:
$thisfile".URL_REDIRECT_APPEND."&userck=$userck&dept=$dept&report_nr=$report_nr&mode=sent");
exit;
+
+ exit;
+ }
+ else {echo
"<p>".$sql."<p>$LDDbNoSave.";};
+ break;
+
+ case 'sent':
+ $sql="SELECT
report_nr, report, reporter, report_date, report_time FROM $dbtable
+
WHERE report_nr='$report_nr'";
+
+
if($ergebnis=$db->Execute($sql))
+ {
+
$rows=$ergebnis->RecordCount();
+ }
+ else echo
"$sql<br>$LDDbNoRead<br>";
+
+ break;
+ } // end of switch
+}
+
+?>
+<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 3.0//EN" "html.dtd">
+<?php html_rtl($lang); ?>
+<HEAD>
+<?php echo setCharSet(); ?>
+
+ <script language="javascript" >
+<!--
+
+function checkform(d)
+{
+
+ if(d.report.value=="")
+ { alert("<?php echo $LDAlertReport ?>");
+ d.report.focus();
+ return false;
+ }
+ if(d.reporter.value=="")
+ { alert("<?php echo $LDAlertName ?>");
+ d.reporter.focus();
+ return false;
+ }
+ if(d.id_nr.value=="")
+ { alert("<?php echo $LDAlertPersonNr ?>");
+ d.id_nr.focus();
+ return false;
+ }
+ return true;
+}
+
+// -->
+</script>
+
+<?php
+require($root_path.'include/helpers/inc_js_gethelp.php');
+require($root_path.'include/helpers/inc_css_a_hilitebu.php');
+?></HEAD>
+
+<BODY topmargin=0 leftmargin=0 marginwidth=0 marginheight=0
+<?php if (!$cfg['dhtml']){ echo 'link='.$cfg['body_txtcolor'].'
alink='.$cfg['body_alink'].' vlink='.$cfg['body_txtcolor']; } ?>>
+
+<table width=100% border=0 height=100% cellpadding="0" cellspacing="0">
+<tr valign=top>
+<td bgcolor="<?php echo $cfg['top_bgcolor']; ?>" height="10" >
+<FONT COLOR="<?php echo $cfg['top_txtcolor']; ?>" SIZE=+2
FACE="Arial"><STRONG> <?php echo "$LDMedDepot - $LDReport"
?></STRONG></FONT></td>
+<td bgcolor="<?php echo $cfg['top_bgcolor']; ?>" height="10" align=right>
+<a href="#" onClick=history.back(1)><img <?php echo
createLDImgSrc($root_path,'back2.gif','0') ?> <?php
if($cfg['dhtml'])echo'class="fadeOut" >';?></a><a
+href="javascript:gethelp('products_db.php','report','<?php echo $mode
?>','<?php echo $cat ?>','<?php echo $update ?>')"><img <?php echo
createLDImgSrc($root_path,'hilfe-r.gif','0') ?> <?php
if($cfg['dhtml'])echo'class="fadeOut" >';?></a><a
+href="<?php echo $breakfile ?>?sid=<?php echo "$sid&lang=$lang" ?>"><img <?php
echo createLDImgSrc($root_path,'close2.gif','0') ?> <?php
if($cfg['dhtml'])echo'class="fadeOut" >';?></a></td></tr>
+<tr valign=top >
+<td bgcolor=<?php echo $cfg['body_bgcolor']; ?> valign=top colspan=2><p><br>
+<ul>
+
+
+<?php if ($mode=="sent") : ?>
+<FONT SIZE=4 FACE="Arial" color=#00cc00>
+<img <?php echo createComIcon($root_path,'varrow.gif','0') ?>>
+<b><?php echo $LDReportSent ?></b></FONT> <font size="2" face="arial">
+</font><p>
+<?php
+$tog=1;
+$content=$ergebnis->FetchRow();
+echo '</font>
+ <table cellpadding=0 cellspacing=0 border=0
bgcolor="#666666"><tr><td><table border=0 cellspacing=1 cellpadding=3>
+ <tr bgcolor=#ffffff>
+ <td colspan=5><p><br><font face=Verdana,Arial
size=2><ul><i>" '.nl2br($content['report']).' "</i></ul></td>
+ </tr>
+ <tr bgcolor=#cccccc>
+ <td colspan=5><p>
+ <font face=Verdana,Arial
size=2>'.$LDReporter.': '.nl2br($content['reporter']).'<br>
+ '.$LDDate.':
'.formatDate2Local($content['report_date'],$date_format).'<br>
+ '.$LDTime.':
'.convertTimeToLocal($content['report_time']).'<p></td>
+ </tr></table></td></tr>
+ </table>';
+?>
+<?php else : ?>
+<FONT SIZE=4 FACE="Arial" color="#00cc00">
+<img <?php echo createComIcon($root_path,'varrow.gif','0') ?>>
+<b><?php echo $LDWriteReport ?></b></FONT> <font size="2" face="arial">
+</font><p>
+<form ENCTYPE="multipart/form-data" action="<?php echo $thisfile ?>"
method="post" onSubmit="return checkform(this)">
+<table cellpadding=5 border=0 cellspacing=1>
+<tr>
+<td bgcolor="#dddddd" ><FONT SIZE=-1 FACE="Arial">
+<p><?php echo $LDReport ?>:<br>
+<TEXTAREA NAME="report" Content-Type="text/html"
+ COLS=60 ROWS=10></TEXTAREA>
+</td>
+</tr>
+<tr>
+<td bgcolor="#dddddd"><FONT SIZE=-1 FACE="Arial">
+
+<?php echo $LDReporter ?>:<br><input type="text" name="reporter" size=30
value="<?php echo $_COOKIE[$local_user.$sid]; ?>"> <p>
+<?php echo $LDPersonellNr ?>:<br><input type="text" name="id_nr" size=30>
+<input type="hidden" name="report_date" value="<?php echo date('Y-m-d') ?>" >
+<input type="hidden" name="report_time" value= "<?php echo date('H:i:s') ?>">
+<input type="hidden" name="sid" value= "<?php echo $sid ?>">
+<input type="hidden" name="lang" value= "<?php echo $lang ?>">
+<input type="hidden" name="userck" value= "<?php echo $userck ?>">
+<input type="hidden" name="mode" value= "save">
+
+</td>
+</tr>
+</table>
+<p>
+<!-- <input type="submit" name="versand" value="<?php echo $LDSend ?>" >
+ -->
+ <input type="image" <?php echo
createLDImgSrc($root_path,'abschic.gif','0','absmiddle') ?>>
+<input type="reset" value="<?php echo $LDResetAll ?>" >
+</form>
+
+</FONT>
+<p>
+<?php endif ?>
+
+<p>
+<p>
+<?php
+if($mode=='sent')
+{
+ echo '
+ <a href="'.$thisfile.'?sid='.$sid.'&lang='.$lang.'"><img
'.createLDImgSrc($root_path,'new_report.gif','0','absmiddle').'></a> ';
+}
+else
+{
+?>
+<a href="<?php echo $breakfile ?>?sid=<?php echo
"$sid&lang=$lang&userck=$userck" ?>" ><img <?php echo
createLDImgSrc($root_path,'close2.gif','0') ?> height=24 align="middle"></a>
+<?php
+}
+?>
+<p>
+</ul>
+
+</FONT>
+<p>
+</td>
+</tr>
+<tr>
+<td bgcolor=<?php echo $cfg['bot_bgcolor']; ?> height=70 colspan=2>
+<?php
+require($root_path.'include/helpers/inc_load_copyrite.php');
+?>
+</td></tr>
+</table>
+
+</FONT>
+</BODY>
+</HTML>
Added: care2x/branches/gettext/modules/medstock/medstock.php
===================================================================
--- care2x/branches/gettext/modules/medstock/medstock.php
(rev 0)
+++ care2x/branches/gettext/modules/medstock/medstock.php 2010-06-30
09:19:58 UTC (rev 6442)
@@ -0,0 +1,143 @@
+<?php
+error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR);
+require('./roots.php');
+require($root_path.'include/helpers/inc_environment_global.php');
+/**
+* CARE2X Integrated Hospital Information System Deployment 2.1 - 2004-10-02
+* GNU General Public License
+* Copyright 2002,2003,2004,2005 Elpidio Latorilla
+* elpi...@care2x.org,
+*
+* See the file "copy_notice.txt" for the licence notice
+*/
+define('LANG_FILE','products.php');
+define('NO_2LEVEL_CHK','1');
+require_once($root_path.'include/helpers/inc_front_chain_lang.php');
+
+$breakfile=$root_path.'main/startframe.php'.URL_APPEND;
+// reset all 2nd level lock cookies
+require($root_path.'include/helpers/inc_2level_reset.php');
+require ($root_path.'include/core/class_access.php');
+
+$access = new
Access($_SESSION['sess_login_userid'],$_SESSION['sess_login_pw']);
+$hideOrder = 0;
+if(ereg("_a_1_meddepotdbadmin",$access->PermissionAreas()))
+ $hideOrder = 1;
+
+# Start Smarty templating here
+ /**
+ * LOAD Smarty
+ */
+
+ # Note: it is advisable to load this after the inc_front_chain_lang.php so
+ # that the smarty script can use the user configured template theme
+
+ require_once($root_path.'gui/smarty_template/smarty_care.class.php');
+ $smarty = new smarty_care('common');
+
+ # Create a helper smarty object without reinitializing the GUI
+ $smarty2 = new smarty_care('common', FALSE);
+
+# Added for the common header top block
+
+ $smarty->assign('sToolbarTitle',$LDMedDepot);
+
+ # Added for the common header top block
+ $smarty->assign('pbHelp',"javascript:gethelp('submenu1.php','$LDMedDepot')");
+
+ $smarty->assign('breakfile',$breakfile);
+
+ # Window bar title
+ $smarty->assign('title',$LDMedDepot);
+
+ # Add the bot onLoad code
+
+ if(isset($stb) && $stb) $smarty->assign('sOnLoadJs','onLoad="startbot()"');
+
+ ob_start();
+?>
+
+<script language="javascript">
+<!--
+<?php
+
+if($stb)
+echo '
+function startbot() {
+
medibotwin'.$sid.'=window.open("'.$root_path.'modules/products/products-bestellbot.php'.URL_REDIRECT_APPEND.'&cat=medstock&userck='.$userck.'","medibotwin'.$sid.'","width=200,height=180,menubar=no,resizable=yes,scrollbars=yes");
+}
+';
+?>
+// -->
+</script>
+
+<?php
+
+ $sTemp = ob_get_contents();
+ob_end_clean();
+$smarty->append('JavaScript',$sTemp);
+
+ # Prepare the submenu icons
+
+ $aSubMenuIcon=array(createComIcon($root_path,'bestell.gif','0'),
+
createComIcon($root_path,'help_tree.gif','0'),
+
createComIcon($root_path,'templates.gif','0'),
+
createComIcon($root_path,'documents.gif','0'),
+
createComIcon($root_path,'storage.gif','0'),
+
createComIcon($root_path,'sitemap_animator.gif','0'),
+
createComIcon($root_path,'storage.gif','0'),
+
createComIcon($root_path,'storage.gif','0')
+ );
+
+# Prepare the submenu item descriptions
+
+$aSubMenuText=array($LDPharmaOrderTxt,
+ $LDHow2OrderTxt,
+ $LDOrderCatTxt,
+ $LDOrderArchiveTxt,
+ $LDPharmaDbTxt,
+ $LDOrderBotActivateTxt,
+ $LDSupplierTxt,
+ $LDSupplyTxt
+ );
+
+# Prepare the submenu item links indexed by their template tags
+
+$aSubMenuItem=array('LDPharmaOrder' => "<a
href=\"medstock-pass.php".URL_APPEND."&mode=order\">$LDPharmaOrder</a>",
+ 'LDHow2Order' => "<a
href=\"javascript:gethelp('products.php','how2','','meddepot')\">$LDHow2Order</a>",
+ 'LDOrderCat' => "<a
href=\"medstock-pass.php".URL_APPEND."&mode=catalog\">$LDOrderCat</a>",
+ 'LDOrderArchive' => "<a
href=\"medstock-pass.php".URL_APPEND."&mode=archive\">$LDOrderArchive</a>",
+ 'LDPharmaDb' => "<a
href=\"medstock-pass.php".URL_APPEND."&mode=dbank\">$LDPharmaDb</a>",
+ 'LDOrderBotActivate' => "<a
href=\"medstock-orderbot-pass.php".URL_APPEND."\" >$LDMediBotActivate</a>",
+ 'LDSupplier' => "<a
href=\"medstock-pass.php".URL_APPEND."&mode=supplier\">$LDSupplier</a>",
+ 'LDSupply' => "<a
href=\"medstock-pass.php".URL_APPEND."&mode=supply\">$LDSupply</a>"
+
);
+
+# Create the submenu rows
+
+$iRunner = 0;
+
+while(list($x,$v)=each($aSubMenuItem)){
+ if($hideOrder == 1 && $iRunner == 0) {$hideOrder = 0;continue;}
+ $sTemp='';
+ ob_start();
+ if($cfg['icons'] != 'no_icon')
$smarty2->assign('sIconImg','<img '.$aSubMenuIcon[$iRunner].'>');
+ $smarty2->assign('sSubMenuItem',$v);
+ $smarty2->assign('sSubMenuText',$aSubMenuText[$iRunner]);
+ $smarty2->display('common/submenu_row.tpl');
+ $sTemp = ob_get_contents();
+ ob_end_clean();
+ $iRunner++;
+ $smarty->assign($x,$sTemp);
+}
+
+# Assign the submenu to the mainframe center block
+
+ $smarty->assign('sMainBlockIncludeFile','medstock/submenu_medstock.tpl');
+
+ /**
+ * show Template
+ */
+
+ $smarty->display('common/mainframe.tpl');
+?>
Added: care2x/branches/gettext/modules/medstock/roots.php
===================================================================
--- care2x/branches/gettext/modules/medstock/roots.php
(rev 0)
+++ care2x/branches/gettext/modules/medstock/roots.php 2010-06-30 09:19:58 UTC
(rev 6442)
@@ -0,0 +1,4 @@
+<?php
+$root_path='../../';
+$top_dir='modules/medstock/';
+?>
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
This SF.net email is sponsored by Sprint
What will you do first with EVO, the first 4G phone?
Visit sprint.com/first -- http://p.sf.net/sfu/sprint-com-first
_______________________________________________
Care2002-developers mailing list
Care2002-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/care2002-developers
