Index: APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml =================================================================== diff -u -r72928 -r74557 --- APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml (.../PickingOnderdelen.cls.xml) (revision 72928) +++ APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml (.../PickingOnderdelen.cls.xml) (revision 74557) @@ -104,8 +104,11 @@ #dim FileException As TECH.Exceptions.FileException #dim GeneralErrorException As TECH.Exceptions.FileException #dim Omschrijving As %String + #dim MesFaseActief As %Integer = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Halux.PPS.Document.impl.BatchNaarObjective_MESFase") + #dim MagDocumentVoorLBX As %Boolean = (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) && (MesFaseActief < 2) + #dim MagDocumentVoorTAX As %Boolean = (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) - If (##class(TECH.StringUtils).Equals(..Batch.GeefCategorie(), ##class(APPS.Halux.common.enu.Categorie).Legrabox(), ##class(APPS.Halux.common.enu.Categorie).TAORbox())) { + If (MagDocumentVoorLBX || MagDocumentVoorTAX) { While ToeleveringenIterator.HasNext() { #dim Toelevering As DOM.AKP.Toelevering = ToeleveringenIterator.Next() Index: APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml =================================================================== diff -u -r72627 -r74557 --- APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml (.../OnderdelenPicking.cls.xml) (revision 72627) +++ APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml (.../OnderdelenPicking.cls.xml) (revision 74557) @@ -211,7 +211,11 @@ #dim VermeldOmschrijvingEnKorttekst As %Boolean = ('$IsObject(DataVoorVorigeLijn) || IsTussenlijnNodig) Do ..VoegToeItem(DataVoorLijn,VermeldOmschrijvingEnKorttekst) - If ((ToeleveringIDVoorPCDataOnderdelenPickingDocument > 0) && (##class(TECH.StringUtils).Equals(..Batch.GeefCategorie(), ##class(APPS.Halux.common.enu.Categorie).TAORbox(), ##class(APPS.Halux.common.enu.Categorie).Legrabox()))) { + #dim MesFaseActief As %Integer = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Halux.PPS.Document.impl.BatchNaarObjective_MESFase") + #dim MagDocumentVoorLBX As %Boolean = (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) && (MesFaseActief < 2) + #dim MagDocumentVoorTAX As %Boolean = (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) + + If ((ToeleveringIDVoorPCDataOnderdelenPickingDocument > 0) && (MagDocumentVoorLBX || MagDocumentVoorTAX)) { Do ..ZetDataVoorPCDataOnderdelenPickingDocument(DataVoorLijn, ToeleveringIDVoorPCDataOnderdelenPickingDocument) } Set DataVoorVorigeLijn = DataVoorLijn Index: vhUnitTest/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen/TestGenereerDocumenten.cls.xml =================================================================== diff -u -r72204 -r74557 --- vhUnitTest/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen/TestGenereerDocumenten.cls.xml (.../TestGenereerDocumenten.cls.xml) (revision 72204) +++ vhUnitTest/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen/TestGenereerDocumenten.cls.xml (.../TestGenereerDocumenten.cls.xml) (revision 74557) @@ -9,7 +9,7 @@ #dim Toelevering As DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).ToeleveringMetLijn() Set BatchMock = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() - Do BatchMock.VerwachtMethodCall("GeefCategorie").DanReturn(BatchCategorie).ExactAantalKeer(1) + Do BatchMock.VerwachtMethodCall("GeefCategorie").DanReturn(BatchCategorie).ExactAantalKeer(2) Do BatchMock.VerwachtMethodCall("GeefToeleveringIterator").DanReturn(##class(TECH.ListUtils).CreateIteratorOfObjects(Toelevering)) @@ -26,7 +26,7 @@ #dim Toelevering As DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).ToeleveringMetLijn() Set BatchMock = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() - Do BatchMock.VerwachtMethodCall("GeefCategorie").DanReturn(BatchCategorie).ExactAantalKeer(1) + Do BatchMock.VerwachtMethodCall("GeefCategorie").DanReturn(BatchCategorie).ExactAantalKeer(2) Do BatchMock.VerwachtMethodCall("GeefToeleveringIterator").DanReturn(##class(TECH.ListUtils).CreateIteratorOfObjects(Toelevering)) @@ -45,8 +45,8 @@ Set BatchMock = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() Do BatchMock.VerwachtMethodCall("GeefCategorie").DanReturn(BatchCategorie) - Do BatchMock.VerwachtMethodCall("GeefLijn").DanReturn("1").ExactAantalKeer(1) - Do BatchMock.VerwachtMethodCall("GeefID").DanReturn("1000").ExactAantalKeer(4) + Do BatchMock.IndienMethodCall("GeefLijn").DanReturn("1") + Do BatchMock.IndienMethodCall("GeefID").DanReturn("1000") Do BatchMock.VerwachtMethodCall("GeefToeleveringIterator").DanReturn(##class(TECH.ListUtils).CreateIteratorOfObjects(Toelevering))