Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler/Test.cls.xml =================================================================== diff -u --- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler/Test.cls.xml (revision 0) +++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler/Test.cls.xml (revision 47950) @@ -0,0 +1,246 @@ + + + +vhUnitTest.TestCase + + +vhTest.Mock.DOM.AKP.AankoopAPI +1 + + + +vhTest.Mock.AXimpl.Admin.Common.ProductBepaler +1 + + + +vhTest.Mock.DOM.PM.ProductTypeAPI +1 + + + +AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler +1 + + + +AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut +1 + + + +aTestName:%String + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +1 +AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut + + + + + + Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestHalux.cls.xml =================================================================== diff -u -r47685 -r47950 --- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestHalux.cls.xml (.../TestHalux.cls.xml) (revision 47685) +++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestHalux.cls.xml (.../TestHalux.cls.xml) (revision 47950) @@ -31,7 +31,10 @@ Set ProductRepositoryMock = ##class(vhTest.Mock.Prod.ProductRepository).%New() Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True).Nooit() // want legal entity hlx - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -56,7 +59,10 @@ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Nieuwe leverancier met id '01234' gedefinieerd in AX Halux, die nog niet voorzien is in Admin Conversiecode.") do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings)) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do ToeleveringAPIMock.Verifieer() Index: AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml =================================================================== diff -u --- AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml (revision 0) +++ AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml (revision 47950) @@ -0,0 +1,143 @@ + + + +TECH.Bezwaren.BezwarenBepaler,TECH.Mockable + + +%String +list +1 + + + +%String +1 + + + +AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut +1 + + + +DOM.AKP.AankoopAPI +1 + + + +AXimpl.Admin.Common.ProductBepaler +1 + + + +DOM.PM.ProductTypeAPI +1 + + + +ProductLookup:AXimpl.Admin.Common.ProductBepaler,AankoopAPI:DOM.AKP.AankoopAPI,ProductTypeAPI:DOM.PM.ProductTypeAPI +1 +1 +%Status +1 + + + + +Bericht:AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut +%ListOfDataTypes + + + + +Bezwaar:%String +1 + + + + + + Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/Test.cls.xml =================================================================== diff -u -r47685 -r47950 --- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/Test.cls.xml (.../Test.cls.xml) (revision 47685) +++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/Test.cls.xml (.../Test.cls.xml) (revision 47950) @@ -5,7 +5,6 @@ @@ -68,7 +70,11 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) + #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -110,7 +116,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -158,7 +167,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","8765").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","8765").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal2LijnenZelfdeLeverancier(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -195,14 +207,16 @@ Set InventoryOutConverterStub = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter).%New() Do InventoryOutConverterStub.IndienMethodCall("Convert",..Matches.DataTransferObject(RequestInventoryOut),"MessageID").DanReturn(Antwoord) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub) Set ProductDummy = ##class(Prod.Product).%New() Set ProductDummy.OpslagZone = "1" Set ProductRepositoryMock = ##class(vhTest.Mock.Prod.ProductRepository).%New() Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal2LijnenZelfdeLeverancierZelfdeProduct(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -255,7 +269,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","8765").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","8765").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal2LijnenVerschillendeLeverancier(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -269,7 +286,28 @@ - @@ -322,7 +360,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -415,6 +456,24 @@ Quit Antwoord ]]> + + +ErrorText:%String +1 +AXif.Dynamics.Inventory.MessageParts + + Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestBlum.cls.xml =================================================================== diff -u -r47685 -r47950 --- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestBlum.cls.xml (.../TestBlum.cls.xml) (revision 47685) +++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestBlum.cls.xml (.../TestBlum.cls.xml) (revision 47950) @@ -33,7 +33,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -77,7 +80,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do ToeleveringAPIMock.Verifieer() @@ -123,7 +129,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do ToeleveringAPIMock.Verifieer() @@ -168,7 +177,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do ToeleveringAPIMock.Verifieer() @@ -213,7 +225,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do ToeleveringAPIMock.Verifieer() Index: vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml =================================================================== diff -u -r45745 -r47950 --- vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml (.../InventoryInConverter.cls.xml) (revision 45745) +++ vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml (.../InventoryInConverter.cls.xml) (revision 47950) @@ -13,15 +13,6 @@ - - -Toelevering:DOM.AKP.Toelevering - - - - - - Index: AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml =================================================================== diff -u -r47685 -r47950 --- AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml (.../InventoryInConverter.cls.xml) (revision 47685) +++ AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml (.../InventoryInConverter.cls.xml) (revision 47950) @@ -51,13 +51,28 @@ 1 + +DOM.AKP.AankoopAPI +1 + + + +DOM.PM.ProductTypeAPI +1 + + + +AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler +1 + + %String 1 -ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Admin.Common.ProductBepaler,ReceptieService:APPS.AKP.Receptie.impl.ReceptieService,InventoryOutConverter:AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter,ProductRepository:Prod.ProductRepository +ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Admin.Common.ProductBepaler,ReceptieService:APPS.AKP.Receptie.impl.ReceptieService,InventoryOutConverter:AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter,ProductRepository:Prod.ProductRepository,AankoopAPI:DOM.AKP.AankoopAPI,ProductTypeAPI:DOM.PM.ProductTypeAPI,ConversieBezwarenBepaler:AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler 1 1 %Status @@ -69,6 +84,9 @@ Set ..ReceptieService = $$$Inject(ReceptieService,##class(APPS.AKP.Receptie.impl.ReceptieService).%New()) Set ..InventoryOutConverter = $$$Inject(InventoryOutConverter,##class(AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter).%New()) Set ..ProductRepository = $$$Inject(ProductRepository,##class(Prod.ProductRepository).%New()) + Set ..AankoopAPI = $$$Inject(AankoopAPI,##class(DOM.DomeinContext).Instance().GeefAankoopAPI()) + Set ..ProductTypeAPI = $$$Inject(ProductTypeAPI,##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()) + Set ..ConversieBezwarenBepaler = $$$Inject(ConversieBezwarenBepaler,##class(AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New()) Quit $$$OK ]]> @@ -77,6 +95,9 @@ WMSJournalOutRequest:AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut,MessageId:%String AXif.Dynamics.Inventory.MessageParts + +Melding:%String,MessageId:%String +1 +AXif.Dynamics.Inventory.MessageParts + + + WMSJournalOutRequest:AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut 1 Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestTerugname.cls.xml =================================================================== diff -u -r47685 -r47950 --- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestTerugname.cls.xml (.../TestTerugname.cls.xml) (revision 47685) +++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestTerugname.cls.xml (.../TestTerugname.cls.xml) (revision 47950) @@ -32,8 +32,11 @@ Set ProductRepositoryMock = ##class(vhTest.Mock.Prod.ProductRepository).%New() Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) + + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -82,7 +85,11 @@ Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","8765").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter,ProductRepositoryMock,,,BezwarenBepalerMock) + #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) @@ -143,7 +150,10 @@ Do ProductRepositoryMock.VerwachtMethodCall("BestaatViaID","4321").DanReturn($$$True) Do ProductRepositoryMock.VerwachtMethodCall("GeefViaID","4321").DanReturn(ProductDummy) - Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock) + Set BezwarenBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New() + Do BezwarenBepalerMock.IndienMethodCall("GeefBezwaren",$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New()) + + Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub,ProductRepositoryMock,,,BezwarenBepalerMock) #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID") Do $$$AssertEquals(Response,Antwoord) Index: vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml =================================================================== diff -u --- vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml (revision 0) +++ vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml (revision 47950) @@ -0,0 +1,18 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn. +Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +1 +AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler + + +%ListOfDataTypes + + + + + + Index: vhTest/Mock/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml =================================================================== diff -u --- vhTest/Mock/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml (revision 0) +++ vhTest/Mock/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler.cls.xml (revision 47950) @@ -0,0 +1,20 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig. +Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +1 +AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler,Tools.Mock.MockClassBase +right + + +Bericht:AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut +%ListOfDataTypes + + + + + +