Ext_List_Intra_Child Class Reference

Inheritance diagram for Ext_List_Intra_Child:

Collaboration diagram for Ext_List_Intra_Child:

Public Member Functions
	insert ()
	from_array ($p_array)
	display ()
	load ()
	verify ()
	update ()
	compute ()
	display_declaration_amount ($p_readonly=false)
	find_tva_code ($p_array)
	get_parameter ($p_string)
	set_parameter ($p_string, $p_value)
	get_info ()
	save ()
	blank ($p_year, $p_periode, $p_flag_quaterly)
	display_info ()
	display the information about the company More...

Static Public Member Functions
static	choose_periode ($by_year=false)

Protected Attributes
	$variable

Detailed Description

Definition at line 269 of file class_ext_list_intra.php.

Member Function Documentation

Ext_Tva_Gen::blank (   $p_year,   $p_periode,   $p_flag_quaterly  )

inherited

Definition at line 132 of file class_ext_tvagen.php.

References $GLOBALS, $p_year, and Ext_Tva_Gen\set_parameter().

                                                      {
    // load parameter from myown
    $own=new Own($this->db);
    $this->set_parameter("name",$own->MY_NAME);
    $this->set_parameter("num_tva",$own->MY_TVA);
    $this->set_parameter('adress',$own->MY_STREET.",".$own->MY_NUMBER);
    $this->set_parameter('country',$own->MY_COUNTRY." ".$own->MY_CP." ".$own->MY_COMMUNE);
    $this->set_parameter('flag_periode',$p_flag_quaterly);
    $this->set_parameter('periode_dec',$p_periode);
    $this->set_parameter('exercice',$p_year);

    try {
      $this->verify() ;
    } catch ( Exception $e) {
      echo $e->getMessage();
      throw $e;
    }
    // by month
    if ( $p_flag_quaterly == 1) {
      // start periode = 01 to 31, $p_periode contains the month
      $per_start="01.".$p_periode.".".$p_year;
      $day=31;
      $per_end="31".".".$p_periode.".".$p_year;
      while ( checkdate($p_periode,$day,$p_year) == false && $day > 25) {
    $day--;
    $per_end=$day.".".$p_periode.".".$p_year;
      }
      if ($day < 28 ) { echo __FILE__.__LINE__." Erreur de date $day"; exit;}
    }

    if ( $p_flag_quaterly == 2 ) {
      // compute start periode
      $per_start=$GLOBALS['quaterly_limit'][$p_periode][0].".".$p_year;
      $per_end=$GLOBALS['quaterly_limit'][$p_periode][1].".".$p_year;

    }
    if ( $p_flag_quaterly == 3 ) {
      // compute start periode
      $per_start='01.01.'.$p_year;
      $per_end='31.12.'.$p_year;
    }

    $this->set_parameter('start_periode',$per_start);
    $this->set_parameter('end_periode',$per_end);

  }

static Ext_Tva_Gen::choose_periode (   $by_year = false )

staticinherited

Definition at line 82 of file class_ext_tvagen.php.

References $_REQUEST, $array, $by_year, $r, $str_byyear, $str_hidden, $str_month, $str_monthly, $str_quater, $str_quaterly, $str_submit, $str_year, and $year.

                                                 {
    require_once NOALYSS_INCLUDE.'/lib/class_iradio.php';
    $monthly=new IRadio('periodic');
    $monthly->value=1;

    // month
    $month=new ISelect('bymonth');
    $array=array ();
    for ($i=0;$i<12;$i++) {
      $array[$i]['value']=$i+1; $array[$i]['label']=sprintf('%02d',($i+1));
    }
    $month->value=$array;
    $monthly->selected=true;
    $str_monthly=$monthly->input();
    $str_month=$month->input();
    // year
    $year = new IText('year');
    $year->size=4;
    $str_year=$year->input();

    // Tri
    $quater=new ISelect('byquaterly');
    $array=array();
    for ($i=0;$i<4;$i++) {
      $array[$i]['value']=$i+1; $array[$i]['label']=sprintf('%02d',($i+1));
    }
    $quater->value=$array;
    $quaterly=new IRadio('periodic');
    $quaterly->value=2;
    $str_quaterly=$quaterly->input();
    $str_quater=$quater->input();

    $str_submit=HtmlInput::submit('decl',_('Afficher'));
    $str_hidden=HtmlInput::extension().dossier::hidden();
    if (isset($_REQUEST['sa']))
      $str_hidden.=HtmlInput::hidden('sa',$_REQUEST['sa']);
    $str_hidden.=HtmlInput::request_to_hidden(array('ac'));
    $str_byyear='';
    if ( $by_year == true ) {
      $yearly=new IRadio('periodic');
      $yearly->value=3;
      $str_byyear=$yearly->input();
    }
    ob_start();
    require_once('form_periode.php');
    $r=ob_get_contents();
    ob_end_clean();
    return $r;
  }

Ext_List_Intra::compute ( )

inherited

Definition at line 166 of file class_ext_list_intra.php.

References $a, $array, $fiche, $sql, and Listing\find_tva_code().

                    {
    /* retrieve accounting customer */
    $code_customer=new Acc_Parm_Code($this->db);
    $code_customer->p_code='CUSTOMER';
    $code_customer->load();
    $a=$this->find_tva_code('CLINTRA');

    if (trim($a)=='') $a=-1;
    $sql=<<<EOF
      select sum(j_montant) as amount,j_qcode
      from jrnx
      where j_grpt in (select distinct j_grpt from quant_sold join jrnx using (j_id) where qs_vat_code in ($a) )
      and j_poste::text like $1||'%'
      and (j_date >= to_date($2,'DD.MM.YYYY') and j_date <= to_date($3,'DD.MM.YYYY'))
      group by j_qcode
EOF;
    // get all of them
    $all=$this->db->get_array($sql,array($code_customer->p_value,
                    $this->start_periode,
                    $this->end_periode
                    )
                 );
    $array=array();

    // retrieve missing and compute an array
    for ($i=0;$i<count($all);$i++){
        $child=new Ext_List_Intra_Child($this->db);
        $child->set_parameter('amount',$all[$i]['amount']);
        switch ($this->flag_periode) {
        case 1:
        // by month
        $child->set_parameter('periode',sprintf('%02d%s',$this->periode_dec,$this->exercice));
        break;
        case 2:
        /* quaterly */
        $child->set_parameter('periode',sprintf('3%d%s',$this->periode_dec,$this->exercice));
        break;
        case 3:
        /* yearly */
        $child->set_parameter('periode',sprintf('00%s',$this->periode_dec,$this->exercice));
        break;
      } // end switch

      $child->set_parameter('qcode',$all[$i]['j_qcode']);
      $fiche=new Fiche($this->db);
      $fiche->get_by_qcode($all[$i]['j_qcode'],false);
      $num_tva=$fiche->strAttribut(ATTR_DEF_NUMTVA);

      if ( trim($num_tva) === "") {continue;}
      $child->set_parameter('tva_num',$num_tva);

      $child->set_parameter('name_child',$fiche->strAttribut(ATTR_DEF_NAME));
      $child->set_parameter('code','L');

      $array[]=$child;
    }//end for
    $this->aChild=$array;
  }

Ext_List_Intra::display ( )

inherited

Definition at line 84 of file class_ext_list_intra.php.

References $_REQUEST, $r, Ext_List_Intra\display_declaration_amount(), Ext_Tva_Gen\display_info(), and id.

                     {
     $r= '<form class="print" id="readonly">';
     $r.=$this->display_info();
     $r.=HtmlInput::request_to_hidden(array('ac'));
     $r.=$this->display_declaration_amount();
     $r.='</form>';
     $js_remove=sprintf("onclick=\"if ( confirm('%s')){remove_form('%s',%d,%d,'li');}\"",
               "Vous confirmez vouloir effacer ?",
            $_REQUEST['plugin_code'],
            dossier::id(),
            $this->i_id);

     $r.=HtmlInput::button('Effacer','Effacer',$js_remove);
     $r.= create_script("$('readonly').disable();");
     return $r;
  }

Ext_List_Intra::display_declaration_amount (   $p_readonly = false )

inherited

Todo:

finish it

Definition at line 227 of file class_ext_list_intra.php.

References $a, $amount, $f, $r, $res, and Ext_Tva_Gen\get_parameter().

Referenced by Ext_List_Intra\display().

                                                         {
    $res='<fieldset><legend>Listing</legend>';

    $res.= '<table id="tb_dsp" class="result" style="width:80%;">';
    $clean=new IButton();
    $clean->label='Efface ligne';
    $clean->javascript="deleteRow('tb_dsp',this);";

    $r='';
    $r.=th('QuickCode');
    $r.=th('Name');
    $r.=th('Code Pays et numéro de TVA');
    $r.=th('Code Pays et numéro de TVA');
    $r.=th('montant');
    $r.=th('periode');
    $r.=th('');
    $amount=0;
    $res.=tr($r);
    for ($i=0;$i<count($this->aChild);$i++) {
      $a=new IText('qcode[]',$this->aChild[$i]->get_parameter('qcode'));
      $b=new IText('name_child[]',$this->aChild[$i]->get_parameter('name_child'));
      $c=new IText('tva_num_child[]',$this->aChild[$i]->get_parameter('tva_num'));
      $d=new IText('tvacode[]',$this->aChild[$i]->get_parameter('code'));
      $e=new INum('amount[]',$this->aChild[$i]->get_parameter('amount'));
      $f=new IText('periode[]',$this->aChild[$i]->get_parameter('periode'));

      $amount+=round($this->aChild[$i]->get_parameter('amount'),2);
      $r=td($a->input());
      $r.=td($b->input());
      $r.=td($c->input());
      $r.=td($d->input());
      $r.=td($e->input());
      $r.=td($f->input());
      if (! $p_readonly) $r.=td($clean->input());
      $res.=tr($r);

    }
    if ( $p_readonly)
    {
        $r=td('');
        $r.=td('');
        $r.=td('');
        $r.=td(hb('Total'));
        $r.=td(hb(sprintf('%.02f',$amount)));
        $r.=td('');
        $r.=td('');
        $res.=tr($r);
    }
    $res.='</table>';
    $res.='</fieldset>';
    return $res;
  }

Ext_Tva_Gen::display_info ( )

inherited

display the information about the company

Definition at line 182 of file class_ext_tvagen.php.

References $exercice, $r, and $str_date.

Referenced by Ext_List_Intra\display(), Ext_List_Assujetti\display(), and Ext_Tva\display().

                         {
    $itva=new IText('num_tva',$this->num_tva);$str_tva=$itva->input();
    $iname=new IText('name',$this->tva_name); $str_name=$iname->input();
    $iadress=new IText('adress',$this->adress);$str_adress=$iadress->input();
    $icountry=new IText('country',$this->country);$str_country=$icountry->input();

    /* date */

    if (isset($this->date_decl)) { $idate=new IText('date',format_date($this->date_decl));$str_date=$idate->input();}

    /* periode */

    if ( isset($this->start_date) ){
      $str_start=format_date($this->start_date);
      $str_end=format_date($this->end_date);

    }
    $ianne=$this->exercice;
    ob_start();
    require_once('form_decl_info.php');
    $r=ob_get_contents();
    ob_end_clean();
    return $r;
  }

Listing::find_tva_code (   $p_array )

inherited

Definition at line 29 of file class_listing.php.

References $array.

Referenced by Ext_List_Intra\compute(), and Ext_List_Assujetti\compute().

    {
        $array=$this->db->make_list("
            select distinct tva_id  from tva_belge.parameter_chld
            where
            pcode=$1",
                array($p_array));

        return $array;
    }

Ext_List_Intra::from_array (   $p_array )

inherited

Definition at line 48 of file class_ext_list_intra.php.

References $amount, $array, $name, and $periode.

                               {
    if( isset($p_array['name_child'])) {
      $name=$p_array['name_child'];
     $qcode=$p_array['qcode'];
     $code=$p_array['tvacode'];
     $tva_num=$p_array['tva_num_child'];
     $amount=$p_array['amount'];
     $periode=$p_array['periode'];
     $array=array();
    // retrieve missing and compute an array
    for ($i=0;$i<count($name);$i++){
      $child=new Ext_List_Intra_Child($this->db);
      $child->set_parameter('amount',$amount[$i]);
      $child->set_parameter('periode',$periode[$i]);
      $child->set_parameter('qcode',$qcode[$i]);
      $child->set_parameter('code',$code[$i]);
      $child->set_parameter('name_child',$name[$i]);
      $child->set_parameter('tva_num',$tva_num[$i]);

      $array[]=$child;
    }//end for
    $this->aChild=$array;
    } else
      $this->aChild=array();

    $this->start_periode=$p_array['start_periode'];
    $this->end_periode=$p_array['end_periode'];
    $this->flag_periode=$p_array['flag_periode'];
    $this->tva_name=$p_array['name'];
    $this->num_tva=$p_array['num_tva'];
    $this->adress=$p_array['adress'];
    $this->country=$p_array['country'];
    $this->periode_dec=$p_array['periode_dec'];
    $this->exercice=$p_array['exercice'];

  }

Ext_Tva_Gen::get_info ( )

inherited

Definition at line 72 of file class_ext_tvagen.php.

{    return var_export(self::$variable,true);  }

Ext_Tva_Gen::get_parameter (   $p_string )

inherited

Definition at line 54 of file class_ext_tvagen.php.

Referenced by Ext_List_Intra\display_declaration_amount(), Ext_List_Assujetti\display_declaration_amount(), Ext_Tva\display_declaration_amount(), and Ext_Tva_Gen\save().

                                           {
    if ( array_key_exists($p_string,$this->variable) ) {
      $idx=$this->variable[$p_string];
      return $this->$idx;
    }
    else
      throw new Exception (__FILE__.":".__LINE__.'Erreur attribut inexistant');
  }

Ext_List_Intra_Child::insert

(

)

Definition at line 280 of file class_ext_list_intra.php.

References $sql, and $variable.

                                                  {
  protected $variable=array(
                "id"=>"ic_id",
                "tva_num"=>"ic_tvanum",
                "amount"=>"ic_amount",
                "code"=>"ic_code",
                "periode"=>"ic_periode",
                "depend"=>"i_id",
                "qcode"=>"ic_qcode",
                "name_child"=>'ic_name'
                );
  function insert() {
$sql=<<<EOF
INSERT INTO tva_belge.intracomm_chld(
            i_id, ic_tvanum, ic_amount, ic_code, ic_periode, ic_qcode,

Ext_List_Intra::load ( )

inherited

Definition at line 100 of file class_ext_list_intra.php.

References $array, $res, and $sql.

                  {
    $sql="select * from tva_belge.intracomm where i_id=$1";

   $res=$this->db->get_array(
                $sql,
                array($this->i_id)
                );
   if ( $this->db->count() == 0 ) return 0;
   foreach ($res[0] as $idx=>$value) { $this->$idx=$value; }
   // load child
   $sql="select * from tva_belge.intracomm_chld where i_id=$1";
   $res=$this->db->get_array(
                $sql,
                array($this->i_id)
                );
   $nb=$this->db->count();
   $array=array();
   // retrieve missing and compute an array
   for ($i=0;$i<$nb;$i++){
     $child=new Ext_List_Intra_Child($this->db);
     foreach ($res[$i] as $idx=>$value){
       $child->$idx=$value;
     }
     $array[]=$child;
   }//end for
   $this->aChild=$array;

   return 1;
  }

Ext_Tva_Gen::save ( )

inherited

Definition at line 74 of file class_ext_tvagen.php.

References Ext_Tva_Gen\get_parameter().

                         {
  /* please adapt */
    if (  $this->get_parameter("id") == 0 )
      $this->insert();
    else
      $this->update();
  }

Ext_Tva_Gen::set_parameter (   $p_string,   $p_value  )

inherited

Definition at line 62 of file class_ext_tvagen.php.

Referenced by Ext_Tva_Gen\blank(), and Ext_Tva\compute().

                                                    {
    if ( array_key_exists($p_string,$this->variable) ) {
      $idx=$this->variable[$p_string];
      $this->$idx=$p_value;
    }
    else
      throw new Exception (__FILE__.":".__LINE__.'Erreur attribut inexistant');


  }

Ext_List_Intra::update ( )

inherited

Definition at line 163 of file class_ext_list_intra.php.

                    {
  }

Ext_List_Intra::verify ( )

inherited

Definition at line 129 of file class_ext_list_intra.php.

                    {
    return 0;
  }

Field Documentation

Ext_List_Intra_Child::$variable

protected

Initial value:

=array(
                "id"=>"ic_id",
                "tva_num"=>"ic_tvanum",
                "amount"=>"ic_amount",
                "code"=>"ic_code",
                "periode"=>"ic_periode",
                "depend"=>"i_id",
                "qcode"=>"ic_qcode",
                "name_child"=>'ic_name'
                )

Definition at line 270 of file class_ext_list_intra.php.

Referenced by insert().

---

The documentation for this class was generated from the following file:

• tva/class_ext_list_intra.php