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)
}
}
]]>