1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176
| @echo off
chcp 1252 > nul
rem =======================================================================================================================================================================================
rem
rem SCRIPT DE LANCEMENT DU PROGRAMME POUR CONVERSION ET TRANSFERE DES DONNEES FLOTTE TRACTEUR
rem
rem Author: J.FERLIER
rem Versions: 1.0 - 12/11/19 - First draft
rem 1.1 - 13/11/19 - Deplacement des fichiers csv et asc vers répertoire spécifique
rem 1.2 - 13/11/19 - Convertion automatique des fichiers IPETRONIK via IPCONVERTER
rem 1.3 - 14/11/19 - Fonction de traitement de données si données temporelle ou CAN
rem 1.4 - 05/12/19 - Fonction pour ouvrir le fichier contennant la macro excel
rem 1.5 - 28/01/20 - Ajout des fonctions de dezippage des données + transfére des données
rem 1.6 - 10/02/20 - Ajout des fonctions permettant le transfert des données vers Automation
rem 1.7 - 23/04/20 - Récupération de l'état de l'erreur lors du dezpippe des fichier et suppression des fichiers corrompu
rem 1.8 - 14/05/20 - Modification du code pour récpération des droits des fichiers BLF, MF4 et IAD (LA fonction move ne permet pas de récupèrer les droits du dossier parent
rem 1.9 - 25/05/20 - Modification du batch pour traitement des fichiers BIN et DAT provenant des IPFLEETLOG2
rem 2.0 - 19/10/20 - Modification du code pour le rendre compatible avec les fichiers *.dxd, ajout d'un boucle sur le serveur FTP IPETRONIK436
rem 2.1 - 26/11/20 - Ajout des fonctions permettant de traiter les fichiers des modules IPE RT (fichier ziprt et MEA.ziprt
rem 2.2 - 30/06/21 - Correction du traitement des fichiers ZIPRT pour la partie temporelle
rem 2.3 - 15/07/21 - Ajout du traitement des fichiers video pour les logger RT
rem =======================================================================================================================================================================================
rem ===============================================
rem Permet de donner un nom à la fenetre d'excution
rem ===============================================
title Batch transfert FTP vers GATEWAY IPETRONIK
rem ==========================
rem Affectations des variables
rem ==========================
rem ==============================
rem Variable pour le développement
rem ==============================
set FTPDIR="C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\FTP\PDC"
set DIRCONVERSION="C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Conversion"
set SFTPDIR="C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\SFTP\Data"
set ACONVERTIR=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Conversion
set RENOMMER="C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Renomage\"
set ARENOMMER=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Renomage
set GATEWAYDIR="C:\Users\jferlier\OneDrive\Automation\Simulation Serveur\Gateway\"
set ELECDIR=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Electronique
set EACDIR=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Mesure EAC
set INDICATEUR=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Indicateur\Event
set ARCHIVEDIR=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Archive
set ZIPDIR=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\ZIP
set FICHIER=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Envoie Fichier PDC
set AENVOYER=C:\Users\jferlier\OneDrive\Suivi Flotte Tracteur\Test Programme\Fichier_A_Envoye
rem =====================
rem Variable pour commune
rem =====================
set TEMPORELLE=0
set CAN=0
set ZIPFILE=0
set LOGFILE=0
set EXTENSION=NONE
set ACTIVITE=NONE
set BANC=NONE
set DXD=0
set CopieDXDfini=0
set FichierPresent=0
set Event=0
set Mesure=0
set EXTENSION_VIDEO=*avi
rem ===========================================
rem Indication de l'initialisation du programme
rem ===========================================
echo %date% %time% Initialisation du programme
rem =======================================
rem Permet de fonctionner en variable local
rem =======================================
setlocal enabledelayedexpansion
rem =======================
rem 2 - SEARCH LOOP
rem =======================
:LOOP
rem ===================================
rem Attente de 2s avant nouvelle boucle
rem ===================================
timeout /T 2 > nul
rem =================================================================================================================================================================================================================================
rem Partie du programme pour Suivi Flotte Tracteur
rem =================================================================================================================================================================================================================================
rem =====================================================================================================================
rem On cherche dans les dossiers et sous dossier du répertoire les fichiers avec une extension .log ou .md5 ou.zip ou ZIP
rem =====================================================================================================================
for /r %SFTPDIR% %%a in (*.zip) do (
rem ================================================================
rem On increment la variable à chaque fois qu'un fichier est trouve
rem ================================================================
set /a NB_FICHIER+=1
set EXTENSION=NONE
rem =============================================================================
rem Vérification si le fichier est encore en copie, si oui alors on ne touche pas
rem =============================================================================
rename "%%a" "%%~na%%~xa" > nul
if errorlevel 1 (
echo %date% %time% File %%a still in copy
rem goto NEXT
)
else
(
rem ===========================================================================
rem En fonction de l'extension du fichier on on change la valeur de la variable
rem Ceci sera utilisé lors des fonctions de déplacement de fichier
rem ===========================================================================
for /f %%b in ("%%~xa ") do (
if %%b==.zip set ZIPFILE=1
rem ================================================================================
rem On découpe le nom du fichier afin de connaitre le numéro de série du logger
rem Ceci servira à connaitre ou envoyer les informations sur le répertoire du logger
rem ================================================================================
rem pour v final for /f "tokens=5 delims=\" %%b in ("%%a") do ( pour version dev 9
for /f "tokens=9 delims=\" %%b in ("%%a") do (
set SN_Logger=%%b
)
rem ================================================
rem On indique le chemin du fichier dans la variable
rem ================================================
set CHEMIN_FICHIER_ARCHIVE="%ARCHIVEDIR%\!SN_Logger!"
rem =====================================================================================================
rem On vérifie si le dossiers Numero de serie existe dans le dossier Archive, sinon on crée le répertoire
rem =====================================================================================================
if not exist !CHEMIN_FICHIER_ARCHIVE! mkdir !CHEMIN_FICHIER_ARCHIVE!
)
)
)
:AUCUNFICHIER
echo %date% %time% Recherche de nouveau fichier
:NEXT
goto LOOP
goto :eof
endlocal |
Partager