Index: DOM/PM/Maatwerk/Calc/HF/impl/BewerkingsInfoRepository.cls.xml
===================================================================
diff -u -r29059 -r62754
--- DOM/PM/Maatwerk/Calc/HF/impl/BewerkingsInfoRepository.cls.xml (.../BewerkingsInfoRepository.cls.xml) (revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/BewerkingsInfoRepository.cls.xml (.../BewerkingsInfoRepository.cls.xml) (revision 62754)
@@ -208,6 +208,12 @@
Set BewerkingsInfo = ##class(DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo).%New(..GeefFamilie(),..GeefVariant(),ProductKenmerkenSet.ProductID,..BewerkingDimensie,BewerkingCalculator,,GeldigVan,GeldigTot)
}
+ Set EventData = ##class(TECH.Events.BewerkingsInfoGemaaktEventData).%New()
+ Set EventData.BewerkingsInfo = BewerkingsInfo
+ Set Event = ##class(TECH.Events.BewerkingsInfoGemaaktEvent).%New(EventData)
+
+ Do ##class(TECH.Context).Instance().GeefPubSubAPI().GeefEventRaiser().RaiseEventAsync(Event)
+
Do BewerkingsInfo.Save()
]]>
Index: DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/impl/BewerkingsInfo/EventListener.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/impl/BewerkingsInfo/EventListener.cls.xml (revision 0)
+++ DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/impl/BewerkingsInfo/EventListener.cls.xml (revision 62754)
@@ -0,0 +1,27 @@
+
+
+
+
+1
+TECH.RegisteredObject
+
+
+1
+Event:TECH.Events.BewerkingsInfoGemaaktEvent
+
+
+
+
+1
+
+
+
+
+
+
Index: DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml (revision 0)
+++ DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml (revision 62754)
@@ -0,0 +1,19 @@
+
+
+
+TECH.Persistentie.impl.Repository,TECH.Mockable,DOM.PM.Maatwerk.Syncs.DotNet.MaatwerkCalculator.Data.BewerkingsInfoRepository
+
+
+%String
+DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo
+
+
+
+TECH.Iterator
+
+
+
+
+
+
Index: vhTest/Mock/DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml
===================================================================
diff -u
--- vhTest/Mock/DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml (revision 0)
+++ vhTest/Mock/DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml (revision 62754)
@@ -0,0 +1,77 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+1
+DOM.PM.Maatwerk.Syncs.DotNet.MaatwerkCalculator.Data.impl.BewerkingsInfoRepository,vhTest.Mock.DOM.PM.Maatwerk.Syncs.DotNet.MaatwerkCalculator.Data.BewerkingsInfoRepository
+right
+
+
+Gateway:TECH.Persistent.Gateway="",QueryAPI:TECH.Query.QueryAPI=""
+%Status
+
+
+
+
+ID:%String
+%Boolean
+
+
+
+
+Data:TECH.Persistent
+
+
+
+
+Data:TECH.Persistent,Deep:%Boolean=0
+TECH.Persistent
+
+
+
+
+TECH.Iterator
+
+
+
+
+ID:%String
+TECH.Persistent
+
+
+
+
+TECH.Persistent
+
+
+
+
+ID:%String
+
+
+
+
+Data:TECH.Persistent
+
+
+
+
+TECH.Iterator
+
+
+
+
+
+
Index: DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/impl/BewerkingsInfo.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/impl/BewerkingsInfo.cls.xml (revision 0)
+++ DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/impl/BewerkingsInfo.cls.xml (revision 62754)
@@ -0,0 +1,229 @@
+
+
+
+TECH.RegisteredObject
+
+
+%SQLGatewayConnection
+1
+
+
+
+vhLib.Logger
+1
+
+
+
+TECH.DateTime.impl.DateTimeAPI
+1
+
+
+
+%Library.Status
+
+
+
+
+BewerkingsInfo:DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo
+
+
+
+
+BewerkingsInfo:DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo
+ Strings toevoegen in intostuk en valuesstuk
+ If ((PropertyNaam = "GeldigVan") || (PropertyNaam = "GeldigTot")) {
+ Set Waarde = ..DateTimeAPI.HorologToTimeStamp(Waarde)
+ }
+ Set IntoStuk = IntoStuk _ "," _ PropertyNaam
+ Set ValuesStuk = ValuesStuk _ "," _ Waarde _ ""
+ }
+
+ }
+ Set IntoStuk = IntoStuk _ ") "
+ Set ValuesStuk = ValuesStuk _ "); "
+
+ #dim Statement As %String = IntoStuk _ ValuesStuk
+
+ // Tweede ronde: properties van de afgeleide klasse
+ // We gebruiken SCOPE_IDENTITY() voor de foreign key, dit is de autogenerated ID
+ // van de eerste INSERT. De scope is hier de batch van queries
+ // (2 inserts gescheiden door ;).
+ Set IntoStuk = "INSERT INTO " _ ..GeefBewerkingInfotabelNaam() _ " (BewerkingCalculator_Id,Versie,LaatstAangepast"
+ Set ValuesStuk = "VALUES (SCOPE_IDENTITY()"_"," _ 1 _ ",'" _ ..GeefHuidigeTimeStamp()_"'"
+
+ Set PropertiesIterator = ##class(TECH.ListIterator).%New(BewerkingsInfoKlasse.Properties)
+ while (PropertiesIterator.HasNext()) {
+ Set Property = PropertiesIterator.Next()
+
+ Set PropertyNaam = Property.Name
+ Set Waarde = $zobjproperty(BewerkingsInfo, PropertyNaam)
+ Continue:((PropertyNaam = "BewerkingsCalculator") || (PropertyNaam = "%Concurrency") || (PropertyNaam = "%%OID"))
+ If (Waarde '= "") {
+ Set IntoStuk = IntoStuk _ ", " _ PropertyNaam
+ Set ValuesStuk = ValuesStuk _ ", '" _ Waarde _ "'"
+ }
+ }
+
+ Set IntoStuk = IntoStuk _ ") "
+ Set ValuesStuk = ValuesStuk _ ")"
+ Set Statement = Statement _ IntoStuk _ ValuesStuk
+
+ Do ..VoeruitSql(Statement)
+]]>
+
+
+
+BewerkingsInfo:DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo
+
+
+
+
+1
+%String
+
+
+
+
+1
+%String
+
+
+
+
+Statement:%String
+%ResultSet
+
+
+
+
+BewerkingsInfo:DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo
+1
+%Integer
+
+
+
+
+BewerkingsInfo:DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo
+1
+%String
+
+
+
+
+BewerkingsInfo:DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo
+1
+%Decimal
+
+
+
+
+1
+%TimeStamp
+
+
+
+
+
+
Index: vhTest/Fake/DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml
===================================================================
diff -u
--- vhTest/Fake/DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml (revision 0)
+++ vhTest/Fake/DOM/PM/Maatwerk/Syncs/DotNet/MaatwerkCalculator/Data/impl/BewerkingsInfoRepository.cls.xml (revision 62754)
@@ -0,0 +1,75 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+1
+DOM.PM.Maatwerk.Syncs.DotNet.MaatwerkCalculator.Data.impl.BewerkingsInfoRepository
+
+
+ID:%String
+%Boolean
+
+
+
+
+Data:TECH.Persistent
+
+
+
+
+Data:TECH.Persistent,Deep:%Boolean=0
+TECH.Persistent
+
+
+
+
+TECH.Iterator
+
+
+
+
+TECH.Iterator
+
+
+
+
+ID:%String
+TECH.Persistent
+
+
+
+
+TECH.Persistent
+
+
+
+
+ID:%String
+
+
+
+
+Data:TECH.Persistent
+
+
+
+
+TECH.Iterator
+
+
+
+
+
+