Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/BewaarKlantinstellingen.cls.xml =================================================================== diff -u -r62906 -r71138 --- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/BewaarKlantinstellingen.cls.xml (.../BewaarKlantinstellingen.cls.xml) (revision 62906) +++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/BewaarKlantinstellingen.cls.xml (.../BewaarKlantinstellingen.cls.xml) (revision 71138) @@ -9,15 +9,18 @@ Set Request.Actie = "Upsert" Set Request.KlantId = "K||1234" Set Request.IsExport = $$$False + Set Request.IsBlumXs = $$$False #dim KlantinstellingenRepository = ##class(vhTest.Mock.DOM.Halux.AAP.KlantinstellingenRepository).%New() Set Klantinstellingen1 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen1.KlantId = "K||1000" Set Klantinstellingen1.IsExport = $$$True + Set Klantinstellingen1.IsBlumXs = $$$True Set Klantinstellingen2 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen2.KlantId = "K||1001" Set Klantinstellingen2.IsExport = $$$False + Set Klantinstellingen2.IsBlumXs = $$$False #dim KlantinstellingenIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Klantinstellingen1, Klantinstellingen2) Set KlantinstellingenRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.KlantinstellingenRepository).%New() @@ -47,15 +50,18 @@ Set Request.Actie = "Upsert" Set Request.KlantId = "K||1234" Set Request.IsExport = $$$False + Set Request.IsBlumXs = $$$False #dim KlantinstellingenRepository = ##class(vhTest.Mock.DOM.Halux.AAP.KlantinstellingenRepository).%New() Set Klantinstellingen1 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen1.KlantId = "K||1000" Set Klantinstellingen1.IsExport = $$$True + Set Klantinstellingen1.IsBlumXs = $$$True Set Klantinstellingen2 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen2.KlantId = "K||1001" Set Klantinstellingen2.IsExport = $$$False + Set Klantinstellingen2.IsBlumXs = $$$False #dim KlantinstellingenIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Klantinstellingen1, Klantinstellingen2) Set KlantinstellingenRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.KlantinstellingenRepository).%New() @@ -83,15 +89,18 @@ Set Request.Actie = "Upsert" Set Request.KlantId = "K||1234" Set Request.IsExport = $$$False + Set Request.IsBlumXs = $$$False #dim KlantinstellingenRepository = ##class(vhTest.Mock.DOM.Halux.AAP.KlantinstellingenRepository).%New() Set Klantinstellingen1 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen1.KlantId = "K||1000" Set Klantinstellingen1.IsExport = $$$True + Set Klantinstellingen1.IsBlumXs = $$$True Set Klantinstellingen2 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen2.KlantId = "K||1001" Set Klantinstellingen2.IsExport = $$$False + Set Klantinstellingen2.IsBlumXs = $$$False #dim KlantinstellingenIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Klantinstellingen1, Klantinstellingen2) Set KlantinstellingenRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.KlantinstellingenRepository).%New() @@ -122,9 +131,11 @@ Set Klantinstellingen1 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen1.KlantId = "K||1000" Set Klantinstellingen1.IsExport = $$$True + Set Klantinstellingen1.IsBlumXs = $$$True Set Klantinstellingen2 = ##class(DOM.Halux.AAP.Klantinstellingen).%New() Set Klantinstellingen2.KlantId = "K||1001" Set Klantinstellingen2.IsExport = $$$False + Set Klantinstellingen2.IsBlumXs = $$$False #dim KlantinstellingenIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Klantinstellingen1, Klantinstellingen2) Set KlantinstellingenRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.KlantinstellingenRepository).%New()