check(true); $user->check_dossier($gDossier,true); $html=var_export($_REQUEST,true); switch($op) { /* ------------------------------------------------------------ */ /* Remove a attribut */ /* ------------------------------------------------------------ */ case 'rmfa': ob_start(); if( ! isset($_GET['ad_id']) || isNumber($_GET['ad_id']) ==0) throw new Exception ( "Parametre ad_id est invalide",11); $ad_id= $_GET['ad_id']; try { $cn->start(); $fa=new Fiche_Attr($cn,$ad_id); $fa->delete(); $cn->commit(); } catch (Exception $e) { $cn->rollback(); echo $e->getMessage(); } $html=ob_get_contents(); ob_clean(); break; /* ------------------------------------------------------------ */ /* Display card detail */ /* ------------------------------------------------------------ */ case 'dc': $f=new Fiche($cn); /* add title + close */ $html=HtmlInput::button_close($ctl); $html.=h2info('Détail fiche'); if ( $qcode != '') { $f->get_by_qcode($qcode); $can_modify=$user->check_action(FIC); if ( $can_modify==1) $card=$f->Display(false); else $card=$f->Display(true); if ( $card == 'FNT' ) { $html.='

'._('Fiche non trouvée').'

'; } else { if ($can_modify==1) { $html.=''; } } } else { $html.='

'._('Aucune fiche demandée').'

'; $html.=HtmlInput::button('close_'.$ctl,'Fermer',"onclick=\"removeDiv('$ctl')\""); } break; /* ------------------------------------------------------------ */ /* Blank card */ /* ------------------------------------------------------------ */ case 'bc': if ( $user->check_action(FICADD)==1 ) { $r=''; $r=HtmlInput::button_close($ctl); /* get cat. name */ $cat_name=$cn->get_value('select fd_label from fiche_def where fd_id=$1', array($fd_id)); $r.=h2info(_('Nouvelle fiche ').$cat_name); $f=new Fiche($cn); $r.=''; $html=$r; } else { $html=alert(_('Action interdite'),true); } break; /* ------------------------------------------------------------ */ /* Show Type */ /* Before inserting a new card, the type must be selected */ /* ------------------------------------------------------------ */ case 'st': $sql="select fd_id,fd_label from fiche_def"; /* if we filter thanks the ledger*/ if ( $ledger != -1 ) { /* we want the card for deb or cred or both of this ledger */ switch( $fil ) { case -1: $l=new Acc_Ledger($cn,$ledger); $sql.=' where fd_id in ('.$l->get_all_fiche_def().')'; break; case 'cred': $l=new Acc_Ledger($cn,$ledger); $prop=$l->get_propertie(); if ( $prop['jrn_def_fiche_cred']=='')$prop=-1; $sql.=' where fd_id in ('.$prop['jrn_def_fiche_cred'].')'; break; case 'deb': $l=new Acc_Ledger($cn,$ledger); $prop=$l->get_propertie(); if ( $prop=='')$prop=-1; $sql.=' where fd_id in ('.$prop['jrn_def_fiche_deb'].')'; break; } } else { /* we filter thanks a given model of card */ if ( isset($cat)) { $sql=$sql.sprintf(' where frd_id = '.FormatString ($cat)); } else /* we filter thanks a given list of category of card */ if ( isset($fil) && strlen(trim($fil)) > 0 ) { $sql=$sql.sprintf(" where fd_id in (%s)", FormatString($fil)); } } $array=$cn->make_array($sql); $html=HtmlInput::button_close('select_card_div'); $html.=h2info('Choix de la catégorie'); if ( empty($array)) { $html.=_("Aucune catégorie de fiche ne correspondant à". " votre demande"); $html.=$sql; } else { $r=''; $html.='

Choississez la catégorie de fiche à laquelle vous aimeriez ajouter une fiche

'; $isel=new ISelect('fd_id'); $isel->value=$array; $r.=''; $html.=$r; } break; /*---------------------------------------------------------------------- * SC save card * save the new card (insert) * ----------------------------------------------------------------------*/ case 'sc': $html=HtmlInput::button_close($ctl); $html.=h2info('Nouvelle fiche'); if ( $user->check_action(FICADD)==1 ) { $f=new Fiche($cn); $f->insert($fd_id,$_POST); $html.='

Fiche sauvée

'; $html.=$f->Display(true); $js=""; if ( isset( $_POST['ref'])) $js=create_script(' window.location.reload()'); $html.=$js; } else { $html.=alert(_('Action interdite'),true); } $html.=HtmlInput::button('fermer','Fermer'," onclick=\"removeDiv('$ctl')\";"); break; /*---------------------------------------------------------------------- * Search a card * *----------------------------------------------------------------------*/ case 'fs': require_once('class_acc_ledger.php'); $r=''; $r.='

'; $r.= 'Fermer'; $r.='

'; $r.='

'.h2info(_('Recherche de fiche')).'

'; $r.='

'; $q=new IText('query'); $q->value=(isset($query))?$query:''; $r.=_('Fiche contenant'); $r.=$q->input(); $r.=HtmlInput::submit('fs',_('Recherche')); $r.=dossier::hidden().HtmlInput::hidden('op','fs'); $array=array(); foreach (array('query','inp','jrn','label','typecard','price','tvaid') as $i) { if (isset(${$i}) ) { $r.=HtmlInput::hidden($i,${$i}); $sql_array[$i]=${$i}; } } /* what is the type of the ledger */ $type="GL"; if (isset($jrn) && $jrn > 1) { $ledger=new Acc_Ledger($cn,$jrn); $type=$ledger->get_type(); } $fiche=new Fiche($cn); /* Build the SQL and show result */ $sql=$fiche->build_sql($sql_array); /* We limit the search to 20 records */ $sql=$sql.' order by vw_name limit 20'; $a=$cn->get_array($sql); for($i=0;$icheck_action(FICCAT)==1 ) { /*---------------------------------------------------------------------- * Add a category, display first the form * *----------------------------------------------------------------------*/ $ipopup=str_replace('_content','',$ctl); switch($cat) { case FICHE_TYPE_CLIENT: $msg=_(' de clients'); $base=$cn->get_value("select p_value from parm_code where p_code='CUSTOMER'"); break; case FICHE_TYPE_FOURNISSEUR: $msg=_(' de fournisseurs'); $base=$cn->get_value("select p_value from parm_code where p_code='SUPPLIER'"); break; case FICHE_TYPE_ADM_TAX: $msg=_(' d\'administration'); $base=''; break; } $html=''; $html.="

"._("Ajout d'une catégorie")." ".$msg."

"; /* show the form */ $html.= '

'; $html.=$ctl; $html.= ''; $html.= dossier::hidden(); $html.=HtmlInput::hidden('cat',$cat); $search=new IPoste("class_base"); $search->size=40; $search->value=$base; $search->label=_("Recherche poste"); $search->set_attribute('gDossier',dossier::id()); $search->set_attribute('account',$search->name); $search->set_attribute('ipopup','ipop_account'); $str_poste=$search->input(); ob_start(); require('template/category_of_card.php'); $html.=ob_get_contents(); ob_clean(); $submit=HtmlInput::submit('save',_('Sauve')); $html.= '

'; $html.= $submit; $html.= '

'; $html.= ''; $html.= '

'; } else { $html=alert(_('Action interdite'),true); } break; case 'scc': /*---------------------------------------------------------------------- * Save card Category into the database and return a ok message * *----------------------------------------------------------------------*/ $html=''; if ( $user->check_action(FICCAT) == 1 ) { if ( strlen(trim($_POST['nom_mod'])) != 0 && strlen(trim($_POST['class_base'])) != 0 ) { $array=array("FICHE_REF"=>$cat, "nom_mod"=>$_POST['nom_mod'], "class_base"=>$_POST['class_base']); if ( isset ($_POST['create'])) $array['create']=1; $catcard=new Fiche_Def($cn); if ( $catcard->Add($array) == -1) $html.="alert('"._('Catégorie existe déjà')."')"; else $html.="alert('"._('Catégorie sauvée')."')"; $html.=create_script($html); } else { $html.="alert('"._("Le nom et la classe base ne peuvent être vide")."')"; $html.=create_script($html); $invalid=1; } $ipop=str_replace('_content','',$ctl); $html.=create_script('hideIPopup(\''.$ipop.'\');'); } else { $html=alert(_('Action interdite'),true); } break; case 'upc': $html=HtmlInput::button_close($ctl); $html.=h2info('Détail fiche'); if ( $user->check_action(FICADD)==0 ) { $html.=alert(_('Action interdite'),true); } else { if ($cn->get_value('select count(*) from fiche where f_id=$1',array($_GET['f_id'])) == '0' ) { $html.=alert(_('Fiche non valide'),true); } else { $html=HtmlInput::button_close($ctl); $html.=h2info('Détail fiche (sauvée)'); $f=new Fiche($cn,$_GET['f_id']); ob_start(); $f->update($_GET); $html.=ob_get_contents(); ob_clean(); $html.=$f->Display(true); $html.=HtmlInput::button('close_'.$ctl,'Fermer',"onclick=\"removeDiv('$ctl')\""); } } } // switch $html=escape_xml($html); header('Content-type: text/xml; charset=UTF-8'); echo << $ctl $html EOF;