TECH.RegisteredObject,DOM.PM.ProductBeheerBulkAPI APPS.PM.OL.ProductKenmerkenOpkuiser 1 ProductKenmerkenOpkuiser:APPS.PM.OL.ProductKenmerkenOpkuiser="" 1 1 %Status 1 ZetKenmerWaarden voor de opgegeven ProductenKenmerken:APPS.PM.dto.Kenm.ProductenKenmerken %String 0) { Set KenmerkenModifiedEvent = ##class(TECH.Events.KenmerkenModifiedEvent).%New(KenmerkenModifiedEventData) Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventSync(KenmerkenModifiedEvent) } #dim Rapport As %String = "" If GefaaldeProductIDs.Count() > 0 { Set Rapport = Rapport_"Het bewaren van kenmerken is gedeeltelijk gelukt."_$C(13,10) Set Rapport = Rapport_"Gelukt: product(en) "_##class(TECH.ListUtils).ListToPieces(GelukteProductIDs,",")_$C(13,10) Set Rapport = Rapport_"Niet gelukt: product(en) "_##class(TECH.ListUtils).ListToPieces(GefaaldeProductIDs,",") } Quit Rapport ]]> ProductID:%String,KenmerkGroepNaam:%String 1 DOM.PM.ProductKenmerkenSets