$abreviation_fta_transition = "A"; $commentaire_maj_fta = "Archivage réalisé par le service Informatique le 28/11/2006 dans le cadre de la mise à jour vers la version 2.3.0 du module Intranet.\n" . "Pour toutes questions, merci de vous rappocher du Chef de Projet."; //Archivage des FTA Validées et Non-classées $req = "SELECT id_fta,CODE_ARTICLE,LIBELLE,date_derniere_maj_fta " . ", `fta_migration_import_articles_actifs`.`code_agrologic` " . "FROM fta, fta_etat, `fta_migration_import_articles_actifs` RIGHT JOIN `fta` " . "ON `fta_migration_import_articles_actifs`.`code_agrologic` = `fta`.`CODE_ARTICLE` " . "WHERE (`fta_migration_import_articles_actifs`.`code_agrologic` IS NULL) " . "AND (`fta`.`CODE_ARTICLE` IS NOT NULL) " . "AND (fta.id_fta_etat=fta_etat.id_fta_etat ) " . "AND (abreviation_fta_etat='V' ) "; $array = DatabaseOperation::convertSqlStatementWithoutKeyToArray($req); echo "CODE_ARTICE;LIBELLE;id_fta;date_derniere_maj_fta<br>"; foreach ($array as $rows) { //Transition des FTA $id_fta = $rows["id_fta"]; //Si l'article n'est pas classé, alors archivage $tab = affichage_classification_article($id_fta, $extension); if (!$tab[0]) { //Cet article n'est pas classé car il n'y a même pas un chemin de classification //Message HTML echo $rows["CODE_ARTICLE"] . ";\"" . $rows["LIBELLE"] . "\";" . $rows["id_fta"] . ";\"" . $rows["date_derniere_maj_fta"] . "\""; FtaTransitionModel::buildTransitionFta($id_fta, $abreviation_fta_transition, $commentaire_maj_fta, $idFtaRole, $idFtaWorkflow, $ListeDesChapitres); echo "<br>"; } } break; case "2_3_0_epuration_nomenclature": /* - Récupérer uniquement les versions de nomenclatures les plus récentes cf. 11801 ---LISTE DES NOMENCLATURES POUR PRODUIT 0011801----------------------- | ||1.0011801002 BEIGNET CREV 20G ITM LAIZE 461 applicable le 18/01/06 |- | ||2.0011801003 BEIGNET CREV 20G ITM LAIZE 423 applicable le 17/01/06 || | ||3.0011801001 BEIGNET CREV 20G ITM X 16 applicable le 06/12/04 || | |----------------------------------------------------------------------| | Se baser sur la date d'application !! - Sélectionner les nomenclatures les plus récentes dans un tableau: SELECT `_AUTO_NOMENCLATURE`, `_AUTO_PRODUIT`, MAX( `_AUTO_DATE` ) FROM `fta_migration_nomenclature` GROUP BY `_AUTO_PRODUIT`
if (!$ok) { $titre = 'Informations manquantes'; $message = 'Vous devez sélectionner au moins un chapitre à mettre à jour.'; Lib::showMessage($titre, $message, $redirection); $error = 1; } $new_commentaire_maj_fta = $new_commentaire_maj_fta . "-" . $ListeDesChapitresComment; $idFtaChapitreByDefault = FtaChapitreModel::getIdFtaChapitreByDefault($idFtaRole, $idFtaWorkflow, $ListeDesChapitres); } // Fin du controle d'intégrité ************************************************* //Si pas d'erreur, lancement de la transition if (!$error) { foreach ($selection_fta as $idFta) { //Transition de la FTA $commentaire_maj_fta = $new_commentaire_maj_fta; $t = FtaTransitionModel::buildTransitionFta($idFta, $abreviation_fta_transition, $commentaire_maj_fta, $idFtaWorkflow, $ListeDesChapitres, $dateEcheanceFta); //Codes de retour de la fonction: // 0: FTA correctement transitée // 1: FTA non transité car risque de doublon // 3: Erreur autre if ($abreviation_fta_transition == FtaEtatModel::ETAT_ABREVIATION_VALUE_VALIDE) { //Seules les FTA validées entrent dans un système de diffusion switch ($t["0"]) { case 0: //Récupération de la liste diffusion $liste_destinataire = FtaTransitionModel::buildListeDiffusionTransition($idFta); if ($liste_destinataire) { $liste_global = $liste_global + $liste_destinataire; //Envoi des mails de notification if ($envoi_mail_detail) { $idFta;