Index: vhTest/Mock/DOM/VKP/Bon.cls.xml =================================================================== diff -u -r59594 -r60828 --- vhTest/Mock/DOM/VKP/Bon.cls.xml (.../Bon.cls.xml) (revision 59594) +++ vhTest/Mock/DOM/VKP/Bon.cls.xml (.../Bon.cls.xml) (revision 60828) @@ -181,13 +181,6 @@ ]]> - -pieceNummer:%Integer -%String - - - %Boolean - -pieceNummer:%Integer,pieceWaarde:%String + +%String + + + + +pieceWaarde:%String %Boolean - Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper/Test.cls.xml =================================================================== diff -u -r59599 -r60828 --- vhUnitTest/AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper/Test.cls.xml (.../Test.cls.xml) (revision 59599) +++ vhUnitTest/AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper/Test.cls.xml (.../Test.cls.xml) (revision 60828) @@ -45,7 +45,7 @@ Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() Do OrderApiStub.IndienMethodCall("GeefBon","LIMA").DanReturn(BonMock) - Do BonMock.VerwachtMethodCall("GeefVlagHoofding", 63).ExactAantalKeer(0) + Do BonMock.VerwachtMethodCall("IsTweedeBerichtPakbonMagGeboektWordenVerzondenAX").ExactAantalKeer(0) #dim EventRaiserMock As DOM.MAG.event.EventRaiser = ##class(vhTest.Mock.DOM.MAG.event.EventRaiser).%New() Do EventRaiserMock.VerwachtMethodCall("RaisePakbonMagGeboektWordenEvent", CONSNr).ExactAantalKeer(0) @@ -78,7 +78,7 @@ Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() Do OrderApiStub.IndienMethodCall("GeefBon","LIMA").DanReturn(BonStub) Do BonStub.IndienMethodCall("GeefKlantID").DanReturn("LAURA") - Do BonStub.IndienMethodCall("GeefVlagHoofding", 63).DanReturn(Piece63Waarde) + Do BonStub.IndienMethodCall("IsTweedeBerichtPakbonMagGeboektWordenVerzondenAX").DanReturn(Piece63Waarde) #dim EventRaiserMock As DOM.MAG.event.EventRaiser = ##class(vhTest.Mock.DOM.MAG.event.EventRaiser).%New() Do EventRaiserMock.VerwachtMethodCall("RaisePakbonMagGeboektWordenEvent", CONSNr).ExactAantalKeer(AantalKeerPakbonEvent) Index: DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml =================================================================== diff -u -r59594 -r60828 --- DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml (.../DataMBonAbstract.cls.xml) (revision 59594) +++ DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml (.../DataMBonAbstract.cls.xml) (revision 60828) @@ -449,22 +449,16 @@ ]]> - -pieceNummer:%Integer,pieceWaarde:%String + +pieceWaarde:%String %Boolean - - -pieceNummer:%Integer + %String - Index: DOM/VKP/Bon.cls.xml =================================================================== diff -u -r59594 -r60828 --- DOM/VKP/Bon.cls.xml (.../Bon.cls.xml) (revision 59594) +++ DOM/VKP/Bon.cls.xml (.../Bon.cls.xml) (revision 60828) @@ -189,15 +189,14 @@ %Boolean - + 1 -pieceNummer:%Integer,pieceWaarde:%String +pieceWaarde:%String %Boolean - + 1 -pieceNummer:%Integer %String Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/Test.cls.xml =================================================================== diff -u -r59599 -r60828 --- vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/Test.cls.xml (.../Test.cls.xml) (revision 59599) +++ vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/Test.cls.xml (.../Test.cls.xml) (revision 60828) @@ -57,7 +57,7 @@ Do OrderApiStub.IndienMethodCall("GeefBon","LIMA").DanReturn(BonStub) Do BonStub.IndienMethodCall("GeefVerzendwijze").DanReturn(Verzendwijze) - Do BonStub.IndienMethodCall("GeefVlagHoofding", 63).DanReturn(Piece63waarde) + Do BonStub.IndienMethodCall("IsTweedeBerichtPakbonMagGeboektWordenVerzondenAX").DanReturn(Piece63waarde) #dim EventRaiserMock As DOM.MAG.event.EventRaiser = ##class(vhTest.Mock.DOM.MAG.event.EventRaiser).%New() Do EventRaiserMock.VerwachtMethodCall("RaisePakbonMagGeboektWordenEvent", Node3Leverbon).ExactAantalKeer(AantalKeerPakbonEvent) Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper/IsVerzendwijzeMetUitgesteldPakbonBoekenAxTest.cls.xml =================================================================== diff -u -r59599 -r60828 --- vhUnitTest/AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper/IsVerzendwijzeMetUitgesteldPakbonBoekenAxTest.cls.xml (.../IsVerzendwijzeMetUitgesteldPakbonBoekenAxTest.cls.xml) (revision 59599) +++ vhUnitTest/AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper/IsVerzendwijzeMetUitgesteldPakbonBoekenAxTest.cls.xml (.../IsVerzendwijzeMetUitgesteldPakbonBoekenAxTest.cls.xml) (revision 60828) @@ -26,7 +26,7 @@ Index: AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden.cls.xml =================================================================== diff -u -r59599 -r60828 --- AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden.cls.xml (.../BatchJobPakbonMagGeboektWorden.cls.xml) (revision 59599) +++ AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden.cls.xml (.../BatchJobPakbonMagGeboektWorden.cls.xml) (revision 60828) @@ -64,7 +64,7 @@ If IsVerzendwijzeUitgesteldPakbonBoekenAx { #dim Bon As DOM.VKP.Bon = ..OrderApi.GeefBon(Node3Leverbon) - #dim Piece63PakbonReedsGeboekt as %String = Bon.GeefVlagHoofding(63) + #dim Piece63PakbonReedsGeboekt as %String = Bon.IsTweedeBerichtPakbonMagGeboektWordenVerzondenAX() If ($$$HasLength(Piece63PakbonReedsGeboekt) = 0 ||Piece63PakbonReedsGeboekt = 0) { Quit ##class(AXimpl.Dynamics.InventoryOut.EventHandler.PakbonMagGeboektWordenHelper).%New(..EventRaiser, ..OrderApi).ManualPakbonMagGeboektWordenAfhandelaar(Node3Leverbon) Index: AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper.cls.xml =================================================================== diff -u -r59599 -r60828 --- AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper.cls.xml (.../PakbonMagGeboektWordenHelper.cls.xml) (revision 59599) +++ AXimpl/Dynamics/InventoryOut/EventHandler/PakbonMagGeboektWordenHelper.cls.xml (.../PakbonMagGeboektWordenHelper.cls.xml) (revision 60828) @@ -39,7 +39,7 @@ Quit $$$False } - #dim Piece63PakbonReedsGeboekt as %String = Bon.GeefVlagHoofding(63) + #dim Piece63PakbonReedsGeboekt as %String = Bon.IsTweedeBerichtPakbonMagGeboektWordenVerzondenAX() If (Piece63PakbonReedsGeboekt = 1) { Do ##class(vhLib.Logger).%New().Info("AXimpl.Dynamics.InventoryOut.EventHandler.PakbonMagGeboektWordenHelper", "Bon: "_Bonnummer_", Verzendwijze gewijzigd waarbij het de pakbon in Ax meteen geboekt mag worden maar dit werd al op een eerder moment uitgevoerd.") @@ -65,7 +65,7 @@ #dim Bon As DOM.VKP.Bon = ..OrderApi.GeefBon(Bonnummer) #dim VerzendwijzeID As DOM.VKP.enu.VerzendWijze = $$$Trim(Bon.GeefVerzendwijze()) #dim Verzendwijze As DOM.VKP.VerzendWijze = ##class(DOM.VKP.VerzendWijze).OpenId(VerzendwijzeID) - + If ($IsObject(Verzendwijze) && $$$IsNotNullOrEmpty(Verzendwijze.UitgesteldPakbonBoekenAx)) { Set VerzendwijzeUitgesteldVersturen = Verzendwijze.UitgesteldPakbonBoekenAx @@ -95,7 +95,7 @@ #dim Bon As DOM.VKP.Bon = ..OrderApi.GeefBon(Bonnummer) If ($IsObject(Bon)){ - Do Bon.ZetVlagHoofding(63, $$$True) + Do Bon.ZetVlagIsTweedeBerichtPakbonMagGeboektWordenVerzondenAX($$$True) } } ]]>