Index: vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml
===================================================================
diff -u -r38915 -r39497
--- vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml (.../TBXKenmerkenLegacy.cls.xml) (revision 38915)
+++ vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml (.../TBXKenmerkenLegacy.cls.xml) (revision 39497)
@@ -7,314 +7,294 @@
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
+
- Set Resultaat.ItemASM = ""
- Set Resultaat.ItemBGRP = "X"
- Set Resultaat.ItemBM = "I"
- Set Resultaat.ItemBX = "ZR"
- Set Resultaat.ItemCB = 600
- Set Resultaat.ItemDC = "A"
- Set Resultaat.ItemDCOms = ""
- Set Resultaat.ItemDK = 30
- Set Resultaat.ItemDS = "ZA"
- Set Resultaat.ItemDSOms = ""
- Set Resultaat.ItemDWV = ""
- Set Resultaat.ItemFB = "I"
- Set Resultaat.ItemFS = "A"
- Set Resultaat.ItemKB = "BZ"
- Set Resultaat.ItemKBOms = ""
- Set Resultaat.ItemKL = "BZ"
- Set Resultaat.ItemKLOms = ""
- Set Resultaat.ItemKLROPVL = ""
- Set Resultaat.ItemKV = ""
- Set Resultaat.ItemKVOms = ""
- Set Resultaat.ItemKX = ""
- Set Resultaat.ItemKXOms = ""
- Set Resultaat.ItemLD = 400
- Set Resultaat.ItemLT = "M"
- Set Resultaat.ItemOLP = ""
- Set Resultaat.ItemOPVL = ""
- Set Resultaat.ItemRK = "BZ"
- Set Resultaat.ItemRKOms = ""
- Set Resultaat.ItemRSTL = ""
- Set Resultaat.ItemSB = 0
- Set Resultaat.ItemSPZK = ""
- Set Resultaat.ItemSTDL = ""
- Set Resultaat.ItemVPK = "S"
- Set Resultaat.ItemWD = "B"
+
+1
+APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
+
Index: APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml
===================================================================
diff -u -r38719 -r39497
--- APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml (.../TBXKenmerkenLegacy.cls.xml) (revision 38719)
+++ APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml (.../TBXKenmerkenLegacy.cls.xml) (revision 39497)
@@ -236,6 +236,19 @@
+
+
+%String
+
+
+
+NietMeeleveren:%String
+%Status
+
+
Index: APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml
===================================================================
diff -u -r39324 -r39497
--- APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml (.../EdiNaarLegacy.cls.xml) (revision 39324)
+++ APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml (.../EdiNaarLegacy.cls.xml) (revision 39497)
@@ -28,9 +28,9 @@
Product:APPS.EDI.common.dto.v001.LadeTBX
-DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
+APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
1
APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
-
Index: APPS/EDI/common/impl/LegacyConverter.cls.xml
===================================================================
diff -u -r39341 -r39497
--- APPS/EDI/common/impl/LegacyConverter.cls.xml (.../LegacyConverter.cls.xml) (revision 39341)
+++ APPS/EDI/common/impl/LegacyConverter.cls.xml (.../LegacyConverter.cls.xml) (revision 39497)
@@ -22,21 +22,15 @@
Product:APPS.EDI.common.dto.v001.LadeTBX
-DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
-APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
+
-Product:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
+Product:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
APPS.EDI.common.dto.v001.LadeTBX
-
Index: vhTest/Mock/WSimpl/Vhisie4/Winkelkar/EconConfiguratieConverter.cls.xml
===================================================================
diff -u -r39353 -r39497
--- vhTest/Mock/WSimpl/Vhisie4/Winkelkar/EconConfiguratieConverter.cls.xml (.../EconConfiguratieConverter.cls.xml) (revision 39353)
+++ vhTest/Mock/WSimpl/Vhisie4/Winkelkar/EconConfiguratieConverter.cls.xml (.../EconConfiguratieConverter.cls.xml) (revision 39497)
@@ -11,7 +11,7 @@
EconKenmerkenArray:%ArrayOfDataTypes
-DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken
+APPS.PM.Maatwerk.dto.TBXKenmerken
Index: WSimpl/Vhisie4/Winkelkar/EconConfiguratieConverter.cls.xml
===================================================================
diff -u -r39353 -r39497
--- WSimpl/Vhisie4/Winkelkar/EconConfiguratieConverter.cls.xml (.../EconConfiguratieConverter.cls.xml) (revision 39353)
+++ WSimpl/Vhisie4/Winkelkar/EconConfiguratieConverter.cls.xml (.../EconConfiguratieConverter.cls.xml) (revision 39497)
@@ -29,14 +29,14 @@
EconKenmerkenArray:%ArrayOfDataTypes
-DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken
+APPS.PM.Maatwerk.dto.TBXKenmerken
Product:APPS.EDI.common.dto.v001.LadeTBX
-DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
+APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
-Product:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
+Product:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
APPS.EDI.common.dto.v001.LadeTBX
Index: vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerEdiNaarLegacy/Test.cls.xml
===================================================================
diff -u -r39339 -r39497
--- vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerEdiNaarLegacy/Test.cls.xml (.../Test.cls.xml) (revision 39339)
+++ vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerEdiNaarLegacy/Test.cls.xml (.../Test.cls.xml) (revision 39497)
@@ -10,22 +10,22 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemKB,"MG")
- Do $$$AssertEquals(WebOrderLijn.ItemLD,"350")
- Do $$$AssertEquals(WebOrderLijn.ItemDWV,"2")
- Do $$$AssertEquals(WebOrderLijn.ItemDK,"65")
- Do $$$AssertTrue(WebOrderLijn.ItemSB)
- Do $$$AssertEquals(WebOrderLijn.ItemVPK,"P")
- Do $$$AssertEquals(WebOrderLijn.ItemCB,"1000")
- Do $$$AssertEquals(WebOrderLijn.ItemFB,"S")
- Do $$$AssertEquals(WebOrderLijn.ItemBX,"INSCHF")
- Do $$$AssertEquals(WebOrderLijn.ItemBM,"T")
- Do $$$AssertEquals(WebOrderLijn.ItemKL,"MG")
- Do $$$AssertEquals(WebOrderLijn.ItemRK,"MG")
- Do $$$AssertEquals(WebOrderLijn.ItemVPK,"P")
- Do $$$AssertEquals(WebOrderLijn.ItemDC,"A")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKB,"MG")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemLD,"350")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDWV,"2")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDK,"65")
+ Do $$$AssertTrue(GeconverteerdProduct.ItemSB)
+ Do $$$AssertEquals(GeconverteerdProduct.ItemVPK,"P")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemCB,"1000")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemFB,"S")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBX,"INSCHF")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBM,"T")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKL,"MG")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemRK,"MG")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemVPK,"P")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDC,"A")
]]>
@@ -54,22 +54,22 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemKB,"BZ")
- Do $$$AssertEquals(WebOrderLijn.ItemLD,"400")
- Do $$$AssertEquals(WebOrderLijn.ItemDWV,"1")
- Do $$$AssertEquals(WebOrderLijn.ItemDK,"50")
- Do $$$AssertFalse(WebOrderLijn.ItemSB)
- Do $$$AssertEquals(WebOrderLijn.ItemCB,"800")
- Do $$$AssertEquals(WebOrderLijn.ItemFB,"D")
- Do $$$AssertEquals(WebOrderLijn.ItemBX,"INSCHF")
- Do $$$AssertEquals(WebOrderLijn.ItemBM,"TOB")
- Do $$$AssertEquals(WebOrderLijn.ItemASM,"G")
- Do $$$AssertEquals(WebOrderLijn.ItemKL,"BZ")
- Do $$$AssertEquals(WebOrderLijn.ItemRK,"BZ")
- Do $$$AssertEquals(WebOrderLijn.ItemVPK,"S")
- Do $$$AssertEquals(WebOrderLijn.ItemDC,"A")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKB,"BZ")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemLD,"400")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDWV,"1")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDK,"50")
+ Do $$$AssertFalse(GeconverteerdProduct.ItemSB)
+ Do $$$AssertEquals(GeconverteerdProduct.ItemCB,"800")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemFB,"D")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBX,"INSCHF")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBM,"TOB")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemASM,"G")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKL,"BZ")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemRK,"BZ")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemVPK,"S")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDC,"A")
]]>
@@ -82,9 +82,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemWD,"18")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemWD,"18")
]]>
@@ -96,9 +96,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemWD,"B")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemWD,"B")
]]>
@@ -111,9 +111,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemOPVL,"L")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemOPVL,"L")
]]>
@@ -126,9 +126,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemOPVL,"R")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemOPVL,"R")
]]>
@@ -142,9 +142,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemOPVL,"L+R")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemOPVL,"L+R")
]]>
@@ -156,9 +156,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemFS,"2")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemFS,"2")
]]>
@@ -171,9 +171,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemFS,"A")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemFS,"A")
]]>
@@ -186,9 +186,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemFS,"HS")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemFS,"HS")
]]>
@@ -202,9 +202,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"Z")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBGRP,"Z")
]]>
@@ -218,9 +218,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"M")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBGRP,"M")
]]>
@@ -233,9 +233,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"R")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBGRP,"R")
]]>
@@ -249,9 +249,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"G")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBGRP,"G")
]]>
@@ -264,9 +264,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"R")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBGRP,"R")
]]>
@@ -279,9 +279,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"X")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBGRP,"X")
]]>
@@ -295,9 +295,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemKV,"FG8")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKV,"FG8")
]]>
@@ -311,9 +311,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemKV,"FZ8")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKV,"FZ8")
]]>
@@ -327,9 +327,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemKV,"ALU.MG")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKV,"ALU.MG")
]]>
@@ -343,9 +343,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemKV,"ALU.SW")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKV,"ALU.SW")
]]>
@@ -359,9 +359,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemKV,"ALU.BZ")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemKV,"ALU.BZ")
]]>
@@ -373,9 +373,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBM,"I")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBM,"I")
]]>
@@ -387,9 +387,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemBX,"INSCHF")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemBX,"INSCHF")
]]>
@@ -402,9 +402,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemASM,"Z")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemASM,"Z")
]]>
@@ -417,9 +417,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemASM,"")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemASM,"")
]]>
@@ -435,7 +435,7 @@
Do TBXLadeCodeBepalerStub.VerwachtMethodCall("BepaalLadeCode",TeConverterenProduct.Klasse, TeConverterenProduct.ZijkantHoogte, TeConverterenProduct.LadeHoogte, TeConverterenProduct.IsBinnenlade, "V", $$$ElkeWaarde).ExactAantalKeer(1)
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(TBXLadeCodeBepalerStub)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
Do TBXLadeCodeBepalerStub.Verifieer()
]]>
@@ -450,9 +450,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemDWV,"")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDWV,"")
]]>
@@ -465,9 +465,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemDWV,"2")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemDWV,"2")
]]>
@@ -479,9 +479,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemFB,"Z")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemFB,"Z")
]]>
@@ -494,9 +494,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemRSTL,"M")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemRSTL,"M")
]]>
@@ -509,9 +509,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemRSTL,"")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemRSTL,"")
]]>
@@ -527,9 +527,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"S;120;140;150")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"S;120;140;150")
]]>
@@ -545,9 +545,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"B;120;140;250")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"B;120;140;250")
]]>
@@ -563,9 +563,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"M.;120;140;42")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"M.;120;140;42")
]]>
@@ -583,9 +583,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"SS;120;140;60;150;150")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"SS;120;140;60;150;150")
]]>
@@ -603,9 +603,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"BB;120;140;60;250;250")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"BB;120;140;60;250;250")
]]>
@@ -623,9 +623,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"SB;120;140;60;150;250")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"SB;120;140;60;150;250")
]]>
@@ -643,9 +643,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"BS;120;140;60;250;150")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"BS;120;140;60;250;150")
]]>
@@ -663,9 +663,9 @@
Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
- #dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
+ #dim GeconverteerdProduct As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
- Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"MM;120;140;60;42;42")
+ Do $$$AssertEquals(GeconverteerdProduct.ItemSPZK,"MM;120;140;60;42;42")
]]>
Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r39402 -r39497
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39402)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml (.../LegacyNaarEdi.cls.xml) (revision 39497)
@@ -40,7 +40,7 @@
-Product:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
+Product:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
APPS.EDI.common.dto.v001.LadeTBX
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
-
+
1
EconKenmerkenArray:%ArrayOfDataTypes
-DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken
+APPS.PM.Maatwerk.dto.TBXKenmerken
Index: vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml
===================================================================
diff -u -r39474 -r39497
--- vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml (.../Test.cls.xml) (revision 39474)
+++ vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml (.../Test.cls.xml) (revision 39497)
@@ -10,7 +10,7 @@
Set TbxKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set TbxKenmerken.LadeVariant = "TBX"
- #dim LegacyKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+ #dim LegacyKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).StandaardLade()
Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
@@ -27,7 +27,7 @@
Set TbxKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set TbxKenmerken.LadeVariant = "TBX"
- #dim LegacyKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).DMZLade()
+ #dim LegacyKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).DMZLade()
Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
@@ -44,7 +44,7 @@
Set TbxKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set TbxKenmerken.LadeVariant = "TBX"
- #dim LegacyKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).LadeMetVeelExtras()
+ #dim LegacyKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).LadeMetVeelExtras()
Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
@@ -61,7 +61,7 @@
Set TbxKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set TbxKenmerken.LadeVariant = "TBX"
- #dim LegacyKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLadeMetNietMeeleveren()
+ #dim LegacyKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).StandaardLadeMetNietMeeleveren()
Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
@@ -78,7 +78,7 @@
Set TbxKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set TbxKenmerken.LadeVariant = "TBX"
- #dim LegacyKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).LadeMetVerlaagdeRug()
+ #dim LegacyKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).LadeMetVerlaagdeRug()
Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
@@ -95,7 +95,7 @@
Set TbxKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set TbxKenmerken.LadeVariant = "TBX"
- #dim LegacyKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+ #dim LegacyKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).StandaardLade()
Set LegacyKenmerken.ItemKB = "OnbestaandeKleur"
Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
Index: vhTest/Mock/APPS/EDI/common/impl/LegacyConverter.cls.xml
===================================================================
diff -u -r39341 -r39497
--- vhTest/Mock/APPS/EDI/common/impl/LegacyConverter.cls.xml (.../LegacyConverter.cls.xml) (revision 39341)
+++ vhTest/Mock/APPS/EDI/common/impl/LegacyConverter.cls.xml (.../LegacyConverter.cls.xml) (revision 39497)
@@ -11,13 +11,13 @@
Product:APPS.EDI.common.dto.v001.LadeTBX
-DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
+APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
-Product:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy
+Product:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy
APPS.EDI.common.dto.v001.LadeTBX
Index: vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml
===================================================================
diff -u -r39232 -r39497
--- vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml (.../Test.cls.xml) (revision 39232)
+++ vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml (.../Test.cls.xml) (revision 39497)
@@ -5,7 +5,7 @@
@@ -17,7 +17,7 @@
#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).DMZLade()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
- Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).DMZLade())
+ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).DMZLade())
]]>
@@ -26,7 +26,7 @@
#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).SpoelbakLade()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
- Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).SpoelbakLade())
+ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).SpoelbakLade())
]]>
@@ -35,7 +35,7 @@
#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).SifonLadeMet1Uitsparing()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
- Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).SifonLadeMet1Uitsparing())
+ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).SifonLadeMet1Uitsparing())
]]>
@@ -44,7 +44,7 @@
#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).SifonLadeMet2Uitsparingen()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
- Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).SifonLadeMet2Uitsparingen())
+ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).SifonLadeMet2Uitsparingen())
]]>
@@ -53,7 +53,7 @@
#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).LadeMetVeelExtras()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
- Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).LadeMetVeelExtras())
+ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).LadeMetVeelExtras())
]]>
@@ -62,7 +62,7 @@
#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).StandaardLadeMetNietMeeleveren()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
- Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLadeMetNietMeeleveren())
+ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).StandaardLadeMetNietMeeleveren())
]]>
@@ -71,13 +71,13 @@
#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).LadeMetVerlaagdeRug()
Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
- Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).LadeMetVerlaagdeRug())
+ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct),##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy).LadeMetVerlaagdeRug())
]]>