APPS.Halux.PPS.ALUFrees.WerkstukGroepVisitor,%RegisteredObject %Integer 0 %Integer 0 %Integer 0 ProductWerkstukGroep:APPS.Halux.PPS.ALUFrees.impl.Optimizer.ProductWerkstukGroep %Status ProfielWerkstukGroep:APPS.Halux.PPS.ALUFrees.impl.Optimizer.ProfielWerkstukGroep %Status ToeleveringWerkstukGroep:APPS.Halux.PPS.ALUFrees.impl.Optimizer.ToeleveringWerkstukGroep %Status %String 0{ Set Info = "Onvolledige toeleveringen, onvolledige deuren. (aantal profielen : "_..AantalProfielWerkstukGroep_")" }ElseIf ..AantalProductWerkstukGroep > 0 { Set Info = "Onvolledige toeleveringen, volledige deuren. (aantal deuren : "_..AantalProductWerkstukGroep_")" }ElseIf ..AantalToeleveringWerkstukGroep > 0 { Set Info = "Volledige toeleveringen. (aantal deuren : "_..AantalToeleveringWerkstukGroep_")" }Else{ Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Er kon geen info bepaald worden voor deze freesvoorbereiding. Er waren geen werkstukgroepen voor handen.")) } Quit Info ]]>