Index: Prod/Kenmerk/DataDefinitieRepository.cls.xml =================================================================== diff -u -r63402 -r63412 --- Prod/Kenmerk/DataDefinitieRepository.cls.xml (.../DataDefinitieRepository.cls.xml) (revision 63402) +++ Prod/Kenmerk/DataDefinitieRepository.cls.xml (.../DataDefinitieRepository.cls.xml) (revision 63412) @@ -4,6 +4,12 @@ 1 TECH.Interface + +1 +UnID:%String,KenmerkGroep:%String +TECH.Iterator + + TECH.Iterator Index: Prod/Kenmerk/impl/DataDefinitieRepository.cls.xml =================================================================== diff -u -r63402 -r63412 --- Prod/Kenmerk/impl/DataDefinitieRepository.cls.xml (.../DataDefinitieRepository.cls.xml) (revision 63402) +++ Prod/Kenmerk/impl/DataDefinitieRepository.cls.xml (.../DataDefinitieRepository.cls.xml) (revision 63412) @@ -8,6 +8,13 @@ Prod.Kenmerk.DataDefinitie + +UnID:%String,KenmerkGroep:%String +TECH.Iterator + + + TECH.Iterator + + +TECH.RegisteredObject + + +%SQLGatewayConnection +1 + + + +vhLib.Logger +1 + + + +TECH.DateTime.impl.DateTimeAPI +1 + + + +Prod.Kenmerk.impl.DataDefinitieRepository +1 + + + +%Library.Status + + + + +TeControlerenUnId,BewerkteKenmerkGroep + + + + +UnID:%String,KenmerkGroep:%String +1 + + + + +UnID:%String,KenmerkGroep:%String +1 + + + + +UnID:%String,KenmerkGroep:%String +1 + + + + +UnID:%String,KenmerkGroep:%String +1 + + + +1 +%String + + + + +1 +%String + + + + +Rolstukje:%String,Variant:%String +1 +%String + + + + +Statement:%String +%ResultSet + + + + + + Index: APPS/PM/KenmMWFPlugin.cls.xml =================================================================== diff -u -r62549 -r63412 --- APPS/PM/KenmMWFPlugin.cls.xml (.../KenmMWFPlugin.cls.xml) (revision 62549) +++ APPS/PM/KenmMWFPlugin.cls.xml (.../KenmMWFPlugin.cls.xml) (revision 63412) @@ -96,6 +96,9 @@ Do ##class(vhLib.Logger).%New(..#ApplicatieNaam).ErrorMail("Kon halffabs niet maken voor product "_UnID,Exception.ToString()) Do ##class(TECH.ExceptionHandler).Rethrow(Exception) } + If (..GeefProductGroep(KenmerkGroep) = "MVX") { + Do ##class(DOM.PM.Maatwerk.Syncs.DotNet.MaatwerkCalculator.impl.VerwijderKenmerken).%New().VerwijderKenmerkenInDotNetIndienNodig(UnID, KenmerkGroep) + } } ]]> @@ -107,6 +110,7 @@ #dim HeeftEenHalffabGemaakt As %Boolean = 0 #dim HalffabClassName As %String = ..GeefHalffabClassNameVoor(KenmerkGroep) #dim SQLTableName As %String = ..GeefSQLTableNameVoorHalffabKlasse(HalffabClassName) + #dim IsMVXKenmerk As %Boolean = (..GeefProductGroep(KenmerkGroep) = "MVX") Set HalffabObjecten = ##class(%ListOfObjects).%New() Do HalffabObjecten.Insert($zobjclassmethod(HalffabClassName,"%New",$P(UnID,"."))) @@ -168,8 +172,10 @@ Do Halffab.Save() Do EventData.Halffabs.Insert(Halffab) } - Set Event = ##class(TECH.Events.HalffabsGemaaktEvent).%New(EventData) - Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventAsync(Event) + If (IsMVXKenmerk) { + Set Event = ##class(TECH.Events.HalffabsGemaaktEvent).%New(EventData) + Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventAsync(Event) + } } Lock -^HalffabSelectie(SQLTableName)