Index: APPS/Halux/PPS/impl/AansturingActie/common/VoormontageSpaceStep.cls.xml =================================================================== diff -u -r61890 -r61904 --- APPS/Halux/PPS/impl/AansturingActie/common/VoormontageSpaceStep.cls.xml (.../VoormontageSpaceStep.cls.xml) (revision 61890) +++ APPS/Halux/PPS/impl/AansturingActie/common/VoormontageSpaceStep.cls.xml (.../VoormontageSpaceStep.cls.xml) (revision 61904) @@ -31,15 +31,15 @@ APPS.Halux.PPS.dto.ActieResultaat 0 ) { #dim AantalSpaceSteps As %Integer = LijstMetSpaceSteps.Count() #dim ProductIterator = ##class(TECH.ListIterator).%New(LijstMetSpaceSteps) @@ -52,7 +52,7 @@ Do DocumentBundel.VoegToeDocument(..MaakDocument(Productkenmerken,HuidigSpacestepNr,AantalSpaceSteps*AantalPaginasPerSpaceStep)) Set HuidigSpacestepNr = (HuidigSpacestepNr * AantalPaginasPerSpaceStep) + 1 } - #dim Printer As APPS.common.Print.Printer = ..PrinterAPI.GeefPrinter(98) //MOET NOG AANGEPAKT WORDEN????????? + #dim Printer As APPS.common.Print.Printer = ..PrinterAPI.GeefPrinter(..GeefUitvoeringParameter(##class(APPS.Halux.PPS.enu.UitvoeringParameter).Printer())) //MOET NOG AANGEPAKT WORDEN????????? Do DocumentAfdrukker.DrukAfBundel(DocumentBundel,Printer) } Index: APPS/Halux/PPS/Activiteit/impl/LBX/VoormontageSpaceStep.cls.xml =================================================================== diff -u -r61872 -r61904 --- APPS/Halux/PPS/Activiteit/impl/LBX/VoormontageSpaceStep.cls.xml (.../VoormontageSpaceStep.cls.xml) (revision 61872) +++ APPS/Halux/PPS/Activiteit/impl/LBX/VoormontageSpaceStep.cls.xml (.../VoormontageSpaceStep.cls.xml) (revision 61904) @@ -1,7 +1,6 @@ -vhLib.Macro APPS.Halux.PPS.Activiteit.ProductieSequentieAwareActiviteit @@ -54,6 +53,13 @@ %Library.CacheStorage +VoormontageSpaceStepDefaultData + +"VoormontageSpaceStep" + +WerklijstItemMakerInput + + Index: APPS/Halux/PPS/Activiteit/ProductieSequentieAwareActiviteitGroep.cls.xml =================================================================== diff -u -r60225 -r61904 --- APPS/Halux/PPS/Activiteit/ProductieSequentieAwareActiviteitGroep.cls.xml (.../ProductieSequentieAwareActiviteitGroep.cls.xml) (revision 60225) +++ APPS/Halux/PPS/Activiteit/ProductieSequentieAwareActiviteitGroep.cls.xml (.../ProductieSequentieAwareActiviteitGroep.cls.xml) (revision 61904) @@ -73,7 +73,7 @@ #dim ExceptieLijst As TECH.ExceptionList = ##class(TECH.ExceptionList).%New() While (ActiviteitIterator.HasNext()) { #dim Activiteit As APPS.Halux.PPS.Activiteit.ProductieSequentieAwareActiviteit = ActiviteitIterator.Next() - If ($$$Not(Activiteit.GeefOmschrijving() = "TAORbox overzicht batch") && $$$Not(Activiteit.GeefOmschrijving() = "Legrabox overzicht batch") && $$$Not(Activiteit.GeefOmschrijving() = "Tandembox overzicht batch")) { + If ($$$Not(Activiteit.GeefOmschrijving() = "TAORbox overzicht batch") && $$$Not(Activiteit.GeefOmschrijving() = "Legrabox overzicht batch") && $$$Not(Activiteit.GeefOmschrijving() = "Tandembox overzicht batch") && $$$Not(Activiteit.GeefOmschrijving() = "Voormontage SpaceStep")) { Try { Do ##class(vhLib.Logger).%New().Debug("VerwerkProductieSequentieSubset", "Groep:'"_Activiteit.GeefActiviteitGroepID() _ "'; Code:'"_ Activiteit.GeefCode() _"'; Omschrijving: '"_ Activiteit.GeefOmschrijving() _"'") do Activiteit.VerwerkGroepSequentie(##this, ProductieSequentieSubset )