isAppend() == true) { $ret.= '
'; $ret.= '

Nouveau plan

'; $ret.= '
'; $ret.=dossier::hidden(); $ret.= $new->form(); $ret.= HtmlInput::hidden("sa","pa_write"); $ret.=HtmlInput::hidden("p_action","ca_pa"); ; $ret.=HtmlInput::submit("submit","Enregistre"); $ret.= '
'; $ret.= '
'; } else { $ret.= '
'. '

'. "Maximum de plan analytique est atteint". "

"; } } // Add if ( $sa == "pa_write") { $new=new Anc_Plan($cn); if ( $new->isAppend() == false) { $ret.= '

'. "Maximum de plan analytique est atteint". "

"; } else { $new=new Anc_Plan($cn); $new->name=$_POST['pa_name']; $new->description=$_POST['pa_description']; $new->add(); } } // show the detail if ( $sa == "pa_detail" ) { $new=new Anc_Plan($cn,$_GET['pa_id']); $wAction=HtmlInput::hidden("p_action","ca_pa"); $wSa=HtmlInput::hidden("sa","pa_update"); $new->get(); $ret.= '
'; $ret.= '

Mise à jour

'; $ret.= '
'; $ret.=dossier::hidden(); $ret.= $new->form(); $ret.= $wSa; $ret.= $wAction; $ret.=HtmlInput::submit("submit","Enregistre"); /* $ret.=sprintf(''. '', "?p_action=ca_pa&pa_id=".$_GET['pa_id']."&sa=pa_delete&$str_dossier"); */ $ret.=HtmlInput::button_anchor('Efface',"?p_action=ca_pa&pa_id=".$_GET['pa_id']."&sa=pa_delete&$str_dossier",'Efface','onclick="return confirm(\'Effacer ?\')"'); $ret.= '
'; $ret.= '
'; } // Update the PA if ( $sa == "pa_update" ) { $new=new Anc_Plan($cn,$_GET['pa_id']); $new->name=$_POST['pa_name']; $new->description=$_POST['pa_description']; $new->update(); $ret='
'; $ret.='

Mis à jour

'; $ret.="
"; } // show the form for add a poste if ( $sa=='po_add') { $po=new Anc_Account($cn); $po->pa_id=$_REQUEST['pa_id']; $wSa=HtmlInput::hidden("sa","po_write"); $ret.='
'; $ret.='
'; $ret.=dossier::hidden(); $ret.=$po->form(); $ret.=$wSa; $ret.=HtmlInput::submit("add","Ajout"); $ret.="
"; $ret.="
"; } // record the poste if ( $sa=="po_write") { // var_dump($_POST); $po=new Anc_Account($cn); $po->get_from_array($_POST); $po->add(); $sa="list"; } /* delete pa */ if ( $sa == "pa_delete") { $delete=new Anc_Plan($cn,$_GET['pa_id']); $delete->delete(); } /* po detail * */ if ( $sa=="po_detail") { $po=new Anc_Account($cn,$_GET['po_id']); $po->get_by_id(); $ret.='
'; $ret.='
'; $ret.=dossier::hidden(); $ret.=$po->form(); $ret.=HtmlInput::hidden('sa','po_update'); $ret.=HtmlInput::submit('Correction','Correction'); $ret.=sprintf(''. '', $po->id, $_REQUEST['pa_id'] ); $ret.='
'; $ret.='
'; } if ( $sa=="po_update") { $po=new Anc_Account($cn); $po->get_from_array($_POST); $po->update(); $sa="list"; } if ( $sa=="po_delete") { $po=new Anc_Account($cn,$_REQUEST['po_id']); $po->delete(); $sa="list"; } /* List poste */ if ( $sa == "list" ) { $count=0; $new=new Anc_Plan($cn,$_REQUEST['pa_id']); $new->get(); $array=$new->get_poste_analytique(" order by po_name"); $ret.='
'; $ret.=''; $ret.=""; $ret.=""; $ret.=""; $class=""; foreach ($array as $obj) { $count++; if ( $count %2 == 0 ) $class="even"; else $class="odd"; $ret.=""; $ret.="" ; $ret.=""; $ret.=""; $ret.=""; $ret.=""; $ret.=""; } $ret.="
Nom "; $ret.=" Montant "; $ret.=" Description "; $ret.="Groupe Plan A "; $ret.="
". ''. h($obj->name). ''; "".$obj->amount."".h($obj->description)."".$obj->ga_id."".h($new->name)."
"; $ret.=HtmlInput::button_anchor('Ajout',"?p_action=ca_pa&sa=po_add&pa_id=".$_GET['pa_id']."&".$str_dossier); $ret.='
'; } } //--------------------------------------------------------------------------- // Show lmenu // //--------------------------------------------------------------------------- $obj=new Anc_Plan($cn); $list=$obj->get_list(); if ( empty($list) ) { echo ''; if ( ! isset ( $_REQUEST['sa'])) echo '
'. "Aucun plan analytique n'est défini". '
'; } else { echo ''; } //--------------------------------------------------------------------------- // show the u_redcontent part // // //--------------------------------------------------------------------------- echo $ret;