1 if ($nb_bib == '1') { show_list_cde($tab_bib[0][0]); exit; } $def_bibli=entites::getSessionBibliId(); if (in_array($def_bibli, $tab_bib[0])) { show_list_cde($def_bibli); exit; } $aff = "
"; $aff.= "

".htmlentities($msg['acquisition_menu_chx_ent'], ENT_QUOTES, $charset)."

"; $aff.= ""; $parity=1; foreach($tab_bib[0] as $k=>$v) { if ($parity % 2) { $pair_impair = "even"; } else { $pair_impair = "odd"; } $parity += 1; $tr_javascript=" onmouseover=\"this.className='surbrillance'\" onmouseout=\"this.className='".$pair_impair."'\" onmousedown=\"document.forms['list_biblio_form'].setAttribute('action','./acquisition.php?categ=ach&sub=cmde&action=list&id_bibli=".$v."');document.forms['list_biblio_form'].submit(); \" "; $aff.= ""; } $aff.="
".htmlentities($tab_bib[1][$k], ENT_QUOTES, $charset)."
"; print $aff; } //Affiche la liste des commandes pour une bibliotheque function show_list_cde($id_bibli) { global $msg, $charset; global $search_form_actes, $cdelist_form,$cdelist_bt_chk,$cdelist_script; global $cdelist_bt_valid,$cdelist_bt_delete,$cdelist_bt_sold,$cdelist_bt_arc; global $nb_per_page_acq,$nb_per_page; global $class_path; global $user_input, $statut, $page, $nbr_lignes, $last_param, $sortBy; global $tab_bib; global $acquisition_pdfcde_by_mail; if(!isset($sortBy)){ if(trim($_SESSION["acquisition_cde_sort"])){ $sortBy=$_SESSION["acquisition_cde_sort"]; }else{ $sortBy=""; } }else{ $_SESSION["acquisition_cde_sort"]=$sortBy; } $bib = new entites($id_bibli); $bib_coord = pmb_mysql_fetch_object(entites::get_coordonnees($id_bibli,1)); //Creation selecteur etablissement $sel_bibli =""; $search_form_actes=str_replace('', $sel_bibli, $search_form_actes); //Creation selecteur statut $sel_statut = ""; $search_form_actes=str_replace('', $sel_statut ,$search_form_actes); //Affichage form de recherche $titre = htmlentities($msg['recherche'].' : '.$msg['acquisition_ach_cde'], ENT_QUOTES, $charset); $action ="./acquisition.php?categ=ach&sub=cmde&action=list&user_input="; $bouton_add = ""; $search_form_actes = str_replace('!!form_title!!', $titre, $search_form_actes); $search_form_actes = str_replace('!!action!!', $action, $search_form_actes); $search_form_actes = str_replace('', $bouton_add, $search_form_actes); $search_form_actes = str_replace('!!user_input!!', $user_input, $search_form_actes); $search_form_actes = str_replace('!!sortBy!!', $sortBy, $search_form_actes); print $search_form_actes; if (!$statut) { $statut = getSessionCdeState(); //Recuperation du statut courant } else { setSessionCdeState($statut); } print ""; //Prise en compte du formulaire de recherche // nombre de références par pages if(!isset($nb_per_page)){ if ($nb_per_page_acq != "") $nb_per_page = $nb_per_page_acq ; else $nb_per_page = 10; } // traitement de la saisie utilisateur require_once($class_path."/analyse_query.class.php"); // comptage if(!$nbr_lignes) { if(!$user_input) { $nbr_lignes = entites::getNbActes($id_bibli, TYP_ACT_CDE, $statut); } else { $aq=new analyse_query(stripslashes($user_input),0,0,0,0); if ($aq->error) { error_message($msg["searcher_syntax_error"],sprintf($msg["searcher_syntax_error_desc"],$aq->current_car,$aq->input_html,$aq->error_message)); exit; } $nbr_lignes = entites::getNbActes($id_bibli, TYP_ACT_CDE, $statut, $aq, $user_input); } } else { $aq=new analyse_query(stripslashes($user_input),0,0,0,0); } if(!$page) $page=1; $debut =($page-1)*$nb_per_page; if($nbr_lignes) { $url_base = "$PHP_SELF?categ=ach&sub=cmde&action=list&id_bibli=$id_bibli&user_input=".rawurlencode(stripslashes($user_input))."&statut=$statut&sortBy=$sortBy" ; // liste if(!$user_input) { $res = entites::listActes($id_bibli, TYP_ACT_CDE, $statut, $debut, $nb_per_page, 0, '', $sortBy); } else { $res = entites::listActes($id_bibli, TYP_ACT_CDE, $statut, $debut, $nb_per_page, $aq, $user_input, $sortBy); } //Affichage liste des commandes $cde_list=""; $nbr = pmb_mysql_num_rows($res); $parity=1; for($i=0;$i<$nbr;$i++) { $row=pmb_mysql_fetch_object($res); //TODO A modifier si une seule date de livraison par acte $dateech = $row->date_ech_calc; if ($dateech != '00000000') $dateech=formatdate($dateech); else $dateech = ''; $st = ( ($row->statut) & ~(STA_ACT_FAC | STA_ACT_PAY | STA_ACT_ARC) ); switch ($st) { case STA_ACT_AVA : $st_cde = htmlentities($msg['acquisition_cde_aval'], ENT_QUOTES, $charset); break; case STA_ACT_ENC : $st_cde = htmlentities($msg['acquisition_cde_enc'], ENT_QUOTES, $charset); break; case STA_ACT_REC : $st_cde = htmlentities($msg['acquisition_cde_liv'], ENT_QUOTES, $charset); break; default : $st_cde = htmlentities($msg['acquisition_cde_enc'], ENT_QUOTES, $charset); } if( ($row->statut & STA_ACT_PAY) == STA_ACT_PAY ) { $st_fac = htmlentities($msg['acquisition_act_pay'], ENT_QUOTES, $charset); } elseif( ($row->statut & STA_ACT_FAC) == STA_ACT_FAC ) { $st_fac = htmlentities($msg['acquisition_act_fac'], ENT_QUOTES, $charset); } else $st_fac = ''; if ($st_fac) $st_cde.=' / '.$st_fac; if( ($row->statut & STA_ACT_ARC) == STA_ACT_ARC ) $st_cde = ''.$st_cde.''; if ($parity % 2) { $pair_impair = "even"; } else { $pair_impair = "odd"; } $parity += 1; $tr_javascript = "onmouseover=\"this.className='surbrillance'\" onmouseout=\"this.className='".$pair_impair."'\" "; $dn_javascript = "onmousedown=\"document.location='./acquisition.php?categ=ach&sub=cmde&action=modif&id_bibli=".$id_bibli."&id_cde=".$row->id_acte."' \" "; $cde_list.= " ".$row->numero." ".htmlentities($row->raison_sociale, ENT_QUOTES, $charset)." ".formatdate($row->date_acte)." ".$dateech." $st_cde id_acte."&page=".$page."&by_mail=0'\" > ".htmlentities($msg[ "; if ( ( (($row->statut & ~STA_ACT_ARC)== STA_ACT_ENC) && $acquisition_pdfcde_by_mail && strpos($bib_coord->email,'@')) ) { $cde_list.= " id_acte."&page=".$page."&by_mail=1'\" > ".htmlentities($msg[ "; } $cde_list.= ""; if ($statut!=STA_ACT_ALL && $statut!=STA_ACT_ARC) { $cde_list.= ""; } $cde_list.= ""; } if (!$last_param) { $nav_bar = aff_pagination ($url_base, $nbr_lignes, $nb_per_page, $page, 10, true, true); } else { $nav_bar = ""; } $fieldList=array("1"=>"numero","2"=>"raison_sociale","3"=>"date_acte","4"=>"date_ech_calc"); foreach ($fieldList as $k=>$field){ if($sortBy==$field){ $cdelist_form = str_replace('!!sortBy_'.$k.'_1!!',"-".$field,$cdelist_form); $cdelist_form = str_replace('!!sortBy_'.$k.'_2!!'," ▴",$cdelist_form); }elseif($sortBy=="-".$field){ $cdelist_form = str_replace('!!sortBy_'.$k.'_1!!',$field,$cdelist_form); $cdelist_form = str_replace('!!sortBy_'.$k.'_2!!'," ▾",$cdelist_form); }else{ $cdelist_form = str_replace('!!sortBy_'.$k.'_1!!',$field,$cdelist_form); $cdelist_form = str_replace('!!sortBy_'.$k.'_2!!',"",$cdelist_form); } } $cdelist_form = str_replace('',$cde_list,$cdelist_form); $cdelist_form = str_replace('',$nav_bar,$cdelist_form); if($statut!=STA_ACT_ALL && $statut!=STA_ACT_ARC) { //colonne chk $cdelist_form=str_replace("", " ",$cdelist_form); //Bouton Sélectionner $cdelist_form=str_replace('', $cdelist_bt_chk,$cdelist_form); //JavaScript $cdelist_form=str_replace('', $cdelist_script,$cdelist_form); } $bt_list=''; $bt_sup=''; switch($statut) { case STA_ACT_AVA : $bt_list=$cdelist_bt_valid; $bt_sup=$cdelist_bt_delete; break; case STA_ACT_ENC : $bt_list=$cdelist_bt_sold; break; case STA_ACT_REC : $bt_list=$cdelist_bt_arc; break; default: break; } $cdelist_form = str_replace('',$bt_list,$cdelist_form); $cdelist_form = str_replace('',$bt_sup,$cdelist_form); print $cdelist_form; } else { // la requête n'a produit aucun résultat error_message($msg['acquisition_cde_rech'], str_replace('!!cde_cle!!', stripslashes($user_input), $msg['acquisition_cde_rech_error']), 0, './categ=ach&sub=cmde&action=list&id_bibli='.$id_bibli); } } //Affiche les exercices actifs pour création commande function show_list_exercices($id_bibli, $fct, $url, $id_dev=0) { global $dbh; global $msg, $charset; global $current_module; $q = entites::getCurrentExercices($id_bibli); $r = pmb_mysql_query($q, $dbh); $n = pmb_mysql_num_rows($r); switch ($n) { case 0 : //Pas d'exercice actif pour la bibliothèque $error_msg.= htmlentities($msg["acquisition_err_exer"],ENT_QUOTES, $charset)."
"; error_message($msg[321], $error_msg.htmlentities($msg["acquisition_err_par"],ENT_QUOTES, $charset), '1', './admin.php?categ=acquisition'); die; break; case 1 : //1 seul exercice actif pour la bibliotheque $row = pmb_mysql_fetch_object($r); eval($fct."(".$id_bibli.", ".$row->id_exercice.", ".$id_dev.");"); break; default : $aff = "
"; $aff.= "

".htmlentities($msg['acquisition_menu_chx_exe'], ENT_QUOTES, $charset)."

"; $aff.= ""; $parity=1; while(($row=pmb_mysql_fetch_object($r))) { if ($parity % 2) { $pair_impair = "even"; } else { $pair_impair = "odd"; } $parity += 1; $tr_javascript=" onmouseover=\"this.className='surbrillance'\" onmouseout=\"this.className='".$pair_impair."'\" onmousedown=\"document.forms['list_exe_form'].setAttribute('action','".$url."&id_exer=".$row->id_exercice."');document.forms['list_exe_form'].submit(); \" "; $aff.= ""; } $aff.="
".htmlentities($row->libelle, ENT_QUOTES, $charset)."
"; print $aff; break; } } //Affiche le formulaire de création/modification de commande function show_cde($id_bibli, $id_exer, $id_cde) { global $msg, $charset; global $modif_cde_form, $valid_cde_form; global $bt_enr, $bt_enr_valid, $bt_val, $bt_dup, $bt_rec, $bt_fac, $bt_audit, $bt_sol, $bt_arc, $bt_sup, $bt_imp, $bt_mail ; global $sel_date_liv_mod, $sel_date_liv_fix, $sel_date_pay_mod; global $pmb_gestion_devise; global $p_user; global $pmb_type_audit; //Recuperation etablissement $bibli = new entites($id_bibli); $lib_bibli = htmlentities($bibli->raison_sociale, ENT_QUOTES, $charset); //Prise en compte des adresses utilisateurs par defaut $tab1 = explode('|', $p_user->speci_coordonnees_etab); $tab_adr=array(); foreach ($tab1 as $value) { $tab2=explode(',', $value); $tab_adr[$tab2[0]]['id_adr_fac']=$tab2[1]; $tab_adr[$tab2[0]]['id_adr_liv']=$tab2[2]; } $def_id_adr_fac=$tab_adr[$id_bibli]['id_adr_fac']; $def_id_adr_liv=$tab_adr[$id_bibli]['id_adr_liv']; if(!$id_cde) { //creation de commmande //Recuperation exercice $exer = new exercices($id_exer); $lib_exer = htmlentities($exer->libelle, ENT_QUOTES, $charset); $form = $modif_cde_form; $titre = htmlentities($msg['acquisition_cde_cre'], ENT_QUOTES, $charset); $date_cre = formatdate(today()); //$numero = calcNumero($id_bibli, TYP_ACT_CDE); $nom_acte = ''; $statut = STA_ACT_AVA; $sel_statut = ""; $sel_statut.=htmlentities($msg['acquisition_cde_aval'], ENT_QUOTES, $charset); $id_fou = '0'; $lib_fou = ''; $id_adr_fou = '0'; $adr_fou = ''; if ($def_id_adr_fac) { $id_adr_fac = $def_id_adr_fac; $coord = new coordonnees($def_id_adr_fac); } else { $coord_fac = entites::get_coordonnees($id_bibli, '1'); if (pmb_mysql_num_rows($coord_fac) != 0) { $coord = pmb_mysql_fetch_object($coord_fac); $id_adr_fac = $coord->id_contact; } else { $id_adr_fac='0'; } } if ($id_adr_fac) { if($coord->libelle != '') $adr_fac = htmlentities($coord->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact != '') $adr_fac.= htmlentities($coord->contact, ENT_QUOTES, $charset)."\n"; if($coord->adr1 != '') $adr_fac.= htmlentities($coord->adr1, ENT_QUOTES, $charset)."\n"; if($coord->adr2 != '') $adr_fac.= htmlentities($coord->adr2, ENT_QUOTES, $charset)."\n"; if($coord->cp !='') $adr_fac.= htmlentities($coord->cp, ENT_QUOTES, $charset).' '; if($coord->ville != '') $adr_fac.= htmlentities($coord->ville, ENT_QUOTES, $charset); } else { $adr_fac = ''; } if ($def_id_adr_liv) { $id_adr_liv = $def_id_adr_liv; $coord = new coordonnees($def_id_adr_liv); } else { $coord_liv = entites::get_coordonnees($id_bibli, '2'); if (pmb_mysql_num_rows($coord_liv) != 0) { $coord = pmb_mysql_fetch_object($coord_liv); $id_adr_liv = $coord->id_contact; } else { $id_adr_liv='0'; } } if ($id_adr_liv) { if($coord->libelle != '') $adr_liv = htmlentities($coord->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact != '') $adr_liv.= htmlentities($coord->contact, ENT_QUOTES, $charset)."\n"; if($coord->adr1 != '') $adr_liv.= htmlentities($coord->adr1, ENT_QUOTES, $charset)."\n"; if($coord->adr2 != '') $adr_liv.= htmlentities($coord->adr2, ENT_QUOTES, $charset)."\n"; if($coord->cp !='') $adr_liv.= htmlentities($coord->cp, ENT_QUOTES, $charset).' '; if($coord->ville != '') $adr_liv.= htmlentities($coord->ville, ENT_QUOTES, $charset); } else { $id_adr_liv = $id_adr_fac; $adr_liv = $adr_fac; } $comment = ''; $comment_i = ''; $lien_dev = ''; $liens_liv = ''; $liens_fac = ''; $ref = ''; $sel_date_pay = $sel_date_pay_mod; $date_pay = ''; $date_pay_lib = $msg['parperso_nodate']; $num_pay = ''; $sel_date_liv=$sel_date_liv_mod; $date_liv = ''; $date_liv_lib = $msg['parperso_nodate']; $id_dev = '0'; $devise = $pmb_gestion_devise; $bt_enr_valid = ''; $bt_dup = ''; $bt_rec = ''; $bt_fac = ''; $bt_sol = ''; $bt_imp = ''; $bt_mail = ''; $bt_audit = ''; $bt_arc = ''; $bt_sup = ''; $lignes= show_lig_cde(0); } else { //visualisation ou modification de commmande //Recuperation commande $cde = new actes($id_cde); $exer = new exercices($cde->num_exercice); $lib_exer = htmlentities($exer->libelle, ENT_QUOTES, $charset); //elements communs $titre = htmlentities($msg['acquisition_cde_mod'], ENT_QUOTES, $charset); $date_cre = formatdate($cde->date_acte); $numero = htmlentities($cde->numero, ENT_QUOTES, $charset); $nom_acte = htmlentities($cde->nom_acte,ENT_QUOTES,$charset); $id_fou = $cde->num_fournisseur; $fou = new entites($id_fou); $lib_fou = htmlentities($fou->raison_sociale, ENT_QUOTES, $charset); $coord = entites::get_coordonnees($fou->id_entite, '1'); if (pmb_mysql_num_rows($coord) != 0) { $coord = pmb_mysql_fetch_object($coord); $id_adr_fou = $coord->id_contact; if($coord->libelle != '') $adr_fou = htmlentities($coord->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact !='') $adr_fou.= htmlentities($coord->contact, ENT_QUOTES, $charset)."\n"; if($coord->adr1 != '') $adr_fou.= htmlentities($coord->adr1, ENT_QUOTES, $charset)."\n"; if($coord->adr2 != '') $adr_fou.= htmlentities($coord->adr2, ENT_QUOTES, $charset)."\n"; if($coord->cp !='') $adr_fou.= htmlentities($coord->cp, ENT_QUOTES, $charset).' '; if($coord->ville != '') $adr_fou.= htmlentities($coord->ville, ENT_QUOTES, $charset); } else { $id_adr_fou = '0'; $adr_fou = ''; } $id_adr_fac = $cde->num_contact_fact; if ($id_adr_fac) { $coord_fac = new coordonnees($id_adr_fac); if($coord_fac->libelle != '') $adr_fac = htmlentities($coord_fac->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact !='') $adr_fac.= htmlentities($coord_fac->contact, ENT_QUOTES, $charset)."\n"; if($coord_fac->adr1 != '') $adr_fac.= htmlentities($coord_fac->adr1, ENT_QUOTES, $charset)."\n"; if($coord_fac->adr2 != '') $adr_fac.= htmlentities($coord_fac->adr2, ENT_QUOTES, $charset)."\n"; if($coord_fac->cp !='') $adr_fac.= htmlentities($coord_fac->cp, ENT_QUOTES, $charset).' '; if($coord_fac->ville != '') $adr_fac.= htmlentities($coord_fac->ville, ENT_QUOTES, $charset); } else { $id_adr_fac = '0'; $adr_fac = ''; } $id_adr_liv = $cde->num_contact_livr; if ($id_adr_liv) { $coord_liv = new coordonnees($id_adr_liv); if($coord_liv->libelle != '') $adr_liv = htmlentities($coord_liv->libelle, ENT_QUOTES, $charset)."\n"; if($coord_liv->contact != '') $adr_liv.= htmlentities($coord_liv->contact, ENT_QUOTES, $charset)."\n"; if($coord_liv->adr1 != '') $adr_liv.= htmlentities($coord_liv->adr1, ENT_QUOTES, $charset)."\n"; if($coord_liv->adr2 != '') $adr_liv.= htmlentities($coord_liv->adr2, ENT_QUOTES, $charset)."\n"; if($coord_liv->cp !='') $adr_liv.= htmlentities($coord_liv->cp, ENT_QUOTES, $charset).' '; if($coord_liv->ville != '') $adr_liv.= htmlentities($coord_liv->ville, ENT_QUOTES, $charset); } else { $id_adr_liv = '0'; $adr_liv = ''; } $comment = htmlentities($cde->commentaires, ENT_QUOTES, $charset); $comment_i = htmlentities($cde->commentaires_i, ENT_QUOTES, $charset); $id_dev = liens_actes::getDevis($id_cde); if ($id_dev) { $dev=new actes($id_dev); $lien_dev = "".$dev->numero.""; } $tab_liens = liens_actes::getChilds($id_cde); $liens_liv = ''; $liens_fac = ''; while(($row_liens = pmb_mysql_fetch_object($tab_liens))) { if( ($row_liens->type_acte) == TYP_ACT_LIV ) { $liens_liv.= "
num_acte_lie."\">".$row_liens->numero.""; } if( ($row_liens->type_acte) == TYP_ACT_FAC ) { $liens_fac.= "
num_acte_lie."\">".$row_liens->numero.""; } } $ref = htmlentities($cde->reference, ENT_QUOTES, $charset); $sel_date_pay = $sel_date_pay_mod; if ($cde->date_paiement=='0000-00-00') { $date_pay = ''; $date_pay_lib = $msg['parperso_nodate']; } else { $date_pay = $cde->date_paiement; $date_pay_lib = formatdate($cde->date_paiement); } $num_pay = htmlentities($cde->num_paiement, ENT_QUOTES, $charset); if (!$pmb_type_audit) { $bt_audit = ''; } $devise = htmlentities($cde->devise, ENT_QUOTES, $charset); if ($cde->statut != STA_ACT_AVA) { //Commande non modifiable $form = $valid_cde_form; $statut = $cde->statut; $st = ( ($cde->statut) & ~(STA_ACT_FAC | STA_ACT_PAY | STA_ACT_ARC) ); switch ($st) { case STA_ACT_AVA : $sel_statut = htmlentities($msg['acquisition_cde_aval'], ENT_QUOTES, $charset); break; case STA_ACT_ENC : $sel_statut = htmlentities($msg['acquisition_cde_enc'], ENT_QUOTES, $charset); break; case STA_ACT_REC : $sel_statut = htmlentities($msg['acquisition_cde_liv'], ENT_QUOTES, $charset); break; default : $sel_statut = htmlentities($msg['acquisition_cde_enc'], ENT_QUOTES, $charset); break; } if( ($cde->statut & STA_ACT_PAY) == STA_ACT_PAY ) { $statut_fac = htmlentities($msg['acquisition_act_pay'], ENT_QUOTES, $charset); } elseif( ($cde->statut & STA_ACT_FAC) == STA_ACT_FAC ) { $statut_fac = htmlentities($msg['acquisition_act_fac'], ENT_QUOTES, $charset); } else { $statut_fac = ''; } if ($statut_fac) $sel_statut.=' / '.$statut_fac; if( ($cde->statut & STA_ACT_ARC) == STA_ACT_ARC ) $sel_statut = ''.$sel_statut.''; $sel_statut.= ""; $sel_date_liv=$sel_date_liv_fix; if ($cde->date_ech=='0000-00-00') { $date_liv_lib = $msg['parperso_nodate']; } else { $date_liv_lib = formatdate($cde->date_ech); } if (($cde->statut & STA_ACT_ARC) == STA_ACT_ARC ){ //Commande archivee $bt_enr = ''; $bt_enr_valid = ''; $bt_val = ''; $bt_rec = ''; $bt_fac = ''; $bt_sol = ''; $bt_arc = ''; } else { //Commande non archivee $bt_enr = ''; $bt_val = ''; if (($cde->statut & STA_ACT_REC) == STA_ACT_REC) { //Commande soldee $bt_rec = ''; $bt_sol = ''; } if (($cde->statut & STA_ACT_FAC) == STA_ACT_FAC) { //Commande facturee $bt_fac = ''; } if ( (($cde->statut & STA_ACT_REC) != STA_ACT_REC) || (($cde->statut & STA_ACT_FAC) != STA_ACT_FAC) || (($cde->statut & STA_ACT_PAY) != STA_ACT_PAY) ) { //Commande ni soldee, ni facturee, ni payee $bt_arc = ''; } } $lignes= show_lig_cde($id_cde, FALSE); } else { //Commande modifiable $form = $modif_cde_form; $statut = STA_ACT_AVA; $sel_statut = ""; $sel_statut.=htmlentities($msg['acquisition_cde_aval'], ENT_QUOTES, $charset); $sel_date_liv = $sel_date_liv_mod; if ($cde->date_ech=='0000-00-00') { $date_liv = ''; $date_liv_lib = $msg['parperso_nodate']; } else { $date_liv = $cde->date_ech; $date_liv_lib = formatdate($cde->date_ech); } $bt_enr_valid = ''; $bt_rec = ''; $bt_fac = ''; $bt_sol = ''; $lignes= show_lig_cde($id_cde); } } //Date validation if ($cde->date_valid != '0000-00-00') { $form = str_replace('!!date_valid_label!!',htmlentities($msg['acquisition_cde_date_val'], ENT_QUOTES, $charset),$form); $form = str_replace('!!date_valid!!',formatdate($cde->date_valid),$form); } else { $form = str_replace('!!date_valid_label!!','',$form); $form = str_replace('!!date_valid!!','',$form); } //complement formulaire $form = str_replace('', $sel_statut, $form); $form = str_replace('', $sel_date_liv, $form); $form = str_replace('', $sel_date_pay, $form); $form = str_replace('', $bt_enr, $form); $form = str_replace('', $bt_enr_valid, $form); $form = str_replace('', $bt_val, $form); $form = str_replace('', $bt_dup, $form); $form = str_replace('', $bt_rec, $form); $form = str_replace('', $bt_fac, $form); $form = str_replace('', $bt_imp, $form); $form = str_replace('', $bt_audit, $form); $form = str_replace('', $bt_arc, $form); $form = str_replace('', $bt_sol, $form); $form = str_replace('', $bt_sup, $form); $form = str_replace('!!act_nblines!!', $lignes[0], $form); $form = str_replace('', $lignes[1], $form); //Remplissage formulaire $form = str_replace('!!form_title!!', $titre, $form); $form = str_replace('!!id_bibli!!', $id_bibli, $form); $form = str_replace('!!lib_bibli!!', $lib_bibli, $form); $form = str_replace('!!id_exer!!', $exer->id_exercice, $form); $form = str_replace('!!lib_exer!!', $lib_exer, $form); $form = str_replace('!!id_cde!!', $id_cde, $form); $form = str_replace('!!date_cre!!', $date_cre, $form); $form = str_replace('!!dat_def_lib!!', formatdate(today()), $form); $form = str_replace('!!dat_def!!', preg_replace('/-/', '', today()), $form); $form = str_replace('!!numero!!', $numero, $form); $form = str_replace('!!nom_acte!!', $nom_acte, $form); $form = str_replace('!!statut!!', $statut, $form); $form = str_replace('!!id_fou!!', $id_fou, $form); $form = str_replace('!!lib_fou!!', $lib_fou, $form); $form = str_replace('!!id_adr_fou!!', $id_adr_fou, $form); $form = str_replace('!!adr_fou!!', $adr_fou, $form); $form = str_replace('!!date_liv!!', $date_liv, $form); $form = str_replace('!!date_liv_lib!!', $date_liv_lib, $form); $form = str_replace('!!date_pay!!', $date_pay, $form); $form = str_replace('!!date_pay_lib!!', $date_pay_lib, $form); $form = str_replace('!!num_pay!!', $num_pay, $form); $form = str_replace('!!id_adr_liv!!', $id_adr_liv, $form); $form = str_replace('!!adr_liv!!', $adr_liv, $form); $form = str_replace('!!id_adr_fac!!', $id_adr_fac, $form); $form = str_replace('!!adr_fac!!', $adr_fac, $form); $form = str_replace('!!comment!!', $comment, $form); $form = str_replace('!!comment_i!!', $comment_i, $form); $form = str_replace('!!ref!!', $ref, $form); $form = str_replace('!!id_dev!!', $id_dev, $form); $form = str_replace('!!devise!!', $devise, $form); $form = str_replace('!!lien_dev!!', $lien_dev, $form); $form = str_replace('!!liens_fac!!', $liens_fac, $form); $form = str_replace('!!liens_liv!!', $liens_liv, $form); //ajout ajax pour recherche budgets if($id_cde) { $form.=""; } print $form; } //Affiche les lignes d'une commande function show_lig_cde($id_cde, $mod=TRUE) { global $charset,$msg; global $acquisition_gestion_tva; global $modif_cde_row_form, $valid_cde_row_form; $form = " "; $i=0; if (!$id_cde) { $t = array(0=>$i, $form); return $t; } if ($mod) { $row_form = $modif_cde_row_form; } else { $row_form = $valid_cde_row_form; } $lgstat_form=lgstat::getHtmlSelect(array(), FALSE, array('id'=>'lg_statut[!!i!!]', 'name'=>'lg_statut[!!i!!]')); $lignes = actes::getLignes($id_cde); while (($row = pmb_mysql_fetch_object($lignes))) { $i++; $form.= $row_form; $form = str_replace('!!no!!', $i, $form); $form = str_replace('!!code!!', htmlentities($row->code, ENT_QUOTES, $charset), $form); if ($mod) { $form = str_replace('!!lib!!', htmlentities($row->libelle, ENT_QUOTES, $charset), $form); } else { $form = str_replace('!!lib!!', nl2br(htmlentities($row->libelle, ENT_QUOTES, $charset)), $form); } $form = str_replace('!!qte!!', $row->nb, $form); $form = str_replace('!!prix!!', $row->prix, $form); if ($acquisition_gestion_tva) { $form = str_replace('!!tva!!', $row->tva , $form); if ($acquisition_gestion_tva==1 ) { $prix_ttc=round($row->prix+($row->prix/100*$row->tva),2); $onchange_tva=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ht_to_ttc(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_prix=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ht_to_ttc(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_ht_ttc=" ".$prix_ttc." "; }elseif ($acquisition_gestion_tva==2 ) { $prix=$row->prix; $tva=$row->tva; $prix_ht=round( $prix / (($tva/100)+1),2); $onchange_tva=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ttc_to_ht(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_prix=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ttc_to_ht(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_ht_ttc=" ".$prix_ht." "; } if ($row->debit_tva==1 ) { $force_ht_ttc="
".$msg["acquisition_force_ht"].""; }else{ $force_ht_ttc="
".$msg["acquisition_force_ttc"].""; } } $form = str_replace('!!onchange_tva!!', $onchange_tva, $form); $form = str_replace('!!convert_prix!!', $convert_prix, $form); $form = str_replace('!!convert_ht_ttc!!', $convert_ht_ttc, $form); $form = str_replace('!!force_ht_ttc!!', $force_ht_ttc, $form); $form = str_replace('!!rem!!', $row->remise, $form); $lgstat=str_replace('!!i!!',$i,$lgstat_form); $lgstat=str_replace("value='$row->statut' ","value='$row->statut' selected='selected' ",$lgstat); $form=str_replace('!!lgstat!!',$lgstat,$form); $form=str_replace('!!comment_lg!!',htmlentities($row->commentaires_gestion,ENT_QUOTES,$charset),$form); $form=str_replace('!!comment_lo!!',htmlentities($row->commentaires_opac,ENT_QUOTES,$charset),$form); $form=str_replace('!!id_cde!!',$id_cde,$form); if ($mod) { if ($row->num_type) { $tp = new types_produits($row->num_type); $form = str_replace('!!typ!!', $tp->id_produit, $form); $form = str_replace('!!lib_typ!!', htmlentities($tp->libelle, ENT_QUOTES, $charset), $form); } else { $form = str_replace('!!typ!!', '0', $form); $form = str_replace('!!lib_typ!!', '', $form); } if ($row->num_rubrique) { $rub = new rubriques($row->num_rubrique); $bud = new budgets($rub->num_budget); $form = str_replace('!!rub!!', $rub->id_rubrique, $form); $tab_rub = rubriques::listAncetres($rub->id_rubrique, true); $lib_rub = ''; foreach ($tab_rub as $dummykey=>$value) { $lib_rub.= $value[1]; if($value[0] != $row->num_rubrique) $lib_rub.= ":"; } $form = str_replace('!!lib_rub!!', htmlentities($bud->libelle.":".$lib_rub, ENT_QUOTES, $charset), $form); } else { $form = str_replace('!!rub!!', '0', $form); $form = str_replace('!!lib_rub!!', '', $form); } $form = str_replace('!!id_sug!!', $row->num_acquisition, $form); $form = str_replace('!!id_lig!!', $row->id_ligne, $form); $form = str_replace('!!typ_lig!!', $row->type_ligne, $form); $form = str_replace('!!id_prod!!', $row->num_produit, $form); } else { //recherche des lignes de livraison $lig_liv = lignes_actes::getLivraisons($row->id_ligne); $rec = 0; while (($row_liv = pmb_mysql_fetch_object($lig_liv))) { $rec = $rec + $row_liv->nb; } $form = str_replace('!!rec!!', $rec, $form); if ($row->num_type) { $tp = new types_produits($row->num_type); $form = str_replace('!!lib_typ!!', htmlentities($tp->libelle, ENT_QUOTES, $charset), $form); } else { $form = str_replace('!!lib_typ!!', '', $form); } if ($row->num_rubrique) { $rub = new rubriques($row->num_rubrique); $bud = new budgets($rub->num_budget); $tab_rub = rubriques::listAncetres($rub->id_rubrique, true); $lib_rub = ''; foreach ($tab_rub as $dummykey=>$value) { $lib_rub.= $value[1]; if($value[0] != $row->num_rubrique) $lib_rub.= ":"; } $form = str_replace('!!lib_rub!!', htmlentities($bud->libelle.":".$lib_rub, ENT_QUOTES, $charset), $form); } else { $form = str_replace('!!lib_rub!!', '', $form); } $form = str_replace('!!id_lig!!', $row->id_ligne, $form); } } $t = array(0=>$i, 1=>$form); return $t; } //Affiche le formulaire de création de commande à partir d'un devis function show_cde_from_dev($id_bibli, $id_exer, $id_dev) { global $msg, $charset; global $modif_cde_form; global $bt_enr, $bt_val; global $sel_date_liv_mod, $sel_date_pay_mod; //Recuperation etablissement $bibli = new entites($id_bibli); $lib_bibli = htmlentities($bibli->raison_sociale, ENT_QUOTES, $charset); $form = $modif_cde_form; //Recuperation devis $dev = new actes($id_dev); //Recuperation exercice $exer = new exercices($id_exer); $lib_exer = htmlentities($exer->libelle, ENT_QUOTES, $charset); $titre = htmlentities($msg['acquisition_cde_cre'], ENT_QUOTES, $charset); $date_cre = formatdate(today()); //$numero = calcNumero($id_bibli, TYP_ACT_CDE); $nom_acte = ''; $statut = STA_ACT_AVA; $sel_statut = ""; $sel_statut.=htmlentities($msg['acquisition_cde_aval'], ENT_QUOTES, $charset); $id_fou = $dev->num_fournisseur; $fou = new entites($id_fou); $lib_fou = htmlentities($fou->raison_sociale, ENT_QUOTES, $charset); $coord = entites::get_coordonnees($fou->id_entite, '1'); if (pmb_mysql_num_rows($coord) != 0) { $coord = pmb_mysql_fetch_object($coord); $id_adr_fou = $coord->id_contact; if($coord->libelle != '') $adr_fou = htmlentities($coord->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact != '') $adr_fou.= htmlentities($coord->contact, ENT_QUOTES, $charset)."\n"; if($coord->adr1 != '') $adr_fou.= htmlentities($coord->adr1, ENT_QUOTES, $charset)."\n"; if($coord->adr2 != '') $adr_fou.= htmlentities($coord->adr2, ENT_QUOTES, $charset)."\n"; if($coord->cp !='') $adr_fou.= htmlentities($coord->cp, ENT_QUOTES, $charset).' '; if($coord->ville != '') $adr_fou.= htmlentities($coord->ville, ENT_QUOTES, $charset); } else { $id_adr_fou = '0'; $adr_fou = ''; } $id_adr_fac = $dev->num_contact_fact; if ($id_adr_fac) { $coord_fac = new coordonnees($id_adr_fac); if($coord_fac->libelle != '') $adr_fac = htmlentities($coord_fac->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact !='') $adr_fac.= htmlentities($coord_fac->contact, ENT_QUOTES, $charset)."\n"; if($coord_fac->adr1 != '') $adr_fac.= htmlentities($coord_fac->adr1, ENT_QUOTES, $charset)."\n"; if($coord_fac->adr2 != '') $adr_fac.= htmlentities($coord_fac->adr2, ENT_QUOTES, $charset)."\n"; if($coord_fac->cp !='') $adr_fac.= htmlentities($coord_fac->cp, ENT_QUOTES, $charset).' '; if($coord_fac->ville != '') $adr_fac.= htmlentities($coord_fac->ville, ENT_QUOTES, $charset); } else { $id_adr_fac = '0'; $adr_fac = ''; } $id_adr_liv = $dev->num_contact_livr; if ($id_adr_liv) { $coord_liv = new coordonnees($id_adr_liv); if($coord_liv->libelle != '') $adr_liv = htmlentities($coord_liv->libelle, ENT_QUOTES, $charset)."\n"; if($coord_liv->contact != '') $adr_liv.= htmlentities($coord_liv->contact, ENT_QUOTES, $charset)."\n"; if($coord_liv->adr1 != '') $adr_liv.= htmlentities($coord_liv->adr1, ENT_QUOTES, $charset)."\n"; if($coord_liv->adr2 != '') $adr_liv.= htmlentities($coord_liv->adr2, ENT_QUOTES, $charset)."\n"; if($coord_liv->cp !='') $adr_liv.= htmlentities($coord_liv->cp, ENT_QUOTES, $charset).' '; if($coord_liv->ville != '') $adr_liv.= htmlentities($coord_liv->ville, ENT_QUOTES, $charset); } else { $id_adr_liv = '0'; $adr_liv = ''; } $comment = ''; $comment_i = htmlentities($dev->commentaires_i, ENT_QUOTES, $charset);; $lien_dev = "".$dev->numero.""; $liens_liv = ''; $liens_fac = ''; $ref = htmlentities($dev->reference, ENT_QUOTES, $charset); $sel_date_pay=$sel_date_pay_mod; $date_pay = ''; $date_pay_lib = $msg['parperso_nodate']; $num_pay = ''; $sel_date_liv=$sel_date_liv_mod; $date_liv = ''; $date_liv_lib = $msg['parperso_nodate']; $devise = htmlentities($dev->devise, ENT_QUOTES, $charset); $bt_dup = ''; $bt_rec = ''; $bt_fac = ''; $bt_imp = ''; $bt_sol = ''; $bt_audit = ''; $bt_sup = ''; $lignes = show_lig_cde_from_dev($id_dev); $id_cde=0; //complement formulaire $form = str_replace('', $sel_statut, $form); $form = str_replace('', $sel_date_liv, $form); $form = str_replace('', $sel_date_pay, $form); $form = str_replace('', $bt_enr, $form); $form = str_replace('', $bt_val, $form); $form = str_replace('', $bt_imp, $form); $form = str_replace('', $bt_dup, $form); $form = str_replace('', $bt_rec, $form); $form = str_replace('', $bt_fac, $form); $form = str_replace('', $bt_audit, $form); $form = str_replace('', $bt_sol, $form); $form = str_replace('', $bt_sup, $form); $form = str_replace('!!act_nblines!!', $lignes[0], $form); $form = str_replace('', $lignes[1], $form); //Remplissage formulaire $form = str_replace('!!form_title!!', $titre, $form); $form = str_replace('!!id_bibli!!', $id_bibli, $form); $form = str_replace('!!lib_bibli!!', $lib_bibli, $form); $form = str_replace('!!id_exer!!', $exer->id_exercice, $form); $form = str_replace('!!lib_exer!!', $lib_exer, $form); $form = str_replace('!!id_cde!!', $id_cde, $form); $form = str_replace('!!date_cre!!', $date_cre, $form); $form = str_replace('!!dat_def_lib!!', formatdate(today()), $form); $form = str_replace('!!dat_def!!', preg_replace('/-/', '', today()), $form); $form = str_replace('!!numero!!', "", $form); $form = str_replace('!!nom_acte!!', $nom_acte, $form); $form = str_replace('!!statut!!', $statut, $form); $form = str_replace('!!id_fou!!', $id_fou, $form); $form = str_replace('!!lib_fou!!', $lib_fou, $form); $form = str_replace('!!id_adr_fou!!', $id_adr_fou, $form); $form = str_replace('!!adr_fou!!', $adr_fou, $form); $form = str_replace('!!date_liv!!', $date_liv, $form); $form = str_replace('!!date_liv_lib!!', $date_liv_lib, $form); $form = str_replace('!!date_pay!!', $date_pay, $form); $form = str_replace('!!date_pay_lib!!', $date_pay_lib, $form); $form = str_replace('!!num_pay!!', $num_pay, $form); $form = str_replace('!!id_adr_liv!!', $id_adr_liv, $form); $form = str_replace('!!adr_liv!!', $adr_liv, $form); $form = str_replace('!!id_adr_fac!!', $id_adr_fac, $form); $form = str_replace('!!adr_fac!!', $adr_fac, $form); $form = str_replace('!!comment!!', $comment, $form); $form = str_replace('!!comment_i!!', $comment_i, $form); $form = str_replace('!!ref!!', $ref, $form); $form = str_replace('!!id_dev!!', $id_dev, $form); $form = str_replace('!!devise!!', $devise, $form); $form = str_replace('!!lien_dev!!', $lien_dev, $form); $form = str_replace('!!liens_fac!!', $liens_fac, $form); $form = str_replace('!!liens_liv!!', $liens_liv, $form); print $form; } //Affiche les lignes d'une commande a partir d'un devis function show_lig_cde_from_dev($id_dev) { global $charset,$msg; global $acquisition_gestion_tva; global $modif_cde_row_form,$deflt3lgstatcde; $form = " "; $i=0; if (!$id_dev) { $t = array(0=>$i, $form); return $t; } $lgstat_form=lgstat::getHtmlSelect(array(0=>$deflt3lgstatcde), FALSE, array('id'=>'lg_statut[!!i!!]','name'=>'lg_statut[!!i!!]')); $lignes = actes::getLignes($id_dev); while (($row = pmb_mysql_fetch_object($lignes))) { $i++; $form.= $modif_cde_row_form; $form = str_replace('!!no!!', $i, $form); $form = str_replace('!!code!!', htmlentities($row->code, ENT_QUOTES, $charset), $form); $form = str_replace('!!lib!!', htmlentities($row->libelle, ENT_QUOTES, $charset), $form); $form = str_replace('!!qte!!', $row->nb, $form); $form = str_replace('!!prix!!', $row->prix, $form); if ($acquisition_gestion_tva) { $form = str_replace('!!tva!!', $row->tva , $form); if ($acquisition_gestion_tva==1 ) { $prix_ttc=round($row->prix+($row->prix/100*$row->tva),2); $onchange_tva=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ht_to_ttc(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_prix=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ht_to_ttc(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_ht_ttc=" ".$prix_ttc." "; }elseif ($acquisition_gestion_tva==2 ) { $prix=$row->prix; $tva=$row->tva; $prix_ht=round( $prix / (($tva/100)+1),2); $onchange_tva=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ttc_to_ht(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_prix=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ttc_to_ht(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_ht_ttc=" ".$prix_ht." "; } if ($row->debit_tva==1 ) { $force_ht_ttc="
".$msg["acquisition_force_ht"].""; }else{ $force_ht_ttc="
".$msg["acquisition_force_ttc"].""; } } $form = str_replace('!!onchange_tva!!', $onchange_tva, $form); $form = str_replace('!!convert_prix!!', $convert_prix, $form); $form = str_replace('!!convert_ht_ttc!!', $convert_ht_ttc, $form); $form = str_replace('!!force_ht_ttc!!', $force_ht_ttc, $form); $form = str_replace('!!rem!!', $row->remise, $form); $lgstat=str_replace('!!i!!',$i,$lgstat_form); $form=str_replace('!!lgstat!!',$lgstat,$form); $form=str_replace('!!comment_lg!!',htmlentities($row->commentaires_gestion,ENT_QUOTES,$charset),$form); $form=str_replace('!!comment_lo!!',htmlentities($row->commentaires_opac,ENT_QUOTES,$charset),$form); if ($row->num_type) { $tp = new types_produits($row->num_type); $form = str_replace('!!typ!!', $tp->id_produit, $form); $form = str_replace('!!lib_typ!!', htmlentities($tp->libelle, ENT_QUOTES, $charset), $form); } else { $form = str_replace('!!typ!!', '0', $form); $form = str_replace('!!lib_typ!!', '', $form); } $form = str_replace('!!rub!!', '0', $form); $form = str_replace('!!lib_rub!!', '', $form); $form = str_replace('!!id_sug!!', $row->num_acquisition, $form); $form = str_replace('!!id_lig!!', $row->id_ligne, $form); $form = str_replace('!!typ_lig!!', $row->type_ligne, $form); $form = str_replace('!!id_prod!!', $row->num_produit, $form); } $t = array(0=>$i, 1=>$form); return $t; } //Affiche la liste des etablissements et exercices pour choix depuis suggestions function show_list_biblio_from_sug($sugchk) { global $dbh; global $msg, $charset; global $tab_bib; global $current_module; $sugchk = rawurlencode(serialize($sugchk)); //Affichage de la liste des etablissements et exercices auxquels a acces l'utilisateur $te = array(); foreach($tab_bib[0] as $k=>$v) { $qe = entites::getCurrentExercices($v); $re = pmb_mysql_query($qe, $dbh); while (($rowe=pmb_mysql_fetch_object($re))) { $te[$rowe->id_exercice][0]=$v; $te[$rowe->id_exercice][1]=$tab_bib[1][$k]; $te[$rowe->id_exercice][2]=$rowe->libelle; } } switch (count($te)) { case 0 : //Pas d'exercice actif $error_msg.= htmlentities($msg["acquisition_err_exer"],ENT_QUOTES, $charset)."
"; error_message($msg[321], $error_msg.htmlentities($msg["acquisition_err_par"],ENT_QUOTES, $charset), '1', './admin.php?categ=acquisition'); die; break; default: $aff = "
"; $aff.= ""; $aff.= "

".htmlentities($msg['acquisition_menu_chx_ent_exe'], ENT_QUOTES, $charset)."

"; $aff.= ""; $parity = 1; $tb = array(); foreach($te as $key=>$value) { if (in_array($value[0], $tb)===false) { $tb[]=$value[0]; if ($parity % 2) { $pair_impair = "even"; } else { $pair_impair = "odd"; } $parity += 1; $aff.= ""; } if ($parity % 2) { $pair_impair = "even"; } else { $pair_impair = "odd"; } $parity += 1; $tr_javascript=" onmouseover=\"this.className='surbrillance'\" onmouseout=\"this.className='".$pair_impair."'\" onmousedown=\"document.forms['list_biblio_form'].setAttribute('action','./acquisition.php?categ=ach&sub=cmde&action=from_sug_next&id_bibli=".$value[0]."&id_exer=".$key."');document.forms['list_biblio_form'].submit(); \" "; $aff.= ""; } $aff.="
".htmlentities($value[1], ENT_QUOTES, $charset)."
".htmlentities($value[2], ENT_QUOTES, $charset)."
"; if (count($te) == '1') $aff.= ""; print $aff; break; } } //Affiche le formulaire de création de commande depuis suggestions function show_cde_from_sug($id_bibli, $id_exer, $sugchk) { global $msg, $charset; global $modif_cde_form; global $bt_enr, $bt_val; global $sel_date_liv_mod, $sel_date_pay_mod; global $pmb_gestion_devise; global $p_user; //Recuperation etablissement $bibli = new entites($id_bibli); $lib_bibli = htmlentities($bibli->raison_sociale, ENT_QUOTES, $charset); //Prise en compte des adresses utilisateurs par défaut $tab1 = explode('|', $p_user->speci_coordonnees_etab); $tab_adr=array(); foreach ($tab1 as $v) { $tab2=explode(',', $v); $tab_adr[$tab2[0]]['id_adr_fac']=$tab2[1]; $tab_adr[$tab2[0]]['id_adr_liv']=$tab2[2]; } $def_id_adr_fac=$tab_adr[$id_bibli]['id_adr_fac']; $def_id_adr_liv=$tab_adr[$id_bibli]['id_adr_liv']; $form = $modif_cde_form; //Recuperation exercice $exer = new exercices($id_exer); $lib_exer = htmlentities($exer->libelle, ENT_QUOTES, $charset); $titre = htmlentities($msg['acquisition_cde_cre'], ENT_QUOTES, $charset); $date_cre = formatdate(today()); //$numero = calcNumero($id_bibli, TYP_ACT_CDE); $nom_acte = ''; $statut = STA_ACT_AVA; $sel_statut = ""; $sel_statut.=htmlentities($msg['acquisition_cde_aval'], ENT_QUOTES, $charset); $id_fou = '0'; $lib_fou = ''; $id_adr_fou = '0'; $adr_fou = ''; if ($def_id_adr_fac) { $id_adr_fac = $def_id_adr_fac; $coord = new coordonnees($def_id_adr_fac); } else { $coord_fac = entites::get_coordonnees($id_bibli, '1'); if (pmb_mysql_num_rows($coord_fac) != 0) { $coord = pmb_mysql_fetch_object($coord_fac); $id_adr_fac = $coord->id_contact; } else { $id_adr_fac='0'; } } if ($id_adr_fac) { if($coord->libelle != '') $adr_fac = htmlentities($coord->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact != '') $adr_fac.= htmlentities($coord->contact, ENT_QUOTES, $charset)."\n"; if($coord->adr1 != '') $adr_fac.= htmlentities($coord->adr1, ENT_QUOTES, $charset)."\n"; if($coord->adr2 != '') $adr_fac.= htmlentities($coord->adr2, ENT_QUOTES, $charset)."\n"; if($coord->cp !='') $adr_fac.= htmlentities($coord->cp, ENT_QUOTES, $charset).' '; if($coord->ville != '') $adr_fac.= htmlentities($coord->ville, ENT_QUOTES, $charset); } else { $adr_fac = ''; } if ($def_id_adr_liv) { $id_adr_liv = $def_id_adr_liv; $coord = new coordonnees($def_id_adr_liv); } else { $coord_liv = entites::get_coordonnees($id_bibli, '2'); if (pmb_mysql_num_rows($coord_liv) != 0) { $coord = pmb_mysql_fetch_object($coord_liv); $id_adr_liv = $coord->id_contact; } else { $id_adr_liv='0'; } } if ($id_adr_liv) { if($coord->libelle != '') $adr_liv = htmlentities($coord->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact != '') $adr_liv.= htmlentities($coord->contact, ENT_QUOTES, $charset)."\n"; if($coord->adr1 != '') $adr_liv.= htmlentities($coord->adr1, ENT_QUOTES, $charset)."\n"; if($coord->adr2 != '') $adr_liv.= htmlentities($coord->adr2, ENT_QUOTES, $charset)."\n"; if($coord->cp !='') $adr_liv.= htmlentities($coord->cp, ENT_QUOTES, $charset).' '; if($coord->ville != '') $adr_liv.= htmlentities($coord->ville, ENT_QUOTES, $charset); } else { $id_adr_liv = $id_adr_fac; $adr_liv = $adr_fac; } $comment = ''; $comment_i = ''; $id_dev = 0; $lien_dev = ''; $liens_liv = ''; $liens_fac = ''; $ref = ''; $sel_date_pay=$sel_date_pay_mod; $date_pay = ''; $date_pay_lib = $msg['parperso_nodate']; $num_pay = ''; $sel_date_liv=$sel_date_liv_mod; $date_liv = ''; $date_liv_lib = $msg['parperso_nodate']; $devise = $pmb_gestion_devise; $bt_dup = ''; $bt_rec = ''; $bt_fac = ''; $bt_imp = ''; $bt_sol = ''; $bt_audit = ''; $bt_sup = ''; $lignes = show_lig_cde_from_sug($sugchk); $id_cde=0; //complement formulaire $form = str_replace('', $sel_statut, $form); $form = str_replace('', $sel_date_liv, $form); $form = str_replace('', $sel_date_pay, $form); $form = str_replace('', $bt_enr, $form); $form = str_replace('', $bt_val, $form); $form = str_replace('', $bt_dup, $form); $form = str_replace('', $bt_rec, $form); $form = str_replace('', $bt_fac, $form); $form = str_replace('', $bt_imp, $form); $form = str_replace('', $bt_audit, $form); $form = str_replace('', $bt_sol, $form); $form = str_replace('', $bt_sup, $form); $form = str_replace('!!act_nblines!!', $lignes[0], $form); $form = str_replace('', $lignes[1], $form); //Remplissage formulaire $form = str_replace('!!form_title!!', $titre, $form); $form = str_replace('!!id_bibli!!', $id_bibli, $form); $form = str_replace('!!lib_bibli!!', $lib_bibli, $form); $form = str_replace('!!id_exer!!', $exer->id_exercice, $form); $form = str_replace('!!lib_exer!!', $lib_exer, $form); $form = str_replace('!!id_cde!!', $id_cde, $form); $form = str_replace('!!date_cre!!', $date_cre, $form); $form = str_replace('!!dat_def_lib!!', formatdate(today()), $form); $form = str_replace('!!dat_def!!', preg_replace('/-/', '', today()), $form); $form = str_replace('!!numero!!', "", $form); $form = str_replace('!!nom_acte!!', $nom_acte, $form); $form = str_replace('!!statut!!', $statut, $form); $form = str_replace('!!id_fou!!', $id_fou, $form); $form = str_replace('!!lib_fou!!', $lib_fou, $form); $form = str_replace('!!id_adr_fou!!', $id_adr_fou, $form); $form = str_replace('!!adr_fou!!', $adr_fou, $form); $form = str_replace('!!date_liv!!', $date_liv, $form); $form = str_replace('!!date_liv_lib!!', $date_liv_lib, $form); $form = str_replace('!!date_pay!!', $date_pay, $form); $form = str_replace('!!date_pay_lib!!', $date_pay_lib, $form); $form = str_replace('!!num_pay!!', $num_pay, $form); $form = str_replace('!!id_adr_liv!!', $id_adr_liv, $form); $form = str_replace('!!adr_liv!!', $adr_liv, $form); $form = str_replace('!!id_adr_fac!!', $id_adr_fac, $form); $form = str_replace('!!adr_fac!!', $adr_fac, $form); $form = str_replace('!!comment!!', $comment, $form); $form = str_replace('!!comment_i!!', $comment_i, $form); $form = str_replace('!!ref!!', $ref, $form); $form = str_replace('!!id_dev!!', $id_dev, $form); $form = str_replace('!!devise!!', $devise, $form); $form = str_replace('!!lien_dev!!', $lien_dev, $form); $form = str_replace('!!liens_fac!!', $liens_fac, $form); $form = str_replace('!!liens_liv!!', $liens_liv, $form); print $form; } //Affiche les lignes de commande depuis les suggestions function show_lig_cde_from_sug($sugchk) { global $dbh,$charset; global $acquisition_gestion_tva; global $modif_cde_row_form,$deflt3lgstatcde; $form = " "; $i=0; $lgstat_form=lgstat::getHtmlSelect(array(0=>$deflt3lgstatcde), FALSE, array('id'=>'lg_statut[!!i!!]', 'name'=>'lg_statut[!!i!!]')); $arrchk = unserialize(rawurldecode(stripslashes($sugchk))); foreach($arrchk as $value) { $i++; $sug = new suggestions($value); $form.=$modif_cde_row_form; $code=""; $taec=""; $prix='0'; $nb='none'; if ($sug->num_notice) { $q = "select niveau_biblio from notices where notice_id='".$sug->num_notice."' "; $r = pmb_mysql_query($q,$dbh); if(pmb_mysql_num_rows($r)) { $nb=pmb_mysql_result($r,0,0); } } switch($nb) { case 'a' : $typ_lig = 1; $notice=new sel_article_display($sug->num_notice,''); $notice->getData(); $notice->responsabilites = get_notice_authors($sug->num_notice); $notice->doHeader(); $taec= $notice->titre; if($notice->auteur1) { $taec.="\n".$notice->auteur1; } if($notice->in_bull) { $taec.="\n".$notice->in_bull; } $prix=$notice->prix; break; case 'm' : $typ_lig = 1; $notice=new sel_mono_display($sug->num_notice,''); $notice->getData(); $notice->responsabilites = get_notice_authors($sug->num_notice); $notice->doHeader(); $code = $notice->code; $taec= $notice->titre; if($notice->auteur1) { $taec.="\n".$notice->auteur1; } if ($notice->editeur1) { $taec.= "\n".$notice->editeur1; } if ($notice->editeur1 && $notice->ed_date) { $taec.= ", ".$notice->ed_date; } elseif ($notice->ed_date){ $taec.= $notice->ed_date; } if ($notice->collection) { $taec.= "\n".$notice->collection; } $prix=$notice->prix; break; default : $typ_lig = 0; $code = htmlentities($sug->code, ENT_QUOTES, $charset); $taec= htmlentities($sug->titre,ENT_QUOTES,$charset); if ($sug->auteur!="") $taec.= "\n".htmlentities($sug->auteur,ENT_QUOTES,$charset); if ($sug->editeur != ""){ $taec.= "\n".htmlentities($sug->editeur,ENT_QUOTES,$charset); if ($sug->date_publi != "0000-00-00") { $taec.= ",".htmlentities($sug->date_publi,ENT_QUOTES,$charset); } } $prix=htmlentities($sug->prix, ENT_QUOTES, $charset); break; } $form = str_replace('!!no!!', $i, $form); $form = str_replace('!!code!!', $code, $form); $form = str_replace('!!lib!!', $taec, $form); $form = str_replace('!!qte!!', $sug->nb, $form); $form = str_replace('!!prix!!', $prix, $form); if ($acquisition_gestion_tva) { $form = str_replace('!!tva!!', $row->tva , $form); if ($acquisition_gestion_tva==1 ) { $prix_ttc=round($row->prix+($row->prix/100*$row->tva),2); $onchange_tva=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ht_to_ttc(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_prix=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ht_to_ttc(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_ht_ttc=" ".$prix_ttc." "; }elseif ($acquisition_gestion_tva==2 ) { $prix=$row->prix; $tva=$row->tva; $prix_ht=round( $prix / (($tva/100)+1),2); $onchange_tva=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ttc_to_ht(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_prix=" onChange='document.getElementById(\"convert_ht_ttc_$i\").innerHTML= ttc_to_ht(document.getElementById(\"prix[$i]\").value,document.getElementById(\"tva[$i]\").value); ' "; $convert_ht_ttc=" ".$prix_ht." "; } if ($row->debit_tva==1 ) { $force_ht_ttc="
".$msg["acquisition_force_ht"].""; }else{ $force_ht_ttc="
".$msg["acquisition_force_ttc"].""; } } $form = str_replace('!!onchange_tva!!', $onchange_tva, $form); $form = str_replace('!!convert_prix!!', $convert_prix, $form); $form = str_replace('!!convert_ht_ttc!!', $convert_ht_ttc, $form); $form = str_replace('!!force_ht_ttc!!', $force_ht_ttc, $form); $form = str_replace('!!rem!!', '0.00', $form); $lgstat=str_replace('!!i!!',$i,$lgstat_form); $form=str_replace('!!lgstat!!',$lgstat,$form); $form=str_replace('!!comment_lg!!',htmlentities($row->commentaires_gestion,ENT_QUOTES,$charset),$form); $form=str_replace('!!comment_lo!!',htmlentities($row->commentaires_opac,ENT_QUOTES,$charset),$form); $form = str_replace('!!typ!!', '0', $form); $form = str_replace('!!lib_typ!!', '', $form); $form = str_replace('!!rub!!', '0', $form); $form = str_replace('!!lib_rub!!', '', $form); $form = str_replace('!!id_sug!!', $sug->id_suggestion, $form); $form = str_replace('!!id_lig!!', '0', $form); $form = str_replace('!!typ_lig!!', $typ_lig, $form); $form = str_replace('!!id_prod!!', $sug->num_notice, $form); } $t = array(0=>$i, 1=>$form); return $t; } //Solde la commande en l'état function sold_cde() { global $id_cde, $comment, $ref, $date_pay, $num_pay; if(!$id_cde) return; $cde = new actes($id_cde); //Commande considérée comme soldée $cde->statut = ($cde->statut & (~STA_ACT_ENC)); $cde->statut = ($cde->statut | STA_ACT_REC); //Les quantites livrees sur la commande sont-elles entierement facturees //Si oui statut commande >> facture $tab_cde = actes::getLignes($id_cde); $facture = true; while(($row_cde = pmb_mysql_fetch_object($tab_cde))) { $tab_liv = lignes_actes::getLivraisons($row_cde->id_ligne); $tab_fac = lignes_actes::getFactures($row_cde->id_ligne); $nb_liv = 0; while (($row_liv = pmb_mysql_fetch_object($tab_liv))) { $nb_liv = $nb_liv + $row_liv->nb; } $nb_fac = 0; while(($row_fac = pmb_mysql_fetch_object($tab_fac))) { $nb_fac = $nb_fac + $row_fac->nb; } if ($nb_liv > $nb_fac) { $facture = false; break; } } if ($facture) { $cde->statut = ($cde->statut | STA_ACT_FAC); //Pas de reste à facturer >>Statut commande = facturée //Si de plus toutes les factures sont payées, Statut commande=payé $tab_pay = liens_actes::getChilds($id_cde, TYP_ACT_FAC); $paye= true; while (($row_pay = pmb_mysql_fetch_object($tab_pay))) { if(($row_pay->statut & STA_ACT_PAY) != STA_ACT_PAY){ $paye = false; break; } } if ($paye) $cde->statut = ($cde->statut | STA_ACT_PAY); } else { $cde->statut = ($cde->statut & (~STA_ACT_FAC)); //Reste à facturer >>Statut commande = non facturée } $cde->numero=addslashes($cde->numero); $cde->commentaires = trim($comment); $cde->commentaires_i = addslashes($cde->commentaires_i); $cde->reference = trim($ref); $cde->date_paiement = $date_pay; $cde->num_paiement = trim($num_pay); $cde->devise = addslashes($cde->devise); $cde->save(); } //Archive la commande function arc_cde(){ global $id_cde; if(!$id_cde) return; $cde = new actes($id_cde); //Commande archivée $cde->statut = ($cde->statut | STA_ACT_ARC); $cde->update_statut(); //Archivage des factures et bl correspondants $list_childs = liens_actes::getChilds($id_cde); while (($row = pmb_mysql_fetch_object($list_childs))) { $act = new actes($row->num_acte_lie); $act->statut = ($act->statut | STA_ACT_ARC); $act->update_statut(); } } //Sauvegarde commande function update_cde() { global $id_bibli, $id_exer, $id_cde, $num_cde, $nom_acte, $id_dev, $statut; global $id_fou; global $id_adr_liv, $id_adr_fac; global $comment, $comment_i, $ref, $date_pay, $num_pay, $date_liv, $devise; global $code, $lib, $qte, $prix, $typ, $tva, $rem, $rub, $id_sug, $id_lig, $typ_lig, $id_prod; global $acquisition_gestion_tva; global $action; global $force_debit; global $lg_statut,$comment_lg,$comment_lo; if (!$id_cde) { //Creation de commande $cde = new actes(); $cde ->type_acte = TYP_ACT_CDE; $cde->num_entite = $id_bibli; $cde->num_exercice = $id_exer; /*$num_cde=trim($num_cde); if ($num_cde!='') { $cde->numero=$num_cde; } else { $cde->calc(); }*/ $cde->nom_acte = trim($nom_acte); if ($action == 'valid') { $cde->statut = STA_ACT_ENC; } else { $cde->statut = STA_ACT_AVA; } $cde->num_fournisseur = $id_fou; $cde->num_contact_livr = $id_adr_liv; $cde->num_contact_fact = $id_adr_fac; $cde->commentaires = trim($comment); $cde->commentaires_i = trim($comment_i); $cde->reference = trim($ref); $cde->date_paiement = $date_pay; $cde->num_paiement = trim($num_pay); $cde->date_ech = $date_liv; $cde->devise = trim($devise); $cde->save(); $id_cde= $cde->id_acte; //creation des liens entre actes if ($id_dev) { $la = new liens_actes($id_dev, $id_cde); } //Recuperation des lignes valides $tab_lig=array(); if (count($id_lig)) { foreach($id_lig as $k=>$v) { $code[$k] = trim($code[$k]); $lib[$k] = trim($lib[$k]); $comment_lg[$k] = trim($comment_lg[$k]); $comment_lo[$k] = trim($comment_lo[$k]); if ($code[$k] !='' || $lib[$k]!='') { $tab_lig[$k]=$v; } } } //creation des lignes de commande foreach($tab_lig as $k=>$v) { $lig_cde = new lignes_actes(); $lig_cde->type_ligne = $typ_lig[$k]; $lig_cde->num_acte = $id_cde; $lig_cde->num_rubrique = $rub[$k]; $lig_cde->num_produit = $id_prod[$k]; $lig_cde->num_acquisition = $id_sug[$k]; $lig_cde->num_type = $typ[$k]; $lig_cde->code = trim($code[$k]); $lig_cde->libelle = trim($lib[$k]); $lig_cde->prix = $prix[$k]; if ($acquisition_gestion_tva) { $lig_cde->tva = $tva[$k]; } else { $lig_cde->tva = '0.00'; } $lig_cde->debit_tva= $force_debit[$k]; $lig_cde->remise = $rem[$k]; $lig_cde->nb = round($qte[$k]); $lig_cde->date_ech = $date_liv; $lig_cde->date_cre = today(); $lig_cde->statut = $lg_statut[$k]; $lig_cde->commentaires_gestion=$comment_lg[$k]; $lig_cde->commentaires_opac=$comment_lo[$k]; $lig_cde->save(); } //Mise à jour du statut des suggestions et envoi email suivi de suggestion $sug_map = new suggestions_map(); $sug_map->doTransition('ORDERED', $id_sug); } else { //modification de commande $cde = new actes($id_cde); $old_statut=$statut; if ($old_statut != STA_ACT_ENC) { //Commande a valider /*$num_cde=trim($num_cde); if ($num_cde!='') { $cde->numero=$num_cde; } else { $cde->numero=addslashes($cde->numero); }*/ $cde->nom_acte = trim($nom_acte); if ($action == 'valid') { $cde->date_valid = date("Y-m-d"); $cde->statut = STA_ACT_ENC; //Statut commande = A valider->en cours } $cde->num_fournisseur = $id_fou; $cde->num_contact_livr = $id_adr_liv; $cde->num_contact_fact = $id_adr_fac; $cde->commentaires = trim($comment); $cde->commentaires_i = trim($comment_i); $cde->reference = trim($ref); $cde->date_paiement = $date_pay; $cde->num_paiement = trim($num_pay); $cde->date_ech = $date_liv; $cde->devise = trim($devise); $cde->save(); //Recuperation des lignes valides $tab_lig=array(); if (count($id_lig)) { foreach($id_lig as $k=>$v) { $code[$k] = trim($code[$k]); $lib[$k] = trim($lib[$k]); $comment_lg[$k] = trim($comment_lg[$k]); $comment_lo[$k] = trim($comment_lo[$k]); if ($code[$k] !='' || $lib[$k]!='') { $tab_lig[$k]=$v; } } } //maj des lignes de commande foreach($tab_lig as $k=>$v) { $lig_cde = new lignes_actes($v); $lig_cde->type_ligne = $typ_lig[$k]; $lig_cde->num_acte = $id_cde; $lig_cde->num_rubrique = $rub[$k]; $lig_cde->num_produit = $id_prod[$k]; $lig_cde->num_acquisition = $id_sug[$k]; $lig_cde->num_type = $typ[$k]; $lig_cde->code = trim($code[$k]); $lig_cde->libelle = trim($lib[$k]); $lig_cde->prix = $prix[$k]; if ($acquisition_gestion_tva) { $lig_cde->tva = $tva[$k]; } else { $lig_cde->tva = '0.00'; } $lig_cde->debit_tva= $force_debit[$k]; $lig_cde->remise = $rem[$k]; $lig_cde->nb = round($qte[$k]); $lig_cde->date_ech = $date_liv; $lig_cde->date_cre = today(); $lig_cde->statut = $lg_statut[$k]; $lig_cde->commentaires_gestion=$comment_lg[$k]; $lig_cde->commentaires_opac=$comment_lo[$k]; $lig_cde->save(); if($v==0) $tab_lig[$k]=$lig_cde->id_ligne; } //suppression des lignes non reprises $cde->cleanLignes($id_cde, $tab_lig); } else { //Commande validee $cde->numero=addslashes($cde->numero); $cde->commentaires = trim($comment); $cde->commentaires_i = addslashes($cde->commentaires_i); $cde->reference = trim($ref); $cde->date_paiement = $date_pay; $cde->num_paiement = trim($num_pay); $cde->devise = addslashes($cde->devise); $cde->save(); //Recuperation des lignes $tab_lig=array(); if (count($id_lig)) { foreach($id_lig as $k=>$v) { $comment_lg[$k] = trim($comment_lg[$k]); $comment_lo[$k] = trim($comment_lo[$k]); $tab_lig[$k]=$v; } } //maj des lignes de commande foreach($tab_lig as $k=>$v) { $lig_cde = new lignes_actes($v); $lig_cde->code = addslashes($lig_cde->code); $lig_cde->libelle = addslashes($lig_cde->libelle); $lig_cde->statut = $lg_statut[$k]; $lig_cde->commentaires_gestion=$comment_lg[$k]; $lig_cde->commentaires_opac=$comment_lo[$k]; $lig_cde->save(); } } } } //Duplication de commande function duplicate_cde($id_bibli, $id_cde) { global $msg, $charset; global $modif_cde_form; global $bt_enr, $bt_val; global $sel_date_liv_mod, $sel_date_pay_mod; //Recuperation etablissement $bibli = new entites($id_bibli); $lib_bibli = htmlentities($bibli->raison_sociale, ENT_QUOTES, $charset); $form = $modif_cde_form; //Recuperation commande $cde = new actes($id_cde); $exer = new exercices($cde->num_exercice); $lib_exer = htmlentities($exer->libelle, ENT_QUOTES, $charset); $titre = htmlentities($msg['acquisition_cde_cre'], ENT_QUOTES, $charset); $date_cre = formatdate(today()); $numero = calcNumero($id_bibli, TYP_ACT_CDE); $nom_acte=htmlentities($cde->nom_acte, ENT_QUOTES, $charset); $statut = STA_ACT_AVA; $sel_statut = ""; $sel_statut.=htmlentities($msg['acquisition_cde_aval'], ENT_QUOTES, $charset); $id_fou = $cde->num_fournisseur; $fou = new entites($id_fou); $lib_fou = htmlentities($fou->raison_sociale, ENT_QUOTES, $charset); $coord = entites::get_coordonnees($fou->id_entite, '1'); if (pmb_mysql_num_rows($coord) != 0) { $coord = pmb_mysql_fetch_object($coord); $id_adr_fou = $coord->id_contact; if($coord->libelle != '') $adr_fou = htmlentities($coord->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact !='') $adr_fou.= htmlentities($coord->contact, ENT_QUOTES, $charset)."\n"; if($coord->adr1 != '') $adr_fou.= htmlentities($coord->adr1, ENT_QUOTES, $charset)."\n"; if($coord->adr2 != '') $adr_fou.= htmlentities($coord->adr2, ENT_QUOTES, $charset)."\n"; if($coord->cp !='') $adr_fou.= htmlentities($coord->cp, ENT_QUOTES, $charset).' '; if($coord->ville != '') $adr_fou.= htmlentities($coord->ville, ENT_QUOTES, $charset); } else { $id_adr_fou = '0'; $adr_fou = ''; } $id_adr_fac = $cde->num_contact_fact; if ($id_adr_fac) { $coord_fac = new coordonnees($id_adr_fac); if($coord_fac->libelle != '') $adr_fac = htmlentities($coord_fac->libelle, ENT_QUOTES, $charset)."\n"; if($coord->contact !='') $adr_fac.= htmlentities($coord_fac->contact, ENT_QUOTES, $charset)."\n"; if($coord_fac->adr1 != '') $adr_fac.= htmlentities($coord_fac->adr1, ENT_QUOTES, $charset)."\n"; if($coord_fac->adr2 != '') $adr_fac.= htmlentities($coord_fac->adr2, ENT_QUOTES, $charset)."\n"; if($coord_fac->cp !='') $adr_fac.= htmlentities($coord_fac->cp, ENT_QUOTES, $charset).' '; if($coord_fac->ville != '') $adr_fac.= htmlentities($coord_fac->ville, ENT_QUOTES, $charset); } else { $id_adr_fac = '0'; $adr_fac = ''; } $id_adr_liv = $cde->num_contact_livr; if ($id_adr_liv) { $coord_liv = new coordonnees($id_adr_liv); if($coord_liv->libelle != '') $adr_liv = htmlentities($coord_liv->libelle, ENT_QUOTES, $charset)."\n"; if($coord_liv->contact != '') $adr_liv.= htmlentities($coord_liv->contact, ENT_QUOTES, $charset)."\n"; if($coord_liv->adr1 != '') $adr_liv.= htmlentities($coord_liv->adr1, ENT_QUOTES, $charset)."\n"; if($coord_liv->adr2 != '') $adr_liv.= htmlentities($coord_liv->adr2, ENT_QUOTES, $charset)."\n"; if($coord_liv->cp !='') $adr_liv.= htmlentities($coord_liv->cp, ENT_QUOTES, $charset).' '; if($coord_liv->ville != '') $adr_liv.= htmlentities($coord_liv->ville, ENT_QUOTES, $charset); } else { $id_adr_liv = '0'; $adr_liv = ''; } $comment = ''; $comment_i = htmlentities($cde->commentaires_i, ENT_QUOTES, $charset); $id_dev = liens_actes::getDevis($id_cde); if ($id_dev) { $dev=new actes($id_dev); $lien_dev = "".$dev->numero.""; } $liens_liv = ''; $liens_fac = ''; $ref = htmlentities($cde->reference, ENT_QUOTES, $charset); $sel_date_pay=$sel_date_pay_mod; $date_pay = ''; $date_pay_lib = $msg['parperso_nodate']; $num_pay = ''; $sel_date_liv=$sel_date_liv_mod; $date_liv = ''; $date_liv_lib = $msg['parperso_nodate']; $devise = htmlentities($cde->devise, ENT_QUOTES, $charset); $bt_dup = ''; $bt_rec = ''; $bt_fac = ''; $bt_imp = ''; $bt_sol = ''; $bt_audit = ''; $bt_sup = ''; $lignes= show_lig_cde($id_cde); $id_cde=0; //complement formulaire $form = str_replace('', $sel_statut, $form); $form = str_replace('', $sel_date_liv, $form); $form = str_replace('', $sel_date_pay, $form); $form = str_replace('', $bt_enr, $form); $form = str_replace('', $bt_val, $form); $form = str_replace('', $bt_dup, $form); $form = str_replace('', $bt_rec, $form); $form = str_replace('', $bt_fac, $form); $form = str_replace('', $bt_imp, $form); $form = str_replace('', $bt_audit, $form); $form = str_replace('', $bt_sol, $form); $form = str_replace('', $bt_sup, $form); $form = str_replace('!!act_nblines!!', $lignes[0], $form); $form = str_replace('', $lignes[1], $form); //Remplissage formulaire $form = str_replace('!!form_title!!', $titre, $form); $form = str_replace('!!id_bibli!!', $id_bibli, $form); $form = str_replace('!!lib_bibli!!', $lib_bibli, $form); $form = str_replace('!!id_exer!!', $exer->id_exercice, $form); $form = str_replace('!!lib_exer!!', $lib_exer, $form); $form = str_replace('!!id_cde!!', $id_cde, $form); $form = str_replace('!!date_cre!!', $date_cre, $form); $form = str_replace('!!dat_def_lib!!', formatdate(today()), $form); $form = str_replace('!!dat_def!!', preg_replace('/-/', '', today()), $form); $form = str_replace('!!numero!!', $numero, $form); $form = str_replace('!!nom_acte!!', $nom_acte, $form); $form = str_replace('!!statut!!', $statut, $form); $form = str_replace('!!id_fou!!', $id_fou, $form); $form = str_replace('!!lib_fou!!', $lib_fou, $form); $form = str_replace('!!id_adr_fou!!', $id_adr_fou, $form); $form = str_replace('!!adr_fou!!', $adr_fou, $form); $form = str_replace('!!date_liv!!', $date_liv, $form); $form = str_replace('!!date_liv_lib!!', $date_liv_lib, $form); $form = str_replace('!!date_pay!!', $date_pay, $form); $form = str_replace('!!date_pay_lib!!', $date_pay_lib, $form); $form = str_replace('!!num_pay!!', $num_pay, $form); $form = str_replace('!!id_adr_liv!!', $id_adr_liv, $form); $form = str_replace('!!adr_liv!!', $adr_liv, $form); $form = str_replace('!!id_adr_fac!!', $id_adr_fac, $form); $form = str_replace('!!adr_fac!!', $adr_fac, $form); $form = str_replace('!!comment!!', $comment, $form); $form = str_replace('!!comment_i!!', $comment_i, $form); $form = str_replace('!!ref!!', $ref, $form); $form = str_replace('!!id_dev!!', $id_dev, $form); $form = str_replace('!!devise!!', $devise, $form); $form = str_replace('!!lien_dev!!', $lien_dev, $form); $form = str_replace('!!liens_fac!!', $liens_fac, $form); $form = str_replace('!!liens_liv!!', $liens_liv, $form); print $form; } //TODO Verifier que budgets saisis si obligatoires //TODO A transferer depuis frame //Vérification dépassement de budget function verif_bud() { global $msg; global $max_lig; global $qte, $prix, $rem, $rub; global $error, $error_msg; global $acquisition_budget; if ($acquisition_budget) { $tot_rub = array(); $tot_bud = array(); for ($i=1;$i<=$max_lig;$i++) { $tot_rub[$rub[$i]] = 0; } //récupère le total de la commande par rubrique for ($i=1;$i<=$max_lig;$i++) { $tot_rub[$rub[$i]] = $tot_rub[$rub[$i]] + ( $qte[$i]*$prix[$i]*(1 - ($rem[$i]/100) ) ); } //récupère le total de la commande par budget foreach ($tot_rub as $key=>$value) { $r = new rubriques($key); if (!array_key_exists($r->num_budget, $tot_bud)) $tot_bud[$r->num_budget] = 0; $tot_bud[$r->num_budget] = $tot_bud[$r->num_budget] + $value; } //Vérifie que les budgets affectés par rubrique ne sont pas dépassés foreach ($tot_rub as $key=>$value) { $r = new rubriques($key); $b = new budgets($r->num_budget); if ( $b->type_budget == TYP_BUD_RUB ) { //Budget affecté par rubrique $mnt_rub = $r->montant; $eng_rub = rubriques::calcEngagement($key) + $value; //Budget rubrique dépassé ? if ($eng_rub > $mnt_rub) { $error = true; $tab_rub = rubriques::listAncetres($key, true); $lib_rub = $b->libelle.":"; foreach ($tab_rub as $value) { $lib_rub.= $value[1]; if($value[0] != $key) $lib_rub.= ":"; } $error_msg = $msg['acquisition_rub']." :\\n\\n ".$lib_rub."\\n\\n".$msg['acquisition_act_bud_dep']; break; } } } //Vérifie que les budgets affectés globalement ne sont pas dépassés foreach ($tot_bud as $key=>$value) { $b = new budgets($key); if ( $b->type_budget == TYP_BUD_GLO ) { $mnt_bud = $b->montant_global; $eng_bud = budgets::calcEngagement($b->id_budget) + $value; //Budget dépassé ? if ($eng_bud > $mnt_bud) { $error = true; $error_msg = $msg['acquisition_act_tab_bud']." : ".$b->libelle."\\n\\n".$msg['acquisition_act_bud_dep']; break; } } } } } function valid_cde_list() { global $chk; if(is_array($chk)) { foreach ($chk as $id_cde) { $cde=new actes($id_cde); if ($cde->type_acte==TYP_ACT_CDE && $cde->statut==STA_ACT_AVA) { $cde->statut=STA_ACT_ENC; $cde->date_valid=date("Y-m-d"); $cde->save(); } } } } function delete_cde_list() { global $chk; if(is_array($chk)) { foreach ($chk as $id_cde) { $cde=new actes($id_cde); if ($cde->type_acte==TYP_ACT_CDE && $cde->statut==STA_ACT_AVA) { $cde->delete(); } } } } function arc_cde_list() { global $chk,$id_cde; if(is_array($chk)) { foreach ($chk as $id_cde) { arc_cde(); } } } function sold_cde_list() { global $chk,$id_cde; if(is_array($chk)) { foreach ($chk as $id_cde) { sold_cde(); } } } function print_cde($id_bibli=0, $id_cde=0, $by_mail=FALSE) { global $dbh, $msg, $charset, $base_path, $acquisition_pdfcde_print; global $acquisition_pdfcde_obj_mail, $acquisition_pdfcde_text_mail; global $acquisition_pdfcde_by_mail,$PMBuseremailbcc; if (!($id_bibli && $id_cde)) return; $bib = new entites($id_bibli); $bib_coord = pmb_mysql_fetch_object(entites::get_coordonnees($id_bibli,1)); $cde = new actes($id_cde); $id_fou = $cde->num_fournisseur; $fou = new entites($id_fou); $fou_coord = pmb_mysql_fetch_object(entites::get_coordonnees($id_fou,1)); $no_mail=FALSE; if ( $by_mail==FALSE || !($acquisition_pdfcde_by_mail && strpos($bib_coord->email,'@') && strpos($fou_coord->email,'@')) ) { $no_mail=TRUE; } else { $dest_name=''; if($fou_coord->libelle) { $dest_name = $fou_coord->libelle; } else { $dest_name = $fou->raison_sociale; } if($fou_coord->contact) $dest_name.=" ".$fou_coord->contact; $dest_mail=$fou_coord->email; $obj_mail = $acquisition_pdfcde_obj_mail; $text_mail = $acquisition_pdfcde_text_mail; $bib_name = $bib_coord->raison_sociale; $bib_mail = $bib_coord->email; $lettre = lettreCommande_factory::make(); $lettre->doLettre($id_bibli,$id_cde); $piece_jointe=array(); $piece_jointe[0]['contenu']=$lettre->getLettre('S'); $piece_jointe[0]['nomfichier']=$lettre->getFileName(); // mailpmb($to_nom="", $to_mail, $obj="", $corps="", $from_name="", $from_mail, $headers, $copie_CC="", $copie_BCC="", $faire_nl2br=0, $pieces_jointes=array()) $res_envoi=mailpmb($dest_name, $dest_mail, $obj_mail, $text_mail ,$bib_name, $bib_mail, "Content-Type: text/plain; charset=\"$charset\"", '', $PMBuseremailbcc, 1, $piece_jointe); if (!$res_envoi) { $no_mail=TRUE; } if (!$no_mail) { print "

".sprintf($msg["acquisition_print_emailsucceed"]."

",$dest_mail); } else { print "

".sprintf($msg["acquisition_print_emailfailed"]."

",$dest_mail); } } if ($no_mail) { print "
"; } } //Traitement des actions print "

".htmlentities($msg['acquisition_ach_ges'],ENT_QUOTES, $charset)." : ".htmlentities($msg['acquisition_ach_cde'],ENT_QUOTES, $charset)."

"; switch($action) { case 'list': entites::setSessionBibliId($id_bibli); show_list_cde($id_bibli); break; case 'modif': if(!$id_cde && !$id_exer) { $url = "./acquisition.php?categ=ach&sub=cmde&action=modif&id_bibli=".$id_bibli."&id_cde=0"; show_list_exercices($id_bibli, 'show_cde', $url, 0); } else { show_cde($id_bibli, $id_exer, $id_cde); } break; case 'delete' : actes::delete($id_cde); liens_actes::delete($id_cde); show_list_cde($id_bibli); break; case 'update' : case 'valid' : update_cde(); show_list_cde($id_bibli); break; case 'from_devis' : if (!$id_exer) { $url = "./acquisition.php?categ=ach&sub=cmde&action=from_devis&id_bibli=".$id_bibli."&id_dev=".$id_dev; show_list_exercices($id_bibli, 'show_cde_from_dev', $url, $id_dev); } else { show_cde_from_dev($id_bibli, $id_exer, $id_dev); } break; case 'from_sug' : show_list_biblio_from_sug($chk); break; case 'from_sug_next' : show_cde_from_sug($id_bibli, $id_exer, $sugchk); break; case 'sold': sold_cde(); $statut = STA_ACT_REC; show_list_cde($id_bibli); break; case 'arc': arc_cde(); $statut = STA_ACT_ARC; show_list_cde($id_bibli); break; case 'duplicate' : duplicate_cde($id_bibli, $id_cde); break; case 'list_valid': valid_cde_list(); show_list_cde($id_bibli); break; case 'list_delete' : delete_cde_list(); show_list_cde($id_bibli); break; case 'list_arc': arc_cde_list(); show_list_cde($id_bibli); break; case 'list_sold': sold_cde_list(); show_list_cde($id_bibli); break; case 'print' : print_cde($id_bibli, $id_cde, $by_mail); show_list_cde($id_bibli); break; default: show_list_biblio(); break; } ?>