Index: AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml
===================================================================
diff -u -r48711 -r48819
--- AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml (.../ProductItemConverter.cls.xml) (revision 48711)
+++ AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml (.../ProductItemConverter.cls.xml) (revision 48819)
@@ -88,6 +88,8 @@
; Bij een nieuw product defaulten we Opslagzone op 9
Do Product.ZetOpslagZone("9")
Do Product.ZetMuntAankoop("EUR")
+ Do Product.ZetLinkType(..BepaalLinkType(ProductItem,LegalEntity)) ; Ook ReqCovType
+
Do ..UpdateProduct(ProductItem,Product,LegalEntity)
Do ..StuurDoorNaarEWMS(Product)
}
@@ -149,8 +151,6 @@
Do Product.ZetAantalInNormaalVerpakking(..BepaalAantalInNormaalVerpakking(ProductItem)) ;QtyNVP
Do Product.ZetPalletAantal(..BepaalPalletAantal(ProductItem)) ;QtyPLT
Do Product.ZetStockNietStock(..BepaalStockNietStock(ProductItem)) ; ReqCovType
- Do Product.ZetLinkType(..BepaalLinkType(ProductItem, Product,LegalEntity)) ; Ook ReqCovType
-
;Do Product.ZetWeetNiet7(..BepaalWeetNiet7(ProductItem)) ; StoppedInvent , sca volgt op
;Do Product.ZetWeetNiet8(..BepaalWeetNiet8(ProductItem)) ; StoppedPurch , sca volgt op
@@ -218,7 +218,7 @@
#dim AdministratiefProduct as DOM.PM.impl.AdministratiefProduct = ..ProductRolAPI.GeefAdministratiefProduct(Product.GeefID())
While TranslationIterator.HasNext() {
#dim Translation as AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityTranslation = TranslationIterator.Next()
- #dim GekuisteVertaling as %String = ##class(TECH.StringUtils).Replace(Translation.Description,$c(10)," ")
+ #dim GekuisteVertaling as %String = ##class(TECH.StringUtils).Replace(Translation.Description,$c(10),"~")
Do AdministratiefProduct.ZetLangtekst(GekuisteVertaling,##class(AXimpl.AxToAdminUtils).ConvertLanguageId(Translation.LanguageId))
Do ..LangtekstBewaarder.BewaarVoorTaal(Product.GeefID(),GekuisteVertaling,##class(AXimpl.AxToAdminUtils).ConvertLanguageId(Translation.LanguageId))
}
@@ -283,17 +283,27 @@
-ProductItem:AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityItem,Product:DOM.PM.Product,LegalEntity:%String
+ProductItem:AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityItem,LegalEntity:%String
1
DOM.PM.enu.LinkType
Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/MappingTest.cls.xml
===================================================================
diff -u -r48711 -r48819
--- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/MappingTest.cls.xml (.../MappingTest.cls.xml) (revision 48711)
+++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/MappingTest.cls.xml (.../MappingTest.cls.xml) (revision 48819)
@@ -61,8 +61,8 @@
Set ..ProductMock = ..GeefProduct()
Set ..ProductAPIMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance()
- Do ..ProductAPIMock.IndienMethodCall("BestaatIdentNr",$$$ElkeWaarde).DanReturn($$$True)
- Do ..ProductAPIMock.IndienMethodCall("GeefProductVolgensIdentNr",$$$ElkeWaarde).DanReturn(..ProductMock)
+ Do ..ProductAPIMock.IndienMethodCall("BestaatIdentNr",$$$ElkeWaarde).DanReturn($$$False)
+ ;Do ..ProductAPIMock.IndienMethodCall("GeefProductVolgensIdentNr",$$$ElkeWaarde).DanReturn(..ProductMock)
Set ..ProductRolAPIMock = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
Set ..AdministratiefProductMock = ##class(vhTest.Mock.DOM.PM.AdministratiefProduct).%New()
@@ -82,6 +82,7 @@
Set ..MailAPIMock = ##class(vhTest.Mock.TECH.Mail.MailAPI).MockInstance()
Set ..Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(..ProductAPIMock,..ProductRolAPIMock,..LangtekstBewaarderMock,..KlasRepositoryMock,..LoggerMock,..MailAPIMock)
+ Set ..Converter.NieuwProductMock = ..ProductMock
]]>
@@ -99,7 +100,6 @@
-
+
-
+
-
+
-
+
+
+
+
+
-
+