Index: APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder.cls.xml
===================================================================
diff -u -r54542 -r54543
--- APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder.cls.xml (.../PassageDefinitieDefinieerder.cls.xml) (revision 54542)
+++ APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder.cls.xml (.../PassageDefinitieDefinieerder.cls.xml) (revision 54543)
@@ -20,7 +20,7 @@
@@ -30,85 +30,85 @@
Code gegenereerd uit excel, zie sharepoint
1
@@ -121,8 +121,9 @@
Set ..DataDefinitie.Concept = ##class(DOM.PM.enu.TAORConcept).DisplayToLogical(Concept)
Set ..DataDefinitie.Decor = ##class(APPS.Halux.PPS.enu.TAORDecor).DisplayToLogical(Decor)
Set ..DataDefinitie.Rol = Rol
- set ..DataDefinitie.LadeHoogte = LadeHoogte
- quit $this
+ Set ..DataDefinitie.LadeHoogte = LadeHoogte
+
+ Quit $this
]]>
@@ -136,6 +137,7 @@
Set ..DataDefinitie.MoetKantellen = +MoetKantellen
Set ..DataDefinitie.Uitgang = Uitgang
Set ..DataDefinitie.GUID = ..#GUID
+
Do ..DataDefinitie.Save()
]]>