altocompta/doc/developper/html/user__form__ods_8php.html
2006-07-12 21:24:48 +00:00

417 lines
36 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: user_form_ods.php File Reference</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&nbsp;Page</a> | <a class="qindex" href="namespaces.html">Namespace List</a> | <a class="qindex" href="hierarchy.html">Class&nbsp;Hierarchy</a> | <a class="qindex" href="annotated.html">Data&nbsp;Structures</a> | <a class="qindex" href="dirs.html">Directories</a> | <a class="qindex" href="files.html">File&nbsp;List</a> | <a class="qindex" href="functions.html">Data&nbsp;Fields</a> | <a class="qindex" href="globals.html">Globals</a> | <a class="qindex" href="pages.html">Related&nbsp;Pages</a></div>
<div class="nav">
<a class="el" href="dir_000000.html">include</a></div>
<h1>user_form_ods.php File Reference</h1>Functions for the ledger of misc. operation. <a href="#_details">More...</a>
<p>
<p>
<a href="user__form__ods_8php-source.html">Go to the source code of this file.</a><table border="0" cellpadding="0" cellspacing="0">
<tr><td></td></tr>
<tr><td colspan="2"><br><h2>Functions</h2></td></tr>
<tr><td class="memItemLeft" nowrap align="right" valign="top">&nbsp;</td><td class="memItemRight" valign="bottom"><a class="el" href="user__form__ods_8php.html#a0">FormODS</a> ($p_cn, $p_jrn, $p_periode, $p_submit, $p_array=null, $pview_only=true, $p_article=6, $p_saved=false)</td></tr>
<tr><td class="mdescLeft">&nbsp;</td><td class="mdescRight">Display the miscellaneous operation Used to show detail, encode a new oper or update one. <a href="#a0"></a><br></td></tr>
<tr><td class="memItemLeft" nowrap align="right" valign="top">&nbsp;</td><td class="memItemRight" valign="bottom"><a class="el" href="user__form__ods_8php.html#a1">RecordODS</a> ($p_cn, $p_array, $p_user, $p_jrn)</td></tr>
<tr><td class="mdescLeft">&nbsp;</td><td class="mdescRight">Record an buy in the table jrn &amp; jrnx. <a href="#a1"></a><br></td></tr>
</table>
<hr><a name="_details"></a><h2>Detailed Description</h2>
Functions for the ledger of misc. operation.
<p>
<p>
Definition in file <a class="el" href="user__form__ods_8php-source.html">user_form_ods.php</a>.<hr><h2>Function Documentation</h2>
<a class="anchor" name="a0"></a><!-- doxytag: member="user_form_ods.php::FormODS" ref="a0" args="($p_cn, $p_jrn, $p_periode, $p_submit, $p_array=null, $pview_only=true, $p_article=6, $p_saved=false)" --><p>
<table class="mdTable" cellpadding="2" cellspacing="0">
<tr>
<td class="mdRow">
<table cellpadding="0" cellspacing="0" border="0">
<tr>
<td class="md" nowrap valign="top">FormODS </td>
<td class="md" valign="top">(&nbsp;</td>
<td class="md" nowrap valign="top">$&nbsp;</td>
<td class="mdname" nowrap> <em>p_cn</em>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_jrn</em>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_periode</em>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_submit</em>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_array</em> = <code>null</code>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>pview_only</em> = <code>true</code>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_article</em> = <code>6</code>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_saved</em> = <code>false</code></td>
</tr>
<tr>
<td class="md"></td>
<td class="md">)&nbsp;</td>
<td class="md" colspan="2"></td>
</tr>
</table>
</td>
</tr>
</table>
<table cellspacing="5" cellpadding="0" border="0">
<tr>
<td>
&nbsp;
</td>
<td>
<p>
Display the miscellaneous operation Used to show detail, encode a new oper or update one.
<p>
<dl compact><dt><b>Parameters:</b></dt><dd>
<table border="0" cellspacing="2" cellpadding="0">
<tr><td valign="top"></td><td valign="top"><em>$p_cn</em>&nbsp;</td><td>database connextion </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$p_array</em>&nbsp;</td><td>which can be empty </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$p_jrn</em>&nbsp;</td><td>the "journal" </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$p_user</em>&nbsp;</td><td>= $g_user </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$p_submit</em>&nbsp;</td><td>contains the submit string </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$pview_only</em>&nbsp;</td><td>if we cannot change it (no right or centralized op) </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$p_article</em>&nbsp;</td><td>number of article </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$p_saved</em>&nbsp;</td><td>if true propose to upload a piece gen :<ul>
<li>return: string with the form</li></ul>
</td></tr>
</table>
</dl>
<p>
Definition at line <a class="el" href="user__form__ods_8php-source.html#l00045">45</a> of file <a class="el" href="user__form__ods_8php-source.html">user_form_ods.php</a>.
<p>
References <a class="el" href="jrn__pdf_8php-source.html#l00069">$filter</a>, <a class="el" href="setup_8php-source.html#l00269">$flag</a>, <a class="el" href="balance_8php-source.html#l00118">$i</a>, <a class="el" href="jrn__detail_8php-source.html#l00124">$l_line</a>, <a class="el" href="pref_8inc_8php-source.html#l00096">$msg</a>, <a class="el" href="modify__op_8php-source.html#l00054">$p_jrn</a>, <a class="el" href="bank_8inc_8php-source.html#l00237">$r</a>, <a class="el" href="postgres_8php-source.html#l00222">CountSql()</a>, <a class="el" href="ac__common_8php-source.html#l00036">echo_error()</a>, <a class="el" href="jrn_8php-source.html#l00523">GetJrnProperty()</a>, <a class="el" href="preference_8php-source.html#l00125">GetPeriode()</a>, <a class="el" href="poste_8php-source.html#l00036">GetPosteLibelle()</a>, <a class="el" href="ac__common_8php-source.html#l00076">isNumber()</a>, <a class="el" href="action_8inc_8php-source.html#l00240">name</a>, <a class="el" href="action_8inc_8php-source.html#l00241">value</a>, and <a class="el" href="user__common_8php-source.html#l00654">VerifyOperationDate()</a>.<div class="fragment"><pre class="fragment"><a name="l00046"></a>00046 {
<a name="l00047"></a>00047 include_once(<span class="stringliteral">"poste.php"</span>);
<a name="l00048"></a>00048 <span class="keywordflow">if</span> ( $p_array != null ) {
<a name="l00049"></a>00049 <span class="comment">// array contains old value</span>
<a name="l00050"></a>00050 foreach ( $p_array as $a=&gt;$v) {
<a name="l00051"></a>00051 ${<span class="stringliteral">"$a"</span>}=$v;
<a name="l00052"></a>00052 }
<a name="l00053"></a>00053 }
<a name="l00054"></a>00054 <span class="comment">// The date</span>
<a name="l00055"></a>00055 list ($l_date_start,$l_date_end)=<a class="code" href="preference_8php.html#a2">GetPeriode</a>($p_cn,$p_periode);
<a name="l00056"></a>00056 <a class="code" href="setup_8php.html#a4">$flag</a>=(isset($e_date))?1:0;
<a name="l00057"></a>00057 $e_date=( ! isset($e_date) ) ? substr($l_date_start,2,8):$e_date;
<a name="l00058"></a>00058
<a name="l00059"></a>00059 <span class="comment">// Verify if valid date</span>
<a name="l00060"></a>00060 <span class="keywordflow">if</span> ( $flag==1 and <a class="code" href="user__common_8php.html#a9">VerifyOperationDate</a>($p_cn,$p_periode,$e_date) == null) {
<a name="l00061"></a>00061 <span class="keywordflow">if</span> ( $pview_only == <span class="keyword">true</span>)
<a name="l00062"></a>00062 <span class="keywordflow">return</span> null;
<a name="l00063"></a>00063 <span class="keywordflow">else</span>
<a name="l00064"></a>00064 $e_date=substr($l_date_start,2,8);
<a name="l00065"></a>00065 }
<a name="l00066"></a>00066
<a name="l00067"></a>00067 $e_comm=(isset($e_comm))?$e_comm:<span class="stringliteral">""</span>;
<a name="l00068"></a>00068 <span class="comment">// Save old value and set a new one</span>
<a name="l00069"></a>00069
<a name="l00070"></a>00070 <a class="code" href="bank_8inc_8php.html#a29">$r</a>=<span class="stringliteral">""</span>;
<a name="l00071"></a>00071 <span class="keywordflow">if</span> ( $pview_only == <span class="keyword">false</span>) {
<a name="l00072"></a>00072 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<a class="code" href="constant_8php.html#a79">JS_SEARCH_POSTE</a>;
<a name="l00073"></a>00073 }
<a name="l00074"></a>00074 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;FORM NAME=\"form_detail\" enctype=\"multipart/form-data\" ACTION=\"user_jrn.php?action=new&amp;p_jrn=$p_jrn\" METHOD=\"POST\"&gt;"</span>;
<a name="l00075"></a>00075 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;TABLE&gt;';
<a name="l00076"></a>00076 <span class="comment">// Date</span>
<a name="l00077"></a>00077 $wDate=<span class="keyword">new</span> <a class="code" href="classwidget.html">widget</a>('text');
<a name="l00078"></a>00078 $wDate-&gt;SetReadOnly($pview_only);
<a name="l00079"></a>00079 $wDate-&gt;table=1;
<a name="l00080"></a>00080 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;TR&gt;"</span>.$wDate-&gt;IOValue(<span class="stringliteral">"e_date"</span>,$e_date,'Date').<span class="stringliteral">"&lt;/TR&gt;"</span>;
<a name="l00081"></a>00081
<a name="l00082"></a>00082 <span class="comment">// Description</span>
<a name="l00083"></a>00083 $Commentaire=<span class="keyword">new</span> <a class="code" href="classwidget.html">widget</a>(<span class="stringliteral">"text"</span>);
<a name="l00084"></a>00084 $Commentaire-&gt;table=1;
<a name="l00085"></a>00085 $Commentaire-&gt;SetReadOnly($pview_only);
<a name="l00086"></a>00086 $Commentaire-&gt;size=80;
<a name="l00087"></a>00087 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;tr&gt;"</span>;
<a name="l00088"></a>00088 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=$Commentaire-&gt;IOValue(<span class="stringliteral">"e_comm"</span>,$e_comm,<span class="stringliteral">"Description"</span>);
<a name="l00089"></a>00089 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;/tr&gt;"</span>;
<a name="l00090"></a>00090
<a name="l00091"></a>00091 include_once(<span class="stringliteral">"fiche_inc.php"</span>);
<a name="l00092"></a>00092
<a name="l00093"></a>00093 <span class="comment">// Record the current number of article</span>
<a name="l00094"></a>00094 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;INPUT TYPE=<span class="stringliteral">"HIDDEN"</span> <a class="code" href="action_8inc_8php.html#a18">name</a>=<span class="stringliteral">"nb_item"</span> <a class="code" href="action_8inc_8php.html#a19">value</a>=<span class="stringliteral">"'.$p_article.'"</span>&gt;';
<a name="l00095"></a>00095 $e_comment=(isset($e_comment))?$e_comment:<span class="stringliteral">""</span>;
<a name="l00096"></a>00096
<a name="l00097"></a>00097
<a name="l00098"></a>00098 <span class="comment">// Start the div for item to encode</span>
<a name="l00099"></a>00099 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;DIV&gt;"</span>;
<a name="l00100"></a>00100 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;H2 <span class="keyword">class</span>=<span class="stringliteral">"info"</span>&gt;Op&amp;eacute;rations Diverses&lt;/H2&gt;';
<a name="l00101"></a>00101 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;TABLE border=<span class="stringliteral">"0"</span>&gt;';
<a name="l00102"></a>00102 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;tr&gt;"</span>;
<a name="l00103"></a>00103 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;th&gt;&lt;/th&gt;"</span>;
<a name="l00104"></a>00104 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;th&gt;Compte&lt;/th&gt;"</span>;
<a name="l00105"></a>00105 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;th&gt;Poste&lt;/th&gt;"</span>;
<a name="l00106"></a>00106 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;th&gt;Montant&lt;/th&gt;"</span>;
<a name="l00107"></a>00107 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;th&gt;Cr&amp;eacute;dit ou d&amp;eacute;dit&lt;/th&gt;"</span>;
<a name="l00108"></a>00108 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;/tr&gt;"</span>;
<a name="l00109"></a>00109 $sum_deb=0.0;
<a name="l00110"></a>00110 $sum_cred=0.0;
<a name="l00111"></a>00111
<a name="l00112"></a>00112 <span class="comment">// for each good</span>
<a name="l00113"></a>00113 <span class="keywordflow">for</span> ($i=0;$i&lt; $p_article;$i++) {
<a name="l00114"></a>00114
<a name="l00115"></a>00115 $account=(isset(${<span class="stringliteral">"e_account$i"</span>}))?${<span class="stringliteral">"e_account$i"</span>}:<span class="stringliteral">""</span>;
<a name="l00116"></a>00116
<a name="l00117"></a>00117 $lib=<span class="stringliteral">""</span>;
<a name="l00118"></a>00118 <span class="comment">// If $account has a value</span>
<a name="l00119"></a>00119 <span class="keywordflow">if</span> ( <a class="code" href="ac__common_8php.html#a2">isNumber</a>($account) == 1 ) {
<a name="l00120"></a>00120 <span class="keywordflow">if</span> ( <a class="code" href="postgres_8php.html#a10">CountSql</a>($p_cn,<span class="stringliteral">"select * from tmp_pcmn where pcm_val=$account"</span>) == 0 ) {
<a name="l00121"></a>00121 <a class="code" href="pref_8inc_8php.html#a4">$msg</a>=<span class="stringliteral">"Poste comptable inexistant !!! "</span>;
<a name="l00122"></a>00122 <a class="code" href="ac__common_8php.html#a0">echo_error</a>($msg); <a class="code" href="ac__common_8php.html#a0">echo_error</a>($msg);
<a name="l00123"></a>00123 echo <span class="stringliteral">"&lt;SCRIPT&gt;alert('$msg');&lt;/SCRIPT&gt;"</span>;
<a name="l00124"></a>00124 $account=<span class="stringliteral">""</span>;
<a name="l00125"></a>00125 <span class="keywordflow">if</span> ( $pview_only == <span class="keyword">true</span> ) <span class="keywordflow">return</span> null;
<a name="l00126"></a>00126 } <span class="keywordflow">else</span> {
<a name="l00127"></a>00127 <span class="comment">// retrieve the tva label and name</span>
<a name="l00128"></a>00128 $lib=<a class="code" href="poste_8php.html#a0">GetPosteLibelle</a>($p_cn, $account,1);
<a name="l00129"></a>00129 }
<a name="l00130"></a>00130 }
<a name="l00131"></a>00131
<a name="l00132"></a>00132 ${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>}=(isset(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>}))?${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>}:0;
<a name="l00133"></a>00133 <span class="keywordflow">if</span> ( <a class="code" href="ac__common_8php.html#a2">isNumber</a>(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>}) == 0 ) {
<a name="l00134"></a>00134 <span class="keywordflow">if</span> ( $pview_only==<span class="keyword">true</span>) {
<a name="l00135"></a>00135 <a class="code" href="pref_8inc_8php.html#a4">$msg</a>=<span class="stringliteral">"Montant invalide !!! "</span>;
<a name="l00136"></a>00136 <a class="code" href="ac__common_8php.html#a0">echo_error</a>($msg); <a class="code" href="ac__common_8php.html#a0">echo_error</a>($msg);
<a name="l00137"></a>00137 echo <span class="stringliteral">"&lt;SCRIPT&gt;alert('$msg');&lt;/SCRIPT&gt;"</span>;
<a name="l00138"></a>00138 <span class="keywordflow">return</span> null;
<a name="l00139"></a>00139 }
<a name="l00140"></a>00140 ${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>}=0;
<a name="l00141"></a>00141 }
<a name="l00142"></a>00142 <span class="comment">// code</span>
<a name="l00143"></a>00143 <span class="comment">// Do we need a filter ?</span>
<a name="l00144"></a>00144 <a class="code" href="jrn__detail_8php.html#a11">$l_line</a>=<a class="code" href="jrn_8php.html#a5">GetJrnProperty</a>($p_cn,$p_jrn);
<a name="l00145"></a>00145 <span class="keywordflow">if</span>( strlen(trim ($l_line['jrn_def_class_cred']) ) &gt; 0 or
<a name="l00146"></a>00146 strlen(trim ($l_line['jrn_def_class_deb']) ) &gt; 0 ) {
<a name="l00147"></a>00147 <a class="code" href="jrn__pdf_8php.html#a7">$filter</a>=1;
<a name="l00148"></a>00148 }
<a name="l00149"></a>00149 <span class="keywordflow">else</span>
<a name="l00150"></a>00150 <a class="code" href="jrn__pdf_8php.html#a7">$filter</a>=null;
<a name="l00151"></a>00151 $W = <span class="keyword">new</span> <a class="code" href="classwidget.html">widget</a>('js_search_poste');
<a name="l00152"></a>00152 $W-&gt;readonly=$pview_only;
<a name="l00153"></a>00153 $W-&gt;label=<span class="stringliteral">""</span>;
<a name="l00154"></a>00154 $W-&gt;extra=<a class="code" href="modify__op_8php.html#a2">$p_jrn</a>;
<a name="l00155"></a>00155 $W-&gt;extra2=<a class="code" href="jrn__pdf_8php.html#a7">$filter</a>;
<a name="l00156"></a>00156 <span class="comment">// $r.='&lt;TR&gt;'.InputType("","js_search_poste","e_account".$i,$account,$pview_only,$filter);</span>
<a name="l00157"></a>00157 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;TR&gt;"</span>.$W-&gt;IOValue(<span class="stringliteral">"e_account"</span>.$i, $account);
<a name="l00158"></a>00158 <span class="comment">//libelle</span>
<a name="l00159"></a>00159 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;td&gt; $lib &lt;/td&gt;"</span>;
<a name="l00160"></a>00160 <span class="comment">//amount</span>
<a name="l00161"></a>00161 $wAmount=<span class="keyword">new</span> <a class="code" href="classwidget.html">widget</a>(<span class="stringliteral">"text"</span>);
<a name="l00162"></a>00162 $wAmount-&gt;table=1;
<a name="l00163"></a>00163 $wAmount-&gt;SetReadOnly($pview_only);
<a name="l00164"></a>00164 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=$wAmount-&gt;IOValue(<span class="stringliteral">"e_account"</span>.$i.<span class="stringliteral">"_amount"</span>,${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>});
<a name="l00165"></a>00165
<a name="l00166"></a>00166
<a name="l00167"></a>00167 <span class="comment">// Type is debit or credit, retrieve the old values</span>
<a name="l00168"></a>00168 ${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>}=(isset (${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>}))?${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>}:<span class="charliteral">'d'</span>;
<a name="l00169"></a>00169 $c_check=( ${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>} == <span class="charliteral">'c'</span>)?<span class="stringliteral">"CHECKED"</span>:<span class="stringliteral">""</span>;
<a name="l00170"></a>00170 $d_check=( ${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>} == <span class="charliteral">'d'</span> )?<span class="stringliteral">"CHECKED"</span>:<span class="stringliteral">""</span>;
<a name="l00171"></a>00171 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;td&gt;';
<a name="l00172"></a>00172 <span class="keywordflow">if</span> ( $pview_only == <span class="keyword">false</span> ) {
<a name="l00173"></a>00173 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=' &lt;input type=<span class="stringliteral">"radio"</span> <a class="code" href="action_8inc_8php.html#a18">name</a>=<span class="stringliteral">"'."</span>e_account<span class="stringliteral">"."</span><a class="code" href="balance_8php.html#a12">$i</a><span class="stringliteral">"."</span>_type<span class="stringliteral">".'"</span> <a class="code" href="action_8inc_8php.html#a19">value</a>=<span class="stringliteral">"d"</span> '.$d_check.'&gt; D&amp;eacute;bit ou ';
<a name="l00174"></a>00174 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=' &lt;input type=<span class="stringliteral">"radio"</span> <a class="code" href="action_8inc_8php.html#a18">name</a>=<span class="stringliteral">"'."</span>e_account<span class="stringliteral">"."</span><a class="code" href="balance_8php.html#a12">$i</a><span class="stringliteral">"."</span>_type<span class="stringliteral">".'"</span> value=<span class="stringliteral">"c"</span> '.$c_check.'&gt; Cr&amp;eacute;dit ';
<a name="l00175"></a>00175 }<span class="keywordflow">else</span> {
<a name="l00176"></a>00176 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>} == <span class="charliteral">'c'</span> )?<span class="stringliteral">"Cr&amp;eacute;dit"</span>:<span class="stringliteral">"D&amp;eacute;dit"</span>;
<a name="l00177"></a>00177 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;input type=<span class="stringliteral">"hidden"</span> <a class="code" href="action_8inc_8php.html#a18">name</a>=<span class="stringliteral">"e_account'.$i.'_type"</span> <a class="code" href="action_8inc_8php.html#a19">value</a>=<span class="stringliteral">"'.${"</span>e_account<a class="code" href="balance_8php.html#a12">$i</a><span class="stringliteral">"."</span>_type<span class="stringliteral">"}.'"</span>&gt;';
<a name="l00178"></a>00178 }
<a name="l00179"></a>00179 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;/td&gt;';
<a name="l00180"></a>00180 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.='&lt;/TR&gt;';
<a name="l00181"></a>00181 $sum_deb+=(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>}==<span class="charliteral">'d'</span>)?${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>}:0;
<a name="l00182"></a>00182 $sum_cred+=(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>}==<span class="charliteral">'c'</span>)?${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>}:0;
<a name="l00183"></a>00183 } <span class="comment">// End for </span>
<a name="l00184"></a>00184
<a name="l00185"></a>00185 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;/TABLE&gt;"</span>;
<a name="l00186"></a>00186
<a name="l00187"></a>00187 <span class="keywordflow">if</span> ( $pview_only==<span class="keyword">true</span> &amp;&amp; $p_saved==<span class="keyword">false</span>) {
<a name="l00188"></a>00188 <span class="comment">// check for upload piece</span>
<a name="l00189"></a>00189 <a class="code" href="show__document__modele_8php.html#a6">$file</a>=<span class="keyword">new</span> <a class="code" href="classwidget.html">widget</a>(<span class="stringliteral">"file"</span>);
<a name="l00190"></a>00190 <a class="code" href="show__document__modele_8php.html#a6">$file</a>-&gt;table=1;
<a name="l00191"></a>00191 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;hr&gt;"</span>;
<a name="l00192"></a>00192 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.= <span class="stringliteral">"&lt;table&gt;"</span>;
<a name="l00193"></a>00193 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;TR&gt;"</span>.$file-&gt;IOValue(<span class="stringliteral">"pj"</span>,<span class="stringliteral">""</span>,<span class="stringliteral">"Pi&amp;egrave;ce justificative"</span>).<span class="stringliteral">"&lt;/TR&gt;"</span>;
<a name="l00194"></a>00194 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;/table&gt;"</span>;
<a name="l00195"></a>00195 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;hr&gt;"</span>;
<a name="l00196"></a>00196 }
<a name="l00197"></a>00197 <span class="comment">// Set correctly the REQUEST param for jrn_type </span>
<a name="l00198"></a>00198 <a class="code" href="poste_8inc_8php.html#a8">$h</a>=<span class="keyword">new</span> <a class="code" href="classwidget.html">widget</a>('hidden');
<a name="l00199"></a>00199 <a class="code" href="poste_8inc_8php.html#a8">$h</a>-&gt;name='jrn_type';
<a name="l00200"></a>00200 <a class="code" href="poste_8inc_8php.html#a8">$h</a>-&gt;value='OD';
<a name="l00201"></a>00201 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<a class="code" href="poste_8inc_8php.html#a8">$h</a>-&gt;IOValue();
<a name="l00202"></a>00202
<a name="l00203"></a>00203 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=$p_submit;
<a name="l00204"></a>00204 <span class="comment">// $r.="&lt;/DIV&gt;";</span>
<a name="l00205"></a>00205 <a class="code" href="bank_8inc_8php.html#a29">$r</a>.=<span class="stringliteral">"&lt;/FORM&gt;"</span>;
<a name="l00206"></a>00206 <span class="comment">//TODO if view only show total</span>
<a name="l00207"></a>00207 <a class="code" href="show__document__modele_8php.html#a5">$tmp</a>= abs($sum_deb-$sum_cred);
<a name="l00208"></a>00208 <a class="code" href="debug_8php.html#a0">echo_debug</a>('user_form_ods.php',__LINE__,<span class="stringliteral">"Diff = "</span>.$tmp);
<a name="l00209"></a>00209 <span class="keywordflow">if</span> ( abs($sum_deb-$sum_cred) &gt; 0.0001 and $pview_only==<span class="keyword">true</span>) {
<a name="l00210"></a>00210 <a class="code" href="pref_8inc_8php.html#a4">$msg</a>=sprintf(<span class="stringliteral">"Montant non correspondant credit = %.5f debit = %.5f diff = %.5f"</span>,
<a name="l00211"></a>00211 $sum_cred,$sum_deb,$sum_cred-$sum_deb);
<a name="l00212"></a>00212 echo <span class="stringliteral">"&lt;script&gt; alert('$msg'); &lt;/script&gt;"</span>;
<a name="l00213"></a>00213 <span class="keywordflow">return</span> null;
<a name="l00214"></a>00214 }
<a name="l00215"></a>00215
<a name="l00216"></a>00216 <span class="comment">// Verify that we have a non-null operation</span>
<a name="l00217"></a>00217 <span class="keywordflow">if</span> ($pview_only==<span class="keyword">true</span> and $sum_cred == 0)
<a name="l00218"></a>00218 {
<a name="l00219"></a>00219 <a class="code" href="pref_8inc_8php.html#a4">$msg</a>=sprintf(<span class="stringliteral">"Montant null"</span>);
<a name="l00220"></a>00220 echo <span class="stringliteral">"&lt;script&gt; alert('$msg'); &lt;/script&gt;"</span>;
<a name="l00221"></a>00221 <span class="keywordflow">return</span> null;
<a name="l00222"></a>00222 }
<a name="l00223"></a>00223
<a name="l00224"></a>00224 <span class="keywordflow">return</span> <a class="code" href="bank_8inc_8php.html#a29">$r</a>;
<a name="l00225"></a>00225
<a name="l00226"></a>00226
<a name="l00227"></a>00227 }
</pre></div>
<p>
</td>
</tr>
</table>
<a class="anchor" name="a1"></a><!-- doxytag: member="user_form_ods.php::RecordODS" ref="a1" args="($p_cn, $p_array, $p_user, $p_jrn)" --><p>
<table class="mdTable" cellpadding="2" cellspacing="0">
<tr>
<td class="mdRow">
<table cellpadding="0" cellspacing="0" border="0">
<tr>
<td class="md" nowrap valign="top">RecordODS </td>
<td class="md" valign="top">(&nbsp;</td>
<td class="md" nowrap valign="top">$&nbsp;</td>
<td class="mdname" nowrap> <em>p_cn</em>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_array</em>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_user</em>, </td>
</tr>
<tr>
<td class="md" nowrap align="right"></td>
<td class="md"></td>
<td class="md" nowrap>$&nbsp;</td>
<td class="mdname" nowrap> <em>p_jrn</em></td>
</tr>
<tr>
<td class="md"></td>
<td class="md">)&nbsp;</td>
<td class="md" colspan="2"></td>
</tr>
</table>
</td>
</tr>
</table>
<table cellspacing="5" cellpadding="0" border="0">
<tr>
<td>
&nbsp;
</td>
<td>
<p>
Record an buy in the table jrn &amp; jrnx.
<p>
<dl compact><dt><b>Parameters:</b></dt><dd>
<table border="0" cellspacing="2" cellpadding="0">
<tr><td valign="top"></td><td valign="top"><em>$p_cn</em>&nbsp;</td><td>Database connection </td></tr>
<tr><td valign="top"></td><td valign="top"><em>$p_array</em>&nbsp;</td><td>contains all the data e_date =&gt; e : 01.01.2003 nb_item =&gt; e : 3 e_account0 =&gt; e : 6 e_account0_amount=&gt;e:1<ul>
<li>$p_user userid</li><li>$p_jrn current folder (journal)</li></ul>
</td></tr>
</table>
</dl>
<dl compact><dt><b>Returns:</b></dt><dd>true on success</dd></dl>
<p>
Definition at line <a class="el" href="user__form__ods_8php-source.html#l00247">247</a> of file <a class="el" href="user__form__ods_8php-source.html">user_form_ods.php</a>.
<p>
References <a class="el" href="impress__fiche_8php-source.html#l00082">$e</a>, <a class="el" href="annulation_8php-source.html#l00136">$seq</a>, <a class="el" href="balance_8php-source.html#l00036">exit</a>, <a class="el" href="user__common_8php-source.html#l00244">InsertJrnx()</a>, <a class="el" href="ac__common_8php-source.html#l00076">isNumber()</a>, <a class="el" href="postgres_8php-source.html#l00251">NextSequence()</a>, and <a class="el" href="postgres_8php-source.html#l00257">StartSql()</a>.<div class="fragment"><pre class="fragment"><a name="l00248"></a>00248 {
<a name="l00249"></a>00249 foreach ( $p_array as $v =&gt; $e)
<a name="l00250"></a>00250 {
<a name="l00251"></a>00251 ${<span class="stringliteral">"$v"</span>}=<a class="code" href="impress__fiche_8php.html#a10">$e</a>;
<a name="l00252"></a>00252 }
<a name="l00253"></a>00253 <span class="comment">// Get the default period</span>
<a name="l00254"></a>00254 $periode=$p_user-&gt;GetPeriode();
<a name="l00255"></a>00255 $amount=0.0;
<a name="l00256"></a>00256 <span class="comment">// Computing total customer</span>
<a name="l00257"></a>00257
<a name="l00258"></a>00258 $sum_deb=0.0;
<a name="l00259"></a>00259 $sum_cred=0.0;
<a name="l00260"></a>00260
<a name="l00261"></a>00261 <span class="comment">// Compute the j_grpt</span>
<a name="l00262"></a>00262 <a class="code" href="annulation_8php.html#a4">$seq</a>=<a class="code" href="postgres_8php.html#a13">NextSequence</a>($p_cn,'s_grpt');
<a name="l00263"></a>00263
<a name="l00264"></a>00264 <a class="code" href="postgres_8php.html#a14">StartSql</a>($p_cn);
<a name="l00265"></a>00265 <span class="comment">// store into the database</span>
<a name="l00266"></a>00266 <span class="keywordflow">for</span> ( $i = 0; $i &lt; $nb_item;$i++) {
<a name="l00267"></a>00267 <span class="keywordflow">if</span> ( <a class="code" href="ac__common_8php.html#a2">isNumber</a>(${<span class="stringliteral">"e_account$i"</span>}) == 0 ) <span class="keywordflow">continue</span>;
<a name="l00268"></a>00268 $sum_deb+=(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>}==<span class="charliteral">'d'</span>)?round(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>},2):0;
<a name="l00269"></a>00269 $sum_cred+=(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>}==<span class="charliteral">'c'</span>)?round(${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>},2):0;
<a name="l00270"></a>00270
<a name="l00271"></a>00271 <span class="keywordflow">if</span> ( ${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>} == 0 ) <span class="keywordflow">continue</span>;
<a name="l00272"></a>00272 <span class="keywordflow">if</span> ( ($j_id=<a class="code" href="user__common_8php.html#a4">InsertJrnx</a>($p_cn,${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_type"</span>},$p_user-&gt;id,$p_jrn,${<span class="stringliteral">"e_account$i"</span>},$e_date,${<span class="stringliteral">"e_account$i"</span>.<span class="stringliteral">"_amount"</span>},<a class="code" href="annulation_8php.html#a4">$seq</a>,$periode)) == false ) {
<a name="l00273"></a>00273 $Rollback($p_cn);<a class="code" href="balance_8php.html#a0">exit</a>(<span class="stringliteral">"error 'user_form_ods.php' __LINE__"</span>);}
<a name="l00274"></a>00274 }
<a name="l00275"></a>00275
<a name="l00276"></a>00276 <span class="keywordflow">if</span> ( <a class="code" href="user__common_8php.html#a5">InsertJrn</a>($p_cn,$e_date,<span class="stringliteral">""</span>,$p_jrn,$e_comm,$sum_deb,$seq,$periode) == <span class="keyword">false</span> ) {
<a name="l00277"></a>00277 $Rollback($p_cn);<a class="code" href="balance_8php.html#a0">exit</a>(<span class="stringliteral">"error 'user_form_ods.php' __LINE__"</span>);}
<a name="l00278"></a>00278
<a name="l00279"></a>00279 <span class="comment">// Set Internal code and Comment</span>
<a name="l00280"></a>00280 $internal_code=<a class="code" href="jrn_8php.html#a14">SetInternalCode</a>($p_cn,$seq,$p_jrn);
<a name="l00281"></a>00281 <span class="keywordflow">if</span> ( $e_comm==<span class="stringliteral">""</span> ) {
<a name="l00282"></a>00282 <span class="comment">// Update comment if comment is blank</span>
<a name="l00283"></a>00283 <a class="code" href="depense_8inc_8php.html#a4">$Res</a>=<a class="code" href="postgres_8php.html#a2">ExecSql</a>($p_cn,<span class="stringliteral">"update jrn set jr_comment='"</span>.$internal_code.<span class="stringliteral">"' where jr_grpt_id="</span>.$seq);
<a name="l00284"></a>00284 }
<a name="l00285"></a>00285 <span class="keywordflow">if</span> ( isset ($_FILES))
<a name="l00286"></a>00286 <a class="code" href="postgres_8php.html#a24">save_upload_document</a>($p_cn,$seq);
<a name="l00287"></a>00287
<a name="l00288"></a>00288 <a class="code" href="postgres_8php.html#a16">Commit</a>($p_cn);
<a name="l00289"></a>00289 <span class="keywordflow">return</span> $internal_code;
<a name="l00290"></a>00290 }
</pre></div>
<p>
</td>
</tr>
</table>
</BODY>
</HTML>