149 lines
14 KiB
HTML
149 lines
14 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
|
|
<html><head><meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
|
|
<title>phpcompta: /home/dany/developpement/phpcompta-dev/phpcompta/html/bilan.php Source File</title>
|
|
<link href="doxygen.css" rel="stylesheet" type="text/css">
|
|
</head><body>
|
|
<!-- Generated by Doxygen 1.4.4 -->
|
|
<div class="qindex"><a class="qindex" href="index.html">Main Page</a> | <a class="qindex" href="namespaces.html">Namespace List</a> | <a class="qindex" href="hierarchy.html">Class Hierarchy</a> | <a class="qindex" href="annotated.html">Data Structures</a> | <a class="qindex" href="dirs.html">Directories</a> | <a class="qindex" href="files.html">File List</a> | <a class="qindex" href="functions.html">Data Fields</a> | <a class="qindex" href="globals.html">Globals</a> | <a class="qindex" href="pages.html">Related Pages</a></div>
|
|
<div class="nav">
|
|
<a class="el" href="dir_000000.html">developpement</a> » <a class="el" href="dir_000001.html">phpcompta-dev</a> » <a class="el" href="dir_000002.html">phpcompta</a> » <a class="el" href="dir_000003.html">html</a></div>
|
|
<h1>bilan.php</h1><a href="bilan_8php.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <?
|
|
<a name="l00002"></a>00002 <span class="comment">/*</span>
|
|
<a name="l00003"></a>00003 <span class="comment"> * This file is part of PhpCompta.</span>
|
|
<a name="l00004"></a>00004 <span class="comment"> *</span>
|
|
<a name="l00005"></a>00005 <span class="comment"> * PhpCompta is free software; you can redistribute it and/or modify</span>
|
|
<a name="l00006"></a>00006 <span class="comment"> * it under the terms of the GNU General Public License as published by</span>
|
|
<a name="l00007"></a>00007 <span class="comment"> * the Free Software Foundation; either version 2 of the License, or</span>
|
|
<a name="l00008"></a>00008 <span class="comment"> * (at your option) any later version.</span>
|
|
<a name="l00009"></a>00009 <span class="comment"> *</span>
|
|
<a name="l00010"></a>00010 <span class="comment"> * PhpCompta is distributed in the hope that it will be useful,</span>
|
|
<a name="l00011"></a>00011 <span class="comment"> * but WITHOUT ANY WARRANTY; without even the implied warranty of</span>
|
|
<a name="l00012"></a>00012 <span class="comment"> * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</span>
|
|
<a name="l00013"></a>00013 <span class="comment"> * GNU General Public License for more details.</span>
|
|
<a name="l00014"></a>00014 <span class="comment"> *</span>
|
|
<a name="l00015"></a>00015 <span class="comment"> * You should have received a copy of the GNU General Public License</span>
|
|
<a name="l00016"></a>00016 <span class="comment"> * along with PhpCompta; if not, write to the Free Software</span>
|
|
<a name="l00017"></a>00017 <span class="comment"> * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA</span>
|
|
<a name="l00018"></a>00018 <span class="comment">*/</span>
|
|
<a name="l00019"></a>00019 <span class="comment">/* $Revision$ */</span>
|
|
<a name="l00020"></a>00020 <span class="comment">// Copyright Author Dany De Bontridder ddebontridder@yahoo.fr</span>
|
|
<a name="l00024"></a>00024 <span class="comment"></span>include_once(<span class="stringliteral">"ac_common.php"</span>);
|
|
<a name="l00025"></a>00025 include_once(<span class="stringliteral">"impress_inc.php"</span>);
|
|
<a name="l00026"></a>00026 include_once(<span class="stringliteral">"postgres.php"</span>);
|
|
<a name="l00027"></a>00027
|
|
<a name="l00028"></a>00028
|
|
<a name="l00029"></a>00029 include ('class_user.php');
|
|
<a name="l00030"></a>00030 <span class="comment">/* Admin. Dossier */</span>
|
|
<a name="l00031"></a><a class="code" href="bilan_8php.html#a0">00031</a> <a class="code" href="impress__fiche_8php.html#a0">$cn</a>=<a class="code" href="postgres_8php.html#a1">DbConnect</a>($_SESSION['g_dossier']);
|
|
<a name="l00032"></a>00032
|
|
<a name="l00033"></a><a class="code" href="bilan_8php.html#a1">00033</a> <a class="code" href="user__action__ach_8php.html#a9">$User</a>=<span class="keyword">new</span> <a class="code" href="classcl__user.html">cl_user</a>($cn);
|
|
<a name="l00034"></a>00034 <a class="code" href="user__action__ach_8php.html#a9">$User</a>->Check();
|
|
<a name="l00035"></a>00035
|
|
<a name="l00036"></a>00036 <span class="comment">// TODO a specific level of security for the "bilan" ???</span>
|
|
<a name="l00037"></a>00037 <span class="comment">// Change must be done here</span>
|
|
<a name="l00038"></a>00038 <span class="keywordflow">if</span> ( $User->admin == 0 ) {
|
|
<a name="l00039"></a>00039 <span class="keywordflow">if</span> ($User->CheckAction($cn,<a class="code" href="constant_8php.html#a6">IMP</a>)
|
|
<a name="l00040"></a>00040 ==0
|
|
<a name="l00041"></a>00041 )
|
|
<a name="l00042"></a>00042 {
|
|
<a name="l00043"></a>00043 <span class="comment">/* Cannot Access */</span>
|
|
<a name="l00044"></a>00044 <a class="code" href="ac__common_8php.html#a8">NoAccess</a>();
|
|
<a name="l00045"></a>00045 }
|
|
<a name="l00046"></a>00046
|
|
<a name="l00047"></a>00047 }
|
|
<a name="l00048"></a>00048
|
|
<a name="l00049"></a>00049 <span class="comment">// A rtf file is generated</span>
|
|
<a name="l00050"></a>00050 header('Content-type: application/rtf');
|
|
<a name="l00051"></a>00051
|
|
<a name="l00052"></a>00052 <span class="comment">// It will be called downloaded.pdf</span>
|
|
<a name="l00053"></a>00053 header('Content-Disposition: attachment; filename=<span class="stringliteral">"bilan.rtf"</span>');
|
|
<a name="l00054"></a>00054
|
|
<a name="l00055"></a>00055
|
|
<a name="l00056"></a>00056 <span class="comment">// Variable</span>
|
|
<a name="l00057"></a>00057 <span class="comment">// Start periode </span>
|
|
<a name="l00058"></a><a class="code" href="bilan_8php.html#a2">00058</a> <a class="code" href="bilan_8php.html#a2">$start</a>=( isset ($_POST['from_periode']))?$_POST['from_periode']:-1;
|
|
<a name="l00059"></a><a class="code" href="bilan_8php.html#a3">00059</a> <a class="code" href="bilan_8php.html#a3">$end</a>=( isset ($_POST['to_periode']))?$_POST['to_periode']:-1;
|
|
<a name="l00060"></a>00060
|
|
<a name="l00061"></a>00061 <span class="comment">// Variable if ok ?</span>
|
|
<a name="l00062"></a>00062 <span class="keywordflow">if</span> ( $<a class="code" href="document__modele_8inc_8php.html#a5">start</a>*$end < 0 ) {
|
|
<a name="l00063"></a>00063 <a class="code" href="ac__common_8php.html#a0">echo_error</a>(<span class="stringliteral">"Missing Variable start = $start end=$end"</span>);
|
|
<a name="l00064"></a>00064 <a class="code" href="balance_8php.html#a0">exit</a> (-1);
|
|
<a name="l00065"></a>00065 }
|
|
<a name="l00066"></a>00066 <span class="comment">// Open forms</span>
|
|
<a name="l00067"></a><a class="code" href="bilan_8php.html#a4">00067</a> <a class="code" href="bilan_8php.html#a4">$bnb_form</a>=fopen('document/fr_be/bnb.form<span class="charliteral">','</span>r');
|
|
<a name="l00068"></a>00068 <span class="keywordflow">if</span> ( $bnb_form == <span class="keyword">false</span>) {
|
|
<a name="l00069"></a>00069 echo 'Cannot Open';
|
|
<a name="l00070"></a>00070 <a class="code" href="balance_8php.html#a0">exit</a>();
|
|
<a name="l00071"></a>00071 }
|
|
<a name="l00072"></a><a class="code" href="bilan_8php.html#a5">00072</a> <a class="code" href="bilan_8php.html#a5">$col</a>=array();
|
|
<a name="l00073"></a>00073
|
|
<a name="l00074"></a>00074 <span class="comment">// read forms line per line</span>
|
|
<a name="l00075"></a>00075 <span class="keywordflow">while</span> (! feof ($bnb_form)) {
|
|
<a name="l00076"></a>00076 $buffer=trim(fgets($bnb_form));
|
|
<a name="l00077"></a>00077 <span class="comment">// $a=(CheckFormula($buffer) == true)?"$buffer ok<br>":'<font color="red">'.'Pas ok '.$buffer."</font><br>";</span>
|
|
<a name="l00078"></a>00078 <span class="comment">// echo $a;</span>
|
|
<a name="l00079"></a>00079 <span class="comment">// blank line are skipped</span>
|
|
<a name="l00080"></a>00080 <span class="keywordflow">if</span> (strlen(trim($buffer))==0)
|
|
<a name="l00081"></a>00081 <span class="keywordflow">continue</span>;
|
|
<a name="l00082"></a>00082
|
|
<a name="l00083"></a>00083 <span class="comment">// buffer contains a formula A$=....</span>
|
|
<a name="l00084"></a>00084 <span class="comment">// We need to eval it </span>
|
|
<a name="l00085"></a>00085 <span class="comment">//ereg("\\$[a-zA-Z]+[0-9]*=",$buffer,$e);</span>
|
|
<a name="l00086"></a>00086 <span class="comment">// echo $e[0];</span>
|
|
<a name="l00087"></a>00087 <span class="comment">//echo "<br>".$form;</span>
|
|
<a name="l00088"></a><a class="code" href="bilan_8php.html#a6">00088</a> <a class="code" href="action_8inc_8php.html#a16">$a</a>=<a class="code" href="impress__inc_8php.html#a9">ParseFormula</a>($cn,<span class="stringliteral">"$buffer"</span>,$buffer,$<a class="code" href="document__modele_8inc_8php.html#a5">start</a>,$end,<span class="keyword">false</span>);
|
|
<a name="l00089"></a><a class="code" href="bilan_8php.html#a7">00089</a> <a class="code" href="balance_8php.html#a11">$b</a>=str_replace(<span class="stringliteral">"$"</span>,<span class="stringliteral">"\$"</span>,$a);
|
|
<a name="l00090"></a>00090
|
|
<a name="l00091"></a>00091 <span class="comment">// echo "Formule to eval".$b.'<hr>';</span>
|
|
<a name="l00092"></a>00092 eval(<span class="stringliteral">"$b;"</span>);
|
|
<a name="l00093"></a>00093 <span class="comment">// var_dump($b);</span>
|
|
<a name="l00094"></a>00094
|
|
<a name="l00095"></a>00095 }<span class="comment">// end read form line per line</span>
|
|
<a name="l00096"></a>00096 <span class="comment">// echo "<hr>";</span>
|
|
<a name="l00097"></a>00097 fclose ($bnb_form);
|
|
<a name="l00099"></a>00099 <span class="comment">// Open the rtf document in order to read it and to </span>
|
|
<a name="l00100"></a>00100 <span class="comment">// replace the <<>> by the appropriate values</span>
|
|
<a name="l00101"></a>00101 <span class="comment">//</span>
|
|
<a name="l00102"></a>00102 <span class="comment">// Open the rtf template</span>
|
|
<a name="l00103"></a><a class="code" href="bilan_8php.html#a8">00103</a> <a class="code" href="bilan_8php.html#a8">$bnb_rtf</a>=fopen('document/fr_be/bnb.rtf<span class="charliteral">','</span>r');
|
|
<a name="l00104"></a>00104 <span class="comment">// $out=fopen('tmp/a.rtf','w+');</span>
|
|
<a name="l00105"></a>00105 <span class="comment">// if ( $bnb_rtf == false) {</span>
|
|
<a name="l00106"></a>00106 <span class="comment">// echo 'Cannot Open rtf';</span>
|
|
<a name="l00107"></a>00107 <span class="comment">// exit();</span>
|
|
<a name="l00108"></a>00108 <span class="comment">// }</span>
|
|
<a name="l00109"></a>00109 <span class="comment">// Read it until the end</span>
|
|
<a name="l00110"></a>00110 <span class="keywordflow">while</span> ( !feof($bnb_rtf) ) {
|
|
<a name="l00111"></a>00111 <a class="code" href="bilan_8php.html#a10">$line_rtf</a>=fgets($bnb_rtf);
|
|
<a name="l00112"></a>00112 <span class="comment">// the line contains the magic <<</span>
|
|
<a name="l00113"></a>00113 <span class="keywordflow">if</span> (ereg(<span class="stringliteral">"<<\\$[a-zA-Z]*[0-9]*>>"</span>,$line_rtf,$f2) == <span class="keyword">true</span>) {
|
|
<a name="l00114"></a>00114 <span class="comment">// DEBUG</span>
|
|
<a name="l00115"></a>00115 <span class="comment">// echo $line_rtf.'<br>';</span>
|
|
<a name="l00116"></a>00116
|
|
<a name="l00117"></a>00117 <span class="comment">// the f2 array contains all the magic << in the line</span>
|
|
<a name="l00118"></a>00118 foreach ($f2 as $f2_str) {
|
|
<a name="l00119"></a>00119 <span class="comment">// DEBUG</span>
|
|
<a name="l00120"></a>00120 <span class="comment">// echo "single_f2 = $f2_str <br>";</span>
|
|
<a name="l00121"></a>00121 <span class="comment">// replace single_f2 by its value</span>
|
|
<a name="l00122"></a>00122 <a class="code" href="bilan_8php.html#a9">$f2_value</a>=str_replace(<span class="stringliteral">"<<"</span>,<span class="stringliteral">""</span>,$f2_str);
|
|
<a name="l00123"></a><a class="code" href="bilan_8php.html#a9">00123</a> <a class="code" href="bilan_8php.html#a9">$f2_value</a>=str_replace(<span class="stringliteral">">>"</span>,<span class="stringliteral">""</span>,$f2_value);
|
|
<a name="l00124"></a>00124 <a class="code" href="bilan_8php.html#a9">$f2_value</a>=str_replace(<span class="stringliteral">"$"</span>,<span class="stringliteral">""</span>,$f2_value);
|
|
<a name="l00125"></a>00125 <span class="comment">// DEBUG</span>
|
|
<a name="l00126"></a>00126 <span class="comment">//echo "f2_value=$f2_value";</span>
|
|
<a name="l00127"></a>00127 <a class="code" href="action_8inc_8php.html#a16">$a</a>=${<span class="stringliteral">"$f2_value"</span>};
|
|
<a name="l00128"></a>00128 <span class="comment">// DEBUG echo " a = $a";</span>
|
|
<a name="l00129"></a><a class="code" href="bilan_8php.html#a10">00129</a> <a class="code" href="bilan_8php.html#a10">$line_rtf</a>=str_replace($f2_str,$a,$line_rtf);
|
|
<a name="l00130"></a>00130
|
|
<a name="l00131"></a>00131 }<span class="comment">// foreach end</span>
|
|
<a name="l00132"></a>00132 }
|
|
<a name="l00133"></a>00133 <span class="comment">// DEBUG</span>
|
|
<a name="l00134"></a>00134 <span class="comment">// fwrite($out,$line_rtf);</span>
|
|
<a name="l00135"></a>00135 echo <a class="code" href="bilan_8php.html#a10">$line_rtf</a>;
|
|
<a name="l00136"></a>00136
|
|
<a name="l00137"></a>00137
|
|
<a name="l00138"></a>00138 }<span class="comment">// rtf file is read</span>
|
|
<a name="l00139"></a>00139 ?>
|
|
</pre></div><hr size="1"><address style="align: right;"><small>Generated on Mon Jun 26 20:13:15 2006 for phpcompta by
|
|
<a href="http://www.doxygen.org/index.html">
|
|
<img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.4.4 </small></address>
|
|
</body>
|
|
</html>
|