class_fiche.php

Go to the documentation of this file.

<?
/*
 *   This file is part of PhpCompta.
 *
 *   PhpCompta is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *
 *   PhpCompta is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *   GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with PhpCompta; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/
/* $Revision$ */
// Copyright Author Dany De Bontridder ddebontridder@yahoo.fr
include_once("class_attribut.php");
class fiche_def {
  var $cn;           // database connection
  var $id;                      // id (fiche_def.fd_id
  var $label;                   // fiche_def.fd_label
  var $class_base;              // fiche_def.fd_class_base
  var $fiche_def;               // fiche_def.frd_id = fiche_def_ref.frd_id
  var $create_account;          // fd_create_account: flag
  var $all;
  var $attribut;                // get from attr_xxx tables
  function fiche_def($p_cn,$p_id = 0) {
    $this->cn=$p_cn;
    $this->id=$p_id;
  }

  function GetAttribut() {
    $sql="select * from jnt_fic_attr ".
      " natural join attr_def where fd_id=".$this->id.
      " order by ad_id";

    $Ret=ExecSql($this->cn,$sql);

    if ( ($Max=pg_NumRows($Ret)) == 0 )
      return ;
    for ($i=0;$i < $Max;$i++) {
      $row=pg_fetch_array($Ret,$i);
      $t = new Attribut($row['ad_id']);
      $t->ad_text=$row['ad_text'];
      $this->attribut[$i]=$t;
    }
    return $this->attribut;
  }

  function Get() {
    if ( $this->id == 0 ) 
      return 0;
    $sql="select * from fiche_def ".
      " where fd_id=".$this->id;
    $Ret=ExecSql($this->cn,$sql);
    if ( ($Max=pg_NumRows($Ret)) == 0 )
      return ;
    $row=pg_fetch_array($Ret,0);
    $this->label=$row['fd_label'];
    $this->class_base=$row['fd_class_base'];
    $this->fiche_def=$row['frd_id'];
    $this->create_account=$row['fd_create_account'];
  }
 function GetAll() {
   $sql="select * from fiche_def ";

    $Ret=ExecSql($this->cn,$sql);
    if ( ($Max=pg_NumRows($Ret)) == 0 )
      return ;

    for ( $i = 0; $i < $Max;$i++) {
      $row=pg_fetch_array($Ret,$i);
      $this->all[$i]=new fiche_def($this->cn,$row['fd_id']);
      $this->all[$i]->label=$row['fd_label'];
      $this->all[$i]->class_base=$row['fd_class_base'];
      $this->all[$i]->fiche_def=$row['frd_id'];
      $this->all[$i]->create_account=$row['fd_create_account'];
    }
  }
 function HasAttribute($p_attr) {
   return (CountSql($this->cn,"select * from vw_fiche_def where ad_id=$p_attr and fd_id=".$this->id)>0)?true:false;

 }
 function Display() 
   {

     $r=sprintf("<TD>%s</TD>",$this->id);
     $r.=sprintf("<TD>%s</TD>",$this->label);
     $r.=sprintf("<TD>%s</TD>",$this->class_base);
     $r.=sprintf("<TD>%s</TD>",$this->fiche_def);
     return $r;
   }

}

// class fiche
class fiche {
  var $cn;           
  var $id;           
  var $fiche_def;    
  var $attribut;     
  var $fiche_def_ref; 
  function fiche($p_cn,$p_id=0) {
    $this->cn=$p_cn;
    $this->id=$p_id;
  }
  function GetByQCode($p_qcode,$p_all=true)
    {
      $p_qcode=FormatString($p_qcode);
      $sql="select f_id from jnt_fic_att_value join attr_value 
           using (jft_id)  where ad_id=23 and av_text='".$p_qcode."'";
      $Res=ExecSql($this->cn,$sql);
      $r=pg_fetch_all($Res);
      if ( sizeof($r) == 0 ) 
        return 1;
      $this->id=$r[0]['f_id'];
      echo_debug('class_fiche',__LINE__,'f_id = '.$this->id);

      if ( $p_all )
        $this->getAttribut();
      return 0;
    }
  function getAttribut() {
    if ( $this->id == 0){
      return;
    }
     $sql="select * 
           from jnt_fic_att_value 
               natural join fiche 
               natural join attr_value
               left join attr_def using (ad_id) where f_id=".$this->id.
       " order by ad_id";

    $Ret=ExecSql($this->cn,$sql);
    if ( ($Max=pg_NumRows($Ret)) == 0 )
      return ;
    for ($i=0;$i<$Max;$i++) {
      $row=pg_fetch_array($Ret,$i);
      $this->fiche_def=$row['fd_id'];
      $t=new Attribut ($row['ad_id']);
      $t->ad_text=$row['ad_text'];
      $t->av_text=$row['av_text'];
      $this->attribut[$i]=$t;
    }
    $e=new Fiche_def($this->cn,$this->fiche_def);
    $e->GetAttribut();

    if ( sizeof($this->attribut) != sizeof($e->attribut ) ) {

      // !!! Missing attribute
      foreach ($e->attribut as $f ) {
        $flag=0;
        foreach ($this->attribut as $g ) {
          if ( $g->ad_id == $f->ad_id ) 
            $flag=1;
        }
        if ( $flag == 0 ) { 
          // there's a missing one, we insert it
          $t=new Attribut ($f->ad_id);
          $t->av_text="";
          $t->ad_text=$f->ad_text;
          $this->attribut[$Max]=$t;
          $Max++;
        } // if flag == 0

      }// foreach 
      $this->attribut=SortAttributeById($this->attribut);


    }//missing attribut
  }


  function size() {
    if ( isset ($this->ad_id))
      return sizeof($this->ad_id);
    else
      return 0;
  }


  function GetByType($p_fd_id) {
     $sql="select * 
           from
               fiche 
            where fd_id=".$p_fd_id;


    $Ret=ExecSql($this->cn,$sql);
    if ( ($Max=pg_NumRows($Ret)) == 0 )
      return ;
    $all[0]=new fiche($this->cn);

    for ($i=0;$i<$Max;$i++) {
      $row=pg_fetch_array($Ret,$i);
      $t=new fiche($this->cn,$row['f_id']);
      $t->getAttribut();
      $all[$i]=$t;

    }
    return $all;
  }
  function CountByDef($p_frd_id,$p_search="",$p_sql="") {
     $sql="select * 
           from
               fiche join fiche_Def using (fd_id)
            where frd_id=".$p_frd_id;
     if ( $p_search != "" ) 
       {
         $a=FormatString($p_search);
         $sql="select * from vw_fiche_attr where frd_id=".$p_frd_id.
           " and vw_name ~* '$p_search'";
       }

    $Ret=ExecSql($this->cn,$sql.$p_sql);
    
    return pg_NumRows($Ret) ;
  }
  function GetByDef($p_frd_id,$p_offset=-1,$p_search="") {
    if ( $p_offset == -1 ) 
      {
        $sql="select * 
           from
               fiche join fiche_Def using (fd_id)
            where frd_id=".$p_frd_id." $p_search order by f_id";
      } 
    else 
      {
        $limit=$_SESSION['g_pagesize'];
        $sql="select * 
           from
               fiche join fiche_Def using (fd_id)
            where frd_id=".$p_frd_id." $p_search order by f_id
           limit ".$limit." offset ".$p_offset;

      }

    $Ret=ExecSql($this->cn,$sql);
    if ( ($Max=pg_NumRows($Ret)) == 0 )
      return ;
    $all[0]=new fiche($this->cn);

    for ($i=0;$i<$Max;$i++) {
      $row=pg_fetch_array($Ret,$i);
      $t=new fiche($this->cn,$row['f_id']);
      $t->getAttribut();
      $all[$i]=$t;

    }
    return $all;
  }
  function ShowTable() {
    echo "<TR><TD> ".
      $this->id."</TD>".
      "<TR> <TD>".
      $this->attribut_value."</TD>".
      "<TR> <TD>".
      $this->attribut_def."</TD></TR>";
  }
  function strAttribut($p_ad_id) 
    {
      if ( sizeof ($this->attribut) == 0 ) 
        {
          if ($this->id==0) return '- ERROR -';
          // object is not in memory we need to look into the database
          $sql="select av_text from attr_value join jnt_fic_att_value using(jft_id)
                where f_id=".$this->id." and ad_id=".$p_ad_id;
          $Res=ExecSql($this->cn,$sql);
          $row=pg_fetch_all($Res);
          // if not found return error
          if ( $row == false ) 
            return ' - ERROR -';
          
          return $row[0]['av_text'];
        }

      foreach ($this->attribut as $e)
        {
          if ( $e->ad_id == $p_ad_id ) 
            return $e->av_text;
        }
        return '- ERROR -';
    }
  function blank($p_fiche_def) 
    {
      // array = array of attribute object sorted on ad_id
      $f=new fiche_def($this->cn,$p_fiche_def);
      $array=$f->getAttribut();
      $r='<table>';
      foreach ($array as $attr)
        {
          $msg="";
          if ( $attr->ad_id == ATTR_DEF_ACCOUNT) 
            {
              $r.=JS_SEARCH_POSTE;
              $w=new widget("js_search_poste");
              //  account created automatically
              $sql="select account_auto($p_fiche_def)";
              echo_debug("class_fiche",__LINE__,$sql);
              $ret_sql=ExecSql($this->cn,$sql);
              $a=pg_fetch_array($ret_sql,0);
              if ( $a['account_auto'] == 't' )
                $msg="<TD> <font color=\"red\">Rappel: Poste créé automatiquement !</font></TD> ";

             }
          elseif ( $attr->ad_id == ATTR_DEF_TVA) 
            {
              $r.=JS_TVA;
              $w=new widget("js_tva");
            }
          elseif ( $attr->ad_id == ATTR_DEF_COMPANY )
            {
              $r.=JS_SEARCH_CARD;
              $w=new widget("js_search");
              // filter on frd_id
              $w->extra=FICHE_TYPE_CLIENT.','.FICHE_TYPE_FOURNISSEUR.','.FICHE_TYPE_ADM_TAX; 
              $w->extra2=0;      // jrn = 0
              $label=new widget("span");
              $label->name="av_text".$attr->ad_id."_label";
              $msg=$label->IOValue();
            }
          else
            {
              $w=new widget("text");
            }
          $w->table=1;
          $w->label=$attr->ad_text;
          $w->name="av_text".$attr->ad_id;

          $r.="<TR>".$w->IOValue()."$msg </TR>";
        }
      $r.= '</table>';
      return $r;
    }

  
  function Display($p_readonly) 
    {
      $this->GetAttribut();
      $attr=$this->attribut;

      $ret="<table>";

      foreach ( $attr as $r) 
        {
          $msg="";
          if ( $p_readonly) 
            {
              $w=new widget("text");
            }
          if ($p_readonly==false)
            {
              if ( $r->ad_id == ATTR_DEF_ACCOUNT) 
                {
                  $ret.=JS_SEARCH_POSTE;
                  $w=new widget("js_search_poste");
                  //  account created automatically
                  $sql="select account_auto($this->fiche_def)";
                  echo_debug("class_fiche",__LINE__,$sql);
                  $ret_sql=ExecSql($this->cn,$sql);
                  $a=pg_fetch_array($ret_sql,0);
                  if ( $a['account_auto'] == 't' )
                    $msg="<TD> <font color=\"red\">si vide le Poste sera créer automatiquement</font></TD> ";
                }
              elseif ( $r->ad_id == ATTR_DEF_TVA) 
                {
                  $ret.=JS_TVA;
                  $w=new widget("js_tva");
            }
              elseif ( $r->ad_id == ATTR_DEF_COMPANY )
                {
                  $ret.=JS_SEARCH_CARD;
                  $w=new widget("js_search");
                  // filter on frd_id
                  $w->extra=FICHE_TYPE_CLIENT.','.FICHE_TYPE_FOURNISSEUR.','.FICHE_TYPE_ADM_TAX; 
                  $w->extra2=0;      // jrn = 0
                  $label=new widget("span");
                  $label->name="av_text".$r->ad_id."_label";
                  $msg=$label->IOValue();
                }
            
              else 
                {
                  $w=new widget("text");
                }
            }
          $w->label=$r->ad_text;
          $w->value=$r->av_text;
          $w->name="av_text".$r->ad_id;
          $w->readonly=$p_readonly;
          $w->table=1;

          $ret.="<TR>".$w->IOValue()."$msg </TR>";
        }
      $ret.="</table>";
      return $ret;
    }
  function Save($p_fiche_def=0) 
    {
      // new card or only a update ?
      if ( $this->id == 0 ) 
        $this->insert($p_fiche_def);
      else
        $this->update();
    }
  function insert($p_fiche_def) 
    {
      $fiche_id=NextSequence($this->cn,'s_fiche');
      $this->id=$fiche_id;
      // first we create the card
      StartSql($this->cn);
      $sql=sprintf("insert into fiche(f_id,fd_id)". 
                   " values (%d,%d)",
                   $fiche_id,$p_fiche_def);
      $Ret=ExecSql($this->cn,$sql);
      // parse the $_POST array
      foreach ($_POST as $name=>$value ) 
        {
          echo_debug ("class_fiche",__LINE__,"Name = $name value $value") ;
          list ($id) = sscanf ($name,"av_text%d");
          if ( $id == null ) continue;
          echo_debug("class_fiche",__LINE__,"add $id");
          
          // Special traitement
          // quickcode
          if ( $id == ATTR_DEF_QUICKCODE) 
            {
              echo_debug("Modify ATTR_DEF_QUICKCODE");
              $sql=sprintf("select insert_quick_code(%d,'%s')",
                           $fiche_id,FormatString($value));
              ExecSql($this->cn,$sql);
              continue;
            }
          // name
          if ( $id == ATTR_DEF_NAME ) 
            {
              echo_debug("Modify ATTR_DEF_NAME");
              if ( strlen(trim($value)) == 0 )
                $value="pas de nom";
              
            }
          // account
          if ( $id == ATTR_DEF_ACCOUNT ) 
            {
              echo_debug("Modify ATTR_DEF_ACCOUNT");
              $v=FormatString($value);
              if ( isNumber($v) == 1 )
                {
                  $sql=sprintf("select account_insert(%d,%d)",
                               $this->id,$v);
                  $Ret=ExecSql($this->cn,$sql);
                }
              if ( strlen(trim($v))==0  )
                {
                  $sql=sprintf("select account_insert(%d,null)",
                               $this->id);
                  $Ret=ExecSql($this->cn,$sql);
                }
              
              continue;
            }
        // TVA
          if ( $id == ATTR_DEF_TVA ) 
            {
              echo_debug("Modify ATTR_DEF_TVA");
              // Verify if the rate exists, if not then do not update
              if ( strlen(trim($value)) != 0 ) 
                {
                  if ( CountSql($this->cn,"select * from tva_rate where tva_id=".$value) == 0) 
                    {
                      echo_debug("class_fiche",__LINE__,"Tva invalide $value");
                      continue;
                    }
                }
            }
          // The contact has a company attribut
          if ( $id == ATTR_DEF_COMPANY ) 
            {
              $exist=CountSql($this->cn,"select f_id from fiche join fiche_def using (fd_id) ".
                              " join jnt_fic_att_value using (f_id) join attr_value using (jft_id) ".
                              " where frd_id in (8,9,14) and ad_id=".ATTR_DEF_QUICKCODE.
                              " and av_text='".FormatString($value)."'");
              if ( $exist == 0 ) 
                {
                  $value="Attention : pas de société  ";
                }
            }
          // Normal traitement
          $value2=FormatString($value);

          $sql=sprintf("select attribut_insert(%d,%d,'%s')",
                       $fiche_id,$id,$value2);
          ExecSql($this->cn,$sql);
        }
      Commit($this->cn);
      return;
      

    }

   

 function update() 
     {
       // parse the $_POST array
       foreach ($_POST as $name=>$value ) 
         {
           echo_debug ("class_fiche",__LINE__,"Name = $name value $value") ;
           list ($id) = sscanf ($name,"av_text%d");
           if ( $id == null ) continue;
           echo_debug("class_fiche",__LINE__,"modify $id");
           
           // retrieve jft_id to update table attr_value
           $sql=" select jft_id from jnt_fic_att_value where ad_id=$id and f_id=$this->id";
           $Ret=ExecSql($this->cn,$sql);
           if ( pg_NumRows($Ret) != 1 ) {
             echo_error ("class_fiche ".__LINE__." INVALID ID !!! ");
             return;
           }
           $tmp=pg_fetch_array($Ret,0);
           $jft_id=$tmp['jft_id'];
           
           // Special traitement
           // quickcode
           if ( $id == ATTR_DEF_QUICKCODE) 
             {
               echo_debug("Modify ATTR_DEF_QUICKCODE");
               $sql=sprintf("select update_quick_code(%d,'%s')",
                            $jft_id,FormatString($value));
               ExecSql($this->cn,$sql);
               continue;
             }
           // name
           if ( $id == ATTR_DEF_NAME ) 
             {
               echo_debug("Modify ATTR_DEF_NAME");
               if ( strlen(trim($value)) == 0 )
                 continue;
               
             }
           // account
           if ( $id == ATTR_DEF_ACCOUNT ) 
             {
               echo_debug("Modify ATTR_DEF_ACCOUNT");
               $v=FormatString($value);
               if ( isNumber($v) == 1 )
                 {
                   $sql=sprintf("select account_update(%d,%d)",
                                $this->id,$v);
                   $Ret=ExecSql($this->cn,$sql);
                 }
               if ( strlen (trim($v)) == 0 ) 
                 {
                   $sql=sprintf("select account_update(%d,null)",
                                $this->id);
                   $Ret=ExecSql($this->cn,$sql);
                   continue;
                 }
             }
         // TVA
           if ( $id == ATTR_DEF_TVA ) 
             {
               echo_debug("Modify ATTR_DEF_TVA");
               // Verify if the rate exists, if not then do not update
               if ( strlen(trim($value)) != 0 ) 
                 {
                   if ( CountSql($this->cn,"select * from tva_rate where tva_id=".$value) == 0) 
                     {
                       echo_debug("class_fiche",__LINE__,"Tva invalide $value");
                       continue;
                     }
                 }
             }
           if ( $id == ATTR_DEF_COMPANY ) 
             {
               $exist=CountSql($this->cn,"select f_id from fiche join fiche_def using (fd_id) ".
                               " join jnt_fic_att_value using (f_id) join attr_value using (jft_id) ".
                               " where frd_id in (8,9,14) and ad_id=".ATTR_DEF_QUICKCODE.
                               " and av_text='".FormatString($value)."'");
 
 
               if ( $exist == 0 ) 
                 {
                   $value="Attention : pas de société ";
                 }
             }
           
           // Normal traitement
           $value2=FormatString($value);
           $sql=sprintf("update attr_value set av_text='%s' where jft_id=%d",
                        $value2,$jft_id);
           ExecSql($this->cn,$sql);
         }
       return;
       
     }
   function remove() 
     {
       if ( $this->id==0 ) return;
       // verify if that card has not been used is a ledger
       $sql="select fiche_used(".$this->id.") as result";
       $Res=ExecSql($this->cn,$sql);
       
       // fetch the result
       list($result)=pg_fetch_row($Res,0);
 
       if ( $result == 0 ) 
         {
           $sql="select fiche_delete (".$this->id.")";
           $Res=ExecSql($this->cn,$sql);
           return 0;
         }
       return 1;
     }
   function getName() 
     {
       $sql="select av_text from jnt_fic_att_value join attr_value 
            using (jft_id)  where ad_id=1 and f_id=".$this->id;
       $Res=ExecSql($this->cn,$sql);
       $r=pg_fetch_all($Res);
       if ( sizeof($r) == 0 ) 
         return 1;
       return $r[0]['av_text'];
     }
   function Get() 
     {
       echo_debug('class_client',__LINE__,'Get');
       fiche::getAttribut();
     }
   function GetAll($p_offset=-1,$p_search="") 
     {
       return fiche::GetByDef($this->fiche_def_ref,$p_offset,$p_search);
    }
}
?>

---