Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml =================================================================== diff -u -r51330 -r52421 --- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml (.../Test.cls.xml) (revision 51330) +++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml (.../Test.cls.xml) (revision 52421) @@ -189,6 +189,8 @@ Set Envelope.Body.MessageParts.MessagePart.Item.GetAt(1).Translation.GetAt(2).Name = "Andere korttekst" Do Converter.ConvertProductItem(Envelope.Body.MessageParts.MessagePart.Item.GetAt(1),"vhbe") + Do $$$AssertEquals(Converter.MailGestuurd,$$$True) + Do $$$AssertEquals(Converter.DoorgestuurdNaarEWMS,$$$False) Do $$$AssertEquals(Converter.NieuwProductGegeven,$$$False) ]]> @@ -231,7 +233,9 @@ Do ProductMock.VerwachtMethodCall("ZetOpslagZone","9").DanDoeNiks() Do ProductMock.VerwachtMethodCall("ZetMuntAankoop","EUR").DanDoeNiks() Do ProductMock.VerwachtMethodCall("ZetBTWCode","8").DanDoeNiks() + Do ProductMock.VerwachtMethodCall("ZetWerkvloerEenheid","ST").DanDoeNiks() ;InventUnitId + Do:$$$Not(Actief) ProductMock.VerwachtMethodCall("ZetLinkType","").DanDoeNiks() Do:(Actief) ProductMock.VerwachtMethodCall("ZetLinkType","").Nooit() @@ -295,7 +299,9 @@ Do ProductMock.IndienMethodCall("ZetOpslagZone","9").DanDoeNiks() Do ProductMock.VerwachtMethodCall("ZetMuntAankoop","EUR").DanDoeNiks() Do ProductMock.VerwachtMethodCall("ZetBTWCode","8").DanDoeNiks() + Do ProductMock.VerwachtMethodCall("ZetWerkvloerEenheid","ST").DanDoeNiks() ;InventUnitId + #dim ProductAPIMock as DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance() Do ProductAPIMock.IndienMethodCall("BestaatIdentNr","IdentNummer").DanReturn($$$False) @@ -346,7 +352,9 @@ Do ProductMock.IndienMethodCall("ZetOpslagZone","9").DanDoeNiks() Do ProductMock.VerwachtMethodCall("ZetMuntAankoop","EUR").DanDoeNiks() Do ProductMock.VerwachtMethodCall("ZetBTWCode","8").DanDoeNiks() + Do ProductMock.VerwachtMethodCall("ZetWerkvloerEenheid","ST").DanDoeNiks() ;InventUnitId + #dim ProductAPIMock as DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance() Do ProductAPIMock.IndienMethodCall("BestaatIdentNr","IdentNummer").DanReturn($$$False) @@ -467,7 +475,6 @@ Do ProductMock.VerwachtMethodCall("ZetFSCHout","").DanDoeNiks() ;CertClaimLevel Do ProductMock.VerwachtMethodCall("ZetTelbaar","").DanDoeNiks() ;CountableOrDivisible Do ProductMock.VerwachtMethodCall("ZetBarcodeWaarde","09002617767988").DanDoeNiks() ;GTIN - Do ProductMock.VerwachtMethodCall("ZetWerkvloerEenheid","ST").DanDoeNiks() ;InventUnitId Do ProductMock.VerwachtMethodCall("ZetLevertermijn",1).DanDoeNiks() ;LeadTimePurch Do ProductMock.VerwachtMethodCall("ZetMinimumBestelhoeveelheid",100).DanDoeNiks() ;LowestQtyPurch Do ProductMock.VerwachtMethodCall("ZetGewichtPerDuizendStuksInKG","5.49").DanDoeNiks() ;NetWeight Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml =================================================================== diff -u -r49691 -r52421 --- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml (.../ProductItemConverterFake.cls.xml) (revision 49691) +++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml (.../ProductItemConverterFake.cls.xml) (revision 52421) @@ -23,6 +23,10 @@ %Boolean + +%Boolean + + DOM.PM.Product @@ -65,6 +70,13 @@ + + +ItemId:%String +1 + + Index: AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml =================================================================== diff -u -r51686 -r52421 --- AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml (.../ProductItemConverter.cls.xml) (revision 51686) +++ AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml (.../ProductItemConverter.cls.xml) (revision 52421) @@ -99,6 +99,7 @@ Do Product.ZetOpslagZone("9") Do Product.ZetMuntAankoop("EUR") Do Product.ZetBTWCode("8") + Do Product.ZetWerkvloerEenheid(..BepaalWerkvloerEenheid(ProductItem)) ;InventUnitId if ..MagLinktypeAangepastWordenBijCreatie(ProductItem,Product) { Do Product.ZetLinkType(..BepaalLinkType(ProductItem,LegalEntity)) ; Ook ReqCovType } @@ -159,7 +160,6 @@ Do Product.ZetFSCHout(..BepaalFSCHout(ProductItem)) ;CertClaimLevel Do Product.ZetTelbaar(..BepaalTelbaar(ProductItem)) ;CountableOrDivisible Do Product.ZetBarcodeWaarde(..BepaalBarcodeWaarde(ProductItem)) ;GTIN - Do Product.ZetWerkvloerEenheid(..BepaalWerkvloerEenheid(ProductItem)) ;InventUnitId Do Product.ZetLevertermijn(..BepaalLevertermijn(ProductItem,LegalEntity)) ;LeadTimePurch Do Product.ZetMinimumBestelhoeveelheid(..BepaalMinimumBestelhoeveelheid(ProductItem)) ;LowestQtyPurch Do Product.ZetGewichtPerDuizendStuksInKG(..BepaalGewichtPerDuizendStuksInKG(ProductItem)) ;NetWeight