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