Prod.Product,BL.Derde.LevSpecifiek %RegisteredObject %Decimal %Decimal %String %String %String %String %String %String %String %String %String %String Flow.Toelev.Lijn AXimpl.PM.Kenmerk.Kenmerken DOM.PM.MaatwerkProduct DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken APPS.Halux.Planning.Resource.dto.ResourceLijn ProductieOrderLijn:Flow.Toelev.Lijn %Status PRNr ProductieOrderLijn:Flow.Toelev.Lijn 1 1 Resourcegroep:%String,Resource:%String,Activiteit:%String,Productgroep:%String,Selector:%String="",DefaultTijd:%Decimal=66,IsLeading:%Integer=0 0 ;sommige tijden worden bewust op 0 gezet, zoals SPOELBAK/SYFON matten omdat deze door de werkpost van SPOELBAK/SyFON worden gemaakt. { Do ..ResourceLijn.Save() } Do ##class(APPS.Halux.Planning.Resource.impl.GebruikLogger).LogGebruik(..ResourceLijn) ]]> ToepassingCode:%String 1 DefaultTijd 20:1,1:2) } If AantalSneden { Set BSKey="" } Else { Set BSKey=$O(^PRBS("BS",..PRNr,BSKey)) } } Quit AantalSneden ]]>