1 APPS.Halux.common.SequentieService,TECH.Mockable APPS.Halux.common.enu.ProductieGroep.AutoComplete 1 APPS.Halux.common.enu.Categorie.AutoComplete 1 APPS.Halux.common.impl.SequentieService.HoekprofielPositieBepaler 1 HoekprofielPositieBepaler:APPS.Halux.common.impl.SequentieService.HoekprofielPositieBepaler="" 1 1 %Status 1 BatchID:%Integer TECH.Iterator BatchID:%Integer %Boolean BatchID:%String APPS.Halux.common.ProductieSequentie BatchID:%String %Boolean 0) } Quit HeeftProductieSequentie ]]> BatchID:%String 1 xxxSequence = oldSchool , xxxSequentie = newSchool Batch:APPS.Halux.common.Batch Batch:APPS.Halux.common.Batch APPS.Halux.common.ProductieSequentie Batch:APPS.Halux.common.Batch,ProductieSequentie:APPS.Halux.common.ProductieSequentie 1 Batch:APPS.Halux.common.Batch 1 CR<", $Char(13, 10)) Do ##class(vhLib.Logger).%New("HALUX.VHOSS").Warning("BouwProductSequence", "Batch " _ Batch.GeefID() _ ": volgende lades zijn niet opgenomen in de productiesequentie: " _ MeldingVoorGebruiker) } } Else { Do blSequencer.BldLeanV1Sequence(.QtyLade) } Do OperatieScope.Gelukt() } Catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() If (Exception.IsMajor()) { Do OperatieScope.Gefaald() } Else { Do OperatieScope.Gelukt() } Do ##class(TECH.ExceptionHandler).Throw(Exception) } ]]> ActiviteitGroepDataLijst:%ListOfObjects,ProductieSequentie:APPS.Halux.common.ProductieSequentie,BatchID:%String Batch:APPS.Halux.common.Batch 1 %Boolean Batch:APPS.Halux.common.Batch 1 APPS.Halux.common.ProductieSequentie Batch:APPS.Halux.common.Batch Batch:APPS.Halux.common.Batch 1 Queue:DS.PPS.TBX.Queue 1 APPS.Halux.common.ProductieSequentieItem ProductID:%String 1 DS.PPS.TBX.sub.emWPLosOnderdeel ProductID:%String 1 DS.PPS.TBX.sub.emWPVerpak ProductieSequentieItemID:%String APPS.Halux.common.ProductieSequentieItem ProductieSequentieItemID:%String %Boolean ProductieSequentieItemID:%String %Boolean TAORbox:DOM.PM.TAORProduct.TAORLade 1 %String