Index: development/models/mat/MAT Configurator,1.0.0.trl
===================================================================
diff -u
--- development/models/mat/MAT Configurator,1.0.0.trl (revision 0)
+++ development/models/mat/MAT Configurator,1.0.0.trl (revision 2435)
@@ -0,0 +1,727 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
\ No newline at end of file
Index: development/models/mat/MAT Configurator,1.0.0.mtd
===================================================================
diff -u
--- development/models/mat/MAT Configurator,1.0.0.mtd (revision 0)
+++ development/models/mat/MAT Configurator,1.0.0.mtd (revision 2435)
@@ -0,0 +1,24 @@
+
+
+
+
+
+
+ The SQL Server uniqueidentifier data type
+
+ uniqueidentifier
+
+
+
+
+
+ String
+
+
+
+
+
+
+
+
+
\ No newline at end of file
Index: development/models/mat/MAT Configurator,1.0.0.xml
===================================================================
diff -u -r2430 -r2435
--- development/models/mat/MAT Configurator,1.0.0.xml (.../MAT Configurator,1.0.0.xml) (revision 2430)
+++ development/models/mat/MAT Configurator,1.0.0.xml (.../MAT Configurator,1.0.0.xml) (revision 2435)
@@ -1,36 +1,36 @@
-
+
-
+
-
+
-
+
-
+
-
+
@@ -45,18 +45,18 @@
-
+
-
+
-
+
-
+
@@ -81,7 +81,7 @@
-
+
@@ -106,7 +106,7 @@
-
+
@@ -119,10 +119,10 @@
-
+
-
+
@@ -132,7 +132,7 @@
-
+
@@ -142,7 +142,7 @@
-
+
@@ -155,10 +155,10 @@
-
+
-
+
@@ -184,24 +184,28 @@
-
-
-
-
-
+
+
+
+
+
+
+
+
+
-
+
-
+
@@ -215,7 +219,7 @@
-
+
@@ -229,17 +233,17 @@
-
+
-
+
-
+
@@ -251,7 +255,7 @@
-
+
@@ -272,7 +276,7 @@
-
+
@@ -281,7 +285,7 @@
-
+
@@ -292,7 +296,7 @@
-
+
@@ -303,23 +307,23 @@
-
+
-
+
-
+
-
+
-
+
@@ -334,11 +338,11 @@
-
+
-
+
@@ -373,7 +377,7 @@
-
+
@@ -388,10 +392,10 @@
-
+
-
+
@@ -400,7 +404,7 @@
-
+
@@ -415,27 +419,27 @@
-
+
-
+
-
+
-
+
-
+
-
+
-
+
@@ -456,11 +460,11 @@
-
+
-
+
-
+
@@ -469,7 +473,7 @@
-
+
@@ -495,7 +499,7 @@
-
+
@@ -521,7 +525,7 @@
-
+
@@ -539,7 +543,7 @@
-
+
@@ -560,10 +564,10 @@
-
+
-
+
@@ -579,7 +583,7 @@
-
+
@@ -592,17 +596,17 @@
-
+
-
+
-
+
@@ -619,7 +623,7 @@
-
+
@@ -633,10 +637,10 @@
-
+
-
+
@@ -649,38 +653,38 @@
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
@@ -689,20 +693,20 @@
-
+
-
+
-
+
-
+
-
+
@@ -1187,25 +1191,52 @@
STATE.BijhorendeLadeConfiguratieLoaded and (CONFIG.Database.Configurations.Name == CONFIG.BijhorendeLadeConfiguratie)
-STATE.BijhorendeLadeConfiguratieLoaded = false;
-
local string _Connection = GetSetting("data.connectionstring") + ";cache=false";
local string _Query = "SELECT propertyname, value FROM eCon.ConfigAnalyseProperties WHERE configid = '" + CONFIG.Database.Configurations.Id + "' AND propertyname LIKE 'Data.%'";
local boolean _Result;
+local string _ZijwandType;
CONFIG.Database.ConfigAnalyseProperties@options = {};
CONFIG.Database.ConfigAnalyseProperties@options = ExecuteOptionsQuery("CONFIG.Database.ConfigAnalyseProperties"; true; _Connection; _Query);
for i = 1 to len(CONFIG.Database.ConfigAnalyseProperties@options)
CONFIG.Database.ConfigAnalyseProperties = CONFIG.Database.ConfigAnalyseProperties@option(i)@id;
- aaaDebugInfo = CONFIG.Database.ConfigAnalyseProperties.PropertyName;
+
+ if (CONFIG.Database.ConfigAnalyseProperties.PropertyName == "Data.Kenmerken.Zijwandtype") then
+ _ZijwandType = CONFIG.Database.ConfigAnalyseProperties.Value;
+ end if;
+end for;
+
+for i = 1 to len(CONFIG.Database.ConfigAnalyseProperties@options)
+ CONFIG.Database.ConfigAnalyseProperties = CONFIG.Database.ConfigAnalyseProperties@option(i)@id;
+
if (CONFIG.Database.ConfigAnalyseProperties.PropertyName in CONFIG.Defaults.BijhorendeLadeConfiguratie@options) then
- _Result = SetValue(CONFIG.Database.ConfigAnalyseProperties.PropertyName; CONFIG.Database.ConfigAnalyseProperties.Value);
+ if (CONFIG.Database.ConfigAnalyseProperties.PropertyName == "Data.Kenmerken.Variant") then
+ aaaDebugInfo = CONFIG.Database.ConfigAnalyseProperties.PropertyName;
+ if (CONFIG.Database.ConfigAnalyseProperties.Value == "LBX") then
+ if (_ZijwandType == "Free") then
+ DATA.Kenmerken.LadeType = "LegraboxFree";
+ else
+ DATA.Kenmerken.LadeType = "LegraboxPure";
+ end if;
+ end if;
+ if (CONFIG.Database.ConfigAnalyseProperties.Value == "MVX") then
+ DATA.Kenmerken.LadeType = "Merivobox";
+ end if;
+ if (CONFIG.Database.ConfigAnalyseProperties.Value == "TAX") then
+ DATA.Kenmerken.LadeType = "Taorbox";
+ end if;
+ if (CONFIG.Database.ConfigAnalyseProperties.Value == "TBX") then
+ DATA.Kenmerken.LadeType = "Tandembox";
+ end if;
+ else
+ _Result = SetValue(CONFIG.Database.ConfigAnalyseProperties.PropertyName; CONFIG.Database.ConfigAnalyseProperties.Value);
+ end if;
end if;
end for;
BijhorendeLadeConfiguratie:: Properties ophalen op basis van ConfigId
- ;state.bijhorendeladeconfiguratieloaded@value;config.database.configanalyseproperties@options;
+ ;config.database.configanalyseproperties@options;
(CONFIG.ReferentieConfiguratie <> "") and (CONFIG.InputMode <> "Edit")
@@ -1349,7 +1380,8 @@
true
-
+ local string _DummyTrigger = UI.Kenmerken.Materiaal;
+
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.Materiaal = GetArg("data;kenmerken;materiaal");
else
@@ -1428,6 +1460,7 @@
true
+local string _DummyTrigger = DATA.Kenmerken.Materiaal;
local boolean _HeeftMatAntislipFlockKleur = (DATA.Kenmerken.Materiaal == "AZ");
UI.Kenmerken.MatAntislipFlockKleur@visible = _HeeftMatAntislipFlockKleur;
@@ -1496,6 +1529,7 @@
true
+local string _DummyTrigger = DATA.Kenmerken.Materiaal;
local boolean _HeeftMatAntislipFiberKleur = (DATA.Kenmerken.Materiaal == "AF");
UI.Kenmerken.MatAntislipFiberKleur@visible = _HeeftMatAntislipFiberKleur;
@@ -1563,6 +1597,7 @@
true
+local string _DummyTrigger = DATA.Kenmerken.Materiaal;
local boolean _HeeftMatVinylFiberglassKleur = (DATA.Kenmerken.Materiaal == "CF");
UI.Kenmerken.MatVinylFiberglassKleur@visible = _HeeftMatVinylFiberglassKleur;
@@ -1665,7 +1700,7 @@
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.LadeType = GetArg("data;kenmerken;ladetype");
else
- if not(BEHAVIOR.OperationMode == "AxCreate") then
+ if (not(BEHAVIOR.OperationMode == "AxCreate") and not(STATE.BijhorendeLadeConfiguratieLoaded)) then
DATA.Kenmerken.LadeType = UI.Kenmerken.LadeType;
end if;
end if;
@@ -1698,7 +1733,7 @@
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.IsBinnenBreedte = CBool(GetArg("data;kenmerken;isbinnenbreedte"));
else
- if not(BEHAVIOR.OperationMode == "AxCreate") then
+ if (not(BEHAVIOR.OperationMode == "AxCreate")and not(STATE.BijhorendeLadeConfiguratieLoaded)) then
DATA.Kenmerken.IsBinnenBreedte = UI.Kenmerken.IsBinnenBreedte;
end if;
end if;
@@ -1738,7 +1773,7 @@
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.CorpusWanddikte = CDbl(Replace(GetArg("data;kenmerken;corpuswanddikte");".";","));
else
- if not(BEHAVIOR.OperationMode == "AxCreate") then
+ if (not(BEHAVIOR.OperationMode == "AxCreate") and not(STATE.BijhorendeLadeConfiguratieLoaded)) then
DATA.Kenmerken.CorpusWanddikte = UI.Kenmerken.CorpusWanddikte;
end if;
end if;
@@ -1809,7 +1844,7 @@
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.CorpusBreedte = CDbl(Replace(GetArg("data;kenmerken;corpusbreedte");".";","));
else
- if not(BEHAVIOR.OperationMode == "AxCreate") then
+ if (not(BEHAVIOR.OperationMode == "AxCreate") and not(STATE.BijhorendeLadeConfiguratieLoaded)) then
DATA.Kenmerken.CorpusBreedte = UI.Kenmerken.CorpusBreedte;
end if;
end if;
@@ -1856,7 +1891,7 @@
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.HeeftOpvullijstLinks = CBool(GetArg("data;kenmerken;heeftopvullijstlinks"));
else
- if not(BEHAVIOR.OperationMode == "AxCreate") then
+ if (not(BEHAVIOR.OperationMode == "AxCreate") and not(STATE.BijhorendeLadeConfiguratieLoaded)) then
DATA.Kenmerken.HeeftOpvullijstLinks = UI.Kenmerken.HeeftOpvullijstLinks;
end if;
end if;
@@ -1888,7 +1923,7 @@
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.HeeftOpvullijstRechts = CBool(GetArg("data;kenmerken;heeftopvullijstrechts"));
else
- if not(BEHAVIOR.OperationMode == "AxCreate") then
+ if (not(BEHAVIOR.OperationMode == "AxCreate") and not(STATE.BijhorendeLadeConfiguratieLoaded)) then
DATA.Kenmerken.HeeftOpvullijstRechts = UI.Kenmerken.HeeftOpvullijstRechts;
end if;
end if;
@@ -2117,7 +2152,7 @@
if (BEHAVIOR.InvullenDATAKenmerkenViaGetArgs) then
DATA.Kenmerken.LadeDiepte = GetArg("data;kenmerken;ladediepte");
else
- if not(BEHAVIOR.OperationMode == "AxCreate") then
+ if (not(BEHAVIOR.OperationMode == "AxCreate") and not(STATE.BijhorendeLadeConfiguratieLoaded)) then
DATA.Kenmerken.LadeDiepte = UI.Kenmerken.LadeDiepte;
end if;
end if;
@@ -2669,6 +2704,12 @@
;state.startmaatwerkviewer@value;state.maatwerkviewerserviceloaded@value;ui.mwviewer.outputfilepath@value;
+
+ STATE.BijhorendeLadeConfiguratieLoaded
+ STATE.BijhorendeLadeConfiguratieLoaded = false;
+ BijhorendeLadeConfiguratieLoaded
+ ;state.bijhorendeladeconfiguratieloaded@value;
+