Index: vhDeploy/Maatwerk/TAOR/AansturingIncrementeel.cls.xml =================================================================== diff -u -r64063 -r64064 --- vhDeploy/Maatwerk/TAOR/AansturingIncrementeel.cls.xml (.../AansturingIncrementeel.cls.xml) (revision 64063) +++ vhDeploy/Maatwerk/TAOR/AansturingIncrementeel.cls.xml (.../AansturingIncrementeel.cls.xml) (revision 64064) @@ -62,9 +62,9 @@ ; 14.06.2014 : tijdelijke tryout stuff - als je dit tegenkomt na 01.07.2015 trek maar aan de oren van JCL ; 25.04.2016 : TVE heeft publiekelijk aan de oren getrokken van JCL Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).%DeleteExtent() - Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).MaakActie(Categorie,"Opdeelzaag machine data",0,999,ActiviteitGroepProductie,,"Dummy","TAOR.*.Opdeelzaag","") - Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).MaakActie(Categorie,"Kantenband machine data",0,98,ActiviteitGroepProductie,,"Dummy","TAOR.*.Kantenband","") - Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).MaakActie(Categorie,"Bodemslicing machine data",0,97,ActiviteitGroepProductie,,"Dummy","TAOR.*.Slicing","") + Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).MaakActie(Categorie,"Opdeelzaag machine data", ..#IsNietMogelijkZonderBatch, 999,ActiviteitGroepProductie, ..#IsStandaardActie, "Dummy","TAOR.*.Opdeelzaag","") + Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).MaakActie(Categorie,"Kantenband machine data", ..#IsNietMogelijkZonderBatch, 98,ActiviteitGroepProductie, ..#IsStandaardActie, "Dummy","TAOR.*.Kantenband","") + Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).MaakActie(Categorie,"Bodemslicing machine data", ..#IsNietMogelijkZonderBatch, 97,ActiviteitGroepProductie, ..#IsStandaardActie, "Dummy","TAOR.*.Slicing","") // Volgnummers: Kantenband moet vóór Zijkanten uitgevoerd worden (moet dus kleiner dan 100 zijn); Opdeelzaag moet als laatste (bvb. 999) @@ -73,6 +73,14 @@ Do ..ZetActieAlsNietStandaard(ActieID) Set ActieID = ..MaakOfVervangOudeAansturingActie("ReworkUitvoeren", Categorie, "Uitvoeren Rework", ..#IsNietMogelijkZonderBatch, ActiviteitGroepProductie) Do ..ZetActieAlsNietStandaard(ActieID) + + // Ooit (in 2016) werd de AansturingActie voor "PalletEtiketZonderLogo" toegevoegd voor TAX in de deploy-klasse vhDeploy.Deploy20160429xPalletEtiketZonderLogoAansturingActie + // Nu hier toegevoegd in TAOR.AansturingIncrementeel + Do ..MaakOfVervangOudeAansturingActie("PalletEtiketZonderLogo", Categorie, "Palletetiket zonder logo", ..#IsMogelijkZonderBatch, ActiviteitGroepProductie, ..#IsGeenStandaardActie, 608) + + #dim VolgNummerFixed As %Integer = 1 // Te onderzoeken: welk effect als de volgnummers van de AansturingActies opschuiven? (ook rekening houden met de integratietesten ! ) + #dim OverzichtBatchID As %String = ..MaakOfGeefActiviteitID(ActiviteitGroepProductie, "TAOR.OverzichtBatch") + Do ..MaakOfVervangOudeAansturingActie("OverzichtBatch", Categorie, "Overzicht batch", ..#IsNietMogelijkZonderBatch, ActiviteitGroepProductie, ..#IsGeenStandaardActie, VolgNummerFixed) ]]>