120 lines
15 KiB
HTML
120 lines
15 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: fortis_be.inc.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">include</a></div>
|
||
<h1>fortis_be.inc.php</h1><a href="fortis__be_8inc_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="l00021"></a>00021 <span class="comment">// Author Olivier Dzwoniarkiewicz</span>
|
||
<a name="l00026"></a>00026 <span class="comment"></span><span class="comment">//-----------------------------------------------------</span>
|
||
<a name="l00027"></a>00027 <span class="comment">// Fortis Bank</span>
|
||
<a name="l00028"></a>00028 <span class="comment">//-----------------------------------------------------</span>
|
||
<a name="l00029"></a><a class="code" href="fortis__be_8inc_8php.html#a0">00029</a> <a class="code" href="argenta__be_8inc_8php.html#a2">$row</a>=1;
|
||
<a name="l00030"></a>00030 <span class="keywordflow">while</span> (($data = fgetcsv($handle, 2000,'!@')) !== FALSE) {
|
||
<a name="l00031"></a>00031 <a class="code" href="jrn__add_8php.html#a17">$num</a> = count($data);
|
||
<a name="l00032"></a>00032 <span class="keywordflow">for</span> ($c=0; $c < $num; $c++) {
|
||
<a name="l00033"></a>00033
|
||
<a name="l00034"></a>00034 <span class="comment">// first line is skipped</span>
|
||
<a name="l00035"></a>00035 <span class="keywordflow">if</span> ( $row>1) {
|
||
<a name="l00036"></a>00036
|
||
<a name="l00037"></a>00037 <a class="code" href="argenta__be_8inc_8php.html#a5">$code</a>=<span class="stringliteral">""</span>; <a class="code" href="argenta__be_8inc_8php.html#a3">$date_exec</a>=<span class="stringliteral">""</span>; <a class="code" href="fortis__be_8inc_8php.html#a4">$date_valeur</a>=<span class="stringliteral">""</span>; <a class="code" href="argenta__be_8inc_8php.html#a6">$montant</a>=<span class="stringliteral">""</span>; <a class="code" href="argenta__be_8inc_8php.html#a7">$devise</a>=<span class="stringliteral">""</span>; <a class="code" href="argenta__be_8inc_8php.html#a8">$compte_ordre</a>=<span class="stringliteral">""</span>; <a class="code" href="argenta__be_8inc_8php.html#a9">$detail</a>=<span class="stringliteral">""</span>; <a class="code" href="argenta__be_8inc_8php.html#a1">$num_compte</a>=<span class="stringliteral">""</span>; $iduser=<span class="stringliteral">""</span>;
|
||
<a name="l00038"></a>00038
|
||
<a name="l00039"></a>00039 list($code, $date_exec, $date_valeur, $montant, $devise, $compte_ordre, $detail, $num_compte) = split(<span class="stringliteral">";"</span>, $data[$c]);
|
||
<a name="l00040"></a>00040 echo <span class="stringliteral">"line : $row > "</span>.$data[<a class="code" href="admin_8inc_8php.html#a2">$c</a>].<span class="stringliteral">"<hr>"</span>;
|
||
<a name="l00041"></a>00041
|
||
<a name="l00042"></a>00042 <span class="comment">//corrige un bug de date</span>
|
||
<a name="l00043"></a><a class="code" href="fortis__be_8inc_8php.html#a1">00043</a> <a class="code" href="argenta__be_8inc_8php.html#a3">$date_exec</a> = str_replace(chr(34),<span class="stringliteral">""</span>, $date_exec);
|
||
<a name="l00044"></a>00044
|
||
<a name="l00045"></a>00045 <span class="comment">// Si LTXXXXX ou LT XXXXX dans le d<>tail</span>
|
||
<a name="l00046"></a>00046 <span class="keywordflow">if</span> ((ereg (<span class="stringliteral">"LT+([0-9]{5})"</span>, $detail, $regs)) || (ereg (<span class="stringliteral">"LT+[ ]+([0-9]{5})"</span>, $detail, $regs))) {
|
||
<a name="l00047"></a>00047 $iduser = $regs[1];
|
||
<a name="l00048"></a>00048 }
|
||
<a name="l00049"></a>00049
|
||
<a name="l00050"></a>00050 <span class="comment">// Si 00000XXXXXXX</span>
|
||
<a name="l00051"></a>00051 <span class="keywordflow">if</span> (ereg (<span class="stringliteral">"[0-9]{12}"</span>, $detail, $regs)){
|
||
<a name="l00052"></a>00052 <span class="keywordflow">if</span>($regs[0] != <span class="stringliteral">"000000000000"</span>) {
|
||
<a name="l00053"></a>00053 $id = substr($regs[0], 5, 5);
|
||
<a name="l00054"></a><a class="code" href="fortis__be_8inc_8php.html#a2">00054</a> <a class="code" href="fortis__be_8inc_8php.html#a2">$check</a> = substr($regs[0], 10, 2);
|
||
<a name="l00055"></a>00055 <span class="keywordflow">if</span> (($<span class="keywordtype">id</span> % 97) == $check) $iduser = $id;
|
||
<a name="l00056"></a>00056 }
|
||
<a name="l00057"></a>00057 }
|
||
<a name="l00058"></a>00058
|
||
<a name="l00059"></a>00059 <span class="keywordflow">if</span>($iduser != <span class="stringliteral">""</span> ) <a class="code" href="fortis__be_8inc_8php.html#a3">$poste_comptable</a> = <span class="stringliteral">"400"</span>.$iduser;
|
||
<a name="l00060"></a><a class="code" href="fortis__be_8inc_8php.html#a3">00060</a> <span class="keywordflow">else</span> <a class="code" href="fortis__be_8inc_8php.html#a3">$poste_comptable</a> = <span class="stringliteral">""</span>;
|
||
<a name="l00061"></a>00061
|
||
<a name="l00062"></a>00062 list($jour,$mois,$annee) = explode(<span class="stringliteral">"/"</span>, $date_exec); <a class="code" href="argenta__be_8inc_8php.html#a3">$date_exec</a> = $annee.<span class="stringliteral">"-"</span>.$mois.<span class="stringliteral">"-"</span>.$jour;
|
||
<a name="l00063"></a><a class="code" href="fortis__be_8inc_8php.html#a4">00063</a> list($jour,$mois,$annee) = explode(<span class="stringliteral">"/"</span>, $date_valeur); <a class="code" href="fortis__be_8inc_8php.html#a4">$date_valeur</a> = $annee.<span class="stringliteral">"-"</span>.$mois.<span class="stringliteral">"-"</span>.$jour;
|
||
<a name="l00064"></a>00064
|
||
<a name="l00065"></a><a class="code" href="fortis__be_8inc_8php.html#a5">00065</a> <a class="code" href="argenta__be_8inc_8php.html#a6">$montant</a> = str_replace(<span class="stringliteral">","</span>, <span class="stringliteral">"."</span>, $montant);
|
||
<a name="l00066"></a>00066 <a class="code" href="argenta__be_8inc_8php.html#a6">$montant</a> = str_replace(<span class="stringliteral">"+"</span>, <span class="stringliteral">""</span>, $montant);
|
||
<a name="l00067"></a>00067 <a class="code" href="argenta__be_8inc_8php.html#a6">$montant</a> = str_replace(<span class="stringliteral">"\""</span>, <span class="stringliteral">""</span>, $montant);
|
||
<a name="l00068"></a>00068
|
||
<a name="l00069"></a><a class="code" href="fortis__be_8inc_8php.html#a6">00069</a> <a class="code" href="argenta__be_8inc_8php.html#a9">$detail</a>=str_replace(<span class="stringliteral">"\""</span>,<span class="stringliteral">""</span>,$detail);
|
||
<a name="l00070"></a>00070
|
||
<a name="l00071"></a><a class="code" href="fortis__be_8inc_8php.html#a7">00071</a> <a class="code" href="bank_8inc_8php.html#a20">$sql</a> = <span class="stringliteral">"select * from import_tmp </span>
|
||
<a name="l00072"></a>00072 <span class="stringliteral"> where </span>
|
||
<a name="l00073"></a>00073 <span class="stringliteral"> code='"</span>.$code.<span class="stringliteral">"' and </span>
|
||
<a name="l00074"></a>00074 <span class="stringliteral"> num_compte='"</span>.<a class="code" href="argenta__be_8inc_8php.html#a1">$num_compte</a>.<span class="stringliteral">"'"</span>;
|
||
<a name="l00075"></a><a class="code" href="fortis__be_8inc_8php.html#a8">00075</a> <a class="code" href="depense_8inc_8php.html#a4">$Res</a>=<a class="code" href="postgres_8php.html#a2">ExecSql</a>($p_cn,$sql);
|
||
<a name="l00076"></a><a class="code" href="fortis__be_8inc_8php.html#a9">00076</a> <a class="code" href="fortis__be_8inc_8php.html#a9">$Num</a>=pg_NumRows($Res);
|
||
<a name="l00077"></a>00077
|
||
<a name="l00078"></a>00078 <span class="keywordflow">if</span>(<a class="code" href="fortis__be_8inc_8php.html#a9">$Num</a> > 0) {
|
||
<a name="l00079"></a>00079 echo <span class="stringliteral">"Op&eacute;ration FORTIS "</span>.$code.<span class="stringliteral">" d&eacute;j&eagrave; import&eacute;e.<br/>"</span>;
|
||
<a name="l00080"></a>00080 } <span class="keywordflow">else</span> {
|
||
<a name="l00081"></a>00081 <span class="comment">// $Sql="insert into import_tmp values ('$code','$date_exec','$date_valeur','$montant','$devise','".addslashes($compte_ordre)."','".addslashes($detail)."','$num_compte','$poste_comptable')";</span>
|
||
<a name="l00082"></a>00082 <a class="code" href="eub__be_8inc_8php.html#a4">$Sql</a>=<span class="stringliteral">"insert into import_tmp (code ,</span>
|
||
<a name="l00083"></a>00083 <span class="stringliteral"> date_exec ,</span>
|
||
<a name="l00084"></a>00084 <span class="stringliteral"> date_valeur,</span>
|
||
<a name="l00085"></a>00085 <span class="stringliteral"> montant,</span>
|
||
<a name="l00086"></a>00086 <span class="stringliteral"> devise,</span>
|
||
<a name="l00087"></a>00087 <span class="stringliteral"> compte_ordre,</span>
|
||
<a name="l00088"></a>00088 <span class="stringliteral"> detail,</span>
|
||
<a name="l00089"></a>00089 <span class="stringliteral"> num_compte,</span>
|
||
<a name="l00090"></a>00090 <span class="stringliteral"> bq_account ,</span>
|
||
<a name="l00091"></a>00091 <span class="stringliteral"> jrn,</span>
|
||
<a name="l00092"></a>00092 <span class="stringliteral"> ok)</span>
|
||
<a name="l00093"></a>00093 <span class="stringliteral"> values ('$code',</span>
|
||
<a name="l00094"></a>00094 <span class="stringliteral"> '$date_exec',</span>
|
||
<a name="l00095"></a>00095 <span class="stringliteral"> '$date_exec',</span>
|
||
<a name="l00096"></a>00096 <span class="stringliteral"> '$montant',</span>
|
||
<a name="l00097"></a>00097 <span class="stringliteral"> '$devise',</span>
|
||
<a name="l00098"></a>00098 <span class="stringliteral"> '"</span>.addslashes($compte_ordre).<span class="stringliteral">"', </span>
|
||
<a name="l00099"></a>00099 <span class="stringliteral"> '"</span>.addslashes($detail).<span class="stringliteral">"',</span>
|
||
<a name="l00100"></a>00100 <span class="stringliteral"> '$num_compte',</span>
|
||
<a name="l00101"></a>00101 <span class="stringliteral"> $p_bq_account,</span>
|
||
<a name="l00102"></a>00102 <span class="stringliteral"> $p_jrn,</span>
|
||
<a name="l00103"></a>00103 <span class="stringliteral"> false)"</span>;
|
||
<a name="l00104"></a>00104
|
||
<a name="l00105"></a>00105 <a class="code" href="depense_8inc_8php.html#a4">$Res</a>=<a class="code" href="postgres_8php.html#a2">ExecSql</a>($p_cn,$Sql);
|
||
<a name="l00106"></a>00106 }
|
||
<a name="l00107"></a>00107 }
|
||
<a name="l00108"></a>00108
|
||
<a name="l00109"></a>00109 } <span class="comment">// for ($c=0;$c<$num;$c++)</span>
|
||
<a name="l00110"></a>00110 <a class="code" href="argenta__be_8inc_8php.html#a2">$row</a>++;
|
||
<a name="l00111"></a>00111 } <span class="comment">// file is read</span>
|
||
<a name="l00112"></a>00112 fclose($handle);
|
||
<a name="l00113"></a>00113 ?>
|
||
</pre></div></BODY>
|
||
</HTML>
|