Index: svn/Deploy.cls.xml
===================================================================
diff -u -r1749 -r1774
--- svn/Deploy.cls.xml (.../Deploy.cls.xml) (revision 1749)
+++ svn/Deploy.cls.xml (.../Deploy.cls.xml) (revision 1774)
@@ -14,6 +14,11 @@
0
+
+%Boolean
+1
+
+
1
1
@@ -44,6 +49,9 @@
if (..#DoetDataWijzigingen) && ('##class(TECH.Config.ConfigMgr).Instance().GetBoolean("OmgevingMetData")) {
set ExecuteCode = 0
}
+ if ExecuteCode && ##class(TECH.Config.ConfigMgr).Instance().GeefOmgeving()="PROD" {
+ set ExecuteCode = ..#ProductieWaardig
+ }
if ExecuteCode {
write ..%ClassName(1)," - ",..#Omschrijving," - wordt uitgevoerd ",!
Try {
@@ -62,9 +70,8 @@
do ##class(vhLib.Logger).LogEnMailExceptie(Exception)
}
}
- }
-
- quit
+}
+quit
]]>