Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml =================================================================== diff -u -r38155 -r38167 --- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml (.../Test.cls.xml) (revision 38155) +++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml (.../Test.cls.xml) (revision 38167) @@ -511,6 +511,38 @@ ]]> + + + + + + + + @@ -229,6 +230,16 @@ ]]> + + +1 + + + 1 TECH.ObjectUtils.ObjectConvertData @@ -240,7 +251,6 @@ Do ConvertData.Add("ZijwandVerhogingType","ItemBX", "Set Output = $Case(Input, ""NoGallery"":""ZR"", ""SimpleGallery"":""ER"", ""DesignElement"":""INSCHF"", ""InschuifElement"":""INSCHF"", :Input)") Do ConvertData.Add("Draagkracht","ItemDK") Do ConvertData.Add("HeeftZijstabilisering","ItemSB") - Do ConvertData.Add("RugHoogte","ItemRSTL") Do ConvertData.Add("VerpakkingType","ItemVPK", "Set Output = $Case(Input, ""Pallet"":""P"", ""Probox"":""X"", ""V1"":""S"", :""S"")") Do ConvertData.Add("GeleiderTechnologie","ItemBM", "Set Output = $Select(Input = ""B"" : ""I"", 1:Input)") Do ConvertData.Add("LadeKleur","ItemKL", "Set Output = $Select(Input = ""TS"" : ""BZ"", 1:Input)") Index: EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml =================================================================== diff -u -r37331 -r38167 --- EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml (.../LadeEigenschappenTBX.cls.xml) (revision 37331) +++ EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml (.../LadeEigenschappenTBX.cls.xml) (revision 38167) @@ -197,6 +197,11 @@ + +%String + + + EXT.Unishop.PurchaseOrder001.CreateOrder.LadeEigenschappen.NietMeeleverenTBX @@ -321,6 +326,12 @@ NietMeeleveren + +Rughoogte + + +RugHoogte + Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/AcceptatieTest.cls.xml =================================================================== diff -u -r38161 -r38167 --- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/AcceptatieTest.cls.xml (.../AcceptatieTest.cls.xml) (revision 38161) +++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/AcceptatieTest.cls.xml (.../AcceptatieTest.cls.xml) (revision 38167) @@ -82,7 +82,7 @@ Do $$$AssertEquals(WebOrderLijn.ItemOPVL,"") Do $$$AssertEquals(WebOrderLijn.ItemRK,"BZ") Do $$$AssertEquals(WebOrderLijn.ItemRKOms,"") - Do $$$AssertEquals(WebOrderLijn.ItemRSTL,"") + Do $$$AssertEquals(WebOrderLijn.ItemRSTL,"D") Do $$$AssertEquals(WebOrderLijn.ItemSB,0) Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"") Do $$$AssertEquals(WebOrderLijn.ItemSTDL,"") @@ -229,7 +229,7 @@ Do $$$AssertEquals(WebOrderLijn.ItemOPVL,"") Do $$$AssertEquals(WebOrderLijn.ItemRK,"BZ") Do $$$AssertEquals(WebOrderLijn.ItemRKOms,"") - Do $$$AssertEquals(WebOrderLijn.ItemRSTL,"") + Do $$$AssertEquals(WebOrderLijn.ItemRSTL,"C") Do $$$AssertEquals(WebOrderLijn.ItemSB,1) Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"") Do $$$AssertEquals(WebOrderLijn.ItemSTDL,"") Index: EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml =================================================================== diff -u -r38155 -r38167 --- EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 38155) +++ EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 38167) @@ -174,7 +174,6 @@ While PropertyIterator.HasNext() { #dim PropertyName As %String = PropertyIterator.Next() Continue:PropertyName="NietMeeleveren" - Continue:PropertyName="RugHoogte" Continue:PropertyName="TussenrugMateriaal" Do ..ConverterData.Add(PropertyName,PropertyName)