Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/EnvelopeConverter/Test.cls.xml =================================================================== diff -u -r48332 -r48524 --- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/EnvelopeConverter/Test.cls.xml (.../Test.cls.xml) (revision 48332) +++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/EnvelopeConverter/Test.cls.xml (.../Test.cls.xml) (revision 48524) @@ -62,6 +62,8 @@ Set SOPR.Ext.GetAt(1).ModuleType = "Vend" Set SOPR.Ext.GetAt(1).CustVendRelation = "08629" Set SOPR.Ext.GetAt(1).ExternalItemId= "0123456789012345678901234567890123456789" + Set SOPR.Translation.GetAt(1).Name = "SOPRKorttekst" + Set SOPR.Translation.GetAt(2).Name = "SOPRKorttekst" Set ProductItemConverterMock = ##class(vhTest.Mock.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter).%New() Do ProductItemConverterMock.VerwachtMethodCall("ConvertProductItem",..Matches.DataTransferObject(Principaal),"vhbe").DanDoeNiks().ExactAantalKeer(1) @@ -72,6 +74,7 @@ Set ProductMock = ##class(vhTest.Mock.DOM.PM.Product).%New() Do ProductMock.VerwachtMethodCall("GeefIdentNr").DanReturn("SOPRIdentNummer") + DO ProductMock.VerwachtMethodCall("GeefKorttekst").DanReturn("SOPRKorttekst") #dim ProductAPIMock as vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance() Do ProductAPIMock.VerwachtMethodCall("GeefProduct","SOPRProductId",).DanReturn(ProductMock) Index: AXimpl/Dynamics/ProductItemUpsertIn/Converter/EnvelopeConverter.cls.xml =================================================================== diff -u -r48382 -r48524 --- AXimpl/Dynamics/ProductItemUpsertIn/Converter/EnvelopeConverter.cls.xml (.../EnvelopeConverter.cls.xml) (revision 48382) +++ AXimpl/Dynamics/ProductItemUpsertIn/Converter/EnvelopeConverter.cls.xml (.../EnvelopeConverter.cls.xml) (revision 48524) @@ -68,9 +68,11 @@ #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch(##class(TECH.Exceptions.InvalidInputException).%ClassName(1)) } If $Length(SOPRProductId){ - #dim SOPRIdentNummer = ..ProductAPI.GeefProduct(SOPRProductId).GeefIdentNr() - #dim SOPRPrice as %Numeric = SOPR.CostPrice - Do ..ProductItemConverter.ConvertProductItem(..ApplySOPRToProductItem(ProductItem,SOPRIdentNummer, SOPRPrice),LegalEntity) + #dim SOPRProduct as DOM.PM.Product = ..ProductAPI.GeefProduct(SOPRProductId) + #dim SOPRIdentNummer = SOPRProduct.GeefIdentNr() + #dim SOPRKorttekst = SOPRProduct.GeefKorttekst() ; korttekst is aangepast in cache en die willen we behouden + #dim SOPRPrice as %Numeric = SOPR.CostPrice + Do ..ProductItemConverter.ConvertProductItem(..ApplySOPRToProductItem(ProductItem,SOPRIdentNummer, SOPRPrice,SOPRKorttekst),LegalEntity) } else { Do ..StuurOntbrekendeSOPRMail(ProductItem.ItemId,SOPR.ContractId) } @@ -98,7 +100,7 @@ -ProductItem:AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityItem,IdentNummer:%String,ProductPrice:%Numeric +ProductItem:AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityItem,IdentNummer:%String,ProductPrice:%Numeric,SOPRKorttekst:%String 1 AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityItem