From 2c8f408225ddb78c23ab1971c1ff95adc7c5d3bc Mon Sep 17 00:00:00 2001
From: pvictor <perrier.victor@gmail.com>
Date: Mon, 5 Feb 2018 17:32:13 +0100
Subject: [PATCH] more tests

---
 R/read-hydro-xml.r                             |  4 ++--
 .../xml_hydro/PuissancesHydrauliquesHebdo.xml  | 18 +++++++++---------
 .../xml_thermal/PuissancesThermiquesHebdo.xml  | 14 +++++++-------
 3 files changed, 18 insertions(+), 18 deletions(-)

diff --git a/R/read-hydro-xml.r b/R/read-hydro-xml.r
index 517ec42..6b61dcc 100644
--- a/R/read-hydro-xml.r
+++ b/R/read-hydro-xml.r
@@ -149,7 +149,7 @@ validation_groupe <- function() {
                     "SSCHAH", "SSCOGH", "SSCOMH", "SSCROH", "SSCROP", "SSDALH", "SSEG5H",
                     "SSESTH", "SSGENH", "SSGUIH", "SSMC H", "SSNICH", "SSTU8H", "SSTULH",
                     "TIGNEH", "TRUELH", "TUCOYH", "V.ARCH", "V.BENH", "VERN5H", "VINONH",
-                    "VINTRH", "VLAROH", "VLEJOH", "VOUGLH", "VOUGLP")
+                    "VINTRH", "VLAROH", "VLEJOH", "VOUGLH", "VOUGLP", "XTESTX", "YTESTY")
   selection <- c("1", "1", "1", "1", "1", "0", "0", "1", "0", "1", "0", "0",
                  "1", "0", "1", "1", "1", "1", "1", "0", "1", "0", "0", "1", "1",
                  "1", "0", "0", "1", "1", "1", "0", "0", "0", "1", "1", "0", "1",
@@ -165,7 +165,7 @@ validation_groupe <- function() {
                  "1", "1", "1", "1", "1", "1", "1", "0", "1", "1", "1", "1", "1",
                  "1", "1", "1", "0", "0", "0", "1", "1", "1", "1", "1", "0", "1",
                  "1", "0", "1", "0", "1", "1", "1", "1", "1", "0", "1", "0", "1",
-                 "1", "0", "1", "0", "1", "1")
+                 "1", "0", "1", "0", "1", "1", "0", "0")
   data.frame(
     groupe_hydro = groupe_hydro,
     selection = selection,
diff --git a/tests/testthat/files/xml_hydro/PuissancesHydrauliquesHebdo.xml b/tests/testthat/files/xml_hydro/PuissancesHydrauliquesHebdo.xml
index 3da839b..6baf1a4 100644
--- a/tests/testthat/files/xml_hydro/PuissancesHydrauliquesHebdo.xml
+++ b/tests/testthat/files/xml_hydro/PuissancesHydrauliquesHebdo.xml
@@ -1,25 +1,25 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <PuissancesHydrauliquesHebdo>
   <DocumentHeader>
-    <Identification v="9222_PuissancesHydrauliquesHebdo-fcu121217_20171212-1120"/>
+    <Identification v="AAAA00000BBBBBBB11111111"/>
     <Version v="1"/>
-    <Type v="E03"/>
-    <ClassificationType v="A02"/>
+    <Type v="EEEE"/>
+    <ClassificationType v="AAAA"/>
     <CreationDateTime v="2017-12-12T10:20:03Z"/>
     <ProcessType v="A11"/>
     <TimePeriodCovered v="2017-12-11T23:00Z/2017-12-25T23:00:00Z"/>
-    <Initiator v="NEO"/>
+    <Initiator v="NNN"/>
     <Receptor v="RTE"/>
   </DocumentHeader>
   <Caracteristique>
     <NomCaracteristique v="NomEtude"/>
-    <ValeurCaracteristique v="fcu121217"/>
+    <ValeurCaracteristique v="abc1234"/>
   </Caracteristique>
   <Caracteristique>
     <NomCaracteristique v="PasDeTemps"/>
     <ValeurCaracteristique v="PT2H"/>
   </Caracteristique>
-  <Vallee v="ADOUR">
+  <Vallee v="AAAAA">
     <Point v="1">
       <Puissance v="13.4471"/>
     </Point>
@@ -525,7 +525,7 @@
       <Puissance v="13.4471"/>
     </Point>
   </Vallee>
-  <Vallee v="AGOUT">
+  <Vallee v="BBBBB">
     <Point v="1">
       <Puissance v="5.1765"/>
     </Point>
@@ -1031,7 +1031,7 @@
       <Puissance v="5.1765"/>
     </Point>
   </Vallee>
-  <Usine vallee="DORDOGNE" v="AIGL8H">
+  <Usine vallee="DDDDDD" v="XTESTX">
     <Pt v="1">
       <Puis v="0.0"/>
       <Rprim v="0.0"/>
@@ -2041,7 +2041,7 @@
       <Rhyd v="93.0"/>
     </Pt>
   </Usine>
-  <Usine vallee="DORDOGNE" v="AIGLEH">
+  <Usine vallee="DDDDDD" v="YTESTY">
     <Pt v="1">
       <Puis v="0.0"/>
       <Rprim v="0.0"/>
diff --git a/tests/testthat/files/xml_thermal/PuissancesThermiquesHebdo.xml b/tests/testthat/files/xml_thermal/PuissancesThermiquesHebdo.xml
index 76fa6b9..799c1d9 100644
--- a/tests/testthat/files/xml_thermal/PuissancesThermiquesHebdo.xml
+++ b/tests/testthat/files/xml_thermal/PuissancesThermiquesHebdo.xml
@@ -1,25 +1,25 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <PuissancesThermiquesHebdo>
   <DocumentHeader>
-    <Identification v="9221_PuissancesThermiquesHebdo-fcu131217_20171213-1136"/>
+    <Identification v="AAAAAA0000000BBBBBBB111111111"/>
     <Version v="1"/>
     <Type v="E03"/>
-    <ClassificationType v="A02"/>
+    <ClassificationType v="AAAAA"/>
     <CreationDateTime v="2017-12-13T10:36:13Z"/>
     <ProcessType v="A11"/>
     <TimePeriodCovered v="2017-12-12T23:00Z/2017-12-26T23:00:00Z"/>
-    <Initiator v="NEO"/>
+    <Initiator v="NNN"/>
     <Receptor v="RTE"/>
   </DocumentHeader>
   <Caracteristique>
-    <NomCaracteristique v="NomEtude"/>
-    <ValeurCaracteristique v="fcu131217"/>
+    <NomCaracteristique v="NENENENE"/>
+    <ValeurCaracteristique v="FFFFFFF"/>
   </Caracteristique>
   <Caracteristique>
     <NomCaracteristique v="PasDeTemps"/>
     <ValeurCaracteristique v="PT2H"/>
   </Caracteristique>
-  <Tranche v="ARRI5T 1">
+  <Tranche v="AAAAAAA">
     <Pt v="1">
       <Puis v="0.0"/>
       <Rprim v="0.0"/>
@@ -861,7 +861,7 @@
       <Rsec v="0.0"/>
     </Pt>
   </Tranche>
-  <Tranche v="ARRI5T 2">
+  <Tranche v="BBBBBBBB">
     <Pt v="1">
       <Puis v="0.0"/>
       <Rprim v="0.0"/>