You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
315 lines
9.4 KiB
315 lines
9.4 KiB
<?php
|
|
$MODULE="pmsi";
|
|
$TITLE="Consolidation PMSI";
|
|
$DFTENDSTATUS="OK";
|
|
$ARGS="-raz";
|
|
/** Laisser les lignes 2 à 5 sans changer la casse et sans espaces et dans cet ordre
|
|
* car le script est lu et analysé quand il est exécuté via .exe ou Jenkins
|
|
* pour gestion des fichiers .pid dans system\batch\logs
|
|
*/
|
|
|
|
global $ENDSTATUS;
|
|
global $iCTI_connexion;
|
|
global $ADMPROVIDER;
|
|
global $ADMPROVIDER2;
|
|
global $ADMPROVIDER_PREFIX;
|
|
global $ADMPROVIDER2_PREFIX;
|
|
global $ENV_TYPEETS;
|
|
global $ENV_ADM_ANNEEDEBUT;
|
|
global $ENV_CONSO_PMSI_ANNEE_DEBUT;
|
|
global $nbE;
|
|
|
|
|
|
require_once("../../../modules/base/php/lib/cti/Batch/iCTI_batch_common.php" );
|
|
require_once("../../../modules/base/php/lib/cti/Database/Database2Factory.class.php");
|
|
require_once("../../../modules/base/php/lib/cti/Environnement/Environnement.class.php");
|
|
require_once("../../../modules/base/php/lib/cti/EnvironmentSettings/EnvironmentDatabaseSettings.php");
|
|
require_once("../../../modules/base/php/classSimpleXML.php");
|
|
require_once("../../../modules/outils/php/httpService_cacheManager_cleanCache.php");
|
|
require_once("../../../modules/pmsi/php/EtudeManager.php");
|
|
require_once("../../../modules/pmsi/import_rss_rsf/utils/import_functions.php");
|
|
require_once("../../../modules/pmsi/import_rss_rsf/utils/conso_functions.php");
|
|
require_once("../../../modules/base/php/utils/cti_args_functions.php");
|
|
|
|
logStartMsg();
|
|
|
|
|
|
if (iCTI_connect()) {
|
|
|
|
// création du répertoire utilisé par la fonction base.cti_copy_table(i_fromdblink text, i_fromtable text, i_totable text)
|
|
if (!is_dir('C:/TEMP')) {
|
|
mkdir('C:/TEMP');
|
|
}
|
|
|
|
consolidation_environnements();
|
|
|
|
logInfoMsg("Nettoyage cache");
|
|
cleanAllCache("iCTI_pmsi", TRUE);
|
|
|
|
iCTI_disconnect();
|
|
}
|
|
|
|
|
|
logEndMsg();
|
|
|
|
// récupération historique
|
|
function consolidation_environnements() {
|
|
|
|
global $iCTI_connexion;
|
|
global $environmentVars;
|
|
global $ENV_FINESS_PRINCIPAL;
|
|
global $ENV_CONSO_PMSI_ANNEE_DEBUT;
|
|
global $ENV_CONSO_PMSI_DELETE_BEFORE_YEAR;
|
|
|
|
|
|
////////////// PARAMETRE DE COMMANDE /////////////
|
|
// Arguments transmis
|
|
$cti_args = new CTI_Args_class();
|
|
|
|
// -xx || --except-expert
|
|
$expert = get_cti_args_expert($cti_args);
|
|
|
|
// -xe || --except-essentiels
|
|
$essentiels = get_cti_args_essentiels($cti_args);
|
|
|
|
// -env
|
|
$forced_env = get_cti_args_env($cti_args);
|
|
|
|
// --moisforces || -mf
|
|
// --annee-mois-force || -af
|
|
$moisforces = get_cti_args_mois_forces($cti_args);
|
|
if ($moisforces !== "0"){
|
|
$ENV_CONSO_PMSI_ANNEE_DEBUT = find_min_year($moisforces);
|
|
}
|
|
|
|
////////////// PARAMETRAGE ENVIRONNEMENT /////////////
|
|
$environmentVars = array();
|
|
$environmentVars["EXPERT"] = $expert;
|
|
$environmentVars["ESSENTIELS"] = $essentiels;
|
|
$environmentVars["FINESS_PRINCIPAL"] = $ENV_FINESS_PRINCIPAL;
|
|
$environmentVars["CONSO_PMSI_ANNEE_DEBUT"] = $ENV_CONSO_PMSI_ANNEE_DEBUT;
|
|
$environmentVars["MOISFORCES"] = $moisforces;
|
|
|
|
|
|
/////////// INITIALISTATION : INIT ///////////
|
|
$cti_sqlStatements = new CTI_SqlStatements_class("iCTI_import_pmsi_CONSOLIDATION.XML",$iCTI_connexion,$environmentVars);
|
|
$cti_sqlStatements->executeStatementsNode("INIT");
|
|
|
|
|
|
/////////// CONSOLIDATION : GETENV ///////////
|
|
$executed = execute_statement_node_getenv($forced_env);
|
|
if (!$executed) {
|
|
logErrorMsg("L'établissement $forced_env n'a pas été trouvé dans les settings");
|
|
die_conso();
|
|
}
|
|
|
|
|
|
/////////// POST TRAITEMENT : POST ///////////
|
|
|
|
// Suppression des séjours Et intégrité des la bdd
|
|
nettoyage_sejours_bdd($ENV_CONSO_PMSI_DELETE_BEFORE_YEAR);
|
|
|
|
$cti_sqlStatements->executeStatementsNode("POST");
|
|
|
|
}
|
|
|
|
|
|
function execute_statement_node_getenv($forced_env){
|
|
|
|
global $environments_settings;
|
|
global $iCTI_connexion;
|
|
|
|
$executed = false;
|
|
foreach ($environments_settings as $environment) {
|
|
$db_name = strtolower($environment["dbname"]);
|
|
if ($forced_env == '' || $forced_env == $db_name) {
|
|
$executed = true;
|
|
$environmentVars = get_environmentVars($environment);
|
|
$cti_sqlStatements_finess = new CTI_SqlStatements_class("iCTI_import_pmsi_CONSOLIDATION.XML",$iCTI_connexion,$environmentVars);
|
|
$cti_sqlStatements_finess->executeStatementsNode("GETENV");
|
|
}
|
|
}
|
|
|
|
return $executed;
|
|
}
|
|
|
|
|
|
function get_environmentVars($environment){
|
|
|
|
global $environmentVars;
|
|
|
|
$environmentVars["DBNAME"] = $environment["dbname"];
|
|
$environmentVars["DBPORT"] = $environment["dbport"];
|
|
$environmentVars["DBHOST"] = $environment["dbhost"];
|
|
$environmentVars["DBUSERNAME"] = $environment["dbusername"];
|
|
$environmentVars["DBPASSWORD"] = $environment["dbpassword"];
|
|
$environmentVars["FINESS"] = $environment["finess"];
|
|
$environmentVars["FINESS_TEXTE"] = $environment["texte"];
|
|
|
|
return $environmentVars;
|
|
}
|
|
|
|
|
|
|
|
function iCTI_connect() {
|
|
|
|
|
|
global $iCTI_connexion;
|
|
global $ENV_FINESS_PRINCIPAL;
|
|
global $ENV_CONSO_PMSI_ANNEE_DEBUT;
|
|
global $ENV_CONSO_PMSI_DELETE_BEFORE_YEAR;
|
|
|
|
global $environments_settings;
|
|
|
|
$iCTI_connexion = FALSE;
|
|
|
|
|
|
|
|
$file = "../../../settings/settings.XML";
|
|
$settings_xml = simplexml_load_file($file);
|
|
|
|
$ENV_CONSOLIDATION = "0";
|
|
// On traite l'année en cours + 2 années par défault
|
|
$ENV_CONSO_PMSI_ANNEE_DEBUT = transform_AX_in_annee_mois("A2");
|
|
// Supprimer les séjours avant une année AX donnée dans les settings
|
|
$ENV_CONSO_PMSI_DELETE_BEFORE_YEAR= false;
|
|
|
|
$properties = $settings_xml->xpath("/SETTINGS/ENVIRONMENT/PROPERTY");
|
|
|
|
foreach ($properties as $propertyNode) {
|
|
if ($propertyNode['name'] == 'CONSOLIDATION') {
|
|
$ENV_CONSOLIDATION = $propertyNode['value'];
|
|
}
|
|
if ($propertyNode['name'] == 'FINESS') {
|
|
$ENV_FINESS_PRINCIPAL = $propertyNode['value'];
|
|
}
|
|
if ($propertyNode['name'] == 'CONSO_PMSI_ANNEE_DEBUT' || $propertyNode['name'] == 'DEPUIS_ANNEE_MOIS_SORTIE') {
|
|
$ENV_CONSO_PMSI_ANNEE_DEBUT = transform_AX_in_annee_mois($propertyNode['value']);
|
|
}
|
|
if ($propertyNode['name'] == 'CONSO_PMSI_DELETE_BEFORE_YEAR') {
|
|
$year_AX = $propertyNode['value'];
|
|
if (is_year_AX($year_AX)){
|
|
//On garde au moins l'année en cours + 2 ans au cas où
|
|
$year_mini_delete_before = date("Y") - 2;
|
|
$year_delete_before = transform_AX_in_year($year_AX);
|
|
if ($year_delete_before <= $year_mini_delete_before){
|
|
$ENV_CONSO_PMSI_DELETE_BEFORE_YEAR = $year_delete_before;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
if ($ENV_CONSOLIDATION != "1") {
|
|
logErrorMsg("Environnement NON CONSOLIDE");
|
|
return FALSE;
|
|
}
|
|
|
|
|
|
$environment_error = FALSE;
|
|
$environments_settings = array();
|
|
|
|
$environments = $settings_xml->xpath("/SETTINGS/CONSOLIDATION/ENVIRONMENT");
|
|
|
|
// Création d'un tableau comprenant les infos de connexion de tous les environnements du conso
|
|
foreach ($environments as $environmentNode) {
|
|
|
|
$environment_dir = "";
|
|
$environment_finess = "";
|
|
$environment_texte = "";
|
|
$environment_dbname = "";
|
|
$environment_host = "";
|
|
$environment_port = "";
|
|
$environment_username = "";
|
|
$environment_password = "";
|
|
|
|
foreach ($environmentNode->PROPERTY as $propertyNode) {
|
|
if ($propertyNode['name'] == 'ENVIRONMENT') {
|
|
$environment_texte = utf8_decode($propertyNode['value']);
|
|
}
|
|
if ($propertyNode['name'] == 'DIR') {
|
|
$environment_dir = $propertyNode['value'];
|
|
}
|
|
}
|
|
|
|
//Chaine de connexion
|
|
$dbSettings = new EnvironmentDatabaseSettings($environment_dir);
|
|
try {
|
|
$dbSettings->readSettings();
|
|
} catch (Exception $e) {
|
|
logErrorMsg($e->getMessage());
|
|
$environment_error = TRUE;
|
|
}
|
|
|
|
$environment_host = $dbSettings->getHost();
|
|
$environment_port = $dbSettings->getPort();
|
|
$environment_dbname = $dbSettings->getName();
|
|
$environment_username = $dbSettings->getUsername();
|
|
$environment_password = $dbSettings->getPassword();
|
|
|
|
//Settings de l'environnemnt
|
|
if (file_exists($environment_dir . "/settings/settings.xml")) {
|
|
$environment_settings_xml = simplexml_load_file($environment_dir . "/settings/settings.xml");
|
|
if ($environment_settings_xml) {
|
|
foreach ($environment_settings_xml->ENVIRONMENT as $toEnvironmentNode) {
|
|
foreach ($toEnvironmentNode->PROPERTY as $toPropertyNode) {
|
|
if ($toPropertyNode['name'] == 'FINESS') {
|
|
$environment_finess = $toPropertyNode['value'];
|
|
}
|
|
if ($toPropertyNode['name'] == 'ENVIRONMENT') {
|
|
$environment_texte = utf8_decode($toPropertyNode['value']);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
logErrorMsg("iCTI_connect : Fichier settings de l'environnement non trouvé, vérifier le DIR du '$environment_texte' dans les settings du consolidé");
|
|
$environment_error = TRUE;
|
|
}
|
|
|
|
if ($environment_dbname == "") {
|
|
logErrorMsg("iCTI_connect : Nom de la base de donnée non trouvé");
|
|
$environment_error = TRUE;
|
|
}
|
|
if ($environment_finess == "") {
|
|
logErrorMsg("iCTI_connect : Finess non trouvé");
|
|
$environment_error = TRUE;
|
|
}
|
|
|
|
if ($environment_error == TRUE) {
|
|
logErrorMsg("iCTI_connect : Environnement '$environment_texte' sur '$environment_dir' inexistant ou mal configuré");
|
|
logErrorMsg("iCTI_connect : Au moins un environnement de la consolidation n'est pas correct");
|
|
return FALSE;
|
|
|
|
}
|
|
|
|
$environment = array();
|
|
$environment["dir"] = $environment_dir;
|
|
$environment["finess"] = $environment_finess;
|
|
$environment["texte"] = $environment_texte;
|
|
$environment["dbname"] = $environment_dbname;
|
|
$environment["dbport"] = $environment_port;
|
|
$environment["dbhost"] = $environment_host;
|
|
$environment["dbusername"] = $environment_username;
|
|
$environment["dbpassword"] = $environment_password;
|
|
$environments_settings[] = $environment;
|
|
}
|
|
|
|
|
|
|
|
$iCTI_connexion = Database2Factory::getInstance(Environnement::PROVIDER_CTI);
|
|
$ret = $iCTI_connexion->connect();
|
|
if (!$ret) {
|
|
logErrorMsg("La connexion PostgreSQL iCTI a échoué");
|
|
return FALSE;
|
|
}
|
|
|
|
return $ret;
|
|
|
|
}
|
|
|
|
|
|
|
|
?>
|