Index: vhUnitTest/APPS/TBXWeb/Utils/impl/LadeDesignControleur.cls.xml
===================================================================
diff -u -r579 -r643
--- vhUnitTest/APPS/TBXWeb/Utils/impl/LadeDesignControleur.cls.xml (.../LadeDesignControleur.cls.xml) (revision 579)
+++ vhUnitTest/APPS/TBXWeb/Utils/impl/LadeDesignControleur.cls.xml (.../LadeDesignControleur.cls.xml) (revision 643)
@@ -10,26 +10,28 @@
0
-%Integer
+%String
63308,0
-%Integer
+%String
63552,0
+
+%String
+62999,0
+
+
@@ -38,12 +40,8 @@
Set DesignID="WS"
Set WebDomain=$$$TBoxWebDomeinVHEPN
Set LadeDesignControleur=..GeefLadeDesignControleur(WebDomain)
-
- Set DatumVoorUitfasering = (..#DollarHvan01Mei2014 - 1)
- Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,DatumVoorUitfasering,1)
-
- Set DatumNaUitfasering = ..#DollarHvan01Mei2014
- Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,DatumNaUitfasering,0)
+
+ Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,..#DummyDatum,0)
]]>
@@ -53,11 +51,7 @@
Set WebDomain=$$$TBoxWebDomeinSFS
Set LadeDesignControleur=..GeefLadeDesignControleur(WebDomain)
- Set DatumVoorUitfasering = (..#DollarHvan01Mei2014 - 1)
- Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,DatumVoorUitfasering,1)
-
- Set DatumNaUitfasering = ..#DollarHvan01Mei2014
- Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,DatumNaUitfasering,0)
+ Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,..#DummyDatum,0)
]]>
@@ -67,14 +61,7 @@
Set WebDomain=$$$TBoxWebDomeinSFS
Set LadeDesignControleur=..GeefLadeDesignControleur(WebDomain)
- Set DatumUitfaseringGS = (..#DollarHvan01Mei2014)
- Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,DatumUitfaseringGS,1)
-
- Set DatumVoorUitfaseringWS = (..#DollarHvan31Dec2014 - 1)
- Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,DatumVoorUitfaseringWS,1)
-
- Set DatumNaUitfaseringWS = ..#DollarHvan31Dec2014
- Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,DatumNaUitfaseringWS,0)
+ Do ..AssertDesignBeschikbaar(LadeDesignControleur,DesignID,..#DummyDatum,0)
]]>
@@ -92,11 +79,7 @@
Set WebDomain=$$$TBoxWebDomeinVHEPN
Set LadeDesignControleur=..GeefLadeDesignControleur(WebDomain)
- Set DatumVoorUitfasering = (..#DollarHvan01Mei2014 - 1)
- Do ..AssertIsTBXplusBeschikbaar(LadeDesignControleur,DatumVoorUitfasering,1)
-
- Set DatumNaUitfasering = ..#DollarHvan01Mei2014
- Do ..AssertIsTBXplusBeschikbaar(LadeDesignControleur,DatumNaUitfasering,0)
+ Do ..AssertIsTBXplusBeschikbaar(LadeDesignControleur,..#DummyDatum,0)
]]>
@@ -105,14 +88,7 @@
Set WebDomain=$$$TBoxWebDomeinSFS
Set LadeDesignControleur=..GeefLadeDesignControleur(WebDomain)
- Set DatumUitfaseringGS = (..#DollarHvan01Mei2014)
- Do ..AssertIsTBXplusBeschikbaar(LadeDesignControleur,DatumUitfaseringGS,1)
-
- Set DatumVoorUitfaseringWS = (..#DollarHvan31Dec2014 - 1)
- Do ..AssertIsTBXplusBeschikbaar(LadeDesignControleur,DatumVoorUitfaseringWS,1)
-
- Set DatumNaUitfaseringWS = ..#DollarHvan31Dec2014
- Do ..AssertIsTBXplusBeschikbaar(LadeDesignControleur,DatumNaUitfaseringWS,0)
+ Do ..AssertIsTBXplusBeschikbaar(LadeDesignControleur,..#DummyDatum,0)
]]>