REM      :La version est à mettre en 1ère ligne
VERSION  :12/05/2015 - 17h20
REM      :28/11 Mise en place des ZIP
REM	 :11/02 Ajout centralisation pour analyse de facturation des pièces
REM	 :18/02 Ajout de la centralisation JF5.DBF / ANOFIC.DBF
REM	 :19/02 Ajout de TEC1 dans JF1
REM	 :28/02 Changement du mode de sélection des Factures et proformas pour JF3 et JF4 suite soucis sur Lille
REM      :28/05 Changement de la plage des dates de collectes pour JF3 et JF4
REM	 :12/05/2015 Ajout des Fichiers pour Toshiba
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :Suppression du dernier rapport
KILLLOC  :<chemin_sav>\2ES<num_sta>COL.TXT
NOMTACHE :Suppression du fichier des Dossiers
KILLLOC  :<chemin_sav>\2ES<num_sta>FIC.DBF
NOMTACHE :Suppression du fichier des Dossiers annexes
KILLLOC  :<chemin_sav>\2ES<num_sta>FIA.DBF
NOMTACHE :Suppression du fichier des Clients
KILLLOC  :<chemin_sav>\2ES<num_sta>CLI.DBF
NOMTACHE :Suppression du fichier des Suivis
KILLLOC  :<chemin_sav>\2ES<num_sta>SUI.DBF
NOMTACHE :Suppression du fichier des Commandes de pièces
KILLLOC  :<chemin_sav>\2ES<num_sta>CDE.DBF
NOMTACHE :Suppression de la Table des Suivis
KILLLOC  :<chemin_sav>\2ES<num_sta>XSU.DBF
NOMTACHE :Suppression de la Table des Suivis-Xml
KILLLOC  :<chemin_sav>\2ES<num_sta>PSI.DBF
NOMTACHE :Suppression de la Table des Garanties
KILLLOC  :<chemin_sav>\2ES<num_sta>GAR.DBF
NOMTACHE :Suppression de la Table des Utilisateurs
KILLLOC  :<chemin_sav>\2ES<num_sta>TEC.DBF
NOMTACHE :Suppression du fichier des Notes
KILLLOC  :<chemin_sav>\2ES<num_sta>INT.DBF
NOMTACHE :Suppression de la Table des Appareils
KILLLOC  :<chemin_sav>\2ES<num_sta>APP.DBF
NOMTACHE :Suppression de la Table des XML Status
KILLLOC  :<chemin_sav>\2ES<num_sta>XST.DBF
NOMTACHE :Suppression de la Table des XML Reasons
KILLLOC  :<chemin_sav>\2ES<num_sta>XRE.DBF
NOMTACHE :Suppression de la Table des Dossiers Réparés
KILLLOC  :<chemin_sav>\2ES<num_sta>JF1.DBF
NOMTACHE :Suppression de la Table des Commandes / Dossiers Réparés
KILLLOC  :<chemin_sav>\2ES<num_sta>JF2.DBF
NOMTACHE :Suppression de la Table des Proformas / Dossiers Réparés
KILLLOC  :<chemin_sav>\2ES<num_sta>JF3.DBF
NOMTACHE :Suppression de la Table des Factures / Dossiers Réparés
KILLLOC  :<chemin_sav>\2ES<num_sta>JF4.DBF
NOMTACHE :Suppression de la Table des Qualités
KILLLOC  :<chemin_sav>\2ES<num_sta>JF5.DBF
NOMTACHE :Suppression de la Table des Fiches Toshiba
KILLLOC  :<chemin_sav>\2ES<num_sta>TOF.DBF
NOMTACHE :Suppression de la Table des Suivis Toshiba
KILLLOC  :<chemin_sav>\2ES<num_sta>TOS.DBF
NOMTACHE :Suppression des notes dossiers Toshiba
KILLLOC  :<chemin_sav>\2ES<num_sta>TON.DBF
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :Suppression de la Base des N° de Série
KILLLOC  :<chemin_sav>\2ES<num_sta>SNS.DBF
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :Suppression du fichier Global des Fiches
KILLLOC  :<chemin_sav>\GLB<num_sta>FIC.DBF
NOMTACHE :Suppression du fichier Global des Suivis
KILLLOC  :<chemin_sav>\GLB<num_sta>SUI.DBF
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :Suppression du fichier ZIP Samsung
KILLLOC  :<chemin_sav>\2EZ<num_sta>ZIP.ZIP
NOMTACHE :Suppression du fichier ZIP Global
KILLLOC  :<chemin_sav>\GLB<num_sta>ZIP.ZIP
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :Suppression de la Base des Clients Carrefour
KILLLOC  :<chemin_sav>\2ES<num_sta>CLC.DBF
NOMTACHE :Suppression de la Base des Dossiers Carrefour
KILLLOC  :<chemin_sav>\2ES<num_sta>CFI.DBF
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :Collecte des Dossiers Réparés
REQUETE  :SELECT F.NOFICH,F.DTREPAR,F.GARANTIE,F.MARQUE,F.TEC1 INTO <chemin_sav>\2ES<num_sta>JF1.DBF FROM FICHES.DBF F WHERE F.DTREPAR IS NOT NULL AND F.DTREPAR><datlim>-24
NOMTACHE :Collecte des Commandes sur Dossiers Réparés
REQUETE  :SELECT P.*,B.NOFICH,B.BONCDE INTO <chemin_sav>\2ES<num_sta>JF2.DBF FROM PIECECDE.DBF P,BONCDE.DBF B WHERE P.NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>JF1.DBF) AND P.QTE>0 AND P.LIVR>0 AND B.BONCDE=P.BONCDE
NOMTACHE :Collecte des Proformas sur Dossiers Réparés
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>JF3.DBF FROM PROFORMA.DBF F,PROFARC.DBF X WHERE F.DATEFACT><datlim>-31 AND F.NOFACT=X.NOFACT
NOMTACHE :Collecte des Factures sur Dossiers Réparés
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>JF4.DBF FROM FACTURE.DBF F,FACTARC.DBF X WHERE F.DATEFACT><datlim>-31 AND F.NOFACT=X.NOFACT
NOMTACHE :Collecte des Qualités sur Dossiers Réparés
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>JF5.DBF FROM ANOFIC.DBF F WHERE NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>JF1.DBF) AND CODEANO='PNF'
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :Collecte des Dossiers Toshiba
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>TOF.DBF FROM FICHES.DBF WHERE MARQUE='TOSHIBA' AND DATEFICH><datlim>-90 
NOMTACHE :Collecte des Suivis Toshiba
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>TOS.DBF FROM FSUIVI.DBF WHERE NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>TOF.DBF)
NOMTACHE :Collecte des notes Dossiers Toshiba
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>TON.DBF FROM INTERV.DBF WHERE NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>TOF.DBF)
NOMTACHE :Collecte des Dossiers
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>FIC.DBF FROM FICHES.DBF WHERE MARQUE='SAMSUNG' AND DATEFICH><datlim>-90 AND (DTREPAR IS NULL OR DTREPAR><datlim>) AND ORDRE2=<numcli_samsung>
NOMTACHE :Collecte des Dossiers annexes
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>FIA.DBF FROM FICHEA.DBF WHERE NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>FIC.DBF)
NOMTACHE :Collecte des Notes sur dossiers
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>INT.DBF FROM INTERV.DBF WHERE NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>FIC.DBF)
NOMTACHE :Collecte des Clients
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>CLI.DBF FROM CLIENTS.DBF WHERE ORDRE IN (SELECT ORDRE FROM 2ES<num_sta>FIC.DBF)
NOMTACHE :Collecte des Suivis de dossiers
REQUETE  :SELECT S.*,U.* INTO <chemin_sav>\2ES<num_sta>SUI.DBF FROM FSUIVI.DBF S,SUIVI.DBF U WHERE S.CODE_SUI=U.CODE AND S.NOFICH IS NOT NULL AND S.CODE_SUI IS NOT NULL AND U.CODE IS NOT NULL AND S.NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>FIC.DBF) 
NOMTACHE :Collecte des Commandes de pièces
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>CDE.DBF FROM PIECECDE.DBF WHERE NOFICH IN (SELECT NOFICH FROM 2ES<num_sta>FIC.DBF)
NOMTACHE :Collecte de la Table des Suivis de dossiers
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>XSU.DBF FROM SUIVI.DBF WHERE CODE IS NOT NULL
NOMTACHE :Collecte de la Table des Suivis-Xml
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>PSI.DBF FROM PARSISU.DBF WHERE SIM_ID='XSAM'
NOMTACHE :Collecte de la Table des Garanties
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>GAR.DBF FROM GARANTIE.DBF WHERE CODE IS NOT NULL
NOMTACHE :Collecte de la Table des Utilisateurs
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>TEC.DBF FROM TECH.DBF WHERE INIT IS NOT NULL
NOMTACHE :Collecte de la Table des Appareils
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>APP.DBF FROM APPAREIL.DBF WHERE CODE IS NOT NULL
NOMTACHE :Collecte de la Table des XML Status
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>XST.DBF FROM SAMTRSTA.DBF WHERE CODE IS NOT NULL
NOMTACHE :Collecte de la Table des XML Reason
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>XRE.DBF FROM SAMTRREA.DBF WHERE CODE IS NOT NULL
REM      :NOMTACHE :Collecte de la Base des N° de Série
REM      :REQUETE  :SELECT TYPE,SERIE,DFABRIC INTO <chemin_sav>\2ES<num_sta>SNS.DBF FROM FICHES.DBF WHERE DFABRIC IS NOT NULL AND MARQUE='SAMSUNG'
REM      :========================================================================================================================================
NOMTACHE :Collecte des Dossiers Globaux
REQUETE  :SELECT * INTO <chemin_sav>\GLB<num_sta>FIC.DBF FROM FICHES.DBF WHERE DATEFICH><datlim>-90 AND (DTREPAR IS NULL OR DTREPAR><datlim>-30)
NOMTACHE :Collecte des Suivis de dossiers Globaux
REQUETE  :SELECT S.*,U.* INTO <chemin_sav>\GLB<num_sta>SUI.DBF FROM FSUIVI.DBF S,SUIVI.DBF U WHERE S.CODE_SUI=U.CODE AND S.NOFICH IS NOT NULL AND S.CODE_SUI IS NOT NULL AND U.CODE IS NOT NULL AND S.NOFICH IN (SELECT NOFICH FROM GLB<num_sta>FIC.DBF) 
REM      :========================================================================================================================================
NOMTACHE :Collecte des Clients Carrefour
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>CLC.DBF FROM CLIENTS.DBF WHERE NOM LIKE "CARREFOUR*" OR GROUPE='CARREFOUR'
NOMTACHE :Collecte des Dossiers Carrefour
REQUETE  :SELECT * INTO <chemin_sav>\2ES<num_sta>CFI.DBF FROM FICHES.DBF F,SUIVI.DBF S,GARANTIE G WHERE F.ORDRE IN (SELECT ORDRE FROM 2ES<num_sta>CLC.DBF) AND F.DATEFICH>=<datlim>-83 AND (F.DTREPAR IS NULL OR F.DTREPAR>=<datlim>-7) AND (F.DTREPRIS IS NULL OR F.DTREPRIS>=<datlim>-23) AND (F.DATEXPED IS NULL OR F.DATEXPED>=<datlim>-23) AND F.AVANCE=S.CODE AND F.GARANTIE=G.CODE
NOMTACHE :Comptage des Dossiers (FICHES.DBF)
COMPTAGE :SELECT COUNT(NOFICH) AS NBR FROM FICHES.DBF
NOMTACHE :Comptage des Annexes Dossiers (FICHEA.DBF)
COMPTAGE :SELECT COUNT(NOFICH) AS NBR FROM FICHEA.DBF
NOMTACHE :Comptage des Clients (CLIENTS.DBF)
COMPTAGE :SELECT COUNT(CODE) AS NBR FROM CLIENTS.DBF
NOMTACHE :Comptage des Pièces détachées (PIECEDET.DBF)
COMPTAGE :SELECT COUNT(CODE1) AS NBR FROM PIECEDET.DBF
NOMTACHE :Comptage des Commandes (PIECECDE.DBF)
COMPTAGE :SELECT COUNT(CODE) AS NBR FROM PIECECDE.DBF
NOMTACHE :Création du ZIP Samsung
ZIP      :2ES<num_sta>ZIP.ZIP,2ES<num_sta>*.DB*
NOMTACHE :Création du ZIP Global
ZIP      :GLB<num_sta>ZIP.ZIP,GLB<num_sta>*.DB*
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :FTP Ouverte de la connexion
FTPOPEN  :
REM      :NOMTACHE :FTP Suppression des anciens fichiers /
REM      :KILLFTP  :2ES<num_sta>COL.TXT
REM      :NOMTACHE :FTP Suppression des anciens fichiers -
REM      :KILLFTP  :2ES<num_sta>FIC.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers \
REM      :KILLFTP  :2ES<num_sta>FIA.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers |
REM      :KILLFTP  :2ES<num_sta>CLI.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers /
REM      :KILLFTP  :2ES<num_sta>SUI.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers -
REM      :KILLFTP  :2ES<num_sta>CDE.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers \
REM      :KILLFTP  :2ES<num_sta>XSU.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers |
REM      :KILLFTP  :2ES<num_sta>PSI.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers /
REM      :KILLFTP  :2ES<num_sta>GAR.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers -
REM      :KILLFTP  :2ES<num_sta>APP.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers \
REM      :KILLFTP  :2ES<num_sta>INT.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers |
REM      :KILLFTP  :2ES<num_sta>XST.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers /
REM      :KILLFTP  :2ES<num_sta>XRE.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers \
REM      :KILLFTP  :2ES<num_sta>CFI.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers |
REM      :KILLFTP  :2ES<num_sta>CLC.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers /
REM      :KILLFTP  :GLB<num_sta>FIC.DBF
REM      :NOMTACHE :FTP Suppression des anciens fichiers -
REM      :KILLFTP  :GLB<num_sta>SUI.DBF
NOMTACHE :FTP Suppression des anciens fichiers \
KILLFTP  :2ES<num_sta>ZIP.ZIP
NOMTACHE :FTP Suppression des anciens fichiers |
KILLFTP  :GLB<num_sta>ZIP.ZIP
REM      :------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
REM      :NOMTACHE :FTP Envoi du Fichier des Dossiers
REM      :FTPSEND  :2ES<num_sta>FIC.DBF
REM      :NOMTACHE :FTP Envoi du Fichier des Dossiers annexes
REM      :FTPSEND  :2ES<num_sta>FIA.DBF
REM      :NOMTACHE :FTP Envoi du Fichier des Clients
REM      :FTPSEND  :2ES<num_sta>CLI.DBF
REM      :NOMTACHE :FTP Envoi du Fichier des Suivis de dossiers
REM      :FTPSEND  :2ES<num_sta>SUI.DBF
REM      :NOMTACHE :FTP Envoi du Fichier des Commandes de pièces
REM      :FTPSEND  :2ES<num_sta>CDE.DBF
REM      :NOMTACHE :FTP Envoi de la Table des Suivis de dossiers
REM      :FTPSEND  :2ES<num_sta>XSU.DBF
REM      :NOMTACHE :FTP Envoi du Fichier des Notes sur dossiers
REM      :FTPSEND  :2ES<num_sta>INT.DBF
REM      :NOMTACHE :FTP Envoi du Fichier des Clients Carrefour
REM      :FTPSEND  :2ES<num_sta>CLC.DBF
REM      :NOMTACHE :FTP Envoi du Fichier des Fiches Carrefour
REM      :FTPSEND  :2ES<num_sta>CFI.DBF
REM      :NOMTACHE :FTP Envoi de la Table des Suivis-Xml
REM      :FTPSEND  :2ES<num_sta>PSI.DBF
REM      :NOMTACHE :FTP Envoi de la Table des Garanties
REM      :FTPSEND  :2ES<num_sta>GAR.DBF
REM      :NOMTACHE :FTP Envoi de la Table des Appareils
REM      :FTPSEND  :2ES<num_sta>APP.DBF
REM      :NOMTACHE :FTP Envoi de la Table des Utilisateurs
REM      :FTPSEND  :2ES<num_sta>TEC.DBF
REM      :NOMTACHE :FTP Envoi de la Table des XML Status
REM      :FTPSEND  :2ES<num_sta>XST.DBF
REM      :NOMTACHE :FTP Envoi de la Table des XML Reason
REM      :FTPSEND  :2ES<num_sta>XRE.DBF
REM      :NOMTACHE :FTP Envoi de la Table Globale des Fiches
REM      :FTPSEND  :GLB<num_sta>FIC.DBF
REM      :NOMTACHE :FTP Envoi de la Table Globale des Suivis
REM      :FTPSEND  :GLB<num_sta>SUI.DBF
REM      :------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
NOMTACHE :FTP Envoi du ZIP Samsung
FTPSEND  :2ES<num_sta>ZIP.ZIP
NOMTACHE :FTP Envoi du ZIP Global
FTPSEND  :GLB<num_sta>ZIP.ZIP
NOMTACHE :FTP Fermeture de la connexion
FTPCLOSE
REM      :----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------