Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser.cls.xml
===================================================================
diff -u -r63517 -r66882
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser.cls.xml (.../MaatwerkDetailsFromJsonParser.cls.xml) (revision 63517)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser.cls.xml (.../MaatwerkDetailsFromJsonParser.cls.xml) (revision 66882)
@@ -7,7 +7,7 @@
JSONStream:%Stream
APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson
-
+
JSONStream:%Stream
1
%Stream
VerwijderdeHalffabItems:%ArrayOfObjects
1
-
+
+
+
+
+
+
+
+
Enkel subniveau van de HalffabItems. Momenteel alleen gebruikt om te Unittesten.
JSONStream:%Stream
APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson
@@ -107,7 +114,7 @@
JSONStream:%Stream
APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson
Index: vhUnitTest/WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser/GeefMaatwerkDetails/Test.cls.xml
===================================================================
diff -u -r66043 -r66882
--- vhUnitTest/WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser/GeefMaatwerkDetails/Test.cls.xml (.../Test.cls.xml) (revision 66043)
+++ vhUnitTest/WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser/GeefMaatwerkDetails/Test.cls.xml (.../Test.cls.xml) (revision 66882)
@@ -25,7 +25,7 @@
If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
- Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"")
+ Do $$$AssertEquals(MaatwerkDetails.DollarType,"")
Do $$$AssertEquals(MaatwerkDetails.ProbleemRapport,"")
Do $$$AssertFalse($IsObject(MaatwerkDetails.Halffabrikaten))
Do $$$AssertFalse($IsObject(MaatwerkDetails.Kosten))
@@ -90,7 +90,7 @@
If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
- Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MaatwerkDetails.DollarType,"MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
Do $$$AssertEquals(MaatwerkDetails.ProbleemRapport,"TestRapport")
}
]]>
@@ -132,7 +132,7 @@
If ($$$AssertTrue($IsObject(HalffabItem))) {
Do $$$AssertEquals(HalffabItem.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson")
- Do $$$AssertEquals(HalffabItem.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.StandaardHalffabItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(HalffabItem.DollarType,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.StandaardHalffabItem, MaatwerkCalculator.Dom")
If ($$$AssertTrue($IsObject(HalffabItem.ProductData))) {
Do $$$AssertEquals(HalffabItem.ProductData.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.ProductDataParsedFromJson")
Do $$$AssertEquals(HalffabItem.ProductData.Id, "2617803")
@@ -179,11 +179,11 @@
If ($$$AssertTrue($IsObject(HalffabItem))) {
Do $$$AssertEquals(HalffabItem.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson")
- Do $$$AssertEquals(HalffabItem.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.StandaardHalffabItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(HalffabItem.DollarType,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.StandaardHalffabItem, MaatwerkCalculator.Dom")
#dim Halffab As APPS.PM.Maatwerk.dto.DotNet.HalffabDtoParsedFromJson = HalffabItem.Halffab
If $$$AssertTrue($IsObject(Halffab)) {
- Do $$$AssertEquals(Halffab.KlasseNaamInfo, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.Halffab, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(Halffab.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.Halffab, MaatwerkCalculator.Dom")
Do $$$AssertEquals(Halffab.Klassenaam, "Halffab")
Do $$$AssertEquals(Halffab.ProductID, "2617804")
Do $$$AssertEquals(Halffab.Klantbeperking, "UT_KlantNummer")
@@ -238,22 +238,22 @@
If ($$$AssertTrue($IsObject(HalffabItem))) {
Do $$$AssertEquals(HalffabItem.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson")
- Do $$$AssertEquals(HalffabItem.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.StandaardHalffabItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(HalffabItem.DollarType,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.StandaardHalffabItem, MaatwerkCalculator.Dom")
#dim Halffab As APPS.PM.Maatwerk.dto.DotNet.HalffabDtoParsedFromJson = HalffabItem.Halffab
If $$$AssertTrue($IsObject(Halffab)) {
- Do $$$AssertEquals(Halffab.KlasseNaamInfo, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.Halffab, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(Halffab.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.HF.dto.Halffab, MaatwerkCalculator.Dom")
Do $$$AssertEquals(Halffab.Klassenaam, "MVX_HalffabBodem")
Do $$$AssertEquals(Halffab.ProductID, "2617805")
#dim SelectieKenmerken As %ArrayOfDataTypes = Halffab.SelectieKenmerken
If $$$AssertEquals(SelectieKenmerken.Count(), 5) {
- Do $$$AssertEquals(SelectieKenmerken.GetAt("KlasseNaamInfo"), "System.Collections.Generic.Dictionary`2[[System.String, System.Private.CoreLib],[System.String, System.Private.CoreLib]], System.Private.CoreLib") ; Deze is eigenlijk niet relevant.
+ Do $$$AssertEquals(SelectieKenmerken.GetAt("DollarType"), "System.Collections.Generic.Dictionary`2[[System.String, System.Private.CoreLib],[System.String, System.Private.CoreLib]], System.Private.CoreLib") ; Deze is eigenlijk niet relevant.
Do $$$AssertEquals(SelectieKenmerken.GetAt("BewerkbaarOp"), "Lengte")
Do $$$AssertEquals(SelectieKenmerken.GetAt("LadeDiepte"), "500")
Do $$$AssertEquals(SelectieKenmerken.GetAt("BodemKleur"), "OG")
Do $$$AssertEquals(SelectieKenmerken.GetAt("RugwandMateriaal"), "Hout")
- Do $$$AssertEquals(SelectieKenmerken.GetAt("$type"), "") ; $type werd vervangen door "KlasseNaamInfo"
+ Do $$$AssertEquals(SelectieKenmerken.GetAt("$type"), "") ; $type werd vervangen door "DollarType"
}
}
}
@@ -288,7 +288,7 @@
If ($$$AssertTrue($IsObject(KostItem))) {
Do $$$AssertEquals(KostItem.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
- Do $$$AssertEquals(KostItem.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.StandaardHalffabKostItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(KostItem.DollarType,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.StandaardHalffabKostItem, MaatwerkCalculator.Dom")
Do $$$AssertEquals(KostItem.Details, "0,1873 * 4")
Do $$$AssertEquals(KostItem.Kost, "0.7492")
Do $$$AssertEquals(KostItem.Naam, "FrontBevestigingOnder")
@@ -370,7 +370,7 @@
If ($$$AssertTrue($IsObject(KostItem))) {
Do $$$AssertEquals(KostItem.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
- Do $$$AssertEquals(KostItem.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.SamengesteldKostItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(KostItem.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.SamengesteldKostItem, MaatwerkCalculator.Dom")
Do $$$AssertEquals(KostItem.Details, "Dtl TotaleKost")
Do $$$AssertEquals(KostItem.Kost, "5.66")
Do $$$AssertEquals(KostItem.Naam, "TotaleKost")
@@ -381,7 +381,7 @@
If ($$$AssertTrue($IsObject(MateriaalKostItem))) {
Do $$$AssertEquals(MateriaalKostItem.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
- Do $$$AssertEquals(MateriaalKostItem.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.SamengesteldKostItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MateriaalKostItem.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.SamengesteldKostItem, MaatwerkCalculator.Dom")
Do $$$AssertEquals(MateriaalKostItem.Details, "Dtl Materiaal")
Do $$$AssertEquals(MateriaalKostItem.Kost, "5.44")
Do $$$AssertEquals(MateriaalKostItem.Naam, "Materiaal")
@@ -393,23 +393,23 @@
If ($$$AssertTrue($IsObject(MateriaalKostItem01))) {
Do $$$AssertEquals(MateriaalKostItem01.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
- Do $$$AssertEquals(MateriaalKostItem01.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.StandaardHalffabKostItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MateriaalKostItem01.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.StandaardHalffabKostItem, MaatwerkCalculator.Dom")
Do $$$AssertEquals(MateriaalKostItem01.Details, "Dtl FrontBevestigingOnder")
Do $$$AssertEquals(MateriaalKostItem01.Kost, "1.11")
Do $$$AssertEquals(MateriaalKostItem01.Naam, "FrontBevestigingOnder")
Do $$$AssertEquals(MateriaalKostItem01.KostItems.Count(),0,"Aantal KostItems in 'MateriaalKostItem01'")
}
If ($$$AssertTrue($IsObject(MateriaalKostItem02))) {
Do $$$AssertEquals(MateriaalKostItem02.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
- Do $$$AssertEquals(MateriaalKostItem02.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.BewerktHalffabKostItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MateriaalKostItem02.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.BewerktHalffabKostItem, MaatwerkCalculator.Dom")
Do $$$AssertEquals(MateriaalKostItem02.Details, "Dtl Bodem")
Do $$$AssertEquals(MateriaalKostItem02.Kost, "3.33")
Do $$$AssertEquals(MateriaalKostItem02.Naam, "Bodem")
Do $$$AssertEquals(MateriaalKostItem02.KostItems.Count(),0,"Aantal KostItems in 'MateriaalKostItem02'")
}
If ($$$AssertTrue($IsObject(MateriaalKostItem03))) {
Do $$$AssertEquals(MateriaalKostItem03.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
- Do $$$AssertEquals(MateriaalKostItem03.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.ExtraKostItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MateriaalKostItem03.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.ExtraKostItem, MaatwerkCalculator.Dom")
Do $$$AssertEquals(MateriaalKostItem03.Details, "Dtl Etiket")
Do $$$AssertEquals(MateriaalKostItem03.Aantal, "4.0")
Do $$$AssertEquals(MateriaalKostItem03.EenheidKost,"0.25")
@@ -420,7 +420,7 @@
}
If ($$$AssertTrue($IsObject(ProcentueelKostItem))) {
Do $$$AssertEquals(ProcentueelKostItem.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
- Do $$$AssertEquals(ProcentueelKostItem.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.ProcentueelKostItem, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(ProcentueelKostItem.DollarType, "MaatwerkCalculator.Dom.PM.Maatwerk.Calc.Kost.Dto.ProcentueelKostItem, MaatwerkCalculator.Dom")
Do $$$AssertEquals(ProcentueelKostItem.Details, "Dtl ProcentueelKost")
Do $$$AssertEquals(ProcentueelKostItem.Percentage, "0.02")
Do $$$AssertEquals(ProcentueelKostItem.Kost, "0.22")
@@ -473,7 +473,7 @@
If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
- Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MaatwerkDetails.DollarType, "MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
If ($$$AssertTrue($IsObject(MaatwerkDetails.Halffabrikaten))) {
Do $$$AssertEquals(MaatwerkDetails.Halffabrikaten.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson")
Do $$$AssertEquals(MaatwerkDetails.Halffabrikaten.Rol, "FrontBevestigingOnder")
@@ -519,7 +519,7 @@
If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
- Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MaatwerkDetails.DollarType, "MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
If ($$$AssertTrue($IsObject(MaatwerkDetails.Kosten))) {
Do $$$AssertEquals(MaatwerkDetails.Kosten.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson")
Do $$$AssertEquals(MaatwerkDetails.Kosten.Naam, "FrontBevestigingOnder")
@@ -571,7 +571,7 @@
If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
- Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MaatwerkDetails.DollarType, "MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
Do $$$AssertFalse($IsObject(MaatwerkDetails.Halffabrikaten))
Do $$$AssertFalse($IsObject(MaatwerkDetails.Kosten))
Do $$$AssertEquals(MaatwerkDetails.ProbleemRapport,"")
@@ -580,7 +580,7 @@
Do $$$AssertEquals(MaatwerkDetails.VerwijderdeHalffabItems.Count(), 2)
Do $$$AssertTrue(MaatwerkDetails.VerwijderdeHalffabItems.IsDefined("FrontBevestigingOnder"))
Do $$$AssertTrue(MaatwerkDetails.VerwijderdeHalffabItems.IsDefined("TiponBlumotionSynchronisatieStang"))
- Do $$$AssertFalse(MaatwerkDetails.VerwijderdeHalffabItems.IsDefined("KlasseNaamInfo")) ; De method WisDollarTypeUitVerwijderdeHalffabItems() verwijdert dit element, dat (soms) onterecht toegevoegd wordt door de JsonParser (?!)
+ Do $$$AssertFalse(MaatwerkDetails.VerwijderdeHalffabItems.IsDefined("DollarType")) ; De method WisDollarTypeUitVerwijderdeHalffabItems() verwijdert dit element, dat (soms) onterecht toegevoegd wordt door de JsonParser (?!)
#dim VerwijderdHalffabItem As APPS.PM.Maatwerk.dto.DotNet.VerwijderdHalffabItemParsedFromJson = MaatwerkDetails.VerwijderdeHalffabItems.GetAt("FrontBevestigingOnder")
If $$$AssertTrue($IsObject(VerwijderdHalffabItem)) {
@@ -627,7 +627,7 @@
If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
- Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MaatwerkDetails.DollarType, "MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
Do $$$AssertFalse($IsObject(MaatwerkDetails.Halffabrikaten))
Do $$$AssertFalse($IsObject(MaatwerkDetails.Kosten))
Do $$$AssertEquals(MaatwerkDetails.ProbleemRapport,"")
@@ -796,7 +796,7 @@
If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
- Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
+ Do $$$AssertEquals(MaatwerkDetails.DollarType, "MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom")
Do $$$AssertEquals(MaatwerkDetails.ProbleemRapport,"")
If ($$$AssertTrue($IsObject(MaatwerkDetails.Halffabrikaten))) {