Index: vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml
===================================================================
diff -u -r53373 -r53449
--- vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml (.../Winkelkar.cls.xml) (revision 53373)
+++ vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml (.../Winkelkar.cls.xml) (revision 53449)
@@ -77,6 +77,7 @@
Set Winkelkar = ##class(WS.Vhisie4.WinkelkarExport.dto.Winkelkar).%New()
Set Winkelkar.Id = "6438735360"
Set Winkelkar.KlantId = "07833"
+ Set Winkelkar.PrijzenNietOvernemen = $$$False
Do Winkelkar.Lijnen.Insert(##class(vhTest.Utils.WS.Vhisie4.WinkelkarExport.dto.MaatwerkLijn).TAX())
quit Winkelkar
]]>
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasser/BeslagDesign/PasAanTest.cls.xml
===================================================================
diff -u -r53371 -r53449
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasser/BeslagDesign/PasAanTest.cls.xml (.../PasAanTest.cls.xml) (revision 53371)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasser/BeslagDesign/PasAanTest.cls.xml (.../PasAanTest.cls.xml) (revision 53449)
@@ -9,6 +9,8 @@
Set Aanpasser = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.BeslagDesign).%New()
+ Do $$$AssertEquals(Winkelkar.PrijzenNietOvernemen,$$$False)
+
Do $$$AssertNotEquals(Winkelkar.Lijnen.GetAt(1).EconConfiguratieSleutel,"")
Do $$$AssertEquals(Winkelkar.Lijnen.GetAt(1).EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_geleider"),"false")
@@ -17,6 +19,8 @@
Do Aanpasser.PasAan(Winkelkar)
+ Do $$$AssertEquals(Winkelkar.PrijzenNietOvernemen,$$$True)
+
Do $$$AssertEquals(Winkelkar.Lijnen.GetAt(1).EconConfiguratieSleutel,"")
Do $$$AssertEquals(Winkelkar.Lijnen.GetAt(1).EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_geleider"),"true")
@@ -31,6 +35,7 @@
Set Aanpasser = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.BeslagDesign).%New()
+ Set Winkelkar.PrijzenNietOvernemen=$$$True
Set Winkelkar.Lijnen.GetAt(1).EconConfiguratieSleutel=""
Do Winkelkar.Lijnen.GetAt(1).EconConfiguratie.SetAt("true","Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_geleider")
Do Winkelkar.Lijnen.GetAt(1).EconConfiguratie.SetAt("true","Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponblumotionset")
Index: WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml
===================================================================
diff -u -r50355 -r53449
--- WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml (.../Winkelkar.cls.xml) (revision 50355)
+++ WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml (.../Winkelkar.cls.xml) (revision 53449)
@@ -78,6 +78,10 @@
%Date
+
+%Boolean
+
+
%Library.CacheSerialState
WinkelkarState
@@ -128,6 +132,9 @@
BestelOpmerking
+
+PrijzenNietOvernemen
+
Index: vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/MaatwerkLijn.cls.xml
===================================================================
diff -u -r53373 -r53449
--- vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/MaatwerkLijn.cls.xml (.../MaatwerkLijn.cls.xml) (revision 53373)
+++ vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/MaatwerkLijn.cls.xml (.../MaatwerkLijn.cls.xml) (revision 53449)
@@ -3,12 +3,27 @@
TECH.RegisteredObject
+
+
+
+
+
+
+
+
1
-WS.Vhisie4.WinkelkarExport.dto.MaatwerkLijn
+WS.Vhisie4.Winkelkar.dto.MaatwerkLijn
Winkelkar:WS.Vhisie4.WinkelkarExport.dto.Winkelkar