Index: production/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.xml
===================================================================
diff -u
--- production/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.xml (revision 0)
+++ production/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.xml (revision 2918)
@@ -0,0 +1,8177 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ STATE.Initialized
+
+
+ Initialisatie
+ ;
+
+
+ true
+
+CONFIG.Backend = GetArg("backend"); // Voorlopig alleen "axapta", dus AX
+CONFIG.ProcessMode = GetArg("processmode"); // Alleen in AX : "Background" of "Interactive"
+CONFIG.Token = GetArg("vh_token"); // Alleen in Web : Token van Intracto
+CONFIG.Language = GetArg("language"); // Web en AX
+CONFIG.Initiator = GetArg("initiator"); // Alleen in AX
+
+CONFIG.Settings.IsBulkConfiguratie = CBool(GetArg("IsBulkConfiguratie")); // Web
+CONFIG.Settings.BulkConfiguratieId = GetArg("BulkConfiguratieId"); // Web
+CONFIG.Settings.GeselecteerdeIdsVoorBulk = GetArg("GeselecteerdeIdsVoorBulk"); // Web eerste character van deze string is de delimiter, de rest zijn de id's van de geselecteerde lades waarop de bulkwijzigingen moeten gebeuren.
+ // max 25 lades want web-url is beperkt tot 2048 tekens
+CONFIG.Settings.LadeIdBulkwijziging = GetArg("LadeIdBulkwijziging"); // Web
+
+ Algemene input parameters ophalen
+ ;config.backend@value;config.processmode@value;config.token@value;config.language@value;config.initiator@value;config.settings.isbulkconfiguratie@value;config.settings.bulkconfiguratieid@value;config.settings.geselecteerdeidsvoorbulk@value;config.settings.ladeidbulkwijziging@value;
+
+
+ true
+
+BEHAVIOR.IsEconAx = (CONFIG.Backend == "axapta");
+BEHAVIOR.IsEconWeb = (CONFIG.Backend <> "axapta");
+
+ Instellen Gedrag Omgeving
+ ;behavior.iseconax@value;behavior.iseconweb@value;
+
+
+ BEHAVIOR.IsEconAx
+
+local string _Configuration = GetArg("configuration");
+
+local string _BEHAVIOR_AccessMode;
+local string _BEHAVIOR_OperationMode;
+local string _BEHAVIOR_ContextName;
+local boolean _IsNieuweIngaveInAx = (DATA.Lijn.GroeperingCode == ""); // Tijdelijk getest via GroeperingCode ingevuld; [TODO] vind een goede manier om de AxNew te bepalen.
+local boolean _IsEditEdiFromSalesOrderIn;
+local boolean _IsInitiatorAxSalesOrderIn = ((CONFIG.Initiator == "Ax.SalesOrderIn") or (CONFIG.Initiator == "Ax.MsgTableSalesOrderIn"));
+
+_BEHAVIOR_AccessMode = "Intern"; // Voor AX is AccessMode altijd "Intern". (voorlopig toch)
+
+
+_BEHAVIOR_OperationMode = "";
+if (CONFIG.ProcessMode == "Background") then
+ _BEHAVIOR_OperationMode = "AxCreate";
+else
+ if (_IsNieuweIngaveInAx) then
+ _BEHAVIOR_OperationMode = "New";
+ else
+ _BEHAVIOR_OperationMode = "Edit";
+ end if;
+end if;
+
+
+_BEHAVIOR_ContextName = "null";
+if (CONFIG.ProcessMode == "Background") then
+
+ if (_IsInitiatorAxSalesOrderIn) then
+ _BEHAVIOR_ContextName = "AxCreateEdi";
+ else
+ _BEHAVIOR_ContextName = "AxCreateVH4";
+/* * /
+ _KenmerkenOorsprong = "VH4"; // VH4 of EDI of OCC [TODO] onderscheid nog te bepalen, indien mogelijk.
+ if _KenmerkenOorsprong == "VH4" then
+ _BEHAVIOR_ContextName = "AxCreateVH4";
+ end if;
+ if _KenmerkenOorsprong == "OCC" then
+ _BEHAVIOR_ContextName = "AxCreateOcc";
+ end if;
+/* */
+ end if;
+
+else
+
+ if (_IsNieuweIngaveInAx) then
+ _BEHAVIOR_ContextName = "AxNew";
+ else
+ _IsEditEdiFromSalesOrderIn = _IsInitiatorAxSalesOrderIn;
+ if _IsEditEdiFromSalesOrderIn then
+ _BEHAVIOR_ContextName = "AxEditEdi";
+ else
+ _BEHAVIOR_ContextName = "AxEdit";
+ end if;
+ end if;
+
+end if;
+
+
+BEHAVIOR.AccessMode = _BEHAVIOR_AccessMode;
+BEHAVIOR.OperationMode = _BEHAVIOR_OperationMode;
+BEHAVIOR.ContextName = _BEHAVIOR_ContextName;
+BEHAVIOR.IsInteractive = (CONFIG.ProcessMode <> "Background");
+
+CONFIG.InputMode = BEHAVIOR.OperationMode;
+CONFIG.Settings.OperationMode = BEHAVIOR.AccessMode;
+
+ Instellen Gedrag Ax (AccessMode, OperationMode, ContextName)
+ ;behavior.accessmode@value;behavior.operationmode@value;behavior.contextname@value;behavior.isinteractive@value;config.inputmode@value;config.settings.operationmode@value;
+
+
+ BEHAVIOR.IsEconWeb
+
+local string _AccessMode = GetArg("operationmode");
+local string _Configuration = GetArg("configuration");
+
+local string _BEHAVIOR_AccessMode;
+local string _BEHAVIOR_OperationMode;
+local string _BEHAVIOR_ContextName;
+
+
+_BEHAVIOR_AccessMode = "Extern";
+if (LCase(_AccessMode) == "intern") then
+ _BEHAVIOR_AccessMode = "Intern";
+end if;
+
+
+_BEHAVIOR_OperationMode = "";
+if (CONFIG.TOKEN == "128eababb1a1596e3c130b0e0fd5be820334a01a16bf777d1c5439fcfa861e16") then
+ _BEHAVIOR_OperationMode = "CreateConfig";
+ _BEHAVIOR_AccessMode = "Intern"; // CreateConfig volgt de beperkingen van de InterneVerwerking (o.a. voor EDI-bestellingen met specifieke verpakking of verlaagde rug of stalen rug)
+else
+ if (_Configuration <> "") then
+ _BEHAVIOR_OperationMode = "Edit";
+ else
+ _BEHAVIOR_OperationMode = "New";
+ end if;
+end if;
+
+
+_BEHAVIOR_ContextName = "null";
+if (_BEHAVIOR_OperationMode == "CreateConfig") then
+ _BEHAVIOR_ContextName = "WebCreateConfig";
+else
+ if (_BEHAVIOR_OperationMode == "Edit") then
+ _BEHAVIOR_ContextName = "WebShopEdit";
+ else
+ _BEHAVIOR_ContextName = "WebShopNew";
+ end if;
+end if;
+
+
+BEHAVIOR.AccessMode = _BEHAVIOR_AccessMode;
+BEHAVIOR.OperationMode = _BEHAVIOR_OperationMode;
+BEHAVIOR.ContextName = _BEHAVIOR_ContextName;
+BEHAVIOR.IsInteractive = (_BEHAVIOR_OperationMode <> "CreateConfig");
+
+CONFIG.InputMode = BEHAVIOR.OperationMode;
+CONFIG.Settings.OperationMode = BEHAVIOR.AccessMode;
+
+ Instellen Gedrag Web (AccessMode, OperationMode, ContextName)
+ ;behavior.accessmode@value;behavior.operationmode@value;behavior.contextname@value;behavior.isinteractive@value;config.inputmode@value;config.settings.operationmode@value;
+
+
+ BEHAVIOR.IsEconAx
+
+
+ Initialisatie AX
+ ;
+
+
+ true
+ CONFIG.Settings.KlantId = GetArg("KlantId");
+CONFIG.Settings.PersonalityId = GetArg("PersonalityId");
+
+CONFIG.Settings.AXUserId = GetArg("axuserid"); // Alleen in AX
+CONFIG.Settings.IsMaatwerkViewerToegelaten = CBool(GetArg("IsMaatwerkViewerToegelaten")); // Alleen in AX
+
+SalesTableAx = GetArg("SalesTableAx");
+ Settings ophalen uit argumenten
+ ;config.settings.klantid@value;config.settings.personalityid@value;config.settings.axuserid@value;config.settings.ismaatwerkviewertoegelaten@value;salestableax@value;
+
+
+ (CONFIG.ProcessMode == "Background")
+ Data.Kenmerken.BodemKleur = GetArg("data;kenmerken;bodemkleur");
+Data.Kenmerken.CorpusBreedte = CDbl(Replace(GetArg("data;kenmerken;corpusbreedte");".";","));
+Data.Kenmerken.CorpusWanddikte = CDbl(Replace(GetArg("data;kenmerken;corpuswanddikte");".";","));
+Data.Kenmerken.Draagkracht = GetArg("data;kenmerken;draagkracht");
+Data.Kenmerken.DwarsverdelingAantal = GetArg("data;kenmerken;dwarsverdelingaantal");
+Data.Kenmerken.Familie = GetArg("data;kenmerken;familie");
+Data.Kenmerken.FrontBevestiging = GetArg("data;kenmerken;frontbevestiging");
+Data.Kenmerken.GeleiderTechnologie = GetArg("data;kenmerken;geleidertechnologie");
+Data.Kenmerken.HeeftOpvullijstLinks = CBool(GetArg("data;kenmerken;heeftopvullijstlinks"));
+Data.Kenmerken.HeeftOpvullijstRechts = CBool(GetArg("data;kenmerken;heeftopvullijstrechts"));
+Data.Kenmerken.HeeftZijstabilisering = CBool(GetArg("data;kenmerken;heeftzijstabilisering"));
+Data.Kenmerken.IsBinnenbreedte = CBool(GetArg("data;kenmerken;isbinnenbreedte"));
+Data.Kenmerken.IsBinnenlade = CBool(GetArg("data;kenmerken;isbinnenlade"));
+Data.Kenmerken.LadeDiepte = GetArg("data;kenmerken;ladediepte");
+Data.Kenmerken.LadeHoogte = GetArg("data;kenmerken;ladehoogte");
+Data.Kenmerken.LadeKleur = GetArg("data;kenmerken;ladekleur");
+Data.Kenmerken.MatKleur = GetArg("data;kenmerken;matkleur");
+Data.Kenmerken.MatMateriaal = GetArg("data;kenmerken;matmateriaal");
+Data.Kenmerken.MeenemerSet = GetArg("data;kenmerken;meenemerset");
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapBinnen = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_afdekkapbinnen"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapBuiten = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_afdekkapbuiten"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapRugwandHouder = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_afdekkaprugwandhouder"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_BevestigingBodemFront = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_bevestigingbodemfront"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_FrontBevestiging = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_frontbevestiging"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_Geleider = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_geleider"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_InschuifElementVoor = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_inschuifelementvoor"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_InschuifElementZijkant = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_inschuifelementzijkant"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_Opvullijst = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_opvullijst"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSet = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_tiponblumotionset"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_tiponblumotionseteenhedenenmeenemers"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSynchronisatieStang = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_tiponblumotionsynchronisatiestang"));
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_Zijstabilisering = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_zijstabilisering"));
+Data.Kenmerken.OpvullijstKleur = GetArg("data;kenmerken;opvullijstkleur");
+Data.Kenmerken.ProductieWijze = GetArg("data;kenmerken;productiewijze");
+Data.Kenmerken.RugHoogte = GetArg("data;kenmerken;rughoogte");
+Data.Kenmerken.RugwandMateriaal = GetArg("data;kenmerken;rugwandmateriaal");
+Data.Kenmerken.Toepassing = GetArg("data;kenmerken;toepassing");
+Data.Kenmerken.UitsparingData.UitsparingAantal = GetArg("data;kenmerken;uitsparingdata;uitsparingaantal");
+Data.Kenmerken.UitsparingData.M.Breedte = CDbl(Replace(GetArg("data;kenmerken;uitsparingdata;m;breedte");".";","));
+Data.Kenmerken.UitsparingData.M.Hoogte = GetArg("data;kenmerken;uitsparingdata;m;hoogte");
+Data.Kenmerken.UitsparingData.M.Materiaal = GetArg("data;kenmerken;uitsparingdata;m;materiaal");
+Data.Kenmerken.UitsparingData.X.Breedte = CDbl(Replace(GetArg("data;kenmerken;uitsparingdata;x;breedte");".";","));
+Data.Kenmerken.UitsparingData.X.Hoogte = GetArg("data;kenmerken;uitsparingdata;x;hoogte");
+Data.Kenmerken.UitsparingData.X.Materiaal = GetArg("data;kenmerken;uitsparingdata;x;materiaal");
+Data.Kenmerken.UitsparingData.Y.Breedte = CDbl(Replace(GetArg("data;kenmerken;uitsparingdata;y;breedte");".";","));
+Data.Kenmerken.UitsparingData.Y.Hoogte = GetArg("data;kenmerken;uitsparingdata;y;hoogte");
+Data.Kenmerken.UitsparingData.Y.Materiaal = GetArg("data;kenmerken;uitsparingdata;y;materiaal");
+Data.Kenmerken.UitsparingData.Z1.Breedte = CDbl(Replace(GetArg("data;kenmerken;uitsparingdata;z1;breedte");".";","));
+Data.Kenmerken.UitsparingData.Z1.Diepte = CDbl(Replace(GetArg("data;kenmerken;uitsparingdata;z1;diepte");".";","));
+Data.Kenmerken.UitsparingData.Z1.Hoogte = GetArg("data;kenmerken;uitsparingdata;z1;hoogte");
+Data.Kenmerken.UitsparingData.Z1.Materiaal = GetArg("data;kenmerken;uitsparingdata;z1;materiaal");
+Data.Kenmerken.UitsparingData.Z1.Vorm = GetArg("data;kenmerken;uitsparingdata;z1;vorm");
+Data.Kenmerken.UitsparingData.Z2.Breedte = CDbl(Replace(GetArg("data;kenmerken;uitsparingdata;z2;breedte");".";","));
+Data.Kenmerken.UitsparingData.Z2.Diepte = CDbl(Replace(GetArg("data;kenmerken;uitsparingdata;z2;diepte");".";","));
+Data.Kenmerken.UitsparingData.Z2.Hoogte = GetArg("data;kenmerken;uitsparingdata;z2;hoogte");
+Data.Kenmerken.UitsparingData.Z2.Materiaal = GetArg("data;kenmerken;uitsparingdata;z2;materiaal");
+Data.Kenmerken.UitsparingData.Z2.Vorm = GetArg("data;kenmerken;uitsparingdata;z2;vorm");
+Data.Kenmerken.Variant = GetArg("data;kenmerken;variant");
+Data.Kenmerken.VerpakkingType = GetArg("data;kenmerken;verpakkingtype");
+Data.Kenmerken.VoorwandTypeVanCBinnenlade = GetArg("data;kenmerken;voorwandtypevancbinnenlade");
+Data.Kenmerken.VoorwandTypeVanKBinnenlade = GetArg("data;kenmerken;voorwandtypevankbinnenlade");
+Data.Kenmerken.VoorwandTypeVanMBinnenlade = GetArg("data;kenmerken;voorwandtypevanmbinnenlade");
+Data.Kenmerken.ZijwandType = GetArg("data;kenmerken;zijwandtype");
+
+DATA.Kenmerken.SpaceStep.Breedte = CDbl(Replace(GetArg("data;kenmerken;spacestep;breedte");".";","));
+DATA.Kenmerken.SpaceStep.Hoogte = CDbl(Replace(GetArg("data;kenmerken;spacestep;hoogte");".";","));
+DATA.Kenmerken.SpaceStep.Diepte = GetArg("data;kenmerken;spacestep;diepte");
+DATA.Kenmerken.SpaceStep.Kleur = GetArg("data;kenmerken;spacestep;kleur");
+DATA.Kenmerken.SpaceStep.Uitvoering = GetArg("data;kenmerken;spacestep;uitvoering");
+DATA.Kenmerken.SpaceStep.Bewegingstechnologie = GetArg("data;kenmerken;spacestep;bewegingstechnologie");
+DATA.Kenmerken.SpaceStep.StekkerServodrive = Cbool(Replace(GetArg("data;kenmerken;spacestep;stekkerservodrive");".";","));
+DATA.Kenmerken.SpaceStep.StekkerType = GetArg("data;kenmerken;spacestep;stekkertype");
+
+Data.Lijn.Aantal = CDbl(GetArg("data;lijn;aantal"));
+Data.Lijn.Referentie = GetArg("data;lijn;referentie");
+
+//Data.Kenmerken. = GetArg("data;kenmerken;explicietgekozenkenmerken");
+//Data.Kenmerken. = GetArg("data;kenmerken;gekoppeldeingegevenkenmerken");
+//Data.Kenmerken. = GetArg("data;kenmerken;omschrijving");
+//Data.Kenmerken.NietMeeleveren.NietMeeleveren_ = CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_tiponsynchronisatieset"));
+ Kenmerken ophalen uit argumenten (Background)
+ ;data.kenmerken.bodemkleur@value;data.kenmerken.corpusbreedte@value;data.kenmerken.corpuswanddikte@value;data.kenmerken.draagkracht@value;data.kenmerken.dwarsverdelingaantal@value;data.kenmerken.familie@value;data.kenmerken.frontbevestiging@value;data.kenmerken.geleidertechnologie@value;data.kenmerken.heeftopvullijstlinks@value;data.kenmerken.heeftopvullijstrechts@value;data.kenmerken.heeftzijstabilisering@value;data.kenmerken.isbinnenbreedte@value;data.kenmerken.isbinnenlade@value;data.kenmerken.ladediepte@value;data.kenmerken.ladehoogte@value;data.kenmerken.ladekleur@value;data.kenmerken.matkleur@value;data.kenmerken.matmateriaal@value;data.kenmerken.meenemerset@value;data.kenmerken.nietmeeleveren.nietmeeleveren_afdekkapbinnen@value;data.kenmerken.nietmeeleveren.nietmeeleveren_afdekkapbuiten@value;data.kenmerken.nietmeeleveren.nietmeeleveren_afdekkaprugwandhouder@value;data.kenmerken.nietmeeleveren.nietmeeleveren_bevestigingbodemfront@value;data.kenmerken.nietmeeleveren.nietmeeleveren_frontbevestiging@value;data.kenmerken.nietmeeleveren.nietmeeleveren_geleider@value;data.kenmerken.nietmeeleveren.nietmeeleveren_inschuifelementvoor@value;data.kenmerken.nietmeeleveren.nietmeeleveren_inschuifelementzijkant@value;data.kenmerken.nietmeeleveren.nietmeeleveren_opvullijst@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionset@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionseteenhedenenmeenemers@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionsynchronisatiestang@value;data.kenmerken.nietmeeleveren.nietmeeleveren_zijstabilisering@value;data.kenmerken.opvullijstkleur@value;data.kenmerken.productiewijze@value;data.kenmerken.rughoogte@value;data.kenmerken.rugwandmateriaal@value;data.kenmerken.toepassing@value;data.kenmerken.uitsparingdata.uitsparingaantal@value;data.kenmerken.uitsparingdata.m.breedte@value;data.kenmerken.uitsparingdata.m.hoogte@value;data.kenmerken.uitsparingdata.m.materiaal@value;data.kenmerken.uitsparingdata.x.breedte@value;data.kenmerken.uitsparingdata.x.hoogte@value;data.kenmerken.uitsparingdata.x.materiaal@value;data.kenmerken.uitsparingdata.y.breedte@value;data.kenmerken.uitsparingdata.y.hoogte@value;data.kenmerken.uitsparingdata.y.materiaal@value;data.kenmerken.uitsparingdata.z1.breedte@value;data.kenmerken.uitsparingdata.z1.diepte@value;data.kenmerken.uitsparingdata.z1.hoogte@value;data.kenmerken.uitsparingdata.z1.materiaal@value;data.kenmerken.uitsparingdata.z1.vorm@value;data.kenmerken.uitsparingdata.z2.breedte@value;data.kenmerken.uitsparingdata.z2.diepte@value;data.kenmerken.uitsparingdata.z2.hoogte@value;data.kenmerken.uitsparingdata.z2.materiaal@value;data.kenmerken.uitsparingdata.z2.vorm@value;data.kenmerken.variant@value;data.kenmerken.verpakkingtype@value;data.kenmerken.voorwandtypevancbinnenlade@value;data.kenmerken.voorwandtypevankbinnenlade@value;data.kenmerken.voorwandtypevanmbinnenlade@value;data.kenmerken.zijwandtype@value;data.kenmerken.spacestep.breedte@value;data.kenmerken.spacestep.hoogte@value;data.kenmerken.spacestep.diepte@value;data.kenmerken.spacestep.kleur@value;data.kenmerken.spacestep.uitvoering@value;data.kenmerken.spacestep.bewegingstechnologie@value;data.kenmerken.spacestep.stekkerservodrive@value;data.kenmerken.spacestep.stekkertype@value;data.lijn.aantal@value;data.lijn.referentie@value;
+
+
+ (CONFIG.ProcessMode <> "Background")
+
+
+ Kenmerken ophalen uit argumenten (Interactive)
+ ;
+
+
+
+
+ not(CONFIG.Backend == "axapta")
+ if (CONFIG.Token == "") then
+ // todo: configurator afsluiten indien geen token opgegeven
+ local boolean _Result = true; //Exit(true;false);
+end if;
+ Initialisatie web
+ ;
+
+
+ true
+ STATE.KlantVoorkeurenSaved = false;
+ Initialisatie states
+ ;state.klantvoorkeurensaved@value;
+
+
+ true
+ local string _DebugMode = GetSetting("ui.debugmode");
+
+if (LCase(_DebugMode) == "true") then
+ Config.Settings.DebugMode = true;
+end if;
+
+$InspectorPane@visible = Config.Settings.DebugMode;
+ Ophalen DebugMode
+ ;config.settings.debugmode@value;
+
+
+ (CONFIG.Backend <> "axapta")
+ local string _Connection = GetSetting("data.connectionstring");
+local string _Query = "SELECT Id, Name FROM ti.MDLanguage WHERE Active = '1'";
+
+CONFIG.Database.Languages@options = {};
+CONFIG.Database.Languages@options = ExecuteOptionsQuery("CONFIG.Database.Languages"; true; _Connection; _Query);
+
+STATE.LanguagesLoaded = true;
+ Actieve talen ophalen
+ ;config.database.languages@options;state.languagesloaded@value;
+
+
+ BEHAVIOR.IsInteractive
+ HELP.HelpUrl = "lbx/" + CONFIG.Language + ".xml";
+ Tooltips
+ ;help.helpurl@value;
+
+
+ true
+ local boolean _Result = CopyOptionsToArray("UI.Kenmerken.NietMeeleverenOptions"; "UI.Kenmerken.NietMeeleveren");
+
+index i of UI.Kenmerken.NietMeeleveren
+ UI.Kenmerken.NietMeeleveren(i)@label = DATA.Kenmerken.NietMeeleveren@label;
+ UI.Kenmerken.NietMeeleveren(i)@repeat = false;
+ UI.Kenmerken.NietMeeleveren(i).IsSelected@style.controlclass = "vh-slidercheckbox";
+ UI.Kenmerken.NietMeeleveren(i).Text@style.controlclass = "vh-checkboxlist-item";
+ UI.Kenmerken.NietMeeleveren(i).Text = GetLocalizedLabel(UI.Kenmerken.NietMeeleveren(i).Text);
+end index;
+ NietMeeleveren
+ ;ui.kenmerken.nietmeeleveren[1].text@value;
+
+
+ true
+ /*
+local boolean _Result = CopyOptionsToArray("UI.BulkKenmerken.NietMeeleverenOptions"; "UI.BulkKenmerken.NietMeeleveren");
+
+index i of UI.BulkKenmerken.NietMeeleveren
+ UI.BulkKenmerken.NietMeeleveren(i)@label = DATA.BulkKenmerken.NietMeeleveren@label;
+ UI.BulkKenmerken.NietMeeleveren(i)@repeat = false;
+ UI.BulkKenmerken.NietMeeleveren(i).IsSelected@style.controlclass = "vh-slidercheckbox";
+ UI.BulkKenmerken.NietMeeleveren(i).Text@style.controlclass = "vh-checkboxlist-item";
+ UI.BulkKenmerken.NietMeeleveren(i).Text = GetLocalizedLabel(UI.BulkKenmerken.NietMeeleveren(i).Text);
+end index;
+*/
+ NietMeeleveren Bulk
+ ;
+
+
+ true
+ local boolean _Result;
+
+local string _SaveAs = GetArg("saveas");
+local string _Configuration = GetArg("configuration");
+local string _Version = GetArg("version");
+
+if (_SaveAs == "" and _Configuration <> "") then
+ _SaveAs = ElementId(_Configuration; _Version);
+end if;
+
+if (CONFIG.ConfigurationName == "") then
+ if (_SaveAs <> "") then
+ CONFIG.ConfigurationName = _SaveAs;
+ else
+ CONFIG.ConfigurationName = NewId() + ",1";
+ end if;
+end if;
+
+if ((_SaveAs == "") and (CONFIG.ConfigurationName <> "")) then
+ _Result = SetArg("saveas"; ElementName(CONFIG.ConfigurationName));
+ _SaveAs = CONFIG.ConfigurationName;
+end if;
+
+if ((CONFIG.ConfigurationName <> "") and (_SaveAs <> "") and (CONFIG.ConfigurationName <> _SaveAs)) then
+ CONFIG.ConfigurationName = _SaveAs;
+end if
+ ConfigurationId bepalen
+ ;config.configurationname@value;
+
+
+ (CONFIG.Token <> "") and (BEHAVIOR.IsEconWeb)
+
+local string _Setting = GetSetting("data.vanhoecke.connectionstring.vhisie4.settings");
+local string _Json = _Setting + CONFIG.Token;
+
+local boolean _Result;
+
+if not(BEHAVIOR.OperationMode == "CreateConfig") then
+ // Setings ophalen op basis van de vh_token
+
+ _Result = LoadFromJSONService("CONFIG.Settings.KeyValue"; _Json; false);
+
+ /*if not(_Result) then
+ ReturnValue = "{\"status\":\"cancel\"}";
+ _Result = Exit(true;false);
+ end if;*/
+end if;
+
+index i of CONFIG.Settings.KeyValue
+ _Result = SetValue("CONFIG.Settings." + CONFIG.Settings.KeyValue(i).Name; CONFIG.Settings.KeyValue(i).Value);
+end index;
+
+ Config settings ophalen (Web)
+ ;
+
+
+ (CONFIG.Token <> "") and (Config.Backend <> "axapta")
+
+local collection _ExportPersonalities = {"3";"10";"11";"13";"14";"16";"17";"18";"19";"20";"32";"33";"34";"35";"36"};
+
+// HEIN + SEEFELDER
+if ((Config.Settings.PersonalityId == "11") or (Config.Settings.PersonalityId == "13")) then
+ Config.Settings.FrontBevestigingVerbergen = true;
+ Config.Settings.IsBenelux = false;
+end if;
+
+// DARO
+if (Config.Settings.PersonalityId == "10") then
+ Config.Settings.NietMeeleverenVerbergen = false;
+ Config.Settings.IsBenelux = false;
+
+ /*index i of UI.Kenmerken.NietMeeleveren
+ local string _Id = UI.Kenmerken.NietMeeleveren(i).Id;
+
+ if (_Id == "AfdekkapBinnen") OR (_Id == "AfdekkapBuiten") then
+ UI.Kenmerken.NietMeeleveren(i)@visible = false;
+ end if;
+ end index;*/
+end if;
+
+// SFS
+if (Config.Settings.PersonalityId == "3") then
+ Config.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten = false;
+end if;
+
+// FURNIFIT
+if (Config.Settings.PersonalityId == "24") then
+ Config.Settings.VerpakkingProboxToegelaten = false;
+end if;
+
+// HAEFELE DE
+if (Config.Settings.PersonalityId == "33") then
+ Config.Settings.VerpakkingTooltipsTonen = true;
+end if;
+
+// VAN HOECKE
+if (Config.Settings.PersonalityId == "1") then
+ Config.Settings.NietMeeleverenVerbergen = false;
+end if;
+
+// MatMateriaalAntislip verbergen voor alle MP
+if (Config.Settings.PersonalityId <> "1") then
+ CONFIG.Settings.MatMateriaalAntislipToegelaten = false;
+end if;
+
+ Config settings hardcoded (settings voor de MP)
+ ;config.settings.frontbevestigingverbergen@value;config.settings.isbenelux@value;config.settings.nietmeeleverenverbergen@value;config.settings.voorwandtypevanmbinnenladeglastoegelaten@value;config.settings.verpakkingproboxtoegelaten@value;config.settings.verpakkingtooltipstonen@value;config.settings.matmateriaalantisliptoegelaten@value;
+
+
+ true
+ Config.ReferentieConfiguratie = GetArg("referentieconfiguratie");
+ ReferentieConfiguratie ophalen
+ ;config.referentieconfiguratie@value;
+
+
+ (Config.InputMode <> "CreateConfig") and (Config.Backend <> "axapta")
+
+ CONFIG.KlantVoorkeurenConfigurationName = DATA.Kenmerken.Variant + "_" + Config.Settings.PersonalityId + "_" + CONFIG.Settings.KlantId;
+ KlantVoorkeuren naam bepalen
+ ;config.klantvoorkeurenconfigurationname@value;
+
+
+ true
+ UI.Buttons.Top.SaveAndExitButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.SavedAndExit','true'";
+UI.Buttons.Top.SaveAndContinueButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.SavedAndContinue','true'";
+UI.Buttons.Top.CancelButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.Cancelled','true'";
+UI.Buttons.Top.PreferencesButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.KlantVoorkeurenSaved','true'";
+
+UI.MWViewer.InlineButtons.StartMaatwerkViewerButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.StartMaatwerkViewer','true'";
+UI.Buttons.Top.ProcessButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.ProcessedAndExit','true'|task:eCon.UI.Tasks.ProcessAndExitTask";
+/*
+UI.Buttons.Top.ProcessButton = "task:eCon.UI.Tasks.ProcessAndExitTask";
+if (CONFIG.Backend == "axapta") then
+ STATE.ProcessedAndExit = true;
+end if;
+*/
+UI.Buttons.Bottom.SaveAndExitButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.SavedAndExit','true'";
+UI.Buttons.Bottom.SaveAndContinueButton@default = "task:eCon.UI.Tasks.SetValueTask:'STATE.SavedAndContinue','true'";
+
+local boolean _IsEditMode = (CONFIG.InputMode == "Edit");
+local string _LabelSave = UI.Buttons.Top.SaveAndExitButton@label;
+
+if (_IsEditMode) then
+ _LabelSave = TRL.SaveChangesButton@label;
+end if;
+
+UI.Buttons.Top.SaveAndExitButton@label = _LabelSave;
+UI.Buttons.Bottom.SaveAndExitButton@label = _LabelSave;
+
+UI.Buttons.Top.SaveAndExitButton@visible = (CONFIG.Backend <> "axapta");
+UI.Buttons.Top.SaveAndContinueButton@visible = not(_IsEditMode) and (CONFIG.Backend <> "axapta");
+UI.Buttons.Top.PreferencesButton@visible = (CONFIG.Backend <> "axapta");
+UI.Buttons.Top.ProcessButton@visible = (CONFIG.Backend == "axapta");
+
+UI.Buttons.Bottom.SaveAndExitButton@visible = (CONFIG.Backend <> "axapta");
+UI.Buttons.Bottom.SaveAndContinueButton@visible = not(_IsEditMode) and (CONFIG.Backend <> "axapta");
+
+UI.MWViewer.InlineButtons.StartMaatwerkViewerButton@label = "Maatwerk Viewer";
+
+ Buttons
+ ;ui.buttons.top.saveandexitbutton@default;ui.buttons.top.saveandcontinuebutton@default;ui.buttons.top.cancelbutton@default;ui.buttons.top.preferencesbutton@default;ui.mwviewer.inlinebuttons.startmaatwerkviewerbutton@default;ui.buttons.top.processbutton@default;ui.buttons.bottom.saveandexitbutton@default;ui.buttons.bottom.saveandcontinuebutton@default;ui.buttons.top.saveandexitbutton@visible;ui.buttons.top.saveandcontinuebutton@visible;ui.buttons.top.preferencesbutton@visible;ui.buttons.top.processbutton@visible;ui.buttons.bottom.saveandexitbutton@visible;ui.buttons.bottom.saveandcontinuebutton@visible;
+
+
+ true
+ local string SelectedOption = "";
+
+SelectedOption = UI.Kenmerken.BodemKleur;
+for i = 1 to len(UI.Kenmerken.BodemKleur@options)
+ UI.Kenmerken.BodemKleur = UI.Kenmerken.BodemKleur@option(i)@id;
+ UI.Kenmerken.BodemKleur.Text = DATA.Kenmerken.BodemKleur@option(i)@label;
+end for;
+UI.Kenmerken.BodemKleur= SelectedOption;
+
+SelectedOption = UI.BulkKenmerken.BodemKleur;
+for i = 1 to len(UI.Kenmerken.BodemKleur@options)
+ UI.BulkKenmerken.BodemKleur = UI.BulkKenmerken.BodemKleur@option(i)@id;
+ UI.BulkKenmerken.BodemKleur.Text = DATA.BulkKenmerken.BodemKleur@option(i)@label;
+end for;
+UI.BulkKenmerken.BodemKleur= SelectedOption;
+
+SelectedOption = UI.Kenmerken.LadeKleur;
+for i = 1 to len(UI.Kenmerken.LadeKleur@options)
+ UI.Kenmerken.LadeKleur = UI.Kenmerken.LadeKleur@option(i)@id;
+ UI.Kenmerken.LadeKleur.Text = DATA.Kenmerken.LadeKleur@option(i)@label;
+end for;
+UI.Kenmerken.LadeKleur = SelectedOption;
+
+SelectedOption = UI.BulkKenmerken.LadeKleur;
+for i = 1 to len(UI.BulkKenmerken.LadeKleur@options)
+ UI.BulkKenmerken.LadeKleur = UI.BulkKenmerken.LadeKleur@option(i)@id;
+ UI.BulkKenmerken.LadeKleur.Text = DATA.BulkKenmerken.LadeKleur@option(i)@label;
+end for;
+UI.BulkKenmerken.LadeKleur = SelectedOption;
+
+SelectedOption = UI.Kenmerken.MatAntislipKleur;
+for i = 1 to len(UI.Kenmerken.MatAntislipKleur@options)
+ UI.Kenmerken.MatAntislipKleur = UI.Kenmerken.MatAntislipKleur@option(i)@id;
+ UI.Kenmerken.MatAntislipKleur.Text = GetLocalizedLabel("MatAntislipKleur_" + UI.Kenmerken.MatAntislipKleur);
+end for;
+UI.Kenmerken.MatAntislipKleur = SelectedOption;
+
+SelectedOption = UI.Kenmerken.MatAntislipFiberKleur;
+for i = 1 to len(UI.Kenmerken.MatAntislipFiberKleur@options)
+ UI.Kenmerken.MatAntislipFiberKleur = UI.Kenmerken.MatAntislipFiberKleur@option(i)@id;
+ UI.Kenmerken.MatAntislipFiberKleur.Text = GetLocalizedLabel("MatAntislipFiberKleur_" + UI.Kenmerken.MatAntislipFiberKleur);
+end for;
+UI.Kenmerken.MatAntislipFiberKleur = SelectedOption;
+
+SelectedOption = UI.BulkKenmerken.MatAntislipFiberKleur;
+for i = 1 to len(UI.BulkKenmerken.MatAntislipFiberKleur@options)
+ UI.BulkKenmerken.MatAntislipFiberKleur = UI.BulkKenmerken.MatAntislipFiberKleur@option(i)@id;
+ UI.BulkKenmerken.MatAntislipFiberKleur.Text = GetLocalizedLabel("MatAntislipFiberKleur_" + UI.BulkKenmerken.MatAntislipFiberKleur);
+end for;
+UI.BulkKenmerken.MatAntislipFiberKleur = SelectedOption;
+
+SelectedOption = UI.Kenmerken.MatAntislipFlockKleur;
+for i = 1 to len(UI.Kenmerken.MatAntislipFlockKleur@options)
+ UI.Kenmerken.MatAntislipFlockKleur = UI.Kenmerken.MatAntislipFlockKleur@option(i)@id;
+ UI.Kenmerken.MatAntislipFlockKleur.Text = GetLocalizedLabel("MatAntislipFlockKleur_" + UI.Kenmerken.MatAntislipFlockKleur);
+end for;
+UI.Kenmerken.MatAntislipFlockKleur = SelectedOption;
+
+SelectedOption = UI.BulkKenmerken.MatAntislipFlockKleur;
+for i = 1 to len(UI.BulkKenmerken.MatAntislipFlockKleur@options)
+ UI.BulkKenmerken.MatAntislipFlockKleur = UI.BulkKenmerken.MatAntislipFlockKleur@option(i)@id;
+ UI.BulkKenmerken.MatAntislipFlockKleur.Text = GetLocalizedLabel("MatAntislipFlockKleur_" + UI.BulkKenmerken.MatAntislipFlockKleur);
+end for;
+UI.BulkKenmerken.MatAntislipFlockKleur = SelectedOption;
+
+SelectedOption = UI.Kenmerken.MatMateriaal;
+for i = 1 to len(UI.Kenmerken.MatMateriaal@options)
+ UI.Kenmerken.MatMateriaal = UI.Kenmerken.MatMateriaal@option(i)@id;
+ UI.Kenmerken.MatMateriaal.Text = DATA.Kenmerken.MatMateriaal@option(UI.Kenmerken.MatMateriaal.Value)@label;
+end for;
+UI.Kenmerken.MatMateriaal = SelectedOption;
+
+SelectedOption = UI.BulkKenmerken.MatMateriaal;
+for i = 1 to len(UI.BulkKenmerken.MatMateriaal@options)
+ UI.BulkKenmerken.MatMateriaal = UI.BulkKenmerken.MatMateriaal@option(i)@id;
+ UI.BulkKenmerken.MatMateriaal.Text = DATA.BulkKenmerken.MatMateriaal@option(UI.BulkKenmerken.MatMateriaal.Value)@label;
+end for;
+UI.BulkKenmerken.MatMateriaal = SelectedOption;
+
+SelectedOption = UI.Kenmerken.MatVinylFiberglassKleur;
+for i = 1 to len(UI.Kenmerken.MatVinylFiberglassKleur@options)
+ UI.Kenmerken.MatVinylFiberglassKleur = UI.Kenmerken.MatVinylFiberglassKleur@option(i)@id;
+ UI.Kenmerken.MatVinylFiberglassKleur.Text = GetLocalizedLabel("MatVinylFiberglassKleur_" + UI.Kenmerken.MatVinylFiberglassKleur);
+end for;
+UI.Kenmerken.MatVinylFiberglassKleur = SelectedOption;
+
+SelectedOption = UI.BulkKenmerken.MatVinylFiberglassKleur;
+for i = 1 to len(UI.Kenmerken.MatVinylFiberglassKleur@options)
+ UI.BulkKenmerken.MatVinylFiberglassKleur = UI.BulkKenmerken.MatVinylFiberglassKleur@option(i)@id;
+ UI.BulkKenmerken.MatVinylFiberglassKleur.Text = GetLocalizedLabel("MatVinylFiberglassKleur_" + UI.BulkKenmerken.MatVinylFiberglassKleur);
+end for;
+UI.BulkKenmerken.MatVinylFiberglassKleur = SelectedOption;
+
+SelectedOption = UI.Kenmerken.OpvullijstKleur;
+for i = 1 to len(UI.Kenmerken.OpvullijstKleur@options)
+ UI.Kenmerken.OpvullijstKleur = UI.Kenmerken.OpvullijstKleur@option(i)@id;
+ UI.Kenmerken.OpvullijstKleur.Text = DATA.Kenmerken.OpvullijstKleur@option(i)@label;
+end for;
+UI.Kenmerken.OpvullijstKleur = SelectedOption;
+
+SelectedOption = UI.Kenmerken.VoorwandTypeVanCBinnenlade;
+for i = 1 to len(UI.Kenmerken.VoorwandTypeVanCBinnenlade@options)
+ UI.Kenmerken.VoorwandTypeVanCBinnenlade = UI.Kenmerken.VoorwandTypeVanCBinnenlade@option(i)@id;
+ UI.Kenmerken.VoorwandTypeVanCBinnenlade.Text = DATA.Kenmerken.VoorwandTypeVanCBinnenlade@option(i)@label;
+end for;
+UI.Kenmerken.VoorwandTypeVanCBinnenlade= SelectedOption;
+
+SelectedOption = UI.Kenmerken.VoorwandTypeVanMBinnenlade;
+for i = 1 to len(UI.Kenmerken.VoorwandTypeVanMBinnenlade@options)
+ UI.Kenmerken.VoorwandTypeVanMBinnenlade = UI.Kenmerken.VoorwandTypeVanMBinnenlade@option(i)@id;
+ UI.Kenmerken.VoorwandTypeVanMBinnenlade.Text = DATA.Kenmerken.VoorwandTypeVanMBinnenlade@option(i)@label;
+end for;
+UI.Kenmerken.VoorwandTypeVanMBinnenlade= SelectedOption;
+
+SelectedOption = UI.Kenmerken.VoorwandTypeVanKBinnenlade;
+for i = 1 to len(UI.Kenmerken.VoorwandTypeVanKBinnenlade@options)
+ UI.Kenmerken.VoorwandTypeVanKBinnenlade = UI.Kenmerken.VoorwandTypeVanKBinnenlade@option(i)@id;
+ UI.Kenmerken.VoorwandTypeVanKBinnenlade.Text = DATA.Kenmerken.VoorwandTypeVanKBinnenlade@option(i)@label;
+end for;
+UI.Kenmerken.VoorwandTypeVanKBinnenlade= SelectedOption;
+
+SelectedOption = UI.Kenmerken.ZijwandType;
+for i = 1 to len(UI.Kenmerken.ZijwandType@options)
+ UI.Kenmerken.ZijwandType = UI.Kenmerken.ZijwandType@option(i)@id;
+ UI.Kenmerken.ZijwandType.Text = DATA.Kenmerken.ZijwandType@option(i)@label;
+end for;
+UI.Kenmerken.ZijwandType = SelectedOption;
+
+SelectedOption = UI.Kenmerken.SpaceStep.Kleur;
+for i = 1 to len(UI.Kenmerken.SpaceStep.Kleur@options)
+ UI.Kenmerken.SpaceStep.Kleur = UI.Kenmerken.SpaceStep.Kleur@option(i)@id;
+ UI.Kenmerken.SpaceStep.Kleur.Text = DATA.Kenmerken.SpaceStep.Kleur@option(i)@label;
+end for;
+UI.Kenmerken.SpaceStep.Kleur = SelectedOption;
+ Vertalingen UI image labels
+ ;ui.kenmerken.bodemkleur@value;ui.bulkkenmerken.bodemkleur@value;ui.kenmerken.ladekleur@value;ui.bulkkenmerken.ladekleur@value;ui.kenmerken.matantislipkleur@value;ui.kenmerken.matantislipfiberkleur@value;ui.bulkkenmerken.matantislipfiberkleur@value;ui.kenmerken.matantislipflockkleur@value;ui.bulkkenmerken.matantislipflockkleur@value;ui.kenmerken.matmateriaal@value;ui.bulkkenmerken.matmateriaal@value;ui.kenmerken.matvinylfiberglasskleur@value;ui.bulkkenmerken.matvinylfiberglasskleur@value;ui.kenmerken.opvullijstkleur@value;ui.kenmerken.voorwandtypevancbinnenlade@value;ui.kenmerken.voorwandtypevanmbinnenlade@value;ui.kenmerken.voorwandtypevankbinnenlade@value;ui.kenmerken.zijwandtype@value;ui.kenmerken.spacestep.kleur@value;
+
+
+ true
+ local boolean _IsIntern = (CONFIG.Settings.OperationMode == "Intern");
+
+UI.Kenmerken.HeeftAfwijkendeRugHoogte@visible = _IsIntern;
+
+//UI.Kenmerken.RugHoogte@visible = _IsIntern; // afhankelijk van "afwijkende" rughoogte flag
+//UI.Kenmerken.RugHoogte@mandatory = _IsIntern; // afhankelijk van "afwijkende" rughoogte flag
+
+//UI.Kenmerken.ProductieWijze@visible = _IsIntern;
+//UI.Kenmerken.ProductieWijze@mandatory = _IsIntern;
+
+//UI.Kenmerken.RugwandMateriaal@visible = _IsIntern; //Dit mag weg van zodra SpaceStep live is
+//UI.Kenmerken.RugwandMateriaal@mandatory = _IsIntern; //Dit mag weg van zodra SpaceStep live is
+
+UI.Kenmerken.OpvullijstKleur@option("LG")@visible = true; // Op "false" zetten wanneer PM deze uitfaseert (rond aug 2019)
+
+UI.Kenmerken.MatMateriaal@option("AZ")@visible = true; // Flock
+
+UI.Kenmerken.FrontBevestiging@option("D")@visible = _IsIntern;
+
+index i of UI.Kenmerken.NietMeeleveren
+ local boolean _IsZichtbaarExtern = (not(_IsIntern) and (UI.Kenmerken.NietMeeleveren(i).id in CONFIG.NietMeeleverenExtern@options));
+ local boolean _IsZichtbaarIntern = _IsIntern;
+
+ UI.Kenmerken.NietMeeleveren(i)@visible = (_IsZichtbaarIntern or _IsZichtbaarExtern);
+end index;
+
+/*
+//Bulk
+index i of UI.BulkKenmerken.NietMeeleveren
+ local boolean _IsZichtbaarExtern = (not(_IsIntern) and (UI.BulkKenmerken.NietMeeleveren(i).id in CONFIG.NietMeeleverenExtern@options));
+ local boolean _IsZichtbaarIntern = _IsIntern;
+
+ UI.BulkKenmerken.NietMeeleveren(i)@visible = (_IsZichtbaarIntern or _IsZichtbaarExtern);
+end index;
+*/
+UI.Kenmerken.Toepassing@option("SST")@visible = true; //Dit mag weg van zodra SpaceStep live is
+
+ Beperkingen Intern/Extern
+ ;ui.kenmerken.heeftafwijkenderughoogte@visible;ui.kenmerken.opvullijstkleur@options;ui.kenmerken.matmateriaal@options;ui.kenmerken.frontbevestiging@options;ui.kenmerken.toepassing@options;
+
+
+ true
+
+UI.Kenmerken.VoorwandTypeVanMBinnenlade@option("Glas")@visible = (UI.Kenmerken.VoorwandTypeVanMBinnenlade@option("Glas")@visible and Config.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten);
+ Beperkingen Settings
+ ;ui.kenmerken.voorwandtypevanmbinnenlade@options;
+
+
+ (CONFIG.Settings.KlantId == "6819")
+ Config.Settings.IsBeschikbaarVoorKlant = true
+ IsBeschikbaarVoorKlant
+ ;config.settings.isbeschikbaarvoorklant@value;
+
+
+ true
+ STATE.Initialized = false;
+ Einde initialisatie
+ ;state.initialized@value;
+
+
+
+
+
+ true
+
+// Gedrag Verpakkingen :
+local boolean _BEHAVIOR_IsVerpakkingProboxZichtbaar;
+local boolean _BEHAVIOR_IsVerpakkingVHossZichtbaar;
+local boolean _BEHAVIOR_IsVerpakkingPalletZichtbaar;
+
+if (CONFIG.Settings.OperationMode == "Intern") or (CONFIG.InputMode == "CreateConfig") or (BEHAVIOR.IsEconAx) then
+ _BEHAVIOR_IsVerpakkingProboxZichtbaar = true;
+ _BEHAVIOR_IsVerpakkingVHossZichtbaar = true;
+ _BEHAVIOR_IsVerpakkingPalletZichtbaar = true;
+else
+ _BEHAVIOR_IsVerpakkingProboxZichtbaar = CONFIG.Settings.VerpakkingProboxToegelaten;
+ _BEHAVIOR_IsVerpakkingVHossZichtbaar = CONFIG.Settings.VerpakkingVHossToegelaten;
+ _BEHAVIOR_IsVerpakkingPalletZichtbaar = false;
+end if;
+
+// Controls Verpakkingen :
+UI.Kenmerken.VerpakkingType@option("Probox")@visible = _BEHAVIOR_IsVerpakkingProboxZichtbaar;
+UI.Kenmerken.VerpakkingType@option("VHoss")@visible = _BEHAVIOR_IsVerpakkingVHossZichtbaar;
+UI.Kenmerken.VerpakkingType@option("Pallet")@visible = _BEHAVIOR_IsVerpakkingPalletZichtbaar;
+
+ Gedrag Verpakkingen instellen
+ ;ui.kenmerken.verpakkingtype@options;
+
+
+ STATE.VerpakkingTooltipsTrigger
+
+local string _SelectedOption = "";
+
+if not(Config.Settings.VerpakkingTooltipsTonen) then
+ _SelectedOption = UI.Kenmerken.VerpakkingType;
+ for i = 1 to len(DATA.Kenmerken.VerpakkingType@options)
+ UI.Kenmerken.VerpakkingType = DATA.Kenmerken.VerpakkingType@option(i)@id;
+ UI.Kenmerken.VerpakkingType.Url = "";
+ end for;
+ UI.Kenmerken.VerpakkingType = _SelectedOption;
+end if;
+
+STATE.VerpakkingTooltipsTrigger = false;
+
+ Gedrag Verpakkingen Tooltips instellen
+ ;ui.kenmerken.verpakkingtype@value;state.verpakkingtooltipstrigger@value;
+
+
+ true
+
+local boolean _BEHAVIOR_MatMateriaalAntislipToegelaten;
+
+if (CONFIG.Settings.OperationMode == "Intern") or (CONFIG.InputMode == "CreateConfig") or (BEHAVIOR.IsEconAx) then
+ _BEHAVIOR_MatMateriaalAntislipToegelaten = true;
+else
+ _BEHAVIOR_MatMateriaalAntislipToegelaten = Config.Settings.MatMateriaalAntislipToegelaten;
+end if;
+
+// Override all lines above!
+_BEHAVIOR_MatMateriaalAntislipToegelaten = false; // Antislip (AGO)
+
+UI.Kenmerken.MatMateriaal@option("AS")@visible = _BEHAVIOR_MatMateriaalAntislipToegelaten;
+
+ Gedrag Matten
+ ;ui.kenmerken.matmateriaal@options;
+
+
+ true
+
+local boolean _BEHAVIOR_IsReferentieZichtbaar;
+
+if (BEHAVIOR.IsEconAx and BEHAVIOR.IsInteractive == true) then
+ _BEHAVIOR_IsReferentieZichtbaar = false;
+else
+ _BEHAVIOR_IsReferentieZichtbaar = true;
+end if;
+
+UI.Lijn.Referentie@visible = _BEHAVIOR_IsReferentieZichtbaar;
+ Gedrag Referentie
+ ;ui.lijn.referentie@visible;
+
+
+ true
+
+local string _VorigeSoortVerpakking = UI.PropertiesEnkelVoorInCodeVanRules.VerpakkingTypeVorigeWaarde;
+UI.PropertiesEnkelVoorInCodeVanRules.VerpakkingTypeVorigeWaarde = UI.Kenmerken.VerpakkingType;
+
+if (BEHAVIOR.IsEconAx and BEHAVIOR.IsInteractive and (CONFIG.InputMode == "New")) then
+ if (_VorigeSoortVerpakking <> UI.PropertiesEnkelVoorInCodeVanRules.VerpakkingTypeVorigeWaarde) then
+ if (UI.Kenmerken.VerpakkingType == "Pallet" or UI.Kenmerken.VerpakkingType == "VHoss") then
+ index i of UI.Kenmerken.NietMeeleveren
+ if ((UI.Kenmerken.NietMeeleveren(i).Id <> "InschuifElementVoor") and (UI.Kenmerken.NietMeeleveren(i).Id <> "InschuifElementZijkant")) then
+ UI.Kenmerken.NietMeeleveren(i).IsSelected = true;
+ else
+ UI.Kenmerken.NietMeeleveren(i).IsSelected = false;
+ end if;
+ end index;
+ end if;
+
+ if (UI.Kenmerken.VerpakkingType <> "Pallet" and UI.Kenmerken.VerpakkingType <> "VHoss") then
+ index i of UI.Kenmerken.NietMeeleveren
+ UI.Kenmerken.NietMeeleveren(i).IsSelected = false;
+ end index;
+ end if;
+ end if;
+end if;
+
+ Gedrag niet meeleveren opties selecteren indien VerpakkingType VHoss/Pallet
+ ;ui.propertiesenkelvoorincodevanrules.verpakkingtypevorigewaarde@value;
+
+
+ true
+
+local boolean _IsIntern = (CONFIG.Settings.OperationMode == "Intern");
+local boolean _BEHAVIOR_IsNietMeeleverenZichtbaarVolgensSpaceStep;
+
+if((UI.Kenmerken.SpaceStep.Uitvoering == "Volledig") or (UI.Kenmerken.Toepassing <> "SST")) then
+ _BEHAVIOR_IsNietMeeleverenZichtbaarVolgensSpaceStep = true;
+else
+ _BEHAVIOR_IsNietMeeleverenZichtbaarVolgensSpaceStep = false;
+end if;
+
+index i of UI.Kenmerken.NietMeeleveren
+ local boolean _IsZichtbaarExtern = (not(_IsIntern) and (UI.Kenmerken.NietMeeleveren(i).id in CONFIG.NietMeeleverenExtern@options));
+ local boolean _IsZichtbaarIntern = _IsIntern;
+ if (UI.Kenmerken.NietMeeleveren(i).id <> "Opvullijst" and UI.Kenmerken.NietMeeleveren(i).id <> "TiponBlumotionSet") then //Opvullijst wordt opgevangen in een andere rule, in 'Mandatory en visible properties' folder
+ UI.Kenmerken.NietMeeleveren(i)@visible = ((_IsZichtbaarIntern or _IsZichtbaarExtern) and _BEHAVIOR_IsNietMeeleverenZichtbaarVolgensSpaceStep);
+ end if;
+ if (UI.Kenmerken.NietMeeleveren(i).id == "TiponBlumotionSet") then
+ UI.Kenmerken.NietMeeleveren(i)@visible = (_IsZichtbaarExtern and _BEHAVIOR_IsNietMeeleverenZichtbaarVolgensSpaceStep);
+ end if;
+end index;
+ Gedrag niet meeleveren zichtbaarheid
+ ;
+
+
+ true
+
+local boolean TOBSetSelected = DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSet;
+local boolean TOBSetEnMeenemersSelected = DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers;
+local boolean TOBStangSelected = DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSynchronisatieStang;
+
+if (BEHAVIOR.IsEconWeb and TOBSetSelected) then
+ DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers = true;
+ DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSynchronisatieStang = true;
+end if;
+
+if (BEHAVIOR.IsEconWeb and not(TOBSetSelected)) then
+ DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers = false;
+ DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSynchronisatieStang = false;
+end if;
+
+
+if (BEHAVIOR.IsEconAx and BEHAVIOR.IsInteractive and TOBSetEnMeenemersSelected and TOBStangSelected) then
+ DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSet = true;
+end if;
+
+if (BEHAVIOR.IsEconAx and BEHAVIOR.IsInteractive and not(TOBSetEnMeenemersSelected and TOBStangSelected)) then
+ DATA.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSet = false;
+end if;
+
+ Gedrag niet meeleveren TOB
+ ;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionseteenhedenenmeenemers@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionsynchronisatiestang@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionset@value;
+
+
+ true
+
+local boolean _BEHAVIOR_IsProductiewijzeZichtbaar;
+
+if (BEHAVIOR.IsEconAx and BEHAVIOR.IsInteractive == true) then
+ if (UI.Kenmerken.VerpakkingType == "V1") then
+ _BEHAVIOR_IsProductiewijzeZichtbaar = true;
+ end if;
+ if ((UI.Kenmerken.VerpakkingType <> "V1") or UI.Kenmerken.Toepassing == "SST") then
+ _BEHAVIOR_IsProductiewijzeZichtbaar = false;
+ end if;
+else
+ _BEHAVIOR_IsProductiewijzeZichtbaar = false;
+end if;
+
+UI.Kenmerken.Productiewijze@visible = _BEHAVIOR_IsProductiewijzeZichtbaar;
+UI.Kenmerken.ProductieWijze@mandatory = _BEHAVIOR_IsProductiewijzeZichtbaar;
+ Gedrag Productiewijze
+ ;ui.kenmerken.productiewijze@visible;ui.kenmerken.productiewijze@mandatory;
+
+
+ true
+
+local boolean _IsAantalZichtbaar;
+local boolean _IsAantalVerplicht;
+
+if(BEHAVIOR.IsEconAX) then
+ _IsAantalZichtbaar = false;
+ _IsAantalVerplicht = false;
+else
+ _IsAantalZichtbaar = true;
+ _IsAantalVerplicht = true;
+end if;
+
+UI.Lijn.Aantal@visible = _IsAantalZichtbaar;
+UI.Lijn.Aantal@mandatory = _IsAantalVerplicht;
+ Gedrag Aantal
+ ;ui.lijn.aantal@visible;ui.lijn.aantal@mandatory;
+
+
+ true
+
+local Boolean _BEHAVIOR_IsFrontbevestigingZichtbaar;
+local Boolean _BEHAVIOR_IsFrontbevestigingMandatory;
+
+if ((Config.Settings.FrontBevestigingVerbergen or DATA.Kenmerken.IsBinnenlade) or (DATA.Kenmerken.SpaceStep.Uitvoering <> "Volledig" and DATA.Kenmerken.Toepassing == "SST")) then
+ _BEHAVIOR_IsFrontbevestigingZichtbaar = false;
+else
+ _BEHAVIOR_IsFrontbevestigingZichtbaar = true;
+end if;
+
+if ((DATA.Kenmerken.IsBinnenlade or (DATA.Kenmerken.SpaceStep.Uitvoering <> "Volledig" and DATA.Kenmerken.Toepassing == "SST")) and not(CONFIG.Settings.IsBulkConfiguratie)) then
+ _BEHAVIOR_IsFrontbevestigingMandatory = false;
+else
+ _BEHAVIOR_IsFrontbevestigingMandatory = true;
+end if;
+
+UI.Kenmerken.FrontBevestiging@mandatory = _BEHAVIOR_IsFrontbevestigingMandatory;
+UI.Kenmerken.FrontBevestiging@visible = _BEHAVIOR_IsFrontbevestigingZichtbaar;
+
+ Gedrag Frontbevestiging
+ ;ui.kenmerken.frontbevestiging@mandatory;ui.kenmerken.frontbevestiging@visible;
+
+
+ true
+
+local boolean _BEHAVIOR_IsSneltoetsenNietMeeleverenZichtbaar;
+
+if (BEHAVIOR.IsEconAx and BEHAVIOR.IsInteractive) then
+ if (DATA.Kenmerken.Toepassing == "SST") then
+ if (DATA.Kenmerken.SpaceStep.Uitvoering == "Volledig") then
+ _BEHAVIOR_IsSneltoetsenNietMeeleverenZichtbaar = true;
+ else
+ _BEHAVIOR_IsSneltoetsenNietMeeleverenZichtbaar = false;
+ end if;
+ else
+ _BEHAVIOR_IsSneltoetsenNietMeeleverenZichtbaar = true;
+ end if;
+
+else
+ _BEHAVIOR_IsSneltoetsenNietMeeleverenZichtbaar = false;
+end if;
+
+UI.Kenmerken.SneltoetsenNietMeeleveren@visible = _BEHAVIOR_IsSneltoetsenNietMeeleverenZichtbaar;
+
+ Gedrag knoppen selecteren niet meeleveren
+ ;ui.kenmerken.sneltoetsennietmeeleveren@visible;
+
+
+ DATA.Kenmerken.Toepassing == "SY" or DATA.Kenmerken.Toepassing == "SP"
+
+local boolean _BEHAVIOR_IsRugwandMateriaalHoutValid;
+local boolean _BEHAVIOR_IsRugwandMateriaalStaalValid;
+
+if (DATA.Kenmerken.Toepassing == "SY") then
+ _BEHAVIOR_IsRugwandMateriaalHoutValid = true;
+ _BEHAVIOR_IsRugwandMateriaalStaalValid = false;
+end if;
+
+if (DATA.Kenmerken.Toepassing == "SP") then
+ _BEHAVIOR_IsRugwandMateriaalHoutValid = false;
+ _BEHAVIOR_IsRugwandMateriaalStaalValid = true;
+end if;
+
+DATA.Kenmerken.RugwandMateriaal@option("Hout")@valid = _BEHAVIOR_IsRugwandMateriaalHoutValid;
+DATA.Kenmerken.RugwandMateriaal@option("Staal")@valid = _BEHAVIOR_IsRugwandMateriaalStaalValid;
+
+local string TriggerDummy = DATA.Kenmerken.RugwandMateriaal;
+
+ Gedrag RugwandMateriaal toepassing SY/SP
+ ;data.kenmerken.rugwandmateriaal@valids;
+
+
+ DATA.Kenmerken.Toepassing == "L" or DATA.Kenmerken.Toepassing == "SST"
+
+local boolean _BEHAVIOR_IsRugwandMateriaalHoutValid;
+local boolean _BEHAVIOR_IsRugwandMateriaalStaalValid;
+
+If (DATA.Kenmerken.LadeHoogte <> "" and DATA.Kenmerken.LadeKleur <> "" and DATA.Kenmerken.CorpusBreedte <> 0 and DATA.Kenmerken.RugwandMateriaal == "Staal") then
+ _BEHAVIOR_IsRugwandMateriaalHoutValid = true;
+
+ if (STATE.BestaatStalenRugLoaded == "WebServiceIsGeladen") then
+ if (CONFIG.Settings.StalenRugBeschikbaar.BestaatStalenRug) then
+ _BEHAVIOR_IsRugwandMateriaalStaalValid = true;
+ else
+ _BEHAVIOR_IsRugwandMateriaalStaalValid = false;
+ end if;
+ else
+ _BEHAVIOR_IsRugwandMateriaalStaalValid = false;
+ end if;
+else
+ _BEHAVIOR_IsRugwandMateriaalHoutValid = true;
+ _BEHAVIOR_IsRugwandMateriaalStaalValid = true;
+end if;
+
+DATA.Kenmerken.RugwandMateriaal@option("Hout")@valid = _BEHAVIOR_IsRugwandMateriaalHoutValid;
+DATA.Kenmerken.RugwandMateriaal@option("Staal")@valid = _BEHAVIOR_IsRugwandMateriaalStaalValid;
+
+local string TriggerDummy = DATA.Kenmerken.RugwandMateriaal;
+
+
+ Gedrag RugwandMateriaal toepassing L/SST
+ ;data.kenmerken.rugwandmateriaal@valids;
+
+
+ true
+
+local Boolean _BEHAVIOR_IsRugHoogteZichtbaar;
+local Boolean _BEHAVIOR_IsRugHoogteMandatory;
+
+if ((DATA.Kenmerken.HeeftAfwijkendeRugHoogte) or (DATA.Kenmerken.Toepassing == "SY")) then
+ _BEHAVIOR_IsRugHoogteMandatory = true;
+else
+ _BEHAVIOR_IsRugHoogteMandatory = false;
+end if;
+
+if (DATA.Kenmerken.HeeftAfwijkendeRugHoogte and BEHAVIOR.IsEconAX) then
+ _BEHAVIOR_IsRugHoogteZichtbaar = true;
+else
+ _BEHAVIOR_IsRugHoogteZichtbaar = false;
+end if;
+
+UI.Kenmerken.RugHoogte@mandatory = _BEHAVIOR_IsRugHoogteMandatory;
+UI.Kenmerken.RugHoogte@visible = _BEHAVIOR_IsRugHoogteZichtbaar;
+
+ Gedrag Rughoogte
+ ;ui.kenmerken.rughoogte@mandatory;ui.kenmerken.rughoogte@visible;
+
+
+ true
+
+local boolean BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+
+If ((BEHAVIOR.IsEconAX) and (BEHAVIOR.IsInteractive)) then
+ BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar = true;
+else
+ BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar = false;
+end if;
+
+UI.StatusBalk.Code@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+UI.StatusBalk.LadeDiepte@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+UI.StatusBalk.CorpusBreedte@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+UI.StatusBalk.Wand@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+UI.StatusBalk.Draagkracht@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+UI.StatusBalk.FrontBevestiging@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+UI.StatusBalk.Diverse@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+UI.StatusBalk.VerpakkingType@visible = BEHAVIOR_ZijnStatusBarKenmerkenZichtbaar;
+
+ Gedrag kenmerken statusbalk
+ ;ui.statusbalk.code@visible;ui.statusbalk.ladediepte@visible;ui.statusbalk.corpusbreedte@visible;ui.statusbalk.wand@visible;ui.statusbalk.draagkracht@visible;ui.statusbalk.frontbevestiging@visible;ui.statusbalk.diverse@visible;ui.statusbalk.verpakkingtype@visible;
+
+
+ CONFIG.Settings.IsBulkConfiguratie
+
+UI.Kenmerken.LadeKleur@mandatory = false;
+UI.Kenmerken.BodemKleur@mandatory = false;
+UI.Kenmerken.Corpusbreedte@mandatory = false;
+UI.Kenmerken.LadeDiepte@mandatory = false;
+UI.Kenmerken.LadeHoogte@mandatory = false;
+UI.Kenmerken.GeleiderTechnologie@mandatory = false;
+UI.Kenmerken.Draagkracht@mandatory = false;
+UI.Kenmerken.ZijwandType@mandatory = false;
+UI.Kenmerken.Frontbevestiging@mandatory = false;
+UI.Kenmerken.VerpakkingType@mandatory = false;
+UI.Kenmerken.RugwandMateriaal@mandatory = false;
+UI.Lijn.Aantal@mandatory = false;
+
+$BulkKenmerkenPane@visible = true;
+$BulkKenmerkenNMPane@visible = true;
+$ToepassingPane@visible = false;
+$Kleurpane@visible = false;
+$DimensiesPane@visible = false;
+$AfwerkingPane@visible = false;
+$OptiesPane@visible = false;
+$MatPane@visible = false;
+$VerpakkingPane@visible = false;
+$MaatwerkViewerPane@visible = false;
+
+ Gedrag Bulkkenmerkconfiuratie
+ ;ui.kenmerken.ladekleur@mandatory;ui.kenmerken.bodemkleur@mandatory;ui.kenmerken.corpusbreedte@mandatory;ui.kenmerken.ladediepte@mandatory;ui.kenmerken.ladehoogte@mandatory;ui.kenmerken.geleidertechnologie@mandatory;ui.kenmerken.draagkracht@mandatory;ui.kenmerken.zijwandtype@mandatory;ui.kenmerken.frontbevestiging@mandatory;ui.kenmerken.verpakkingtype@mandatory;ui.kenmerken.rugwandmateriaal@mandatory;ui.lijn.aantal@mandatory;
+
+
+
+
+ not((CONFIG.Backend == "axapta") and (CONFIG.ProcessMode == "Background"))
+ DATA.Kenmerken.CorpusBreedte = UI.Kenmerken.CorpusBreedte;
+DATA.Kenmerken.CorpusWanddikte = UI.Kenmerken.CorpusWanddikte;
+DATA.Kenmerken.Draagkracht = UI.Kenmerken.Draagkracht;
+DATA.Kenmerken.DwarsverdelingAantal = UI.Kenmerken.DwarsverdelingAantal;
+DATA.Kenmerken.FrontBevestiging = UI.Kenmerken.FrontBevestiging;
+DATA.Kenmerken.GeleiderTechnologie = UI.Kenmerken.GeleiderTechnologie;
+DATA.Kenmerken.HeeftAfwijkendeRugHoogte = UI.Kenmerken.HeeftAfwijkendeRugHoogte;
+DATA.Kenmerken.HeeftOpvullijstLinks = UI.Kenmerken.HeeftOpvullijstLinks;
+DATA.Kenmerken.HeeftOpvullijstRechts = UI.Kenmerken.HeeftOpvullijstRechts;
+DATA.Kenmerken.HeeftZijstabilisering = UI.Kenmerken.HeeftZijstabilisering;
+DATA.Kenmerken.IsBinnenbreedte = UI.Kenmerken.IsBinnenbreedte;
+DATA.Kenmerken.IsBinnenlade = UI.Kenmerken.IsBinnenlade;
+DATA.Kenmerken.LadeDiepte = UI.Kenmerken.LadeDiepte;
+DATA.Kenmerken.LadeHoogte = UI.Kenmerken.LadeHoogte;
+DATA.Kenmerken.MeenemerSet = UI.Kenmerken.MeenemerSet;
+DATA.Kenmerken.ProductieWijze = UI.Kenmerken.ProductieWijze;
+DATA.Kenmerken.RugHoogte = UI.Kenmerken.RugHoogte;
+DATA.Kenmerken.RugwandMateriaal = UI.Kenmerken.RugwandMateriaal;
+DATA.Kenmerken.Toepassing = UI.Kenmerken.Toepassing;
+DATA.Kenmerken.VerpakkingType = UI.Kenmerken.VerpakkingType;
+
+DATA.Kenmerken.UitsparingData.X.Breedte = UI.Kenmerken.UitsparingData.X.BreedteRugdeel;
+DATA.Kenmerken.UitsparingData.X.Hoogte = UI.Kenmerken.UitsparingData.X.Hoogte;
+DATA.Kenmerken.UitsparingData.X.Materiaal = UI.Kenmerken.UitsparingData.X.Materiaal;
+
+DATA.Kenmerken.UitsparingData.M.Breedte = UI.Kenmerken.UitsparingData.M.BreedteRugdeel;
+DATA.Kenmerken.UitsparingData.M.Hoogte = UI.Kenmerken.UitsparingData.M.Hoogte;
+DATA.Kenmerken.UitsparingData.M.Materiaal = UI.Kenmerken.UitsparingData.M.Materiaal;
+
+DATA.Kenmerken.UitsparingData.Y.Breedte = UI.Kenmerken.UitsparingData.Y.BreedteRugdeel;
+DATA.Kenmerken.UitsparingData.Y.Hoogte = UI.Kenmerken.UitsparingData.Y.Hoogte;
+DATA.Kenmerken.UitsparingData.Y.Materiaal = UI.Kenmerken.UitsparingData.Y.Materiaal;
+
+DATA.Kenmerken.UitsparingData.Z1.Breedte = UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing;
+DATA.Kenmerken.UitsparingData.Z1.Diepte = UI.Kenmerken.UitsparingData.Z1.Diepte;
+DATA.Kenmerken.UitsparingData.Z1.Hoogte = UI.Kenmerken.UitsparingData.Z1.Hoogte;
+DATA.Kenmerken.UitsparingData.Z1.Materiaal = UI.Kenmerken.UitsparingData.Z1.Materiaal;
+DATA.Kenmerken.UitsparingData.Z1.Vorm = UI.Kenmerken.UitsparingData.Z1.Vorm;
+
+DATA.Kenmerken.UitsparingData.Z2.Breedte = UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing;
+DATA.Kenmerken.UitsparingData.Z2.Diepte = UI.Kenmerken.UitsparingData.Z2.Diepte;
+DATA.Kenmerken.UitsparingData.Z2.Hoogte = UI.Kenmerken.UitsparingData.Z2.Hoogte;
+DATA.Kenmerken.UitsparingData.Z2.Materiaal = UI.Kenmerken.UitsparingData.Z2.Materiaal;
+DATA.Kenmerken.UitsparingData.Z2.Vorm = UI.Kenmerken.UitsparingData.Z2.Vorm;
+
+DATA.Kenmerken.UitsparingData.UitsparingAantal = UI.Kenmerken.UitsparingData.UitsparingAantal;
+
+DATA.Lijn.Aantal = UI.Lijn.Aantal;
+DATA.Lijn.Referentie = UI.Lijn.Referentie;
+
+// IMAGE CONTROLS
+DATA.Kenmerken.BodemKleur = UI.Kenmerken.BodemKleur.Value;
+DATA.Kenmerken.LadeKleur = UI.Kenmerken.LadeKleur.Value;
+DATA.Kenmerken.OpvullijstKleur = UI.Kenmerken.OpvullijstKleur.Value;
+DATA.Kenmerken.VoorwandTypeVanCBinnenlade = UI.Kenmerken.VoorwandTypeVanCBinnenlade.Value;
+DATA.Kenmerken.VoorwandTypeVanMBinnenlade = UI.Kenmerken.VoorwandTypeVanMBinnenlade.Value;
+DATA.Kenmerken.VoorwandTypeVanKBinnenlade = UI.Kenmerken.VoorwandTypeVanKBinnenlade.Value;
+DATA.Kenmerken.ZijwandType = UI.Kenmerken.ZijwandType.Value;
+
+index i of UI.Kenmerken.NietMeeleveren
+ local string _IsSelected = CStr(UI.Kenmerken.NietMeeleveren(i).IsSelected);
+ local string _NietMeeleverenProperty = "DATA.Kenmerken.NietMeeleveren.NietMeeleveren_" + UI.Kenmerken.NietMeeleveren(i).Id;
+
+ local boolean _Result = SetValue(_NietMeeleverenProperty; _IsSelected);
+end index;
+
+if (CONFIG.InputMode == "CreateConfig") then
+ STATE.WinkelkarInfoCalculated = false;
+ STATE.WinkelkarInfoDiverseCalculated = false;
+end if;
+ Values
+ ;data.kenmerken.corpusbreedte@value;data.kenmerken.corpuswanddikte@value;data.kenmerken.draagkracht@value;data.kenmerken.dwarsverdelingaantal@value;data.kenmerken.frontbevestiging@value;data.kenmerken.geleidertechnologie@value;data.kenmerken.heeftafwijkenderughoogte@value;data.kenmerken.heeftopvullijstlinks@value;data.kenmerken.heeftopvullijstrechts@value;data.kenmerken.heeftzijstabilisering@value;data.kenmerken.isbinnenbreedte@value;data.kenmerken.isbinnenlade@value;data.kenmerken.ladediepte@value;data.kenmerken.ladehoogte@value;data.kenmerken.meenemerset@value;data.kenmerken.productiewijze@value;data.kenmerken.rughoogte@value;data.kenmerken.rugwandmateriaal@value;data.kenmerken.toepassing@value;data.kenmerken.verpakkingtype@value;data.kenmerken.uitsparingdata.x.breedte@value;data.kenmerken.uitsparingdata.x.hoogte@value;data.kenmerken.uitsparingdata.x.materiaal@value;data.kenmerken.uitsparingdata.m.breedte@value;data.kenmerken.uitsparingdata.m.hoogte@value;data.kenmerken.uitsparingdata.m.materiaal@value;data.kenmerken.uitsparingdata.y.breedte@value;data.kenmerken.uitsparingdata.y.hoogte@value;data.kenmerken.uitsparingdata.y.materiaal@value;data.kenmerken.uitsparingdata.z1.breedte@value;data.kenmerken.uitsparingdata.z1.diepte@value;data.kenmerken.uitsparingdata.z1.hoogte@value;data.kenmerken.uitsparingdata.z1.materiaal@value;data.kenmerken.uitsparingdata.z1.vorm@value;data.kenmerken.uitsparingdata.z2.breedte@value;data.kenmerken.uitsparingdata.z2.diepte@value;data.kenmerken.uitsparingdata.z2.hoogte@value;data.kenmerken.uitsparingdata.z2.materiaal@value;data.kenmerken.uitsparingdata.z2.vorm@value;data.kenmerken.uitsparingdata.uitsparingaantal@value;data.lijn.aantal@value;data.lijn.referentie@value;data.kenmerken.bodemkleur@value;data.kenmerken.ladekleur@value;data.kenmerken.opvullijstkleur@value;data.kenmerken.voorwandtypevancbinnenlade@value;data.kenmerken.voorwandtypevanmbinnenlade@value;data.kenmerken.voorwandtypevankbinnenlade@value;data.kenmerken.zijwandtype@value;state.winkelkarinfocalculated@value;state.winkelkarinfodiversecalculated@value;
+
+
+ true
+ DATA.Kenmerken.MatMateriaal = UI.Kenmerken.MatMateriaal.Value;
+
+DATA.Kenmerken.MatKleur = switch (UI.Kenmerken.MatMateriaal.Value)
+ case "CF": UI.Kenmerken.MatVinylFiberglassKleur.value
+ case "AS": UI.Kenmerken.MatAntislipKleur.value
+ case "AF": UI.Kenmerken.MatAntislipFiberKleur.value
+ case "AZ": UI.Kenmerken.MatAntislipFlockKleur.value
+ else ""
+end switch;
+ Values - Mat
+ ;data.kenmerken.matmateriaal@value;data.kenmerken.matkleur@value;
+
+
+ not((CONFIG.Backend == "axapta") and (CONFIG.ProcessMode == "Background"))
+
+DATA.Kenmerken.SpaceStep.Breedte = UI.Kenmerken.SpaceStep.Sokkelbreedte;
+DATA.Kenmerken.SpaceStep.Hoogte = UI.Kenmerken.SpaceStep.Sokkelhoogte;
+DATA.Kenmerken.SpaceStep.Diepte = UI.Kenmerken.SpaceStep.Sokkeldiepte;
+DATA.Kenmerken.SpaceStep.Kleur = UI.Kenmerken.SpaceStep.Kleur.Value;
+DATA.Kenmerken.SpaceStep.Uitvoering = UI.Kenmerken.SpaceStep.Uitvoering;
+DATA.Kenmerken.SpaceStep.Bewegingstechnologie = UI.Kenmerken.SpaceStep.Bewegingstechnologie;
+DATA.Kenmerken.SpaceStep.StekkerServodrive = UI.Kenmerken.SpaceStep.StekkerServodrive;
+DATA.Kenmerken.SpaceStep.StekkerType = UI.Kenmerken.SpaceStep.StekkerType;
+
+ Values - SpaceStep
+ ;data.kenmerken.spacestep.breedte@value;data.kenmerken.spacestep.hoogte@value;data.kenmerken.spacestep.diepte@value;data.kenmerken.spacestep.kleur@value;data.kenmerken.spacestep.uitvoering@value;data.kenmerken.spacestep.bewegingstechnologie@value;data.kenmerken.spacestep.stekkerservodrive@value;data.kenmerken.spacestep.stekkertype@value;
+
+
+ true
+
+DATA.BulkKenmerken.BodemKleur = UI.BulkKenmerken.BodemKleur.Value;
+DATA.BulkKenmerken.LadeDiepte = UI.BulkKenmerken.LadeDiepte;
+DATA.BulkKenmerken.LadeHoogte = UI.BulkKenmerken.LadeHoogte;
+DATA.BulkKenmerken.LadeKleur = UI.BulkKenmerken.LadeKleur.Value;
+DATA.BulkKenmerken.GeleiderTechnologie = UI.BulkKenmerken.GeleiderTechnologie;
+DATA.BulkKenmerken.FrontBevestiging = UI.BulkKenmerken.FrontBevestiging;
+DATA.BulkKenmerken.VerpakkingType = UI.BulkKenmerken.VerpakkingType;
+
+DATA.BulkKenmerken.HeeftMat = UI.BulkKenmerken.HeeftMat;
+DATA.BulkKenmerken.MatMateriaal = UI.BulkKenmerken.MatMateriaal.Value;
+DATA.BulkKenmerken.MatKleur = switch (UI.BulkKenmerken.MatMateriaal.Value)
+ case "CF": UI.BulkKenmerken.MatVinylFiberglassKleur.value
+ case "AF": UI.BulkKenmerken.MatAntislipFiberKleur.value
+ case "AZ": UI.BulkKenmerken.MatAntislipFlockKleur.value
+ else ""
+end switch;
+
+/*
+index i of UI.BulkKenmerken.NietMeeleveren
+ local string _IsSelected = CStr(UI.BulkKenmerken.NietMeeleveren(i).IsSelected);
+ local string _NietMeeleverenProperty = "DATA.BulkKenmerken.NietMeeleveren.NietMeeleveren_" + UI.BulkKenmerken.NietMeeleveren(i).Id;
+
+ local boolean _Result = SetValue(_NietMeeleverenProperty; _IsSelected);
+end index;
+*/
+
+Data.BulkKenmerken.NietMeeleveren_AfdekkapBinnen = UI.BulkKenmerken.NietMeeleveren_AfdekkapBinnen;
+Data.BulkKenmerken.NietMeeleveren_AfdekkapBuiten = UI.BulkKenmerken.NietMeeleveren_AfdekkapBuiten;
+Data.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder = UI.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder;
+Data.BulkKenmerken.NietMeeleveren_BevestigingBodemFront = UI.BulkKenmerken.NietMeeleveren_BevestigingBodemFront;
+Data.BulkKenmerken.NietMeeleveren_FrontBevestiging = UI.BulkKenmerken.NietMeeleveren_FrontBevestiging;
+Data.BulkKenmerken.NietMeeleveren_Geleider = UI.BulkKenmerken.NietMeeleveren_Geleider;
+Data.BulkKenmerken.NietMeeleveren_InschuifElementVoor = UI.BulkKenmerken.NietMeeleveren_InschuifElementVoor;
+Data.BulkKenmerken.NietMeeleveren_InschuifElementZijkant = UI.BulkKenmerken.NietMeeleveren_InschuifElementZijkant;
+Data.BulkKenmerken.NietMeeleveren_Opvullijst = UI.BulkKenmerken.NietMeeleveren_Opvullijst;
+Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSet = UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSet;
+Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers = UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers;
+Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang = UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang;
+Data.BulkKenmerken.NietMeeleveren_Zijstabilisering = UI.BulkKenmerken.NietMeeleveren_Zijstabilisering;
+
+ Values - BulkKenmerken
+ ;data.bulkkenmerken.bodemkleur@value;data.bulkkenmerken.ladediepte@value;data.bulkkenmerken.ladehoogte@value;data.bulkkenmerken.ladekleur@value;data.bulkkenmerken.geleidertechnologie@value;data.bulkkenmerken.frontbevestiging@value;data.bulkkenmerken.verpakkingtype@value;data.bulkkenmerken.heeftmat@value;data.bulkkenmerken.matmateriaal@value;data.bulkkenmerken.matkleur@value;data.bulkkenmerken.nietmeeleveren_afdekkapbinnen@value;data.bulkkenmerken.nietmeeleveren_afdekkapbuiten@value;data.bulkkenmerken.nietmeeleveren_afdekkaprugwandhouder@value;data.bulkkenmerken.nietmeeleveren_bevestigingbodemfront@value;data.bulkkenmerken.nietmeeleveren_frontbevestiging@value;data.bulkkenmerken.nietmeeleveren_geleider@value;data.bulkkenmerken.nietmeeleveren_inschuifelementvoor@value;data.bulkkenmerken.nietmeeleveren_inschuifelementzijkant@value;data.bulkkenmerken.nietmeeleveren_opvullijst@value;data.bulkkenmerken.nietmeeleveren_tiponblumotionset@value;data.bulkkenmerken.nietmeeleveren_tiponblumotionseteenhedenenmeenemers@value;data.bulkkenmerken.nietmeeleveren_tiponblumotionsynchronisatiestang@value;data.bulkkenmerken.nietmeeleveren_zijstabilisering@value;
+
+
+
+
+ not(CONFIG.InputMode == "Edit") and not((CONFIG.Backend == "axapta") and (CONFIG.ProcessMode == "Background"))
+ DATA.Kenmerken.Toepassing = "L";
+DATA.Kenmerken.MeenemerSet = "Z";
+ Defaults invullen
+ ;data.kenmerken.toepassing@value;data.kenmerken.meenemerset@value;
+
+
+ BEHAVIOR.IsEconAX
+
+If (((BEHAVIOR.IsInteractive) and (BEHAVIOR.OperationMode == "New")) or (not((BEHAVIOR.IsInteractive)) and (GetArg("data;kenmerken;rugwandmateriaal") == ""))) then //Bij een edit zou bij toepassing L het rugwandmateriaal soms onterecht terug op Hout springen
+ if (UI.Kenmerken.Toepassing == "SP") then
+ DATA.Kenmerken.RugwandMateriaal = "Staal"
+ else
+ DATA.Kenmerken.RugwandMateriaal = "Hout"
+ end if;
+end if;
+
+local string Dummy = DATA.Kenmerken.SpaceStep.Uitvoering; //RugwandMateriaal wordt leeggehaald bij SST uitvoering <> "Volledig"
+ //->wanneer opnieuw volledig wordt gekozen wordt RugwandMateriaal opnieuw gedefaulteerd
+
+ Default invullen voor RugwandMateriaal
+ ;
+
+
+ BEHAVIOR.IsEconAX and not(BEHAVIOR.IsInteractive) and GetArg("data;kenmerken;dwarsverdelingaantal") == ""
+ DATA.Kenmerken.Dwarsverdelingaantal = "0";
+ Default invullen voor Dwarsverdelingaantal
+ ;data.kenmerken.dwarsverdelingaantal@value;
+
+
+ (UI.Kenmerken.IsBinnenlade) and (UI.Kenmerken.LadeHoogte == "K")
+ DATA.Kenmerken.VoorwandTypeVanKBinnenlade = "Metaal";
+ Default invullen voor VoorwandTypeVanKBinnenlade
+ ;data.kenmerken.voorwandtypevankbinnenlade@value;
+
+
+ BEHAVIOR.IsEconAX and BEHAVIOR.IsInteractive and DATA.Kenmerken.VerpakkingType == ""
+
+
+DATA.Kenmerken.VerpakkingType = "V1";
+
+ Default invullen voor VerpakkingTpe
+ ;data.kenmerken.verpakkingtype@value;
+
+
+ not(BEHAVIOR.IsInteractive)
+
+if ((CBool(GetArg("data;kenmerken;nietmeeleveren;nietmeeleveren_opvullijst"))) and (not(GetArg("data;kenmerken;opvullijstkleur") == ""))) then
+ if not(DATA.Kenmerken.OpvullijstKleur@option(GetArg("data;kenmerken;opvullijstkleur"))@valid) then
+ DATA.Kenmerken.OpvullijstKleur = DATA.Kenmerken.OpvullijstKleur@option(2)@id;
+ end if;
+end if;
+
+ Waarde verbeteren bij verkeerde opvullijstkleur EDI order wanneer deze opvullijst niet moet worden meegeleverd
+ ;
+
+
+ (CONFIG.ReferentieConfiguratie <> "") and (CONFIG.InputMode <> "Edit") and (CONFIG.Settings.BulkConfiguratieId == "")
+ local string _Connection = GetSetting("data.connectionstring") + ";cache=false";
+local string _Query = "SELECT TOP 1 * FROM eCon.Configurations WHERE name = '" + CONFIG.ReferentieConfiguratie + "'";
+
+CONFIG.Database.Configurations@options = {};
+CONFIG.Database.Configurations@options = ExecuteOptionsQuery("CONFIG.Database.Configurations"; true; _Connection; _Query);
+
+STATE.ReferentieConfiguratieLoaded = true;
+ ReferentieConfiguratie: ConfigId ophalen op basis van ReferentieConfiguratie
+ ;config.database.configurations@options;state.referentieconfiguratieloaded@value;
+
+
+ STATE.ReferentieConfiguratieLoaded and (CONFIG.Database.Configurations.Name == CONFIG.ReferentieConfiguratie) and (CONFIG.Settings.BulkConfiguratieId == "")
+ STATE.ReferentieConfiguratieLoaded = 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;
+
+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;
+
+ if (CONFIG.Database.ConfigAnalyseProperties.PropertyName in CONFIG.Defaults.ReferentieConfiguratie@options) then
+ _Result = SetValue(CONFIG.Database.ConfigAnalyseProperties.PropertyName; CONFIG.Database.ConfigAnalyseProperties.Value);
+ end if;
+end for;
+ ReferentieConfiguratie: Properties ophalen op basis van ConfigId
+ ;state.referentieconfiguratieloaded@value;config.database.configanalyseproperties@options;
+
+
+ (CONFIG.ReferentieConfiguratie == "") and (CONFIG.InputMode <> "Edit") and (CONFIG.Settings.KlantId <> "") and (CONFIG.Settings.PersonalityId <> "")
+ local string _Connection = GetSetting("data.connectionstring") + ";cache=false";
+local string _Query = "SELECT TOP 1 * FROM eCon.Configurations WHERE name = '" + CONFIG.KlantVoorkeurenConfigurationName + "'";
+
+CONFIG.Database.Configurations@options = {};
+CONFIG.Database.Configurations@options = ExecuteOptionsQuery("CONFIG.Database.Configurations"; true; _Connection; _Query);
+
+STATE.KlantVoorkeurenLoaded = true;
+ KlantVoorkeuren: ConfigId ophalen op basis van KlantId
+ ;config.database.configurations@options;state.klantvoorkeurenloaded@value;
+
+
+ STATE.KlantVoorkeurenLoaded and (CONFIG.Database.Configurations.Name == CONFIG.KlantVoorkeurenConfigurationName)
+ STATE.KlantVoorkeurenLoaded = 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.%' AND value <> ''";
+local boolean _Result;
+
+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;
+
+ if (CONFIG.Database.ConfigAnalyseProperties.PropertyName in CONFIG.Defaults.KlantVoorkeuren@options) then
+ _Result = SetValue(CONFIG.Database.ConfigAnalyseProperties.PropertyName; CONFIG.Database.ConfigAnalyseProperties.Value);
+ end if;
+end for;
+ KlantVoorkeuren: Properties ophalen op basis van ConfigId
+ ;state.klantvoorkeurenloaded@value;config.database.configanalyseproperties@options;
+
+
+ (CONFIG.ReferentieConfiguratie == "") and (CONFIG.InputMode <> "Edit") and (CONFIG.Settings.PersonalityId <> "") and (len(CONFIG.Database.ConfigAnalyseProperties) == 0)
+ CONFIG.PersonalityVoorkeurenConfigurationName = DATA.Kenmerken.Variant + "_" + CONFIG.Settings.PersonalityId;
+
+local string _Connection = GetSetting("data.connectionstring") + ";cache=false";
+local string _Query = "SELECT TOP 1 * FROM eCon.Configurations WHERE name = '" + CONFIG.PersonalityVoorkeurenConfigurationName + "'";
+
+CONFIG.Database.Configurations@options = {};
+CONFIG.Database.Configurations@options = ExecuteOptionsQuery("CONFIG.Database.Configurations"; true; _Connection; _Query);
+
+STATE.PersonalityVoorkeurenLoaded = true;
+ PersonalityVoorkeuren: ConfigId ophalen op basis van PersonalityId
+ ;config.personalityvoorkeurenconfigurationname@value;config.database.configurations@options;state.personalityvoorkeurenloaded@value;
+
+
+ STATE.PersonalityVoorkeurenLoaded and (CONFIG.Database.Configurations.Name == CONFIG.PersonalityVoorkeurenConfigurationName)
+ STATE.PersonalityVoorkeurenLoaded = 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.%' AND value <> ''";
+local boolean _Result;
+
+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;
+
+ if (CONFIG.Database.ConfigAnalyseProperties.PropertyName in CONFIG.Defaults.PersonalityVoorkeuren@options) then
+ _Result = SetValue(CONFIG.Database.ConfigAnalyseProperties.PropertyName; CONFIG.Database.ConfigAnalyseProperties.Value);
+ end if;
+end for;
+ PersonalityVoorkeuren: Properties ophalen op basis van ConfigId
+ ;state.personalityvoorkeurenloaded@value;config.database.configanalyseproperties@options;
+
+
+ (CONFIG.ReferentieConfiguratie <> "") and (CONFIG.InputMode <> "Edit") and (CONFIG.Settings.BulkConfiguratieId <> "")
+ local string _Connection = GetSetting("data.connectionstring") + ";cache=false";
+local string _Query = "SELECT TOP 1 * FROM eCon.Configurations WHERE name = '" + CONFIG.ReferentieConfiguratie + "'";
+
+CONFIG.Database.Configurations@options = {};
+CONFIG.Database.Configurations@options = ExecuteOptionsQuery("CONFIG.Database.Configurations"; true; _Connection; _Query);
+
+STATE.ReferentieConfiguratieLoaded = true;
+ ReferentieConfiguratie: ConfigId ophalen op basis van ReferentieConfiguratie (bij bulkconfiguratie)
+ ;config.database.configurations@options;state.referentieconfiguratieloaded@value;
+
+
+ STATE.ReferentieConfiguratieLoaded and (CONFIG.Database.Configurations.Name == CONFIG.ReferentieConfiguratie) and (CONFIG.Settings.BulkConfiguratieId <> "")
+ STATE.ReferentieConfiguratieLoaded = 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;
+
+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;
+ _Result = SetValue(CONFIG.Database.ConfigAnalyseProperties.PropertyName; CONFIG.Database.ConfigAnalyseProperties.Value);
+
+end for;
+ ReferentieConfiguratie: Properties ophalen op basis van ConfigId (bij bulkconfiguratie)
+ ;state.referentieconfiguratieloaded@value;config.database.configanalyseproperties@options;
+
+
+ (CONFIG.Settings.BulkConfiguratieId <> "") and (CONFIG.InputMode <> "Edit")
+ local string _Connection = GetSetting("data.connectionstring") + ";cache=false";
+local string _Query = "SELECT TOP 1 * FROM eCon.Configurations WHERE name = '" + CONFIG.Settings.BulkConfiguratieId + "'";
+
+CONFIG.Database.Configurations@options = {};
+CONFIG.Database.Configurations@options = ExecuteOptionsQuery("CONFIG.Database.Configurations"; true; _Connection; _Query);
+
+STATE.BulkConfiguratieLoaded = true;
+
+ BulkConfiguratie: ConfigId ophalen op basis van BulkConfiguratieId
+ ;config.database.configurations@options;state.bulkconfiguratieloaded@value;
+
+
+ STATE.BulkConfiguratieLoaded and (CONFIG.Database.Configurations.Name == CONFIG.Settings.BulkConfiguratieId)
+
+STATE.BulkConfiguratieLoaded = 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;
+
+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;
+
+ if (CONFIG.Database.ConfigAnalyseProperties.PropertyName in CONFIG.Defaults.BulkConfiguratie@options) then
+ if (CONFIG.Database.ConfigAnalyseProperties.Value <> "") then
+ _Result = SetValue(CONFIG.Database.ConfigAnalyseProperties.PropertyName; CONFIG.Database.ConfigAnalyseProperties.Value);
+ end if;
+ end if;
+end for;
+
+
+ BulkConfiguratie: Properties ophalen op basis van ConfigId
+ ;state.bulkconfiguratieloaded@value;config.database.configanalyseproperties@options;
+
+
+ (CONFIG.Settings.BulkConfiguratieId <> "") and (CONFIG.InputMode <> "Edit")
+
+if (Data.BulkKenmerken.BodemKleur <> "") then
+ DATA.Kenmerken.BodemKleur = DATA.BulkKenmerken.BodemKleur;
+end if;
+
+if (Data.BulkKenmerken.LadeDiepte <> "") then
+ DATA.Kenmerken.LadeDiepte = DATA.BulkKenmerken.LadeDiepte;
+end if;
+
+if (Data.BulkKenmerken.LadeKleur <> "") then
+DATA.Kenmerken.LadeKleur = DATA.BulkKenmerken.LadeKleur;
+end if;
+
+if (Data.BulkKenmerken.LadeHoogte <> "") then
+ DATA.Kenmerken.LadeHoogte = DATA.BulkKenmerken.LadeHoogte;
+end if;
+
+if (Data.BulkKenmerken.GeleiderTechnologie <> "") then
+ DATA.Kenmerken.GeleiderTechnologie = DATA.BulkKenmerken.GeleiderTechnologie;
+end if;
+
+if (Data.BulkKenmerken.FrontBevestiging <> "") then
+ DATA.Kenmerken.FrontBevestiging = DATA.BulkKenmerken.FrontBevestiging;
+end if;
+
+if ((Data.BulkKenmerken.MatMateriaal <> "") and (Data.BulkKenmerken.HeeftMat == "True")) then
+ DATA.Kenmerken.MatMateriaal = DATA.BulkKenmerken.MatMateriaal;
+end if;
+
+if ((Data.BulkKenmerken.MatKleur <> "") and (Data.BulkKenmerken.HeeftMat == "True")) then
+ DATA.Kenmerken.MatKleur = DATA.BulkKenmerken.MatKleur;
+end if;
+
+if (Data.BulkKenmerken.VerpakkingType <> "") then
+ DATA.Kenmerken.VerpakkingType = DATA.BulkKenmerken.VerpakkingType;
+end if;
+
+//Niet Meeleveren
+if (Data.BulkKenmerken.NietMeeleveren_AfdekkapBinnen <> "NietWijzigen") then
+ Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapBinnen = CBool(Data.BulkKenmerken.NietMeeleveren_AfdekkapBinnen);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_AfdekkapBuiten <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapBuiten = CBool(Data.BulkKenmerken.NietMeeleveren_AfdekkapBuiten);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapRugwandHouder = CBool(Data.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_BevestigingBodemFront <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_BevestigingBodemFront = CBool(Data.BulkKenmerken.NietMeeleveren_BevestigingBodemFront);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_FrontBevestiging <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_FrontBevestiging = CBool(Data.BulkKenmerken.NietMeeleveren_FrontBevestiging);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_Geleider <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_Geleider = CBool(Data.BulkKenmerken.NietMeeleveren_Geleider);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_InschuifElementVoor <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_InschuifElementVoor = CBool(Data.BulkKenmerken.NietMeeleveren_InschuifElementVoor);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_InschuifElementZijkant <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_InschuifElementZijkant = CBool(Data.BulkKenmerken.NietMeeleveren_InschuifElementZijkant);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_Opvullijst <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_Opvullijst = CBool(Data.BulkKenmerken.NietMeeleveren_Opvullijst);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSet <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSet = CBool(Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSet);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers = CBool(Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSynchronisatieStang = CBool(Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang);
+end if;
+
+if (Data.BulkKenmerken.NietMeeleveren_Zijstabilisering <> "NietWijzigen") then
+Data.Kenmerken.NietMeeleveren.NietMeeleveren_Zijstabilisering = CBool(Data.BulkKenmerken.NietMeeleveren_Zijstabilisering);
+end if;
+
+CONFIG.ReferentieConfiguratie = "";
+ Bulkkenmerken invullen in DATA kenmerken
+ ;data.kenmerken.bodemkleur@value;data.kenmerken.ladediepte@value;data.kenmerken.ladekleur@value;data.kenmerken.ladehoogte@value;data.kenmerken.geleidertechnologie@value;data.kenmerken.frontbevestiging@value;data.kenmerken.matmateriaal@value;data.kenmerken.matkleur@value;data.kenmerken.verpakkingtype@value;data.kenmerken.nietmeeleveren.nietmeeleveren_afdekkapbinnen@value;data.kenmerken.nietmeeleveren.nietmeeleveren_afdekkapbuiten@value;data.kenmerken.nietmeeleveren.nietmeeleveren_afdekkaprugwandhouder@value;data.kenmerken.nietmeeleveren.nietmeeleveren_bevestigingbodemfront@value;data.kenmerken.nietmeeleveren.nietmeeleveren_frontbevestiging@value;data.kenmerken.nietmeeleveren.nietmeeleveren_geleider@value;data.kenmerken.nietmeeleveren.nietmeeleveren_inschuifelementvoor@value;data.kenmerken.nietmeeleveren.nietmeeleveren_inschuifelementzijkant@value;data.kenmerken.nietmeeleveren.nietmeeleveren_opvullijst@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionset@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionseteenhedenenmeenemers@value;data.kenmerken.nietmeeleveren.nietmeeleveren_tiponblumotionsynchronisatiestang@value;data.kenmerken.nietmeeleveren.nietmeeleveren_zijstabilisering@value;config.referentieconfiguratie@value;
+
+
+
+
+ true
+ UI.Kenmerken.OpvullijstDikte = 25;
+ Bereken OpvullijstDikte
+ ;ui.kenmerken.opvullijstdikte@value;
+
+
+ true
+ local double _CorpusWanddikte = DATA.Kenmerken.CorpusWanddikte;
+local double _OpvullijstDikte = DATA.BerekendeWaarden.OpvullijstDikte;
+
+local boolean _IsBinnenbreedte = DATA.Kenmerken.IsBinnenbreedte;
+local boolean _HeeftOpvullijstLinks = DATA.Kenmerken.HeeftOpvullijstLinks;
+local boolean _HeeftOpvullijstRechts = DATA.Kenmerken.HeeftOpvullijstRechts;
+
+local long _MinTolerantieIB = 0;
+local long _AantalOpvullijsten = 0;
+
+if (_HeeftOpvullijstLinks) then
+ _AantalOpvullijsten = _AantalOpvullijsten + 1;
+end if;
+
+if (_HeeftOpvullijstRechts) then
+ _AantalOpvullijsten = _AantalOpvullijsten + 1;
+end if;
+
+if (_IsBinnenbreedte) then
+ _CorpusWanddikte = 0;
+end if;
+
+DATA.BerekendeWaarden.CorpusBreedteDelta = (2 * _CorpusWanddikte) + (_AantalOpvullijsten * _OpvullijstDikte) + _MinTolerantieIB;
+ Bereken CorpusBreedteDelta
+ ;data.berekendewaarden.corpusbreedtedelta@value;
+
+
+ true
+ local double _InterneBreedte = 0;
+
+if DATA.Kenmerken.CorpusBreedte > 0 then
+ _InterneBreedte = DATA.Kenmerken.CorpusBreedte - DATA.BerekendeWaarden.CorpusBreedteDelta;
+end if;
+
+DATA.BerekendeWaarden.InterneBreedte = _InterneBreedte;
+ Bereken InterneBreedte
+ ;data.berekendewaarden.internebreedte@value;
+
+
+ false
+ local string _LadeCode = DATA.Kenmerken.LadeHoogte;
+
+if (DATA.Kenmerken.IsBinnenlade) then
+ _LadeCode = _LadeCode + "/Z";
+end if;
+
+DATA.BerekendeWaarden.LadeCode = _LadeCode;
+
+ Bereken LadeCode (inactive, zie berekende waarden winkelkarinfo)
+ ;data.berekendewaarden.ladecode@value;
+
+
+ (DATA.Kenmerken.IsBinnenlade) and ((DATA.Kenmerken.LadeHoogte == "M") or (DATA.Kenmerken.LadeHoogte == "C") or (DATA.Kenmerken.LadeHoogte == "K"))
+ local string _VoorwandType = "";
+
+if (DATA.Kenmerken.LadeHoogte == "M") then
+ if (DATA.Kenmerken.VoorwandTypeVanMBinnenlade == "Glas") then
+ _VoorwandType = "Vulling";
+ end if;
+
+ if (DATA.Kenmerken.VoorwandTypeVanMBinnenlade == "Metaal") then
+ _VoorwandType = "Voorstuk";
+ end if;
+end if;
+
+if (DATA.Kenmerken.LadeHoogte == "C") then
+ if ((DATA.Kenmerken.VoorwandTypeVanCBinnenlade == "GlasHoog") or (DATA.Kenmerken.VoorwandTypeVanCBinnenlade == "GlasLaag")) then
+ _VoorwandType = "Vulling";
+ end if;
+
+ if (DATA.Kenmerken.VoorwandTypeVanCBinnenlade == "Reling") then
+ _VoorwandType = "Reling";
+ end if;
+end if;
+
+if (DATA.Kenmerken.LadeHoogte == "K") then
+ if (DATA.Kenmerken.VoorwandTypeVanKBinnenlade == "Metaal") then
+ _VoorwandType = "Voorstuk";
+ end if;
+end if;
+
+DATA.BerekendeWaarden.VoorwandType = _VoorwandType;
+ Bereken VoorwandType
+ ;data.berekendewaarden.voorwandtype@value;
+
+
+ (DATA.Kenmerken.IsBinnenlade) and (DATA.Kenmerken.LadeHoogte == "C")
+ DATA.BerekendeWaarden.VoorwandVerhogingHoogte = switch DATA.Kenmerken.VoorwandTypeVanCBinnenlade
+ case "GlasLaag": "Laag"
+ case "GlasHoog": "Hoog"
+ else ""
+end switch;
+ Bereken VoorwandVerhogingHoogte
+ ;data.berekendewaarden.voorwandverhoginghoogte@value;
+
+
+ BEHAVIOR.IsInteractive
+
+if (not(DATA.Kenmerken.HeeftAfwijkendeRugHoogte) and (DATA.Kenmerken.LadeHoogte <> "")) then
+ if (DATA.Kenmerken.Toepassing <> "SY") then
+ DATA.Kenmerken.RugHoogte = DATA.Kenmerken.LadeHoogte;
+ else
+ DATA.Kenmerken.RugHoogte = "M";
+ end if;
+end if;
+
+ Bereken Rughoogte
+ ;
+
+
+ DATA.Kenmerken.LadeHoogte <> "" and DATA.Kenmerken.Rughoogte <> ""
+
+if ((DATA.Kenmerken.LadeHoogte == DATA.Kenmerken.Rughoogte) or ((CONFIG.Settings.OperationMode == "Extern") and (DATA.Kenmerken.Toepassing == "L"))) then
+ DATA.Kenmerken.HeeftAfwijkendeRughoogte = false;
+else
+ DATA.Kenmerken.HeeftAfwijkendeRughoogte = true;
+end if;
+
+ Bereken HeeftAfwijkendeRughoogte
+ ;data.kenmerken.heeftafwijkenderughoogte@value;
+
+
+ (DATA.Kenmerken.LadeHoogte <> "")
+
+local string _AfbeeldingCode = ""
+
+if (DATA.Kenmerken.Toepassing <> "SST") then
+ if (DATA.Kenmerken.ProductieWijze <> "V") then
+ local string _ProductieWijze = DATA.Kenmerken.ProductieWijze;
+
+ _AfbeeldingCode = _AfbeeldingCode + "SpecialeProductieWijze";
+
+ if (_ProductieWijze == "B") then
+ _AfbeeldingCode = _AfbeeldingCode + "_Bodem" ;
+ end if;
+
+ if (_ProductieWijze == "BR") then
+ _AfbeeldingCode = _AfbeeldingCode + "_BodemEnRug_" + DATA.Kenmerken.RugHoogte;
+ end if;
+
+ if (_ProductieWijze == "R") then
+ _AfbeeldingCode = _AfbeeldingCode + "_Rug_" + DATA.Kenmerken.RugHoogte;
+ end if;
+
+ if (_ProductieWijze == "RRWH") then
+ _AfbeeldingCode = _AfbeeldingCode + "_RugMetHouders_" + DATA.Kenmerken.RugHoogte;
+ end if;
+
+ if (_ProductieWijze == "F") then
+ local string _LadeHoogte = DATA.Kenmerken.LadeHoogte;
+ local string _VoorwandTypeVanBinnenlade = "";
+
+ if (_LadeHoogte == "C") then
+ _VoorwandTypeVanBinnenlade = DATA.Kenmerken.VoorwandTypeVanCBinnenlade;
+ end if;
+
+ if (_LadeHoogte == "M") then
+ _VoorwandTypeVanBinnenlade = DATA.Kenmerken.VoorwandTypeVanMBinnenlade;
+ end if;
+
+ if (_LadeHoogte == "K") then
+ _VoorwandTypeVanBinnenlade = DATA.Kenmerken.VoorwandTypeVanKBinnenlade;
+ end if;
+
+ _AfbeeldingCode = _AfbeeldingCode + "_Front_" + _LadeHoogte + "_" + _VoorwandTypeVanBinnenlade;
+ end if;
+ else
+ _AfbeeldingCode = DATA.Kenmerken.LadeHoogte;
+
+ if (DATA.Kenmerken.IsBinnenlade) then
+ _AfbeeldingCode = _AfbeeldingCode + "_Z";
+ end if;
+
+ if (DATA.Kenmerken.Toepassing == "SP") then
+ _AfbeeldingCode = _AfbeeldingCode + "_" + "Spoelbak";
+ end if;
+
+ if (DATA.Kenmerken.Toepassing == "SY") then
+ _AfbeeldingCode = _AfbeeldingCode + "_" + "Sifon";
+
+ if (DATA.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel") then
+ _AfbeeldingCode = _AfbeeldingCode + "_x2";
+ end if;
+ end if;
+
+ if (DATA.Kenmerken.IsBinnenlade) then
+ if (DATA.BerekendeWaarden.VoorwandType <> "") then
+ _AfbeeldingCode = _AfbeeldingCode + "_" + DATA.BerekendeWaarden.VoorwandType;
+ end if;
+
+ if (DATA.BerekendeWaarden.VoorwandVerhogingHoogte <> "") then
+ _AfbeeldingCode = _AfbeeldingCode + "_" + DATA.BerekendeWaarden.VoorwandVerhogingHoogte;
+ end if;
+ end if;
+
+ if (DATA.Kenmerken.ZijwandType == "Free") then
+ _AfbeeldingCode = _AfbeeldingCode + "_" + DATA.Kenmerken.ZijwandType;
+ end if;
+ end if;
+
+ _AfbeeldingCode = _AfbeeldingCode + "_Legra";
+else
+ if (DATA.Kenmerken.SpaceStep.Uitvoering == "Volledig") then
+ _AfbeeldingCode = "SST_Volledig"
+ end if;
+ if (DATA.Kenmerken.SpaceStep.Uitvoering == "SokkelEnTablet") then
+ _AfbeeldingCode = "SST_SokkelEnTablet"
+ end if;
+ if (DATA.Kenmerken.SpaceStep.Uitvoering == "Tablet") then
+ _AfbeeldingCode = "SST_Tablet"
+ end if;
+end if;
+
+DATA.BerekendeWaarden.AfbeeldingCode = _AfbeeldingCode;
+
+ Bereken AfbeeldingCode
+ ;data.berekendewaarden.afbeeldingcode@value;
+
+
+
+
+
+ true
+ RANGE.CorpusBreedte.Minimum = RANGE.InterneBreedte.Minimum + DATA.BerekendeWaarden.CorpusBreedteDelta;
+ CorpusBreedte minimum
+ ;range.corpusbreedte.minimum@value;
+
+
+ true
+ RANGE.CorpusBreedte.Maximum = RANGE.InterneBreedte.Maximum + DATA.BerekendeWaarden.CorpusBreedteDelta;
+ CorpusBreedte maximum
+ ;range.corpusbreedte.maximum@value;
+
+
+
+
+ true
+ local double MINIMUM_BREEDTE_SMALLELADE = 148;
+local double MINIMUM_BREEDTE_SMALLELADE_TOB = 171;
+local double MINIMUM_BREEDTE_SMALLEBINNENLADE = 187;
+local double MINIMUM_BREEDTE_GEWONE_LADE = 237; // Kleiner dan deze afmeting is "Smalle lade"
+local double MINIMUM_BREEDTE_SPOELBAKLADE = 350;
+local double MINIMUM_BREEDTE_SIFONLADE_ENKEL = 300;
+local double MINIMUM_BREEDTE_SIFONLADE_DUBBEL = 400;
+local double MINIMUM_BREEDTE_UITSPARING = 150;
+local double MINIMUM_BREEDTE_ZIJSTABILISERING = 362;
+
+// Gedeelte voor (extra) Smalle Lade
+local double _MinimumBreedte = MINIMUM_BREEDTE_SMALLELADE;
+if (DATA.Kenmerken.GeleiderTechnologie == "TOB") then
+ _MinimumBreedte = Max(_MinimumBreedte; MINIMUM_BREEDTE_SMALLELADE_TOB);
+end if;
+if (DATA.Kenmerken.IsBinnenlade) then
+ _MinimumBreedte= Max(_MinimumBreedte; MINIMUM_BREEDTE_SMALLEBINNENLADE);
+end if;
+
+
+// Gedeelte voor gewone lades
+if (DATA.Kenmerken.Toepassing == "SP") then
+ _MinimumBreedte = Max(_MinimumBreedte; MINIMUM_BREEDTE_SPOELBAKLADE);
+end if;
+
+if (DATA.Kenmerken.Toepassing == "SY") then
+ local double _MinimumBreedteZ1 = Max(DATA.Kenmerken.UitsparingData.Z1.Breedte; MINIMUM_BREEDTE_UITSPARING);
+ local double _MinimumBreedteSifon = 0;
+
+ if (DATA.Kenmerken.UitsparingData.UitsparingAantal == "Enkel") then
+ _MinimumBreedteSifon = MINIMUM_BREEDTE_SIFONLADE_ENKEL + _MinimumBreedteZ1;
+ end if;
+
+ if (DATA.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel") then
+ local double _MinimumBreedteZ2 = Max(DATA.Kenmerken.UitsparingData.Z2.Breedte; MINIMUM_BREEDTE_UITSPARING);
+
+ _MinimumBreedteSifon = MINIMUM_BREEDTE_SIFONLADE_DUBBEL + _MinimumBreedteZ1 + _MinimumBreedteZ2;
+ end if;
+
+ _MinimumBreedte = Max(_MinimumBreedte; _MinimumBreedteSifon);
+end if;
+
+if (DATA.Kenmerken.HeeftZijstabilisering) then
+ _MinimumBreedte = Max(_MinimumBreedte; MINIMUM_BREEDTE_ZIJSTABILISERING);
+end if;
+
+RANGE.InterneBreedte.Minimum = _MinimumBreedte;
+
+// todo: controleren op extra beperkingen (niet in extremabepaler) bv. geleidertechnologie
+ InterneBreedte minimum
+ ;range.internebreedte.minimum@value;
+
+
+ true
+ local double MAXIMUM_BREEDTE = 1430;
+local double MAXIMUM_BREEDTE_BINNENLADE = 1168;
+local double MAXIMUM_BREEDTE_RUGWANDMATERIAAL_STAAL = 1168;
+local double MAXIMUM_BREEDTE_VERPAKKINGTYPE_VHOSS = 1168;
+local double MAXIMUM_BREEDTE_DWARSVERDELING = 1168;
+local double MAXIMUM_BREEDTE_GELEIDERTECHNOLOGIE_TIPONBLUMOTION = 1368;
+
+local double _MaximumBreedte = MAXIMUM_BREEDTE;
+
+if (DATA.Kenmerken.IsBinnenlade) then
+ _MaximumBreedte = Min(_MaximumBreedte; MAXIMUM_BREEDTE_BINNENLADE);
+end if;
+
+if (DATA.Kenmerken.RugwandMateriaal == "Staal") then
+ _MaximumBreedte = Min(_MaximumBreedte; MAXIMUM_BREEDTE_RUGWANDMATERIAAL_STAAL);
+end if;
+
+if (DATA.Kenmerken.VerpakkingType == "VHoss") then
+ _MaximumBreedte = Min(_MaximumBreedte; MAXIMUM_BREEDTE_VERPAKKINGTYPE_VHOSS);
+end if;
+
+if (DATA.Kenmerken.DwarsverdelingAantal <> "0") then
+ _MaximumBreedte = Min(_MaximumBreedte; MAXIMUM_BREEDTE_DWARSVERDELING);
+end if;
+
+if (DATA.Kenmerken.GeleiderTechnologie == "TOB") then
+ _MaximumBreedte = Min(_MaximumBreedte; MAXIMUM_BREEDTE_GELEIDERTECHNOLOGIE_TIPONBLUMOTION);
+end if;
+
+RANGE.InterneBreedte.Maximum = _MaximumBreedte;
+
+// todo: controleren op extra beperkingen (niet in extremabepaler) bv. zijstabilisering, tipon, flatpack
+ InterneBreedte maximum
+ ;range.internebreedte.maximum@value;
+
+
+
+
+
+ UI.Kenmerken.SneltoetsenNietMeeleveren <> ""
+
+local boolean _AlleNietMeeleverensSelecteren;
+
+if (UI.Kenmerken.SneltoetsenNietMeeleveren == "AllesSelecteren") then
+ _AlleNietMeeleverensSelecteren = true;
+end if;
+
+if (UI.Kenmerken.SneltoetsenNietMeeleveren == "AllesDeselecteren") then
+ _AlleNietMeeleverensSelecteren = false;
+end if;
+
+index i of UI.Kenmerken.NietMeeleveren
+ local string _NietMeeleverenProperty = "DATA.Kenmerken.NietMeeleveren.NietMeeleveren_" + UI.Kenmerken.NietMeeleveren(i).Id;
+ local boolean _Result = SetValue(_NietMeeleverenProperty; CStr(_AlleNietMeeleverensSelecteren));
+end index;
+
+UI.Kenmerken.SneltoetsenNietMeeleveren = "";
+
+ Logica sneltoetsen niet meeleveren
+ ;ui.kenmerken.sneltoetsennietmeeleveren@value;
+
+
+
+
+
+ true
+ DATA.Kenmerken.Draagkracht@valids = ConstrainedOptions("DATA.Kenmerken.Draagkracht,DATA.Kenmerken.LadeDiepte@Valids"; "DATA.Kenmerken.Draagkracht"; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte);
+
+ Applying constraints for property DATA.Kenmerken.Draagkracht
+ ;data.kenmerken.draagkracht@valids;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.Draagkracht,DATA.Kenmerken.LadeDiepte@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.Draagkracht,DATA.Kenmerken.LadeDiepte@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.Draagkracht,DATA.Kenmerken.LadeDiepte@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.ProductieWijze@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.ProductieWijze@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.ProductieWijze@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.LadeHoogte@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.LadeHoogte@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.LadeHoogte@Valids
+ ;
+
+
+ true
+ CONFIG.Settings.IsBenelux@style.invalidbooleans = ConstrainedBooleanInvalids("CONFIG.Settings.IsBenelux,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids"; "CONFIG.Settings.IsBenelux"; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.LadeKleur"; DATA.Kenmerken.LadeKleur);
+
+ Applying constraints for property CONFIG.Settings.IsBenelux
+ ;
+
+
+ ConstraintsNotSatisfiedFor("CONFIG.Settings.IsBenelux,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids")
+ ConstraintsErrorMessagesFor("CONFIG.Settings.IsBenelux,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids")
+ Gather constraint messages for decision table CONFIG.Settings.IsBenelux,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.VerpakkingType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.VerpakkingType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.VerpakkingType@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.VerpakkingType,DATA.Kenmerken.ZijwandType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.VerpakkingType,DATA.Kenmerken.ZijwandType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.VerpakkingType,DATA.Kenmerken.ZijwandType@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.MeenemerSet@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.MeenemerSet@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.MeenemerSet@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.LadeKleur@valids = ConstrainedOptions("CONFIG.Settings.IsBenelux,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids"; "DATA.Kenmerken.LadeKleur"; "CONFIG.Settings.IsBenelux"; CurrentBoolean(CONFIG.Settings.IsBenelux); "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte);
+
+ Applying constraints for property DATA.Kenmerken.LadeKleur
+ ;data.kenmerken.ladekleur@valids;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.GeleiderTechnologie@valids = ConstrainedOptions("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.MeenemerSet@Valids;DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.Toepassing@Valids"; "DATA.Kenmerken.GeleiderTechnologie"; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.MeenemerSet"; DATA.Kenmerken.MeenemerSet; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing);
+
+ Applying constraints for property DATA.Kenmerken.GeleiderTechnologie
+ ;data.kenmerken.geleidertechnologie@valids;
+
+
+ true
+ CONFIG.Settings.OperationMode@valids = ConstrainedOptions("CONFIG.Settings.OperationMode,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids"; "CONFIG.Settings.OperationMode"; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing);
+
+ Applying constraints for property CONFIG.Settings.OperationMode
+ ;config.settings.operationmode@valids;
+
+
+ true
+ DATA.Kenmerken.HeeftZijstabilisering@style.invalidbooleans = ConstrainedBooleanInvalids("DATA.Kenmerken.HeeftZijstabilisering,DATA.Kenmerken.Toepassing@Valids"; "DATA.Kenmerken.HeeftZijstabilisering"; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing);
+
+ Applying constraints for property DATA.Kenmerken.HeeftZijstabilisering
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.RugHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.RugHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.RugHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("CONFIG.Settings.OperationMode,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("CONFIG.Settings.OperationMode,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table CONFIG.Settings.OperationMode,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.RugHoogte,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.RugHoogte,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.RugHoogte,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.HeeftZijstabilisering,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.HeeftZijstabilisering,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.HeeftZijstabilisering,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.Toepassing@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.Toepassing@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.Toepassing@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.Toepassing,DATA.Kenmerken.VerpakkingType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.Toepassing,DATA.Kenmerken.VerpakkingType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.Toepassing,DATA.Kenmerken.VerpakkingType@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.RugHoogte@valids = ConstrainedOptions("DATA.Kenmerken.RugHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.RugHoogte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.RugHoogte,DATA.Kenmerken.VerpakkingType@Valids"; "DATA.Kenmerken.RugHoogte"; "DATA.Kenmerken.RugwandMateriaal"; DATA.Kenmerken.RugwandMateriaal; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing; "DATA.Kenmerken.VerpakkingType"; DATA.Kenmerken.VerpakkingType);
+
+ Applying constraints for property DATA.Kenmerken.RugHoogte
+ ;data.kenmerken.rughoogte@valids;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.RugHoogte,DATA.Kenmerken.VerpakkingType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.RugHoogte,DATA.Kenmerken.VerpakkingType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.RugHoogte,DATA.Kenmerken.VerpakkingType@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.MeenemerSet@valids = ConstrainedOptions("DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.MeenemerSet@Valids;DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.MeenemerSet,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids"; "DATA.Kenmerken.MeenemerSet"; "DATA.Kenmerken.GeleiderTechnologie"; DATA.Kenmerken.GeleiderTechnologie; "DATA.Kenmerken.IsBinnenlade"; CurrentBoolean(DATA.Kenmerken.IsBinnenlade); "DATA.Kenmerken.VoorwandTypeVanMBinnenlade"; DATA.Kenmerken.VoorwandTypeVanMBinnenlade);
+
+ Applying constraints for property DATA.Kenmerken.MeenemerSet
+ ;data.kenmerken.meenemerset@valids;
+
+
+ true
+ DATA.Kenmerken.VoorwandTypeVanMBinnenlade@valids = ConstrainedOptions("CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids;DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.MeenemerSet,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids"; "DATA.Kenmerken.VoorwandTypeVanMBinnenlade"; "CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten"; CurrentBoolean(CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten); "DATA.Kenmerken.IsBinnenlade"; CurrentBoolean(DATA.Kenmerken.IsBinnenlade); "DATA.Kenmerken.MeenemerSet"; DATA.Kenmerken.MeenemerSet);
+
+ Applying constraints for property DATA.Kenmerken.VoorwandTypeVanMBinnenlade
+ ;data.kenmerken.voorwandtypevanmbinnenlade@valids;
+
+
+ true
+ CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten@style.invalidbooleans = ConstrainedBooleanInvalids("CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids"; "CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten"; "DATA.Kenmerken.VoorwandTypeVanMBinnenlade"; DATA.Kenmerken.VoorwandTypeVanMBinnenlade);
+
+ Applying constraints for property CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.MeenemerSet,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.MeenemerSet,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.MeenemerSet,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids
+ ;
+
+
+ ConstraintsNotSatisfiedFor("CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids")
+ ConstraintsErrorMessagesFor("CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids")
+ Gather constraint messages for decision table CONFIG.Settings.VoorwandTypeVanMBinnenladeGlasToegelaten,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.MatKleur@valids = ConstrainedOptions("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.MatKleur,DATA.Kenmerken.MatMateriaal@Valids"; "DATA.Kenmerken.MatKleur"; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.MatMateriaal"; DATA.Kenmerken.MatMateriaal);
+
+ Applying constraints for property DATA.Kenmerken.MatKleur
+ ;data.kenmerken.matkleur@valids;
+
+
+ true
+ DATA.Kenmerken.MatMateriaal@valids = ConstrainedOptions("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.MatKleur,DATA.Kenmerken.MatMateriaal@Valids"; "DATA.Kenmerken.MatMateriaal"; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.MatKleur"; DATA.Kenmerken.MatKleur);
+
+ Applying constraints for property DATA.Kenmerken.MatMateriaal
+ ;data.kenmerken.matmateriaal@valids;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.MatKleur,DATA.Kenmerken.MatMateriaal@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.MatKleur,DATA.Kenmerken.MatMateriaal@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.MatKleur,DATA.Kenmerken.MatMateriaal@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.ProductieWijze@valids = ConstrainedOptions("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.ProductieWijze@Valids;DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.VerpakkingType@Valids"; "DATA.Kenmerken.ProductieWijze"; "DATA.Kenmerken.IsBinnenlade"; CurrentBoolean(DATA.Kenmerken.IsBinnenlade); "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing; "DATA.Kenmerken.VerpakkingType"; DATA.Kenmerken.VerpakkingType);
+
+ Applying constraints for property DATA.Kenmerken.ProductieWijze
+ ;data.kenmerken.productiewijze@valids;
+
+
+ true
+ DATA.Kenmerken.VerpakkingType@valids = ConstrainedOptions("DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.VerpakkingType@Valids;DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.VerpakkingType@Valids;DATA.Kenmerken.RugHoogte,DATA.Kenmerken.VerpakkingType@Valids;DATA.Kenmerken.Toepassing,DATA.Kenmerken.VerpakkingType@Valids;DATA.Kenmerken.VerpakkingType,DATA.Kenmerken.ZijwandType@Valids"; "DATA.Kenmerken.VerpakkingType"; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.ProductieWijze"; DATA.Kenmerken.ProductieWijze; "DATA.Kenmerken.RugHoogte"; DATA.Kenmerken.RugHoogte; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing; "DATA.Kenmerken.ZijwandType"; DATA.Kenmerken.ZijwandType);
+
+ Applying constraints for property DATA.Kenmerken.VerpakkingType
+ ;data.kenmerken.verpakkingtype@valids;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.VerpakkingType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.VerpakkingType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.VerpakkingType@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.Toepassing@valids = ConstrainedOptions("CONFIG.Settings.OperationMode,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.HeeftZijstabilisering,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.ProductieWijze,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.RugHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.RugHoogte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.Toepassing,DATA.Kenmerken.VerpakkingType@Valids;DATA.Kenmerken.Toepassing,DATA.Kenmerken.ZijwandType@Valids"; "DATA.Kenmerken.Toepassing"; "CONFIG.Settings.OperationMode"; CONFIG.Settings.OperationMode; "DATA.Kenmerken.GeleiderTechnologie"; DATA.Kenmerken.GeleiderTechnologie; "DATA.Kenmerken.HeeftZijstabilisering"; CurrentBoolean(DATA.Kenmerken.HeeftZijstabilisering); "DATA.Kenmerken.IsBinnenlade"; CurrentBoolean(DATA.Kenmerken.IsBinnenlade); "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.ProductieWijze"; DATA.Kenmerken.ProductieWijze; "DATA.Kenmerken.RugHoogte"; DATA.Kenmerken.RugHoogte; "DATA.Kenmerken.RugwandMateriaal"; DATA.Kenmerken.RugwandMateriaal; "DATA.Kenmerken.VerpakkingType"; DATA.Kenmerken.VerpakkingType; "DATA.Kenmerken.ZijwandType"; DATA.Kenmerken.ZijwandType);
+
+ Applying constraints for property DATA.Kenmerken.Toepassing
+ ;data.kenmerken.toepassing@valids;
+
+
+ true
+ DATA.Kenmerken.ZijwandType@valids = ConstrainedOptions("DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids;DATA.Kenmerken.Toepassing,DATA.Kenmerken.ZijwandType@Valids;DATA.Kenmerken.VerpakkingType,DATA.Kenmerken.ZijwandType@Valids"; "DATA.Kenmerken.ZijwandType"; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing; "DATA.Kenmerken.VerpakkingType"; DATA.Kenmerken.VerpakkingType);
+
+ Applying constraints for property DATA.Kenmerken.ZijwandType
+ ;data.kenmerken.zijwandtype@valids;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.Toepassing,DATA.Kenmerken.ZijwandType@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.Toepassing,DATA.Kenmerken.ZijwandType@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.Toepassing,DATA.Kenmerken.ZijwandType@Valids
+ ;
+
+
+ true
+ DATA.Kenmerken.BodemKleur@valids = ConstrainedOptions("DATA.Kenmerken.BodemKleur,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.RugwandMateriaal@Valids"; "DATA.Kenmerken.BodemKleur"; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.RugwandMateriaal"; DATA.Kenmerken.RugwandMateriaal);
+
+ Applying constraints for property DATA.Kenmerken.BodemKleur
+ ;data.kenmerken.bodemkleur@valids;
+
+
+ true
+ DATA.Kenmerken.LadeDiepte@valids = ConstrainedOptions("CONFIG.Settings.IsBenelux,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids;DATA.Kenmerken.BodemKleur,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.RugwandMateriaal@Valids;DATA.Kenmerken.Draagkracht,DATA.Kenmerken.LadeDiepte@Valids;DATA.Kenmerken.GeleiderTechnologie,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.MatKleur,DATA.Kenmerken.MatMateriaal@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.Toepassing@Valids"; "DATA.Kenmerken.LadeDiepte"; "CONFIG.Settings.IsBenelux"; CurrentBoolean(CONFIG.Settings.IsBenelux); "DATA.Kenmerken.BodemKleur"; DATA.Kenmerken.BodemKleur; "DATA.Kenmerken.Draagkracht"; DATA.Kenmerken.Draagkracht; "DATA.Kenmerken.GeleiderTechnologie"; DATA.Kenmerken.GeleiderTechnologie; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.LadeKleur"; DATA.Kenmerken.LadeKleur; "DATA.Kenmerken.MatKleur"; DATA.Kenmerken.MatKleur; "DATA.Kenmerken.MatMateriaal"; DATA.Kenmerken.MatMateriaal; "DATA.Kenmerken.RugwandMateriaal"; DATA.Kenmerken.RugwandMateriaal; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing; "DATA.Kenmerken.ZijwandType"; DATA.Kenmerken.ZijwandType);
+
+ Applying constraints for property DATA.Kenmerken.LadeDiepte
+ ;data.kenmerken.ladediepte@valids;
+
+
+ true
+ DATA.Kenmerken.RugwandMateriaal@valids = ConstrainedOptions("DATA.Kenmerken.BodemKleur,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.RugwandMateriaal@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.RugHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids"; "DATA.Kenmerken.RugwandMateriaal"; "DATA.Kenmerken.BodemKleur"; DATA.Kenmerken.BodemKleur; "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.RugHoogte"; DATA.Kenmerken.RugHoogte; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing);
+
+ Applying constraints for property DATA.Kenmerken.RugwandMateriaal
+ ;data.kenmerken.rugwandmateriaal@valids;
+
+
+ true
+ DATA.Kenmerken.LadeHoogte@valids = ConstrainedOptions("CONFIG.Settings.IsBenelux,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids;CONFIG.Settings.OperationMode,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.LadeHoogte@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.LadeKleur@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids;DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.LadeHoogte@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.RugwandMateriaal,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.Toepassing@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.VerpakkingType@Valids;DATA.Kenmerken.LadeHoogte,DATA.Kenmerken.ZijwandType@Valids"; "DATA.Kenmerken.LadeHoogte"; "CONFIG.Settings.IsBenelux"; CurrentBoolean(CONFIG.Settings.IsBenelux); "CONFIG.Settings.OperationMode"; CONFIG.Settings.OperationMode; "DATA.Kenmerken.IsBinnenlade"; CurrentBoolean(DATA.Kenmerken.IsBinnenlade); "DATA.Kenmerken.LadeDiepte"; DATA.Kenmerken.LadeDiepte; "DATA.Kenmerken.LadeKleur"; DATA.Kenmerken.LadeKleur; "DATA.Kenmerken.RugwandMateriaal"; DATA.Kenmerken.RugwandMateriaal; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing; "DATA.Kenmerken.VerpakkingType"; DATA.Kenmerken.VerpakkingType; "DATA.Kenmerken.ZijwandType"; DATA.Kenmerken.ZijwandType);
+
+ Applying constraints for property DATA.Kenmerken.LadeHoogte
+ ;data.kenmerken.ladehoogte@valids;
+
+
+ true
+ DATA.Kenmerken.IsBinnenlade@style.invalidbooleans = ConstrainedBooleanInvalids("DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.LadeHoogte@Valids;DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.MeenemerSet,DATA.Kenmerken.VoorwandTypeVanMBinnenlade@Valids;DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.ProductieWijze@Valids;DATA.Kenmerken.IsBinnenlade,DATA.Kenmerken.Toepassing@Valids"; "DATA.Kenmerken.IsBinnenlade"; "DATA.Kenmerken.LadeHoogte"; DATA.Kenmerken.LadeHoogte; "DATA.Kenmerken.MeenemerSet"; DATA.Kenmerken.MeenemerSet; "DATA.Kenmerken.ProductieWijze"; DATA.Kenmerken.ProductieWijze; "DATA.Kenmerken.Toepassing"; DATA.Kenmerken.Toepassing; "DATA.Kenmerken.VoorwandTypeVanMBinnenlade"; DATA.Kenmerken.VoorwandTypeVanMBinnenlade);
+
+ Applying constraints for property DATA.Kenmerken.IsBinnenlade
+ ;
+
+
+ ConstraintsNotSatisfiedFor("DATA.Kenmerken.BodemKleur,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.RugwandMateriaal@Valids")
+ ConstraintsErrorMessagesFor("DATA.Kenmerken.BodemKleur,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.RugwandMateriaal@Valids")
+ Gather constraint messages for decision table DATA.Kenmerken.BodemKleur,DATA.Kenmerken.LadeDiepte,DATA.Kenmerken.RugwandMateriaal@Valids
+ ;
+
+
+
+
+
+
+ true
+
+//De opties waarbij de 3staten boolean voorkomt voor de bulkkenmerken moet hier ook nog tussenkomen
+
+for i = 1 to len(DATA.Kenmerken.BodemKleur@options)
+ UI.Kenmerken.BodemKleur@option(i)@valid = DATA.Kenmerken.BodemKleur@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.BodemKleur@options)
+ UI.BulkKenmerken.BodemKleur@option(i)@valid = DATA.BulkKenmerken.BodemKleur@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.Draagkracht@options)
+ UI.Kenmerken.Draagkracht@option(i)@valid = DATA.Kenmerken.Draagkracht@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.DwarsverdelingAantal@options)
+ UI.Kenmerken.DwarsverdelingAantal@option(i)@valid = DATA.Kenmerken.DwarsverdelingAantal@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.FrontBevestiging@options)
+ UI.Kenmerken.FrontBevestiging@option(i)@valid = DATA.Kenmerken.FrontBevestiging@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.FrontBevestiging@options)
+ UI.BulkKenmerken.FrontBevestiging@option(i)@valid = DATA.BulkKenmerken.FrontBevestiging@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.GeleiderTechnologie@options)
+ UI.Kenmerken.GeleiderTechnologie@option(i)@valid = DATA.Kenmerken.GeleiderTechnologie@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.GeleiderTechnologie@options)
+ UI.BulkKenmerken.GeleiderTechnologie@option(i)@valid = DATA.BulkKenmerken.GeleiderTechnologie@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.LadeDiepte@options)
+ UI.Kenmerken.LadeDiepte@option(i)@valid = DATA.Kenmerken.LadeDiepte@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.LadeDiepte@options)
+ UI.BulkKenmerken.LadeDiepte@option(i)@valid = DATA.BulkKenmerken.LadeDiepte@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.LadeHoogte@options)
+ UI.Kenmerken.LadeHoogte@option(i)@valid = DATA.Kenmerken.LadeHoogte@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.LadeHoogte@options)
+ UI.BulkKenmerken.LadeHoogte@option(i)@valid = DATA.BulkKenmerken.LadeHoogte@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.LadeKleur@options)
+ UI.Kenmerken.LadeKleur@option(i)@valid = DATA.Kenmerken.LadeKleur@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.LadeKleur@options)
+ UI.BulkKenmerken.LadeKleur@option(i)@valid = DATA.BulkKenmerken.LadeKleur@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.MeenemerSet@options)
+ UI.Kenmerken.MeenemerSet@option(i)@valid = DATA.Kenmerken.MeenemerSet@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.OpvullijstKleur@options)
+ UI.Kenmerken.OpvullijstKleur@option(i)@valid = DATA.Kenmerken.OpvullijstKleur@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.ProductieWijze@options)
+ UI.Kenmerken.ProductieWijze@option(i)@valid = DATA.Kenmerken.ProductieWijze@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.RugHoogte@options)
+ UI.Kenmerken.RugHoogte@option(i)@valid = DATA.Kenmerken.RugHoogte@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.RugwandMateriaal@options)
+ UI.Kenmerken.RugwandMateriaal@option(i)@valid = DATA.Kenmerken.RugwandMateriaal@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.Toepassing@options)
+ UI.Kenmerken.Toepassing@option(i)@valid = DATA.Kenmerken.Toepassing@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.VerpakkingType@options)
+ UI.Kenmerken.VerpakkingType@option(i)@valid = DATA.Kenmerken.VerpakkingType@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.VerpakkingType@options)
+ UI.BulkKenmerken.VerpakkingType@option(i)@valid = DATA.BulkKenmerken.VerpakkingType@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.VoorwandTypeVanCBinnenlade@options)
+ UI.Kenmerken.VoorwandTypeVanCBinnenlade@option(i)@valid = DATA.Kenmerken.VoorwandTypeVanCBinnenlade@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.VoorwandTypeVanMBinnenlade@options)
+ UI.Kenmerken.VoorwandTypeVanMBinnenlade@option(i)@valid = DATA.Kenmerken.VoorwandTypeVanMBinnenlade@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.VoorwandTypeVanKBinnenlade@options)
+ UI.Kenmerken.VoorwandTypeVanKBinnenlade@option(i)@valid = DATA.Kenmerken.VoorwandTypeVanKBinnenlade@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.ZijwandType@options)
+ UI.Kenmerken.ZijwandType@option(i)@valid = DATA.Kenmerken.ZijwandType@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.SpaceStep.Diepte@options)
+ UI.Kenmerken.SpaceStep.Sokkeldiepte@option(i)@valid = DATA.Kenmerken.SpaceStep.Diepte@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.SpaceStep.Kleur@options)
+ UI.Kenmerken.SpaceStep.Kleur@option(i)@valid = DATA.Kenmerken.SpaceStep.Kleur@option(i)@valid;
+end for;
+
+
+for i = 1 to len(DATA.Kenmerken.SpaceStep.Uitvoering@options)
+ UI.Kenmerken.SpaceStep.Uitvoering@option(i)@valid = DATA.Kenmerken.SpaceStep.Uitvoering@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.SpaceStep.Bewegingstechnologie@options)
+ UI.Kenmerken.SpaceStep.Bewegingstechnologie@option(i)@valid = DATA.Kenmerken.SpaceStep.Bewegingstechnologie@option(i)@valid;
+end for;
+
+
+ Valids
+ ;ui.kenmerken.bodemkleur@valids;ui.bulkkenmerken.bodemkleur@valids;ui.kenmerken.draagkracht@valids;ui.kenmerken.dwarsverdelingaantal@valids;ui.kenmerken.frontbevestiging@valids;ui.bulkkenmerken.frontbevestiging@valids;ui.kenmerken.geleidertechnologie@valids;ui.bulkkenmerken.geleidertechnologie@valids;ui.kenmerken.ladediepte@valids;ui.bulkkenmerken.ladediepte@valids;ui.kenmerken.ladehoogte@valids;ui.bulkkenmerken.ladehoogte@valids;ui.kenmerken.ladekleur@valids;ui.bulkkenmerken.ladekleur@valids;ui.kenmerken.meenemerset@valids;ui.kenmerken.opvullijstkleur@valids;ui.kenmerken.productiewijze@valids;ui.kenmerken.rughoogte@valids;ui.kenmerken.rugwandmateriaal@valids;ui.kenmerken.toepassing@valids;ui.kenmerken.verpakkingtype@valids;ui.bulkkenmerken.verpakkingtype@valids;ui.kenmerken.voorwandtypevancbinnenlade@valids;ui.kenmerken.voorwandtypevanmbinnenlade@valids;ui.kenmerken.voorwandtypevankbinnenlade@valids;ui.kenmerken.zijwandtype@valids;ui.kenmerken.spacestep.sokkeldiepte@valids;ui.kenmerken.spacestep.kleur@valids;ui.kenmerken.spacestep.uitvoering@valids;ui.kenmerken.spacestep.bewegingstechnologie@valids;
+
+
+ true
+ local string MatKleur = "";
+
+for i = 1 to len(DATA.Kenmerken.MatKleur@options)
+ MatKleur = DATA.Kenmerken.MatKleur@option(i)@id;
+
+ for j = 1 to len(UI.Kenmerken.MatAntislipKleur@options)
+ if (MatKleur == UI.Kenmerken.MatAntislipKleur@option(j)@id) then
+ UI.Kenmerken.MatAntislipKleur@option(j)@valid = DATA.Kenmerken.MatKleur@option(i)@valid;
+ end if;
+ end for;
+
+ for j = 1 to len(UI.Kenmerken.MatAntislipFiberKleur@options)
+ if (MatKleur == UI.Kenmerken.MatAntislipFiberKleur@option(j)@id) then
+ UI.Kenmerken.MatAntislipFiberKleur@option(j)@valid = DATA.Kenmerken.MatKleur@option(i)@valid;
+ end if;
+ end for;
+
+ for j = 1 to len(UI.Kenmerken.MatAntislipFlockKleur@options)
+ if (MatKleur == UI.Kenmerken.MatAntislipFlockKleur@option(j)@id) then
+ UI.Kenmerken.MatAntislipFlockKleur@option(j)@valid = DATA.Kenmerken.MatKleur@option(i)@valid;
+ end if;
+ end for;
+
+ for j = 1 to len(UI.Kenmerken.MatVinylFiberglassKleur@options)
+ if (MatKleur == UI.Kenmerken.MatVinylFiberglassKleur@option(j)@id) then
+ UI.Kenmerken.MatVinylFiberglassKleur@option(j)@valid = DATA.Kenmerken.MatKleur@option(i)@valid;
+ end if;
+ end for;
+end for;
+
+for i = 1 to len(DATA.Kenmerken.MatMateriaal@options)
+ UI.Kenmerken.MatMateriaal@option(i)@valid = DATA.Kenmerken.MatMateriaal@option(i)@valid;
+end for;
+ Valids - Mat
+ ;ui.kenmerken.matmateriaal@valids;
+
+
+ true
+ local string MatKleur = "";
+
+for i = 1 to len(DATA.BulkKenmerken.MatKleur@options)
+ MatKleur = DATA.BulkKenmerken.MatKleur@option(i)@id;
+
+ for j = 1 to len(UI.BulkKenmerken.MatAntislipFiberKleur@options)
+ if (MatKleur == UI.BulkKenmerken.MatAntislipFiberKleur@option(j)@id) then
+ UI.BulkKenmerken.MatAntislipFiberKleur@option(j)@valid = DATA.BulkKenmerken.MatKleur@option(i)@valid;
+ end if;
+ end for;
+
+ for j = 1 to len(UI.BulkKenmerken.MatAntislipFlockKleur@options)
+ if (MatKleur == UI.BulkKenmerken.MatAntislipFlockKleur@option(j)@id) then
+ UI.BulkKenmerken.MatAntislipFlockKleur@option(j)@valid = DATA.BulkKenmerken.MatKleur@option(i)@valid;
+ end if;
+ end for;
+
+ for j = 1 to len(UI.BulkKenmerken.MatVinylFiberglassKleur@options)
+ if (MatKleur == UI.BulkKenmerken.MatVinylFiberglassKleur@option(j)@id) then
+ UI.BulkKenmerken.MatVinylFiberglassKleur@option(j)@valid = DATA.BulkKenmerken.MatKleur@option(i)@valid;
+ end if;
+ end for;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.MatMateriaal@options)
+ UI.BulkKenmerken.MatMateriaal@option(i)@valid = DATA.BulkKenmerken.MatMateriaal@option(i)@valid;
+end for;
+ Valids - BulkKenmerken Mat
+ ;ui.bulkkenmerken.matmateriaal@valids;
+
+
+ true
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_AfdekkapBinnen@options)
+ UI.BulkKenmerken.NietMeeleveren_AfdekkapBinnen@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_AfdekkapBinnen@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_AfdekkapBuiten@options)
+ UI.BulkKenmerken.NietMeeleveren_AfdekkapBuiten@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_AfdekkapBuiten@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder@options)
+ UI.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_BevestigingBodemFront@options)
+ UI.BulkKenmerken.NietMeeleveren_BevestigingBodemFront@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_BevestigingBodemFront@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_FrontBevestiging@options)
+ UI.BulkKenmerken.NietMeeleveren_FrontBevestiging@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_FrontBevestiging@option(i)@valid;
+ if (DATA.BulkKenmerken.NietMeeleveren_FrontBevestiging@option(i)@valid) then
+ aaaDebugInfo = "ja valid";
+ else
+ aaaDebugInfo = "nee valid";
+ end if;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_Geleider@options)
+ UI.BulkKenmerken.NietMeeleveren_Geleider@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_Geleider@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_InschuifElementVoor@options)
+ UI.BulkKenmerken.NietMeeleveren_InschuifElementVoor@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_InschuifElementVoor@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_InschuifElementZijkant@options)
+ UI.BulkKenmerken.NietMeeleveren_InschuifElementZijkant@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_InschuifElementZijkant@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_Opvullijst@options)
+ UI.BulkKenmerken.NietMeeleveren_Opvullijst@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_Opvullijst@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_TiponBlumotionSet@options)
+ UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSet@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_TiponBlumotionSet@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers@options)
+ UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang@options)
+ UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang@option(i)@valid;
+end for;
+
+for i = 1 to len(DATA.BulkKenmerken.NietMeeleveren_Zijstabilisering@options)
+ UI.BulkKenmerken.NietMeeleveren_Zijstabilisering@option(i)@valid = DATA.BulkKenmerken.NietMeeleveren_Zijstabilisering@option(i)@valid;
+end for;
+
+ Valids - BulkKenmerken
+ ;ui.bulkkenmerken.nietmeeleveren_afdekkapbinnen@valids;ui.bulkkenmerken.nietmeeleveren_afdekkapbuiten@valids;ui.bulkkenmerken.nietmeeleveren_afdekkaprugwandhouder@valids;ui.bulkkenmerken.nietmeeleveren_bevestigingbodemfront@valids;ui.bulkkenmerken.nietmeeleveren_frontbevestiging@valids;aaadebuginfo@value;ui.bulkkenmerken.nietmeeleveren_geleider@valids;ui.bulkkenmerken.nietmeeleveren_inschuifelementvoor@valids;ui.bulkkenmerken.nietmeeleveren_inschuifelementzijkant@valids;ui.bulkkenmerken.nietmeeleveren_opvullijst@valids;ui.bulkkenmerken.nietmeeleveren_tiponblumotionset@valids;ui.bulkkenmerken.nietmeeleveren_tiponblumotionseteenhedenenmeenemers@valids;ui.bulkkenmerken.nietmeeleveren_tiponblumotionsynchronisatiestang@valids;ui.bulkkenmerken.nietmeeleveren_zijstabilisering@valids;
+
+
+
+
+ true
+ UI.Kenmerken.VerpakkingTypeLabel@default = UI.Kenmerken.VerpakkingTypeLabel@label;
+UI.Kenmerken.VerpakkingTypeLabel@visible = (DATA.Kenmerken.VerpakkingType == "Probox");
+ Message Probox
+ ;ui.kenmerken.verpakkingtypelabel@default;ui.kenmerken.verpakkingtypelabel@visible;
+
+
+ true
+ UI.Kenmerken.GeleiderTechnologieLabel@default = UI.Kenmerken.GeleiderTechnologieLabel@label;
+UI.Kenmerken.GeleiderTechnologieLabel@visible = (DATA.Kenmerken.GeleiderTechnologie == "TOB" and DATA.Kenmerken.Toepassing <> "SST");
+ Message TIP-ON BLUMOTION
+ ;ui.kenmerken.geleidertechnologielabel@default;ui.kenmerken.geleidertechnologielabel@visible;
+
+
+
+
+ true
+ UI.Kenmerken.BodemKleur@default = DATA.Kenmerken.BodemKleur;
+UI.Kenmerken.CorpusBreedte@default = DATA.Kenmerken.CorpusBreedte;
+UI.Kenmerken.CorpusWanddikte@default = DATA.Kenmerken.CorpusWanddikte;
+UI.Kenmerken.Draagkracht@default = DATA.Kenmerken.Draagkracht;
+UI.Kenmerken.DwarsverdelingAantal@default = DATA.Kenmerken.DwarsverdelingAantal;
+UI.Kenmerken.FrontBevestiging@default = DATA.Kenmerken.FrontBevestiging;
+UI.Kenmerken.GeleiderTechnologie@default = DATA.Kenmerken.GeleiderTechnologie;
+UI.Kenmerken.HeeftAfwijkendeRugHoogte@default = DATA.Kenmerken.HeeftAfwijkendeRugHoogte;
+UI.Kenmerken.HeeftOpvullijstLinks@default = DATA.Kenmerken.HeeftOpvullijstLinks;
+UI.Kenmerken.HeeftOpvullijstRechts@default = DATA.Kenmerken.HeeftOpvullijstRechts;
+UI.Kenmerken.HeeftZijstabilisering@default = DATA.Kenmerken.HeeftZijstabilisering;
+UI.Kenmerken.IsBinnenbreedte@default = DATA.Kenmerken.IsBinnenbreedte;
+UI.Kenmerken.IsBinnenlade@default = DATA.Kenmerken.IsBinnenlade;
+UI.Kenmerken.LadeDiepte@default = DATA.Kenmerken.LadeDiepte;
+UI.Kenmerken.LadeHoogte@default = DATA.Kenmerken.LadeHoogte;
+UI.Kenmerken.LadeKleur@default = DATA.Kenmerken.LadeKleur;
+UI.Kenmerken.MeenemerSet@default = DATA.Kenmerken.MeenemerSet;
+UI.Kenmerken.OpvullijstKleur@default = DATA.Kenmerken.OpvullijstKleur;
+UI.Kenmerken.ProductieWijze@default = DATA.Kenmerken.ProductieWijze;
+UI.Kenmerken.RugHoogte@default = DATA.Kenmerken.RugHoogte;
+UI.Kenmerken.RugwandMateriaal@default = DATA.Kenmerken.RugwandMateriaal;
+UI.Kenmerken.Toepassing@default = DATA.Kenmerken.Toepassing;
+UI.Kenmerken.VerpakkingType@default = DATA.Kenmerken.VerpakkingType;
+UI.Kenmerken.VoorwandTypeVanMBinnenlade@default = DATA.Kenmerken.VoorwandTypeVanMBinnenlade;
+UI.Kenmerken.VoorwandTypeVanCBinnenlade@default = DATA.Kenmerken.VoorwandTypeVanCBinnenlade;
+UI.Kenmerken.VoorwandTypeVanKBinnenlade@default = DATA.Kenmerken.VoorwandTypeVanKBinnenlade;
+UI.Kenmerken.ZijwandType@default = DATA.Kenmerken.ZijwandType;
+
+UI.Kenmerken.InterneBreedte@default = DATA.BerekendeWaarden.InterneBreedte;
+
+UI.Lijn.Aantal@default = DATA.Lijn.Aantal;
+UI.Lijn.Referentie@default = DATA.Lijn.Referentie;
+
+local boolean _DummyCheckV01 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapBinnen;
+local boolean _DummyCheckV02 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapBuiten;
+local boolean _DummyCheckV03 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_AfdekkapRugwandHouder;
+local boolean _DummyCheckV04 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_BevestigingBodemFront;
+local boolean _DummyCheckV05 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_FrontBevestiging;
+local boolean _DummyCheckV06 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_Geleider;
+local boolean _DummyCheckV07 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_InschuifElementVoor;
+local boolean _DummyCheckV08 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_InschuifElementZijkant;
+local boolean _DummyCheckV09 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_Opvullijst;
+local boolean _DummyCheckV10 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSet;
+local boolean _DummyCheckV11 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers;
+local boolean _DummyCheckV12 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_TiponBlumotionSynchronisatieStang;
+local boolean _DummyCheckV13 = Data.Kenmerken.NietMeeleveren.NietMeeleveren_Zijstabilisering;
+
+index i of UI.Kenmerken.NietMeeleveren
+ local boolean _IsChecked = CBool(Eval("DATA.Kenmerken.NietMeeleveren.NietMeeleveren_" + UI.Kenmerken.NietMeeleveren(i).Id));
+
+ UI.Kenmerken.NietMeeleveren(i).IsSelected@default = _IsChecked;
+end index;
+ Values
+ ;ui.kenmerken.bodemkleur@default;ui.kenmerken.corpusbreedte@default;ui.kenmerken.corpuswanddikte@default;ui.kenmerken.draagkracht@default;ui.kenmerken.dwarsverdelingaantal@default;ui.kenmerken.frontbevestiging@default;ui.kenmerken.geleidertechnologie@default;ui.kenmerken.heeftafwijkenderughoogte@default;ui.kenmerken.heeftopvullijstlinks@default;ui.kenmerken.heeftopvullijstrechts@default;ui.kenmerken.heeftzijstabilisering@default;ui.kenmerken.isbinnenbreedte@default;ui.kenmerken.isbinnenlade@default;ui.kenmerken.ladediepte@default;ui.kenmerken.ladehoogte@default;ui.kenmerken.ladekleur@default;ui.kenmerken.meenemerset@default;ui.kenmerken.opvullijstkleur@default;ui.kenmerken.productiewijze@default;ui.kenmerken.rughoogte@default;ui.kenmerken.rugwandmateriaal@default;ui.kenmerken.toepassing@default;ui.kenmerken.verpakkingtype@default;ui.kenmerken.voorwandtypevanmbinnenlade@default;ui.kenmerken.voorwandtypevancbinnenlade@default;ui.kenmerken.voorwandtypevankbinnenlade@default;ui.kenmerken.zijwandtype@default;ui.kenmerken.internebreedte@default;ui.lijn.aantal@default;ui.lijn.referentie@default;
+
+
+ true
+ UI.Kenmerken.MatMateriaal@default = DATA.Kenmerken.MatMateriaal;
+UI.Kenmerken.HeeftMat@default = (UI.Kenmerken.MatMateriaal <> "");
+
+UI.Kenmerken.MatVinylFiberglassKleur@default = "";
+UI.Kenmerken.MatAntislipKleur@default = "";
+UI.Kenmerken.MatAntislipFiberKleur@default = "";
+UI.Kenmerken.MatAntislipFlockKleur@default = "";
+
+switch UI.Kenmerken.MatMateriaal
+ case "CF": UI.Kenmerken.MatVinylFiberglassKleur@default = DATA.Kenmerken.MatKleur
+ case "AS": UI.Kenmerken.MatAntislipKleur@default = DATA.Kenmerken.MatKleur
+ case "AF": UI.Kenmerken.MatAntislipFiberKleur@default = DATA.Kenmerken.MatKleur
+ case "AZ": UI.Kenmerken.MatAntislipFlockKleur@default = DATA.Kenmerken.MatKleur
+end switch
+ Values - Mat
+ ;ui.kenmerken.matmateriaal@default;ui.kenmerken.heeftmat@default;ui.kenmerken.matvinylfiberglasskleur@default;ui.kenmerken.matantislipkleur@default;ui.kenmerken.matantislipfiberkleur@default;ui.kenmerken.matantislipflockkleur@default;
+
+
+ true
+ UI.Kenmerken.UitsparingData.X.BreedteRugdeel@default = DATA.Kenmerken.UitsparingData.X.Breedte;
+UI.Kenmerken.UitsparingData.X.Hoogte@default = DATA.Kenmerken.UitsparingData.X.Hoogte;
+UI.Kenmerken.UitsparingData.X.Materiaal@default = DATA.Kenmerken.UitsparingData.X.Materiaal;
+
+UI.Kenmerken.UitsparingData.M.BreedteRugdeel@default = DATA.Kenmerken.UitsparingData.M.Breedte;
+UI.Kenmerken.UitsparingData.M.Hoogte@default = DATA.Kenmerken.UitsparingData.M.Hoogte;
+UI.Kenmerken.UitsparingData.M.Materiaal@default = DATA.Kenmerken.UitsparingData.M.Materiaal;
+
+UI.Kenmerken.UitsparingData.Y.BreedteRugdeel@default = DATA.Kenmerken.UitsparingData.Y.Breedte;
+UI.Kenmerken.UitsparingData.Y.Hoogte@default = DATA.Kenmerken.UitsparingData.Y.Hoogte;
+UI.Kenmerken.UitsparingData.Y.Materiaal@default = DATA.Kenmerken.UitsparingData.Y.Materiaal;
+
+UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing@default = DATA.Kenmerken.UitsparingData.Z1.Breedte;
+UI.Kenmerken.UitsparingData.Z1.Diepte@default = DATA.Kenmerken.UitsparingData.Z1.Diepte;
+UI.Kenmerken.UitsparingData.Z1.Hoogte@default = DATA.Kenmerken.UitsparingData.Z1.Hoogte;
+UI.Kenmerken.UitsparingData.Z1.Materiaal@default = DATA.Kenmerken.UitsparingData.Z1.Materiaal;
+UI.Kenmerken.UitsparingData.Z1.Vorm@default = DATA.Kenmerken.UitsparingData.Z1.Vorm;
+
+UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing@default = DATA.Kenmerken.UitsparingData.Z2.Breedte;
+UI.Kenmerken.UitsparingData.Z2.Diepte@default = DATA.Kenmerken.UitsparingData.Z2.Diepte;
+UI.Kenmerken.UitsparingData.Z2.Hoogte@default = DATA.Kenmerken.UitsparingData.Z2.Hoogte;
+UI.Kenmerken.UitsparingData.Z2.Materiaal@default = DATA.Kenmerken.UitsparingData.Z2.Materiaal;
+UI.Kenmerken.UitsparingData.Z2.Vorm@default = DATA.Kenmerken.UitsparingData.Z2.Vorm;
+
+UI.Kenmerken.UitsparingData.UitsparingAantal@default = DATA.Kenmerken.UitsparingData.UitsparingAantal;
+ Values - UitsparingData
+ ;ui.kenmerken.uitsparingdata.x.breedterugdeel@default;ui.kenmerken.uitsparingdata.x.hoogte@default;ui.kenmerken.uitsparingdata.x.materiaal@default;ui.kenmerken.uitsparingdata.m.breedterugdeel@default;ui.kenmerken.uitsparingdata.m.hoogte@default;ui.kenmerken.uitsparingdata.m.materiaal@default;ui.kenmerken.uitsparingdata.y.breedterugdeel@default;ui.kenmerken.uitsparingdata.y.hoogte@default;ui.kenmerken.uitsparingdata.y.materiaal@default;ui.kenmerken.uitsparingdata.z1.breedteuitsparing@default;ui.kenmerken.uitsparingdata.z1.diepte@default;ui.kenmerken.uitsparingdata.z1.hoogte@default;ui.kenmerken.uitsparingdata.z1.materiaal@default;ui.kenmerken.uitsparingdata.z1.vorm@default;ui.kenmerken.uitsparingdata.z2.breedteuitsparing@default;ui.kenmerken.uitsparingdata.z2.diepte@default;ui.kenmerken.uitsparingdata.z2.hoogte@default;ui.kenmerken.uitsparingdata.z2.materiaal@default;ui.kenmerken.uitsparingdata.z2.vorm@default;ui.kenmerken.uitsparingdata.uitsparingaantal@default;
+
+
+ true
+
+UI.Kenmerken.SpaceStep.Sokkelbreedte@default = DATA.Kenmerken.SpaceStep.Breedte;
+UI.Kenmerken.SpaceStep.Sokkelhoogte@default = DATA.Kenmerken.SpaceStep.Hoogte;
+UI.Kenmerken.SpaceStep.Sokkeldiepte@default = DATA.Kenmerken.SpaceStep.Diepte;
+UI.Kenmerken.SpaceStep.Kleur@default = DATA.Kenmerken.SpaceStep.Kleur;
+UI.Kenmerken.SpaceStep.Uitvoering@default = DATA.Kenmerken.SpaceStep.Uitvoering;
+UI.Kenmerken.SpaceStep.Bewegingstechnologie@default = DATA.Kenmerken.SpaceStep.Bewegingstechnologie;
+UI.Kenmerken.SpaceStep.StekkerServodrive@default = DATA.Kenmerken.SpaceStep.StekkerServodrive;
+UI.Kenmerken.SpaceStep.StekkerType@default = DATA.Kenmerken.SpaceStep.StekkerType;
+
+ Values - SpaceStep
+ ;ui.kenmerken.spacestep.sokkelbreedte@default;ui.kenmerken.spacestep.sokkelhoogte@default;ui.kenmerken.spacestep.sokkeldiepte@default;ui.kenmerken.spacestep.kleur@default;ui.kenmerken.spacestep.uitvoering@default;ui.kenmerken.spacestep.bewegingstechnologie@default;ui.kenmerken.spacestep.stekkerservodrive@default;ui.kenmerken.spacestep.stekkertype@default;
+
+
+ true
+
+UI.BulkKenmerken.BodemKleur@default = DATA.BulkKenmerken.BodemKleur;
+UI.BulkKenmerken.LadeDiepte@default = DATA.BulkKenmerken.LadeDiepte;
+UI.BulkKenmerken.LadeHoogte@default = DATA.BulkKenmerken.LadeHoogte;
+UI.BulkKenmerken.LadeKleur@default = DATA.BulkKenmerken.LadeKleur;
+UI.BulkKenmerken.GeleiderTechnologie@default = DATA.BulkKenmerken.GeleiderTechnologie;
+UI.BulkKenmerken.FrontBevestiging@default = DATA.BulkKenmerken.FrontBevestiging;
+UI.BulkKenmerken.VerpakkingType@default = DATA.BulkKenmerken.VerpakkingType;
+
+UI.BulkKenmerken.MatMateriaal@default = DATA.BulkKenmerken.MatMateriaal;
+//UI.BulkKenmerken.HeeftMat@default = Cstr(UI.BulkKenmerken.MatMateriaal <> "");
+
+UI.BulkKenmerken.MatVinylFiberglassKleur@default = "";
+UI.BulkKenmerken.MatAntislipFiberKleur@default = "";
+UI.BulkKenmerken.MatAntislipFlockKleur@default = "";
+
+switch UI.BulkKenmerken.MatMateriaal
+ case "CF": UI.BulkKenmerken.MatVinylFiberglassKleur@default = DATA.BulkKenmerken.MatKleur
+ case "AF": UI.BulkKenmerken.MatAntislipFiberKleur@default = DATA.BulkKenmerken.MatKleur
+ case "AZ": UI.BulkKenmerken.MatAntislipFlockKleur@default = DATA.BulkKenmerken.MatKleur
+end switch;
+
+UI.BulkKenmerken.NietMeeleveren_AfdekkapBinnen@default = Data.BulkKenmerken.NietMeeleveren_AfdekkapBinnen;
+UI.BulkKenmerken.NietMeeleveren_AfdekkapBuiten@default = Data.BulkKenmerken.NietMeeleveren_AfdekkapBuiten;
+UI.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder@default = Data.BulkKenmerken.NietMeeleveren_AfdekkapRugwandHouder;
+UI.BulkKenmerken.NietMeeleveren_BevestigingBodemFront@default = Data.BulkKenmerken.NietMeeleveren_BevestigingBodemFront;
+UI.BulkKenmerken.NietMeeleveren_FrontBevestiging@default = Data.BulkKenmerken.NietMeeleveren_FrontBevestiging;
+UI.BulkKenmerken.NietMeeleveren_Geleider@default = Data.BulkKenmerken.NietMeeleveren_Geleider;
+UI.BulkKenmerken.NietMeeleveren_InschuifElementVoor@default = Data.BulkKenmerken.NietMeeleveren_InschuifElementVoor;
+UI.BulkKenmerken.NietMeeleveren_InschuifElementZijkant@default = Data.BulkKenmerken.NietMeeleveren_InschuifElementZijkant;
+UI.BulkKenmerken.NietMeeleveren_Opvullijst@default = Data.BulkKenmerken.NietMeeleveren_Opvullijst;
+UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSet@default = Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSet;
+UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers@default = Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSetEenhedenEnMeenemers;
+UI.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang@default = Data.BulkKenmerken.NietMeeleveren_TiponBlumotionSynchronisatieStang;
+UI.BulkKenmerken.NietMeeleveren_Zijstabilisering@default = Data.BulkKenmerken.NietMeeleveren_Zijstabilisering;
+
+ Values - BulkKenmerken
+ ;ui.bulkkenmerken.bodemkleur@default;ui.bulkkenmerken.ladediepte@default;ui.bulkkenmerken.ladehoogte@default;ui.bulkkenmerken.ladekleur@default;ui.bulkkenmerken.geleidertechnologie@default;ui.bulkkenmerken.frontbevestiging@default;ui.bulkkenmerken.verpakkingtype@default;ui.bulkkenmerken.matmateriaal@default;ui.bulkkenmerken.matvinylfiberglasskleur@default;ui.bulkkenmerken.matantislipfiberkleur@default;ui.bulkkenmerken.matantislipflockkleur@default;ui.bulkkenmerken.nietmeeleveren_afdekkapbinnen@default;ui.bulkkenmerken.nietmeeleveren_afdekkapbuiten@default;ui.bulkkenmerken.nietmeeleveren_afdekkaprugwandhouder@default;ui.bulkkenmerken.nietmeeleveren_bevestigingbodemfront@default;ui.bulkkenmerken.nietmeeleveren_frontbevestiging@default;ui.bulkkenmerken.nietmeeleveren_geleider@default;ui.bulkkenmerken.nietmeeleveren_inschuifelementvoor@default;ui.bulkkenmerken.nietmeeleveren_inschuifelementzijkant@default;ui.bulkkenmerken.nietmeeleveren_opvullijst@default;ui.bulkkenmerken.nietmeeleveren_tiponblumotionset@default;ui.bulkkenmerken.nietmeeleveren_tiponblumotionseteenhedenenmeenemers@default;ui.bulkkenmerken.nietmeeleveren_tiponblumotionsynchronisatiestang@default;ui.bulkkenmerken.nietmeeleveren_zijstabilisering@default;
+
+
+
+
+
+ true
+ UI.Kenmerken.CorpusBreedte@label = switch (UI.Kenmerken.IsBinnenbreedte)
+ case true: TRL.CorpusBinnenbreedte@label
+ else TRL.CorpusBuitenbreedte@label
+end switch;
+ Label CorpusBreedte
+ ;
+
+
+ true
+ $UitsparingPane@label = switch (UI.Kenmerken.Toepassing)
+ case "SY": UI.Kenmerken.Toepassing@option("SY")@label
+ case "SP": UI.Kenmerken.Toepassing@option("SP")@label
+ else ""
+end switch;
+ Label UitsparingDataPane
+ ;
+
+
+ (DATA.Kenmerken.Toepassing == "SY") or (DATA.Kenmerken.Toepassing == "SP")
+ if (DATA.Kenmerken.UitsparingData.UitsparingAantal == "Enkel") then
+ UI.Kenmerken.UitsparingData.Z1@label = TRL.Z@label;
+else
+ UI.Kenmerken.UitsparingData.Z1@label = TRL.Z1@label;
+end if;
+
+ Label UitsparingData Z1
+ ;
+
+
+
+
+ true
+ if (UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing == 150) then
+ UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@default = "SY_Recht_M_D250_B150"; /* DEPRECATED */
+end if;
+
+if (UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing == 160) then
+ UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@default = "SY_Recht_M_D240_B160";
+end if;
+
+if (UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing == 300) then
+ // UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@default = "SY_Recht_M_D250_B300"; /* DEPRECATED */
+ UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@default = "SY_Recht_M_D240_B300";
+end if;
+
+ Values UitsparingData Z1
+ ;ui.kenmerken.uitsparingdata.z1.codeuitsparing@default;
+
+
+ true
+ if (UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing == 150) then
+ UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@default = "SY_Recht_M_D250_B150"; /* DEPRECATED */
+end if;
+
+if (UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing == 160) then
+ UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@default = "SY_Recht_M_D240_B160";
+end if;
+
+if (UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing == 300) then
+ // UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@default = "SY_Recht_M_D250_B300"; /* DEPRECATED */
+ UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@default = "SY_Recht_M_D240_B300";
+end if;
+
+
+ Values UitsparingData Z2
+ ;ui.kenmerken.uitsparingdata.z2.codeuitsparing@default;
+
+
+ true
+ local boolean _IsSpoelbaklade = (DATA.Kenmerken.Toepassing in {"SP"});
+
+UI.Kenmerken.UitsparingDataSpoelbak@visible = (_IsSpoelbaklade);
+UI.Kenmerken.UitsparingDataSpoelbak.Z1@label = TRL.Z@label;
+
+local double _BreedteX = 158;
+local double _BreedteY = 158;
+local double _BreedteZ1 = 0;
+
+if (DATA.BerekendeWaarden.InterneBreedte > 0) then
+ _BreedteZ1 = DATA.BerekendeWaarden.InterneBreedte - (_BreedteX + _BreedteY);
+end if;
+
+UI.Kenmerken.UitsparingDataSpoelbak.X = _BreedteX;
+UI.Kenmerken.UitsparingDataSpoelbak.Y = _BreedteY;
+UI.Kenmerken.UitsparingDataSpoelbak.Z1 = _BreedteZ1;
+
+ Visible - UitsparingData Spoelbaklade
+ ;ui.kenmerken.uitsparingdataspoelbak@visible;ui.kenmerken.uitsparingdataspoelbak.x@value;ui.kenmerken.uitsparingdataspoelbak.y@value;ui.kenmerken.uitsparingdataspoelbak.z1@value;
+
+
+ (UI.Kenmerken.UitsparingData@visible) or (UI.Kenmerken.UitsparingDataSpoelbak@visible)
+ local string _UitsparingAantal = UI.Kenmerken.UitsparingData.UitsparingAantal;
+if (_UitsparingAantal == "") then
+ _UitsparingAantal = "Enkel";
+end if;
+
+local string _ImageUrl = "./images/Vanhoecke/lbx/UitsparingData/LBX_Toepassing_" + UI.Kenmerken.Toepassing + "_" + _UitsparingAantal + ".png";
+
+UI.Kenmerken.UitsparingData.Afbeelding@default = _ImageUrl;
+UI.Kenmerken.UitsparingDataSpoelbak.Afbeelding@default = _ImageUrl;
+
+ UitsparingData afbeelding
+ ;ui.kenmerken.uitsparingdata.afbeelding@default;ui.kenmerken.uitsparingdataspoelbak.afbeelding@default;
+
+
+ true
+ local boolean _HeeftUitsparingData = (DATA.Kenmerken.Toepassing in {"SY"});
+local boolean _HeeftDubbeleUitsparing = (UI.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel");
+
+UI.Kenmerken.UitsparingData@visible = _HeeftUitsparingData;
+
+UI.Kenmerken.UitsparingData.UitsparingAantal@mandatory = _HeeftUitsparingData;
+UI.Kenmerken.UitsparingData.X.BreedteRugdeel@mandatory = _HeeftUitsparingData;
+UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing@mandatory = _HeeftUitsparingData;
+UI.Kenmerken.UitsparingData.Y.BreedteRugdeel@mandatory = _HeeftUitsparingData;
+
+UI.Kenmerken.UitsparingData.M.BreedteRugdeel@mandatory = _HeeftDubbeleUitsparing;
+UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing@mandatory = _HeeftDubbeleUitsparing;
+
+UI.Kenmerken.UitsparingData.M@visible = _HeeftDubbeleUitsparing;
+UI.Kenmerken.UitsparingData.Z2@visible = _HeeftDubbeleUitsparing;
+ Visible en mandatory - UitsparingData Aantal en Breedtes
+ ;ui.kenmerken.uitsparingdata@visible;ui.kenmerken.uitsparingdata.uitsparingaantal@mandatory;ui.kenmerken.uitsparingdata.x.breedterugdeel@mandatory;ui.kenmerken.uitsparingdata.z1.breedteuitsparing@mandatory;ui.kenmerken.uitsparingdata.y.breedterugdeel@mandatory;ui.kenmerken.uitsparingdata.m.breedterugdeel@mandatory;ui.kenmerken.uitsparingdata.z2.breedteuitsparing@mandatory;ui.kenmerken.uitsparingdata.m@visible;ui.kenmerken.uitsparingdata.z2@visible;
+
+
+ true
+ local boolean _IsSifonlade = (DATA.Kenmerken.Toepassing == "SY");
+local boolean _HeeftDubbeleUitsparing = (UI.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel");
+
+UI.Kenmerken.UitsparingData.X.CodeRugdeel@visible = false;
+UI.Kenmerken.UitsparingData.X.CodeRugdeel@mandatory = false;
+
+UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@visible = _IsSifonlade;
+UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@mandatory = _IsSifonlade;
+
+UI.Kenmerken.UitsparingData.M.CodeRugdeel@visible = false;
+UI.Kenmerken.UitsparingData.M.CodeRugdeel@mandatory = false;
+
+UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@visible = (_HeeftDubbeleUitsparing and _IsSifonlade);
+UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@mandatory = (_HeeftDubbeleUitsparing and _IsSifonlade);
+
+UI.Kenmerken.UitsparingData.Y.CodeRugdeel@visible = false;
+UI.Kenmerken.UitsparingData.Y.CodeRugdeel@mandatory = false;
+
+// Placeholders om de uitlijning te behouden :-P
+/*
+UI.Kenmerken.UitsparingData.X.CodePlaceholder@visible = not(UI.Kenmerken.UitsparingData.X.CodeRugdeel@visible);
+UI.Kenmerken.UitsparingData.Z1.CodePlaceholder@visible = not(UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@visible);
+UI.Kenmerken.UitsparingData.M.CodePlaceholder@visible = not(UI.Kenmerken.UitsparingData.M.CodeRugdeel@visible);
+UI.Kenmerken.UitsparingData.Z2.CodePlaceholder@visible = not(UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@visible);
+UI.Kenmerken.UitsparingData.Y.CodePlaceholder@visible = not(UI.Kenmerken.UitsparingData.Y.CodeRugdeel@visible);
+*/
+UI.Kenmerken.UitsparingData.X.CodePlaceholder@visible = false;
+UI.Kenmerken.UitsparingData.Z1.CodePlaceholder@visible = false;
+UI.Kenmerken.UitsparingData.M.CodePlaceholder@visible = false;
+UI.Kenmerken.UitsparingData.Z2.CodePlaceholder@visible = false;
+UI.Kenmerken.UitsparingData.Y.CodePlaceholder@visible = false;
+ Visible en mandatory - UitsparingData Code
+ ;ui.kenmerken.uitsparingdata.x.coderugdeel@visible;ui.kenmerken.uitsparingdata.x.coderugdeel@mandatory;ui.kenmerken.uitsparingdata.z1.codeuitsparing@visible;ui.kenmerken.uitsparingdata.z1.codeuitsparing@mandatory;ui.kenmerken.uitsparingdata.m.coderugdeel@visible;ui.kenmerken.uitsparingdata.m.coderugdeel@mandatory;ui.kenmerken.uitsparingdata.z2.codeuitsparing@visible;ui.kenmerken.uitsparingdata.z2.codeuitsparing@mandatory;ui.kenmerken.uitsparingdata.y.coderugdeel@visible;ui.kenmerken.uitsparingdata.y.coderugdeel@mandatory;ui.kenmerken.uitsparingdata.x.codeplaceholder@visible;ui.kenmerken.uitsparingdata.z1.codeplaceholder@visible;ui.kenmerken.uitsparingdata.m.codeplaceholder@visible;ui.kenmerken.uitsparingdata.z2.codeplaceholder@visible;ui.kenmerken.uitsparingdata.y.codeplaceholder@visible;
+
+
+ (DATA.Kenmerken.Toepassing == "SY")
+ local string _RugdeelOpMaat = "SY_M_BM";
+local string _UitsparingSmal = "SY_Recht_M_D240_B160";
+
+if (UI.Kenmerken.UitsparingData.UitsparingAantal == "") then
+ UI.Kenmerken.UitsparingData.UitsparingAantal@default = "Enkel";
+end if;
+
+if (UI.Kenmerken.UitsparingData.X.CodeRugdeel <> _RugdeelOpMaat) then
+ UI.Kenmerken.UitsparingData.X.CodeRugdeel@default = _RugdeelOpMaat;
+end if;
+
+if (UI.Kenmerken.UitsparingData.M.CodeRugdeel <> _RugdeelOpMaat) then
+ UI.Kenmerken.UitsparingData.M.CodeRugdeel@default = _RugdeelOpMaat;
+end if;
+
+if (UI.Kenmerken.UitsparingData.Y.CodeRugdeel <> _RugdeelOpMaat) then
+ UI.Kenmerken.UitsparingData.Y.CodeRugdeel@default = _RugdeelOpMaat;
+end if;
+ Defaults voor Sifonlade
+ ;ui.kenmerken.uitsparingdata.uitsparingaantal@default;ui.kenmerken.uitsparingdata.x.coderugdeel@default;ui.kenmerken.uitsparingdata.m.coderugdeel@default;ui.kenmerken.uitsparingdata.y.coderugdeel@default;
+
+
+ not(UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.X@visible) and not(CONFIG.InputMode == "CreateConfig")
+ UI.Kenmerken.UitsparingData.X.BreedteRugdeel@default = 0;
+ UitsparingData breedte X defaulten indien niet zichtbaar
+ ;ui.kenmerken.uitsparingdata.x.breedterugdeel@default;
+
+
+ not(UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.Y@visible) and not(CONFIG.InputMode == "CreateConfig")
+ UI.Kenmerken.UitsparingData.Y.BreedteRugdeel@default = 0;
+ UitsparingData breedte Y defaulten indien niet zichtbaar
+ ;ui.kenmerken.uitsparingdata.y.breedterugdeel@default;
+
+
+ not(UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.M@visible) and not(CONFIG.InputMode == "CreateConfig")
+ UI.Kenmerken.UitsparingData.M.BreedteRugdeel@default = 0;
+ UitsparingData breedte M defaulten indien niet zichtbaar
+ ;ui.kenmerken.uitsparingdata.m.breedterugdeel@default;
+
+
+ not(UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.Z1@visible) and not(CONFIG.InputMode == "CreateConfig")
+ local string _UitsparingSmal = "SY_Recht_M_D240_B160";
+
+UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing@default = 0;
+UI.Kenmerken.UitsparingData.Z1.CodeUitsparing@default = _UitsparingSmal;
+ UitsparingData breedte Z1 defaulten indien niet zichtbaar
+ ;ui.kenmerken.uitsparingdata.z1.breedteuitsparing@default;ui.kenmerken.uitsparingdata.z1.codeuitsparing@default;
+
+
+ not(UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.Z2@visible) and not(CONFIG.InputMode == "CreateConfig")
+ local string _UitsparingSmal = "SY_Recht_M_D240_B160";
+
+UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing@default = 0;
+UI.Kenmerken.UitsparingData.Z2.CodeUitsparing@default = _UitsparingSmal;
+ UitsparingData breedte Z2 defaulten indien niet zichtbaar
+ ;ui.kenmerken.uitsparingdata.z2.breedteuitsparing@default;ui.kenmerken.uitsparingdata.z2.codeuitsparing@default;
+
+
+ (DATA.Kenmerken.Toepassing in {"SY"})
+ local string _CodeX = UI.Kenmerken.UitsparingData.X.CodeRugdeel;
+
+local double _MinimumBreedte = 0;
+local double _MaximumBreedte = 0;
+
+switch _CodeX
+ case "SY_M_BM": // enige mogelijkheid bij Sifonlade
+ //X.BreedteRugdeel@default = 0;
+ UI.Kenmerken.UitsparingData.X.Hoogte = "M";
+ UI.Kenmerken.UitsparingData.X.Materiaal = "Hout";
+ UI.Kenmerken.UitsparingData.X.MateriaalDisplay = DATA.Kenmerken.RugwandMateriaal@option("Hout")@label;
+
+ _MinimumBreedte = 150;
+ _MaximumBreedte = 999;
+end switch;
+
+RANGE.UitsparingDataBreedteX.Minimum = _MinimumBreedte;
+RANGE.UitsparingDataBreedteX.Maximum = _MaximumBreedte;
+ UitsparingData X invullen
+ ;range.uitsparingdatabreedtex.minimum@value;range.uitsparingdatabreedtex.maximum@value;
+
+
+ (DATA.Kenmerken.Toepassing in {"SY"})
+ local string _CodeZ1 = UI.Kenmerken.UitsparingData.Z1.CodeUitsparing;
+
+local double _MinimumBreedte = 0;
+local double _MaximumBreedte = 0;
+
+UI.Kenmerken.UitsparingData.Z1.Hoogte = "M";
+UI.Kenmerken.UitsparingData.Z1.Vorm = "Recht";
+UI.Kenmerken.UitsparingData.Z1.Materiaal = "Staal";
+UI.Kenmerken.UitsparingData.Z1.MateriaalDisplay = DATA.Kenmerken.RugwandMateriaal@option("Staal")@label;
+
+switch _CodeZ1
+ case "SY_Recht_M_D250_B150":
+ UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing = 150;
+ UI.Kenmerken.UitsparingData.Z1.Diepte = 250;
+ _MinimumBreedte = 150;
+ _MaximumBreedte = 150;
+
+ case "SY_Recht_M_D250_B300":
+ UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing = 300;
+ UI.Kenmerken.UitsparingData.Z1.Diepte = 250;
+ _MinimumBreedte = 300;
+ _MaximumBreedte = 300;
+
+ case "SY_Recht_M_D240_B160":
+ UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing = 160;
+ UI.Kenmerken.UitsparingData.Z1.Diepte = 240;
+ _MinimumBreedte = 160;
+ _MaximumBreedte = 160;
+
+ case "SY_Recht_M_D240_B300":
+ UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing = 300;
+ UI.Kenmerken.UitsparingData.Z1.Diepte = 240;
+ _MinimumBreedte = 300;
+ _MaximumBreedte = 300;
+
+end switch;
+
+RANGE.UitsparingDataBreedteZ1.Minimum = _MinimumBreedte;
+RANGE.UitsparingDataBreedteZ1.Maximum = _MaximumBreedte;
+ UitsparingData Z1 invullen
+ ;ui.kenmerken.uitsparingdata.z1.hoogte@value;ui.kenmerken.uitsparingdata.z1.vorm@value;ui.kenmerken.uitsparingdata.z1.materiaal@value;ui.kenmerken.uitsparingdata.z1.materiaaldisplay@value;range.uitsparingdatabreedtez1.minimum@value;range.uitsparingdatabreedtez1.maximum@value;
+
+
+ (DATA.Kenmerken.Toepassing in {"SY"})
+ local string _CodeM = UI.Kenmerken.UitsparingData.M.CodeRugdeel;
+
+local double _MinimumBreedte = 0;
+local double _MaximumBreedte = 0;
+
+switch _CodeM
+ case "SY_M_BM": // enige mogelijkheid bij Sifonlade
+ //UI.Kenmerken.UitsparingData.M.BreedteRugdeel@default = 0;
+ UI.Kenmerken.UitsparingData.M.Hoogte = "M";
+ UI.Kenmerken.UitsparingData.M.Materiaal = "Hout";
+ UI.Kenmerken.UitsparingData.M.MateriaalDisplay = DATA.Kenmerken.RugwandMateriaal@option("Hout")@label;
+
+ _MinimumBreedte = 97;
+ _MaximumBreedte = 999;
+end switch;
+
+RANGE.UitsparingDataBreedteM.Minimum = _MinimumBreedte;
+RANGE.UitsparingDataBreedteM.Maximum = _Maximumbreedte;
+ UitsparingData M invullen
+ ;range.uitsparingdatabreedtem.minimum@value;range.uitsparingdatabreedtem.maximum@value;
+
+
+ (DATA.Kenmerken.Toepassing in {"SY"})
+ local string _CodeZ2 = UI.Kenmerken.UitsparingData.Z2.CodeUitsparing;
+
+local double _MinimumBreedte = 0;
+local double _MaximumBreedte = 0;
+
+UI.Kenmerken.UitsparingData.Z2.Hoogte = "M";
+UI.Kenmerken.UitsparingData.Z2.Vorm = "Recht";
+UI.Kenmerken.UitsparingData.Z2.Materiaal = "Staal";
+UI.Kenmerken.UitsparingData.Z2.MateriaalDisplay = DATA.Kenmerken.RugwandMateriaal@option("Staal")@label;
+
+switch _CodeZ2
+ case "SY_Recht_M_D250_B150":
+ UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing = 150;
+ UI.Kenmerken.UitsparingData.Z2.Diepte = 250;
+ _MinimumBreedte = 150;
+ _MaximumBreedte = 150;
+
+ case "SY_Recht_M_D250_B300":
+ UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing = 300;
+ UI.Kenmerken.UitsparingData.Z2.Diepte = 250;
+ _MinimumBreedte = 300;
+ _MaximumBreedte = 300;
+
+ case "SY_Recht_M_D240_B160":
+ UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing = 160;
+ UI.Kenmerken.UitsparingData.Z2.Diepte = 240;
+ _MinimumBreedte = 160;
+ _MaximumBreedte = 160;
+
+ case "SY_Recht_M_D240_B300":
+ UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing = 300;
+ UI.Kenmerken.UitsparingData.Z2.Diepte = 240;
+ _MinimumBreedte = 300;
+ _MaximumBreedte = 300;
+end switch;
+
+RANGE.UitsparingDataBreedteZ2.Minimum = _MinimumBreedte;
+RANGE.UitsparingDataBreedteZ2.Maximum = _MaximumBreedte;
+ UitsparingData Z2 invullen
+ ;ui.kenmerken.uitsparingdata.z2.hoogte@value;ui.kenmerken.uitsparingdata.z2.vorm@value;ui.kenmerken.uitsparingdata.z2.materiaal@value;ui.kenmerken.uitsparingdata.z2.materiaaldisplay@value;range.uitsparingdatabreedtez2.minimum@value;range.uitsparingdatabreedtez2.maximum@value;
+
+
+ (DATA.Kenmerken.Toepassing in {"SY"})
+ local string _CodeY = UI.Kenmerken.UitsparingData.Y.CodeRugdeel;
+
+local double _MinimumBreedte = 0;
+local double _MaximumBreedte = 0;
+
+switch _CodeY
+ case "SY_M_BM": // enige mogelijkheid bij Sifonlade
+ //UI.Kenmerken.UitsparingData.Y.BreedteRugdeel@default = 0;
+ UI.Kenmerken.UitsparingData.Y.Hoogte = "M";
+ UI.Kenmerken.UitsparingData.Y.Materiaal = "Hout";
+ UI.Kenmerken.UitsparingData.Y.MateriaalDisplay = DATA.Kenmerken.RugwandMateriaal@option("Hout")@label;
+
+ _MinimumBreedte = 150;
+ _MaximumBreedte = 999;
+end switch;
+
+RANGE.UitsparingDataBreedteY.Minimum = _MinimumBreedte;
+RANGE.UitsparingDataBreedteY.Maximum = _MaximumBreedte;
+ UitsparingData Y invullen
+ ;range.uitsparingdatabreedtey.minimum@value;range.uitsparingdatabreedtey.maximum@value;
+
+
+ (UI.Kenmerken.UitsparingData@visible) and (UI.Kenmerken.UitsparingData.UitsparingAantal == "Enkel")
+ local double _SuggestieX = 0;
+local double _SuggestieY = 0;
+local double _SuggestieZ1 = 0;
+
+local double _BreedteX = UI.Kenmerken.UitsparingData.X.BreedteRugdeel;
+local double _BreedteY = UI.Kenmerken.UitsparingData.Y.BreedteRugdeel;
+local double _BreedteZ1 = UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing;
+
+local double _VerwachteBreedte = DATA.BerekendeWaarden.InterneBreedte;
+
+local boolean _AlleBreedtesIngevuld = (_BreedteX > 0) and (_BreedteY > 0) and (_BreedteZ1 > 0);
+local boolean _AlleBreedtesLeeg = (_BreedteX == 0) and (_BreedteY == 0) and (_BreedteZ1 == 0);
+
+local boolean _ToonGesuggereerdeWaarde = false;
+
+if ((_AlleBreedtesIngevuld) or (_AlleBreedtesLeeg)) then
+ _ToonGesuggereerdeWaarde = false;
+else
+ _ToonGesuggereerdeWaarde = (_VerwachteBreedte > 0);
+end if;
+
+if (_ToonGesuggereerdeWaarde) then
+ local double _BreedteSaldo = _VerwachteBreedte - (_BreedteX + _BreedteY + _BreedteZ1);
+
+ if (_BreedteZ1 > 0) then
+ if ((_BreedteX == 0) and (_BreedteY == 0)) then
+ _SuggestieX = Round((_BreedteSaldo / 2) ; 0.1);
+ _SuggestieY = (_BreedteSaldo - _SuggestieX); // _SuggestieY = _SuggestieX , except when _SuggestieX is rounded.
+ else
+ if (_BreedteX == 0) then
+ _SuggestieX = _BreedteSaldo;
+ end if;
+
+ if (_BreedteY == 0) then
+ _SuggestieY = _BreedteSaldo;
+ end if;
+ end if;
+
+ else
+ // BreedteZ1 == 0
+ if ((_BreedteX > 0) and (_BreedteY > 0)) then
+ _SuggestieZ1 = _BreedteSaldo;
+ else
+ if (_BreedteX == 0) then
+ _SuggestieX = _BreedteY;
+ _SuggestieZ1 = (_BreedteSaldo - _SuggestieX);
+ end if;
+
+ if (_BreedteY == 0) then
+ _SuggestieY = _BreedteX;
+ _SuggestieZ1 = (_BreedteSaldo - _SuggestieY);
+ end if;
+ end if;
+
+ end if;
+
+end if;
+
+UI.Kenmerken.UitsparingData.X.GesuggereerdeWaarde = _SuggestieX;
+UI.Kenmerken.UitsparingData.Y.GesuggereerdeWaarde = _SuggestieY;
+UI.Kenmerken.UitsparingData.Z1.GesuggereerdeWaarde = _SuggestieZ1;
+
+UI.Kenmerken.UitsparingData.M.GesuggereerdeWaarde = 0;
+UI.Kenmerken.UitsparingData.Z2.GesuggereerdeWaarde = 0;
+ Bereken GesuggereerdeWaarden Enkele uitsparing
+ ;ui.kenmerken.uitsparingdata.x.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.y.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.z1.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.m.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.z2.gesuggereerdewaarde@value;
+
+
+ (UI.Kenmerken.UitsparingData@visible) and (UI.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel")
+ local double _SuggestieX = 0;
+local double _SuggestieM = 0;
+local double _SuggestieY = 0;
+local double _SuggestieZ1 = 0;
+local double _SuggestieZ2 = 0;
+
+local double _BreedteX = UI.Kenmerken.UitsparingData.X.BreedteRugdeel;
+local double _BreedteM = UI.Kenmerken.UitsparingData.M.BreedteRugdeel;
+local double _BreedteY = UI.Kenmerken.UitsparingData.Y.BreedteRugdeel;
+local double _BreedteZ1 = UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing;
+local double _BreedteZ2 = UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing;
+
+local double _VerwachteBreedte = DATA.BerekendeWaarden.InterneBreedte;
+
+local boolean _AlleRugBreedtesLeeg = (_BreedteX == 0) and (_BreedteM == 0) and (_BreedteY == 0);
+local boolean _AlleRugBreedtesIngevuld = (_BreedteX > 0) and (_BreedteM > 0) and (_BreedteY > 0);
+local boolean _AlleBreedtesIngevuld = (_AlleRugBreedtesIngevuld) and (_BreedteZ1 > 0) and (_BreedteZ2 > 0);
+
+local boolean _ToonGesuggereerdeWaarde = false;
+
+if ((_AlleRugBreedtesLeeg) or (_AlleBreedtesIngevuld)) then
+ _ToonGesuggereerdeWaarde = false;
+else
+ _ToonGesuggereerdeWaarde = (_VerwachteBreedte > 0);
+end if;
+
+if (_ToonGesuggereerdeWaarde) then
+ local double _BreedteSaldo = _VerwachteBreedte - (_BreedteX + _BreedteM + _BreedteY + _BreedteZ1 + _BreedteZ2);
+
+ if (_AlleRugBreedtesIngevuld) then
+
+ if ((_BreedteZ1 == 0) and (_BreedteZ2 == 0)) then
+ _SuggestieZ1 = Round((_BreedteSaldo / 2) ; 0.1);
+ _SuggestieZ2 = (_BreedteSaldo - _SuggestieZ1); // _SuggestieZ2 = _SuggestieZ1 , except when _SuggestieZ1 is rounded.
+ else
+ if (_BreedteZ1 == 0) then
+ _SuggestieZ1 = _BreedteSaldo;
+ end if;
+
+ if (_BreedteZ2 == 0) then
+ _SuggestieZ2 = _BreedteSaldo;
+ end if;
+ end if;
+
+ else
+ // (not _AlleRugBreedtesIngevuld)
+ if ((_BreedteZ1 > 0) and (_BreedteZ2 > 0)) then
+ if (_BreedteM > 0) then
+ if ((_BreedteX == 0) and (_BreedteY == 0)) then
+ _SuggestieX = Round((_BreedteSaldo / 2) ; 0.1);
+ _SuggestieY = (_BreedteSaldo - _SuggestieX); // _SuggestieY = _SuggestieX , except when _SuggestieX is rounded.
+ else
+ if (_BreedteX == 0) then
+ _SuggestieX = _BreedteSaldo;
+ end if;
+
+ if (_BreedteY == 0) then
+ _SuggestieY = _BreedteSaldo;
+ end if;
+ end if;
+ else
+ // BreedteM == 0
+ if ((_BreedteX > 0) and (_BreedteY > 0)) then
+ _SuggestieM = _BreedteSaldo;
+ else
+ _SuggestieX = 0;
+ _SuggestieY = 0;
+ if (_BreedteX == 0) then
+ _SuggestieX = _BreedteY;
+ end if;
+ if (_BreedteY == 0) then
+ _SuggestieY = _BreedteX;
+ end if;
+ _SuggestieM = (_BreedteSaldo - _SuggestieX - _SuggestieY);
+ end if;
+ end if;
+ else
+ // Combinatie van RugBreedtes en UitsparingBreedtes niet ingevuld : TO DO
+ local boolean _dummy = true;
+ end if;
+ end if;
+
+end if;
+
+UI.Kenmerken.UitsparingData.X.GesuggereerdeWaarde = _SuggestieX;
+UI.Kenmerken.UitsparingData.M.GesuggereerdeWaarde = _SuggestieM;
+UI.Kenmerken.UitsparingData.Y.GesuggereerdeWaarde = _SuggestieY;
+UI.Kenmerken.UitsparingData.Z1.GesuggereerdeWaarde = _SuggestieZ1;
+UI.Kenmerken.UitsparingData.Z2.GesuggereerdeWaarde = _SuggestieZ2;
+
+ Bereken GesuggereerdeWaarden Dubbele uitsparing
+ ;ui.kenmerken.uitsparingdata.x.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.m.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.y.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.z1.gesuggereerdewaarde@value;ui.kenmerken.uitsparingdata.z2.gesuggereerdewaarde@value;
+
+
+ (DATA.Kenmerken.Toepassing in {"SY"});
+
+ local boolean _HeeftDubbeleUitsparing = (UI.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel");
+
+local double _TotaleBreedte = 0;
+
+local double _BreedteX = UI.Kenmerken.UitsparingData.X.BreedteRugdeel;
+local double _BreedteZ1 = UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing;
+local double _BreedteM = UI.Kenmerken.UitsparingData.M.BreedteRugdeel;
+local double _BreedteZ2 = UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing;
+local double _BreedteY = UI.Kenmerken.UitsparingData.Y.BreedteRugdeel;
+
+_TotaleBreedte = _BreedteX + _BreedteZ1 + _BreedteY;
+
+if (_HeeftDubbeleUitsparing) then
+ _TotaleBreedte = _TotaleBreedte + _BreedteM + _BreedteZ2;
+end if;
+
+UI.Kenmerken.UitsparingData.UitsparingData_TotaleBreedte = _TotaleBreedte;
+ Bereken TotaleBreedte
+ ;ui.kenmerken.uitsparingdata.uitsparingdata_totalebreedte@value;
+
+
+ UI.Kenmerken.UitsparingData@visible
+ UI.Kenmerken.UitsparingData.UitsparingData_VerwachteBreedte = DATA.BerekendeWaarden.InterneBreedte;
+ Instellen VerwachteBreedte bij Uitsparingen
+ ;ui.kenmerken.uitsparingdata.uitsparingdata_verwachtebreedte@value;
+
+
+ false //true // indien HeeftUitsparing
+ local boolean _IsGeldigTotaleBreedte = (UI.Kenmerken.UitsparingData.UitsparingData_TotaleBreedte == UI.Kenmerken.UitsparingData.UitsparingData_VerwachteBreedte);
+local string _ControlClass = ""; //"colorBlack";
+
+if not(_IsGeldigTotaleBreedte) then
+ _ControlClass = "eConInvalidField"; // ui-state-error""colorRed";
+end if;
+
+UI.Kenmerken.UitsparingData.UitsparingData_TotaleBreedte@style = "controlclass:" + _ControlClass; // _CssClassname;
+//UI.Kenmerken.UitsparingData.UitsparingData_VerwachteBreedte@styleClass = _CssClassname;
+
+UI.Kenmerken.UitsparingData.UitsparingData_VerwachteBreedte@visible = not(_IsGeldigTotaleBreedte);
+ Visible en formatting - VerwachteBreedte
+ ;ui.kenmerken.uitsparingdata.uitsparingdata_verwachtebreedte@visible;
+
+
+ (RANGE.UitsparingDataBreedteX.Maximum > 0)
+ local boolean _IsVasteBreedte = (RANGE.UitsparingDataBreedteX.Maximum == RANGE.UitsparingDataBreedteX.Minimum);
+
+UI.Kenmerken.UitsparingData.X.BreedteRugdeel@enabled = not(_IsVasteBreedte);
+ Breedte X wordt read-only indien Range.Max = Range.Min
+ ;ui.kenmerken.uitsparingdata.x.breedterugdeel@enabled;
+
+
+ (RANGE.UitsparingDataBreedteM.Maximum > 0)
+ local boolean _IsVasteBreedte = (RANGE.UitsparingDataBreedteM.Maximum == RANGE.UitsparingDataBreedteM.Minimum);
+
+UI.Kenmerken.UitsparingData.M.BreedteRugdeel@enabled = not(_IsVasteBreedte);
+ Breedte M wordt read-only indien Range.Max = Range.Min
+ ;ui.kenmerken.uitsparingdata.m.breedterugdeel@enabled;
+
+
+ (RANGE.UitsparingDataBreedteY.Maximum > 0)
+ local boolean _IsVasteBreedte = (RANGE.UitsparingDataBreedteY.Maximum == RANGE.UitsparingDataBreedteY.Minimum);
+
+UI.Kenmerken.UitsparingData.Y.BreedteRugdeel@enabled = not(_IsVasteBreedte);
+ Breedte Y wordt read-only indien Range.Max = Range.Min
+ ;ui.kenmerken.uitsparingdata.y.breedterugdeel@enabled;
+
+
+ (RANGE.UitsparingDataBreedteZ1.Maximum > 0)
+ local boolean _IsVasteBreedte = (RANGE.UitsparingDataBreedteZ1.Maximum == RANGE.UitsparingDataBreedteZ1.Minimum);
+
+UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing@enabled = not(_IsVasteBreedte);
+ Breedte Z1 wordt read-only indien Range.Max = Range.Min
+ ;ui.kenmerken.uitsparingdata.z1.breedteuitsparing@enabled;
+
+
+ (RANGE.UitsparingDataBreedteZ2.Maximum > 0)
+ local boolean _IsVasteBreedte = (RANGE.UitsparingDataBreedteZ2.Maximum == RANGE.UitsparingDataBreedteZ2.Minimum);
+
+UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing@enabled = not(_IsVasteBreedte);
+ Breedte Z2 wordt read-only indien Range.Max = Range.Min
+ ;ui.kenmerken.uitsparingdata.z2.breedteuitsparing@enabled;
+
+
+ BEHAVIOR.IsEconAx and (CONFIG.ProcessMode == "Background")
+
+DATA.Kenmerken.UitsparingData.X.Hoogte = UI.Kenmerken.UitsparingData.X.Hoogte;
+DATA.Kenmerken.UitsparingData.X.Materiaal = UI.Kenmerken.UitsparingData.X.Materiaal;
+
+DATA.Kenmerken.UitsparingData.M.Hoogte = UI.Kenmerken.UitsparingData.M.Hoogte;
+DATA.Kenmerken.UitsparingData.M.Materiaal = UI.Kenmerken.UitsparingData.M.Materiaal;
+
+DATA.Kenmerken.UitsparingData.Y.Hoogte = UI.Kenmerken.UitsparingData.Y.Hoogte;
+DATA.Kenmerken.UitsparingData.Y.Materiaal = UI.Kenmerken.UitsparingData.Y.Materiaal;
+
+DATA.Kenmerken.UitsparingData.Z1.Diepte = UI.Kenmerken.UitsparingData.Z1.Diepte;
+DATA.Kenmerken.UitsparingData.Z1.Hoogte = UI.Kenmerken.UitsparingData.Z1.Hoogte;
+DATA.Kenmerken.UitsparingData.Z1.Materiaal = UI.Kenmerken.UitsparingData.Z1.Materiaal;
+DATA.Kenmerken.UitsparingData.Z1.Vorm = UI.Kenmerken.UitsparingData.Z1.Vorm;
+
+DATA.Kenmerken.UitsparingData.Z2.Diepte = UI.Kenmerken.UitsparingData.Z2.Diepte;
+DATA.Kenmerken.UitsparingData.Z2.Hoogte = UI.Kenmerken.UitsparingData.Z2.Hoogte;
+DATA.Kenmerken.UitsparingData.Z2.Materiaal = UI.Kenmerken.UitsparingData.Z2.Materiaal;
+DATA.Kenmerken.UitsparingData.Z2.Vorm = UI.Kenmerken.UitsparingData.Z2.Vorm;
+
+/*
+// De Breedtes moeten ingevuld zijn in de EDI-input waarden
+DATA.Kenmerken.UitsparingData.X.Breedte = UI.Kenmerken.UitsparingData.X.BreedteRugdeel;
+DATA.Kenmerken.UitsparingData.M.Breedte = UI.Kenmerken.UitsparingData.M.BreedteRugdeel;
+DATA.Kenmerken.UitsparingData.Y.Breedte = UI.Kenmerken.UitsparingData.Y.BreedteRugdeel;
+DATA.Kenmerken.UitsparingData.Z1.Breedte = UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing;
+DATA.Kenmerken.UitsparingData.Z2.Breedte = UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing;
+*/
+
+ UitsparingData UI naar DATA (ax-background mode)
+ ;data.kenmerken.uitsparingdata.x.hoogte@value;data.kenmerken.uitsparingdata.x.materiaal@value;data.kenmerken.uitsparingdata.m.hoogte@value;data.kenmerken.uitsparingdata.m.materiaal@value;data.kenmerken.uitsparingdata.y.hoogte@value;data.kenmerken.uitsparingdata.y.materiaal@value;data.kenmerken.uitsparingdata.z1.diepte@value;data.kenmerken.uitsparingdata.z1.hoogte@value;data.kenmerken.uitsparingdata.z1.materiaal@value;data.kenmerken.uitsparingdata.z1.vorm@value;data.kenmerken.uitsparingdata.z2.diepte@value;data.kenmerken.uitsparingdata.z2.hoogte@value;data.kenmerken.uitsparingdata.z2.materiaal@value;data.kenmerken.uitsparingdata.z2.vorm@value;
+
+
+
+
+ true
+
+local boolean _IsMaatwerkViewerToegelaten = false;
+
+if BEHAVIOR.IsEconAX then
+ _IsMaatwerkViewerToegelaten = CONFIG.Settings.IsMaatwerkViewerToegelaten;
+end if;
+
+local boolean _BEHAVIOR_IsPanelMaatwerkViewerZichtbaar = (_IsMaatwerkViewerToegelaten == true);
+local boolean _BEHAVIOR_IsButtonMaatwerkViewerZichtbaar = (_IsMaatwerkViewerToegelaten == true);
+
+UI.MWViewer@visible = _BEHAVIOR_IsPanelMaatwerkViewerZichtbaar;
+UI.MWViewer.InlineButtons.StartMaatwerkViewerButton@visible = _BEHAVIOR_IsButtonMaatwerkViewerZichtbaar;
+
+ Gedrag MaatwerkViewer button visible
+ ;ui.mwviewer@visible;ui.mwviewer.inlinebuttons.startmaatwerkviewerbutton@visible;
+
+
+ (UI.MWViewer.InlineButtons.StartMaatwerkViewerButton@visible)
+
+local boolean _BEHAVIOR_IsButtonMaatwerkViewerEnabled = false;
+
+local long _AantalOngeldigeVelden = InvalidFields();
+
+if _AantalOngeldigeVelden == 0 then
+ _BEHAVIOR_IsButtonMaatwerkViewerEnabled = true;
+else
+ if (_AantalOngeldigeVelden == 1) then
+ DATA.Lijn.InvalidFieldSet@options = InvalidFieldSet();
+ if (DATA.Lijn.InvalidFieldSet@option(1)@id == "Ui.Lijn.Aantal") then
+ _BEHAVIOR_IsButtonMaatwerkViewerEnabled = true;
+ end if
+ end if
+end if;
+
+// Tijdelijk : controle op valid fields negeren; Button steeds enabled
+// _BEHAVIOR_IsButtonMaatwerkViewerEnabled = true;
+
+
+UI.MWViewer.InlineButtons.StartMaatwerkViewerButton@enabled = _BEHAVIOR_IsButtonMaatwerkViewerEnabled;
+
+ Gedrag MaatwerkViewer button enabled
+ ;ui.mwviewer.inlinebuttons.startmaatwerkviewerbutton@enabled;
+
+
+ (UI.MWViewer.InlineButtons.StartMaatwerkViewerButton@visible)
+
+UI.MWViewer.BerekenAantal@default = 1;
+UI.MWViewer.BerekenKlantnummer@default = CONFIG.Settings.KlantId;
+UI.MWViewer.BerekenDatum@default = ""; // Default = Now
+UI.MWViewer.FileSuffixVast@default = "001";
+UI.MWViewer.HeeftVasteFileSuffix@default = false;
+
+ Initialiseer MaatwerkViewer velden
+ ;ui.mwviewer.berekenaantal@default;ui.mwviewer.berekenklantnummer@default;ui.mwviewer.berekendatum@default;ui.mwviewer.filesuffixvast@default;ui.mwviewer.heeftvastefilesuffix@default;
+
+
+ true
+
+UI.MWViewer.FileSuffixVast@visible = (UI.MWViewer.HeeftVasteFileSuffix == true);
+
+ Visible - TimeSuffixVast
+ ;ui.mwviewer.filesuffixvast@visible;
+
+
+ (UI.MWViewer.InlineButtons.StartMaatwerkViewerButton@visible) and (STATE.StartMaatwerkViewer == true)
+
+// local collection _PropertyNamen = {"Data.Kenmerken.Familie";"Data.Kenmerken.Variant";"Data.Kenmerken.BodemKleur";"Data.Kenmerken.Draagkracht"};
+
+// Vreemd genoeg lukt het niet via een locale collection :-(
+// Dan maar via een array-Property
+
+CONFIG.WebService.PropertyNamen@length = 999;
+
+local Long _i = 0;
+
+// Hoofdletters (Firstcase) zoals de "eCon-ConfigAnalyse Namen" :
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Familie";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Variant";
+
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Bodemkleur";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Corpusbreedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Corpuswanddikte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Draagkracht";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Dwarsverdelingaantal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Frontbevestiging";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Geleidertechnologie";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Heeftmat";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Heeftafwijkenderughoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Heeftopvullijstlinks";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Heeftopvullijstrechts";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Heeftzijstabilisering";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Isbinnenbreedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Isbinnenlade";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Ladediepte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Ladehoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Ladekleur";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Matkleur";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Matmateriaal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Meenemerset";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_afdekkapbinnen";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_afdekkapbuiten";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_afdekkaprugwandhouder";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_bevestigingbodemfront";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_frontbevestiging";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_geleider";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_inschuifelementvoor";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_inschuifelementzijkant";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_opvullijst";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponblumotionset";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponblumotionseteenhedenenmeenemers";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponblumotionsynchronisatiestang";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_zijstabilisering";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Opvullijstkleur";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Productiewijze";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Rughoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Rugwandmateriaal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Breedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Diepte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Hoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Kleur";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Uitvoering";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Bewegingstechnologie";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Stekkerservodrive";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Spacestep.Stekkertype";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Toepassing";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Uitsparingaantal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.M.Breedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.M.Hoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.M.Materiaal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.X.Breedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.X.Hoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.X.Materiaal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Y.Breedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Y.Hoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Y.Materiaal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z1.Breedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z1.Diepte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z1.Hoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z1.Materiaal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z1.Vorm";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z2.Breedte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z2.Diepte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z2.Hoogte";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z2.Materiaal";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Uitsparingdata.Z2.Vorm";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Voorwandtypevancbinnenlade";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Voorwandtypevanmbinnenlade";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Voorwandtypevankbinnenlade";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Verpakkingtype";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Zijwandtype";
+
+CONFIG.WebService.PropertyNamen@length = _i;
+
+
+/*
+// ==========================================
+// !!! LET OP !!! Hetvolgende werkt NIET !!!
+// ==========================================
+// Hoofdletters (UpperCamelCase) zoals de "eCon-property Namen" :
+
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Familie";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Variant";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.BodemKleur";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.Draagkracht";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.FrontBevestiging";
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.GeleiderTechnologie";
+...
+_i = _i + 1; CONFIG.WebService.PropertyNamen(_i) = "Data.Kenmerken.ZijwandVerhogingType";
+*/
+
+ MaatwerkViewer Properties in Array steken
+ ;config.webservice.propertynamen[1]@value;
+
+
+ (STATE.StartMaatwerkViewer == true)
+
+STATE.StartMaatwerkViewer = false;
+
+// ================================
+// Initialisatie
+// ================================
+local string _XmlRequest = "";
+local string _Service = GetSetting("data.vanhoecke.connectionstring.cache.maatwerkviewerservice");
+
+local string _Variant = Data.Kenmerken.Variant;
+local string _TimeSuffix = "001";
+local string _FileSuffixVast = UI.MWViewer.FileSuffixVast;
+
+if (UI.MWViewer.HeeftVasteFileSuffix) then
+ _FileSuffixVast = replace(_FileSuffixVast; ":"; "");
+ _FileSuffixVast = replace(_FileSuffixVast; "?"; "");
+ _FileSuffixVast = replace(_FileSuffixVast; "*"; "");
+ _FileSuffixVast = replace(_FileSuffixVast; "/"; "");
+ _FileSuffixVast = replace(_FileSuffixVast; "\\"; "");
+ _FileSuffixVast = replace(_FileSuffixVast; "<"; "");
+ _FileSuffixVast = replace(_FileSuffixVast; ">"; "");
+
+ _FileSuffixVast = Trim(_FileSuffixVast);
+end if;
+
+if (UI.MWViewer.HeeftVasteFileSuffix and (_FileSuffixVast <> "") ) then
+ _TimeSuffix = _FileSuffixVast;
+else
+ _TimeSuffix = CStr(Year()) + CStr(Month()) + CStr(Day()) + "_" + CStr(Hour()) + "" + CStr(Minute()) + "" + CStr(Second());
+end if;
+
+local string _PersonalityId = Config.Settings.PersonalityId;
+local string _BerekenKlantNummer = CStr(UI.MWViewer.BerekenKlantnummer);
+local string _BerekenAantal = CStr(UI.MWViewer.BerekenAantal);
+local string _BerekenDatum = CStr(UI.MWViewer.BerekenDatum);
+local string _Username = "WimV-TEST";
+local string _Filename = "maatwerkviewer_" + _Variant + "_" + _TimeSuffix + ".txt"; // File extension : .txt OF .xls
+//local string _Filepath = "\\\\Notes01\\shared\\w v\\";
+local string _Filepath = "\\\\Notes01\\shared\\AX\\e-Con_MaatwerkViewer\\";
+local string _FullFilename = _Filepath + _Filename;
+local string _EconConfiguratieKVPs = "";
+local string _PropertyNaam = "";
+
+
+// ================================
+// Lokale Development/Debugging (tijdelijk)
+// ================================
+/* * /
+local boolean _WebServiceAfleidenNaarLokalePC = false;
+
+if _WebServiceAfleidenNaarLokalePC then
+ _Service = replace(_Service; "cachestaging2010"; "WV-W10");
+ _Filename = "\\\\WV-W10\\D$\\Temp\\maatwerkviewer_MVX_001.xls";
+end if;
+/* */
+
+// ================================
+// Fallback Default values
+// ================================
+if (_PersonalityId == "") then
+ _PersonalityId = "1";
+end if;
+if (_BerekenKlantNummer == "") then
+ _BerekenKlantNummer = "6819";
+end if;
+if (_BerekenAantal == "") or (_BerekenAantal == "0") then
+ _BerekenAantal = "1";
+end if;
+
+
+// ====================================
+// Kenmerken KeyValuePairs opbouwen
+// ====================================
+index i of CONFIG.WebService.PropertyNamen
+ _PropertyNaam = CONFIG.WebService.PropertyNamen(i);
+ _EconConfiguratieKVPs = _EconConfiguratieKVPs + " <view:String EconConfiguratieKey='" + _PropertyNaam + "'>" + CStr(Eval(_PropertyNaam)) + "</view:String> ";
+end index;
+
+
+// ================================
+// _XmlRequest opbouwen
+// ================================
+_XmlRequest = _XmlRequest + "<soapenv:Envelope xmlns:soapenv='http://schemas.xmlsoap.org/soap/envelope/' xmlns:view='http://www.vanhoecke.be/WS/PM/Maatwerk/Viewer/Viewer'>";
+_XmlRequest = _XmlRequest + "<soapenv:Header/>";
+_XmlRequest = _XmlRequest + "<soapenv:Body>";
+_XmlRequest = _XmlRequest + "<view:SchrijfPlatteTekst>"; // WebMethod : SchrijfPlatteTekst OF SchrijfExcel
+_XmlRequest = _XmlRequest + "<view:MaatwerkViewerRequest>";
+/* * /
+// Request Header is niet voorzien in het Caché-object WS.PM.Maatwerk.Viewer.MaatwerkViewerRequest, dus hier niet toevoegen, anders zal de WS-call crashen.
+_XmlRequest = _XmlRequest + "<view:Header>";
+_XmlRequest = _XmlRequest + "<view:PersonalityID>" + _PersonalityId + "</view:PersonalityID>";
+_XmlRequest = _XmlRequest + "</view:Header>";
+/* */
+_XmlRequest = _XmlRequest + "<view:KlantNummer>" + _BerekenKlantNummer + "</view:KlantNummer>";
+_XmlRequest = _XmlRequest + "<view:Aantal>" + _BerekenAantal + "</view:Aantal>";
+_XmlRequest = _XmlRequest + "<view:Datum>" + _BerekenDatum + "</view:Datum>";
+_XmlRequest = _XmlRequest + "<view:Username>" + _Username + "</view:Username>";
+_XmlRequest = _XmlRequest + "<view:Filename>" + _FullFilename + "</view:Filename>";
+_XmlRequest = _XmlRequest + "<view:EconConfiguratie>" + _EconConfiguratieKVPs + "</view:EconConfiguratie>";
+_XmlRequest = _XmlRequest + "</view:MaatwerkViewerRequest>";
+_XmlRequest = _XmlRequest + "</view:SchrijfPlatteTekst>"; // WebMethod : SchrijfPlatteTekst OF SchrijfExcel
+_XmlRequest = _XmlRequest + "</soapenv:Body>";
+_XmlRequest = _XmlRequest + "</soapenv:Envelope>";
+
+
+// ================================
+// WebService call uitvoeren
+// ================================
+local boolean _Result = LoadFromXMLService("CONFIG.WebService.MaatwerkViewerSchrijfExcel.ResultaatDummy"; _Service; false; _XmlRequest);
+local string _Status = "";
+local string _Feedback = "";
+
+if (_Result) then
+ _Status = "Gelukt: ";
+ STATE.MaatwerkViewerServiceLoaded = true;
+ UI.MWViewer.OutputFilePath = _FullFileName;
+else
+ _Status = "Mislukt: ";
+ STATE.MaatwerkViewerServiceLoaded = false;
+ UI.MWViewer.OutputFilePath = "[Error]";
+end if;
+
+// Debugging info :
+_Feedback = "Resultaat van de web service 'MaatwerkViewer in Excel' Status ='" + _Status + "'. " + "\n" + "(LET OP: Soap fault wordt ook als succes teruggegeven)";
+local long _FeedbackResult = MsgBox(_Feedback);
+// AaaDebugInfo = _Status + _Service;
+
+ MaatwerkViewer starten
+ ;state.startmaatwerkviewer@value;state.maatwerkviewerserviceloaded@value;ui.mwviewer.outputfilepath@value;
+
+
+
+
+ true
+
+if(DATA.Kenmerken.Toepassing == "SST") then
+ $SpaceStepPane@visible = true;
+else
+ $SpaceStepPane@visible = false;
+end if;
+
+ Is SpaceStepPane visible
+ ;
+
+
+ DATA.Kenmerken.Toepassing == "SST"
+
+DATA.Kenmerken.SpaceStep.Kleur = "OG-M";
+DATA.Kenmerken.SpaceStep.Uitvoering = "Volledig";
+
+//DARO
+if (Config.Settings.PersonalityId == "10") then
+ DATA.Kenmerken.SpaceStep.StekkerType = "UK";
+else
+ DATA.Kenmerken.SpaceStep.StekkerType = "EU";
+end if;
+
+ Defaults voor SpaceStep
+ ;data.kenmerken.spacestep.kleur@value;data.kenmerken.spacestep.uitvoering@value;data.kenmerken.spacestep.stekkertype@value;
+
+
+ not(CONFIG.Settings.IsBulkConfiguratie)
+
+local boolean _IsIntern = (BEHAVIOR.AccessMode == "Intern")
+
+local boolean _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+local boolean _BEHAVIOR_IsSpaceStepPaneZichtbaar;
+local boolean _BEHAVIOR_IsRugwandMateriaalZichtbaar;
+local boolean _BEHAVIOR_IsStekkerServodriveZichtbaar;
+local boolean _BEHAVIOR_IsStekkerTypeMandatory;
+
+if($SpaceStepPane@visible) then
+ _BEHAVIOR_IsSpaceStepPaneZichtbaar = true;
+else
+ _BEHAVIOR_IsSpaceStepPaneZichtbaar = false;
+end if;
+
+if((DATA.Kenmerken.SpaceStep.Uitvoering == "Volledig") or (DATA.Kenmerken.Toepassing <> "SST")) then
+ _BEHAVIOR_ZijnLadeKenmerkenZichtbaar = true;
+else
+ _BEHAVIOR_ZijnLadeKenmerkenZichtbaar = false;
+end if;
+
+if(_IsIntern and _BEHAVIOR_ZijnLadeKenmerkenZichtbaar) then
+ _BEHAVIOR_IsRugwandMateriaalZichtbaar = true;
+else
+ _BEHAVIOR_IsRugwandMateriaalZichtbaar = false;
+end if;
+
+if(DATA.Kenmerken.SpaceStep.Bewegingstechnologie == "Servodrive" and _BEHAVIOR_IsSpaceStepPaneZichtbaar) then
+ _BEHAVIOR_IsStekkerServodriveZichtbaar = true;
+else
+ _BEHAVIOR_IsStekkerServodriveZichtbaar = false;
+end if;
+
+if(DATA.Kenmerken.SpaceStep.StekkerServodrive) then
+ _BEHAVIOR_IsStekkerTypeMandatory = true;
+else
+ _BEHAVIOR_IsStekkerTypeMandatory = false;
+end if;
+
+$DimensiesPane@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+
+UI.Kenmerken.IsBinnenLade@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+UI.Kenmerken.Geleidertechnologie@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+UI.Kenmerken.Draagkracht@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+UI.Kenmerken.HeeftOpvullijstLinks@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+UI.Kenmerken.HeeftOpvullijstRechts@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+UI.Kenmerken.DwarsverdelingAantal@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+UI.Kenmerken.HeeftZijstabilisering@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+
+UI.Kenmerken.ZijwandType@visible = not(_BEHAVIOR_IsSpaceStepPaneZichtbaar);
+UI.Kenmerken.LadeKleur@visible = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.BodemKleur@visible = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+$MatPane@visible = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+
+UI.Kenmerken.RugwandMateriaal@visible = _BEHAVIOR_IsRugwandMateriaalZichtbaar;
+
+UI.Kenmerken.SpaceStep.StekkerServodrive@visible = _BEHAVIOR_IsStekkerServodriveZichtbaar;
+
+UI.Kenmerken.LadeKleur@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.BodemKleur@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+
+UI.Kenmerken.RugwandMateriaal@mandatory = _BEHAVIOR_IsRugwandMateriaalZichtbaar;
+
+UI.Kenmerken.ZijwandType@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.LadeDiepte@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.LadeHoogte@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.Corpusbreedte@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.Draagkracht@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.Corpusbreedte@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+UI.Kenmerken.Geleidertechnologie@mandatory = _BEHAVIOR_ZijnLadeKenmerkenZichtbaar;
+
+UI.Kenmerken.SpaceStep.Sokkelbreedte@mandatory = _BEHAVIOR_IsSpaceStepPaneZichtbaar;
+UI.Kenmerken.SpaceStep.Sokkelhoogte@mandatory = _BEHAVIOR_IsSpaceStepPaneZichtbaar;
+UI.Kenmerken.SpaceStep.Uitvoering@mandatory = _BEHAVIOR_IsSpaceStepPaneZichtbaar;
+UI.Kenmerken.SpaceStep.Sokkeldiepte@mandatory = _BEHAVIOR_IsSpaceStepPaneZichtbaar;
+UI.Kenmerken.SpaceStep.Bewegingstechnologie@mandatory = _BEHAVIOR_IsSpaceStepPaneZichtbaar;
+UI.Kenmerken.SpaceStep.Kleur@mandatory = _BEHAVIOR_IsSpaceStepPaneZichtbaar;
+
+//UI.Kenmerken.SpaceStep.StekkerServodrive@mandatory = false;
+UI.Kenmerken.SpaceStep.StekkerType@mandatory = _BEHAVIOR_IsStekkerTypeMandatory;
+
+UI.Kenmerken.SpaceStep.Kleur@visible = false;
+UI.Kenmerken.SpaceStep.StekkerType@visible = false;
+UI.Kenmerken.SpaceStep.Uitvoering@option("SokkelEnTablet")@visible = false;
+UI.Kenmerken.SpaceStep.Uitvoering@option("Tablet")@visible = false;
+
+ Kenmerken verbergen/mandatory aanpassen indien SpaceStep
+ ;ui.kenmerken.isbinnenlade@visible;ui.kenmerken.geleidertechnologie@visible;ui.kenmerken.draagkracht@visible;ui.kenmerken.heeftopvullijstlinks@visible;ui.kenmerken.heeftopvullijstrechts@visible;ui.kenmerken.dwarsverdelingaantal@visible;ui.kenmerken.heeftzijstabilisering@visible;ui.kenmerken.zijwandtype@visible;ui.kenmerken.ladekleur@visible;ui.kenmerken.bodemkleur@visible;ui.kenmerken.rugwandmateriaal@visible;ui.kenmerken.spacestep.stekkerservodrive@visible;ui.kenmerken.ladekleur@mandatory;ui.kenmerken.bodemkleur@mandatory;ui.kenmerken.rugwandmateriaal@mandatory;ui.kenmerken.zijwandtype@mandatory;ui.kenmerken.ladediepte@mandatory;ui.kenmerken.ladehoogte@mandatory;ui.kenmerken.corpusbreedte@mandatory;ui.kenmerken.draagkracht@mandatory;ui.kenmerken.geleidertechnologie@mandatory;ui.kenmerken.spacestep.sokkelbreedte@mandatory;ui.kenmerken.spacestep.sokkelhoogte@mandatory;ui.kenmerken.spacestep.uitvoering@mandatory;ui.kenmerken.spacestep.sokkeldiepte@mandatory;ui.kenmerken.spacestep.bewegingstechnologie@mandatory;ui.kenmerken.spacestep.kleur@mandatory;ui.kenmerken.spacestep.stekkertype@mandatory;ui.kenmerken.spacestep.kleur@visible;ui.kenmerken.spacestep.stekkertype@visible;ui.kenmerken.spacestep.uitvoering@options;
+
+
+ UI.Kenmerken.Toepassing == "SST" and UI.Kenmerken.SpaceStep.Uitvoering == "Volledig"
+
+local long _DiktePlaatmateriaal = 18;
+local long _DikteBlumOpvullijst = 50;
+
+DATA.Kenmerken.Draagkracht = "40";
+DATA.Kenmerken.HeeftOpvullijstLinks = false;
+DATA.Kenmerken.HeeftOpvullijstRechts = false;
+DATA.Kenmerken.DwarsverdelingAantal = "0";
+DATA.Kenmerken.HeeftZijstabilisering = false;
+DATA.Kenmerken.IsBinnenLade = false;
+DATA.Kenmerken.IsBinnenBreedte = true;
+DATA.Kenmerken.ProductieWijze = "V";
+
+DATA.Kenmerken.Corpusbreedte = DATA.Kenmerken.SpaceStep.Breedte - (2*_DiktePlaatmateriaal) - (2*_DikteBlumOpvullijst);
+
+if(DATA.Kenmerken.SpaceStep.Diepte == "505") then
+ DATA.Kenmerken.LadeDiepte = "450";
+end if;
+if(DATA.Kenmerken.SpaceStep.Diepte == "555") then
+ DATA.Kenmerken.LadeDiepte = "500";
+end if;
+
+if(DATA.Kenmerken.SpaceStep.Hoogte >= 150 and DATA.Kenmerken.SpaceStep.Hoogte < 166) then
+ DATA.Kenmerken.LadeHoogte = "N";
+end if;
+if(DATA.Kenmerken.SpaceStep.Hoogte >= 166 and DATA.Kenmerken.SpaceStep.Hoogte < 204) then
+ DATA.Kenmerken.LadeHoogte = "M";
+end if;
+if(DATA.Kenmerken.SpaceStep.Hoogte >= 204 and DATA.Kenmerken.SpaceStep.Hoogte <= 250) then
+ DATA.Kenmerken.LadeHoogte = "K";
+end if;
+
+if(DATA.Kenmerken.SpaceStep.Bewegingstechnologie == "TOB") then
+ DATA.Kenmerken.Geleidertechnologie = "TOB";
+else
+ DATA.Kenmerken.Geleidertechnologie = "B";
+end if;
+
+ Values bij SpaceStep met lade
+ ;data.kenmerken.draagkracht@value;data.kenmerken.heeftopvullijstlinks@value;data.kenmerken.heeftopvullijstrechts@value;data.kenmerken.dwarsverdelingaantal@value;data.kenmerken.heeftzijstabilisering@value;data.kenmerken.isbinnenlade@value;data.kenmerken.isbinnenbreedte@value;data.kenmerken.productiewijze@value;data.kenmerken.corpusbreedte@value;data.kenmerken.ladediepte@value;data.kenmerken.ladehoogte@value;data.kenmerken.geleidertechnologie@value;
+
+
+ UI.Kenmerken.Toepassing == "SST" and UI.Kenmerken.SpaceStep.Uitvoering <> "Volledig" and UI.Kenmerken.SpaceStep.Uitvoering <> ""
+
+DATA.Kenmerken.Geleidertechnologie = "";
+DATA.Kenmerken.Draagkracht = "";
+DATA.Kenmerken.HeeftOpvullijstLinks = false;
+DATA.Kenmerken.HeeftOpvullijstRechts = false;
+DATA.Kenmerken.DwarsverdelingAantal = "0";
+DATA.Kenmerken.HeeftZijstabilisering = false;
+DATA.Kenmerken.IsBinnenBreedte = true;
+DATA.Kenmerken.Rugwandmateriaal = "";
+DATA.Kenmerken.IsBinnenLade = false;
+
+DATA.Kenmerken.LadeKleur = "";
+DATA.Kenmerken.BodemKleur = "";
+DATA.Kenmerken.LadeDiepte = "";
+DATA.Kenmerken.Corpusbreedte = 0;
+DATA.Kenmerken.HeeftMat = false;
+DATA.Kenmerken.MatMateriaal = "";
+DATA.Kenmerken.ProductieWijze = "V";
+
+index i of UI.Kenmerken.NietMeeleveren
+ UI.Kenmerken.NietMeeleveren(i).IsSelected = false;
+end index;
+
+if(DATA.Kenmerken.SpaceStep.Hoogte >= 150 and DATA.Kenmerken.SpaceStep.Hoogte < 166) then
+ DATA.Kenmerken.LadeHoogte = "N";
+end if;
+if(DATA.Kenmerken.SpaceStep.Hoogte >= 166 and DATA.Kenmerken.SpaceStep.Hoogte < 204) then
+ DATA.Kenmerken.LadeHoogte = "M";
+end if;
+if(DATA.Kenmerken.SpaceStep.Hoogte >= 204 and DATA.Kenmerken.SpaceStep.Hoogte <= 250) then
+ DATA.Kenmerken.LadeHoogte = "K";
+end if;
+
+ Values bij SpaceStep zonder lade
+ ;data.kenmerken.geleidertechnologie@value;data.kenmerken.draagkracht@value;data.kenmerken.heeftopvullijstlinks@value;data.kenmerken.heeftopvullijstrechts@value;data.kenmerken.dwarsverdelingaantal@value;data.kenmerken.heeftzijstabilisering@value;data.kenmerken.isbinnenbreedte@value;data.kenmerken.rugwandmateriaal@value;data.kenmerken.isbinnenlade@value;data.kenmerken.ladekleur@value;data.kenmerken.bodemkleur@value;data.kenmerken.ladediepte@value;data.kenmerken.corpusbreedte@value;data.kenmerken.heeftmat@value;data.kenmerken.matmateriaal@value;data.kenmerken.productiewijze@value;data.kenmerken.ladehoogte@value;
+
+
+ true
+
+if (DATA.Kenmerken.Toepassing <> "SST") then
+ DATA.Kenmerken.SpaceStep.Breedte = 0;
+ DATA.Kenmerken.SpaceStep.Hoogte = 0;
+ DATA.Kenmerken.SpaceStep.Diepte = "";
+ DATA.Kenmerken.SpaceStep.Kleur = "";
+ DATA.Kenmerken.SpaceStep.Uitvoering = "";
+ DATA.Kenmerken.SpaceStep.Bewegingstechnologie = "";
+ DATA.Kenmerken.SpaceStep.StekkerServodrive = false;
+ DATA.Kenmerken.SpaceStep.StekkerType = "";
+else
+ if (DATA.Kenmerken.SpaceStep.Bewegingstechnologie <> "Servodrive") then
+ DATA.Kenmerken.SpaceStep.StekkerServodrive = false;
+ end if;
+end if;
+
+ Values verborgen SpaceStep properties wissen
+ ;data.kenmerken.spacestep.breedte@value;data.kenmerken.spacestep.hoogte@value;data.kenmerken.spacestep.diepte@value;data.kenmerken.spacestep.kleur@value;data.kenmerken.spacestep.uitvoering@value;data.kenmerken.spacestep.bewegingstechnologie@value;data.kenmerken.spacestep.stekkerservodrive@value;data.kenmerken.spacestep.stekkertype@value;
+
+
+
+
+ true
+ UI.Kenmerken.CorpusWanddikte@mandatory = not(UI.Kenmerken.IsBinnenbreedte);
+UI.Kenmerken.CorpusWanddikte@visible = not(UI.Kenmerken.IsBinnenbreedte);
+ CorpusWanddikte
+ ;ui.kenmerken.corpuswanddikte@mandatory;ui.kenmerken.corpuswanddikte@visible;
+
+
+ true
+ local boolean _HeeftMatAntislipFiberKleur = (UI.Kenmerken.HeeftMat and (UI.Kenmerken.MatMateriaal.Value == "AF"));
+
+UI.Kenmerken.MatAntislipFiberKleur@mandatory = _HeeftMatAntislipFiberKleur;
+UI.Kenmerken.MatAntislipFiberKleur@visible = _HeeftMatAntislipFiberKleur;
+
+local boolean _HeeftBulkMatAntislipFiberKleur = ((UI.BulkKenmerken.HeeftMat == "True") and (UI.BulkKenmerken.MatMateriaal.Value == "AF") and (CONFIG.Settings.IsBulkConfiguratie));
+
+UI.BulkKenmerken.MatAntislipFiberKleur@mandatory = _HeeftBulkMatAntislipFiberKleur;
+UI.BulkKenmerken.MatAntislipFiberKleur@visible = _HeeftBulkMatAntislipFiberKleur;
+ MatAntislipFiberKleur
+ ;ui.kenmerken.matantislipfiberkleur@mandatory;ui.kenmerken.matantislipfiberkleur@visible;ui.bulkkenmerken.matantislipfiberkleur@mandatory;ui.bulkkenmerken.matantislipfiberkleur@visible;
+
+
+ true
+ local boolean _HeeftMatAntislipFlockKleur = (UI.Kenmerken.HeeftMat and (UI.Kenmerken.MatMateriaal.Value == "AZ"));
+
+UI.Kenmerken.MatAntislipFlockKleur@mandatory = _HeeftMatAntislipFlockKleur;
+UI.Kenmerken.MatAntislipFlockKleur@visible = _HeeftMatAntislipFlockKleur;
+
+local boolean _HeeftBulkMatAntislipFlockKleur = ((UI.BulkKenmerken.HeeftMat == "True") and (UI.BulkKenmerken.MatMateriaal.Value == "AZ") and (CONFIG.Settings.IsBulkConfiguratie));
+
+UI.BulkKenmerken.MatAntislipFlockKleur@mandatory = _HeeftBulkMatAntislipFlockKleur;
+UI.BulkKenmerken.MatAntislipFlockKleur@visible = _HeeftBulkMatAntislipFlockKleur;
+ MatAntislipFlockKleur
+ ;ui.kenmerken.matantislipflockkleur@mandatory;ui.kenmerken.matantislipflockkleur@visible;ui.bulkkenmerken.matantislipflockkleur@mandatory;ui.bulkkenmerken.matantislipflockkleur@visible;
+
+
+ true
+ local boolean _HeeftMatAntislipKleur = (UI.Kenmerken.HeeftMat and (UI.Kenmerken.MatMateriaal.Value == "AS"));
+
+UI.Kenmerken.MatAntislipKleur@mandatory = _HeeftMatAntislipKleur;
+UI.Kenmerken.MatAntislipKleur@visible = _HeeftMatAntislipKleur;
+ MatAntislipKleur
+ ;ui.kenmerken.matantislipkleur@mandatory;ui.kenmerken.matantislipkleur@visible;
+
+
+ true
+ UI.Kenmerken.MatMateriaal@mandatory = UI.Kenmerken.HeeftMat;
+UI.Kenmerken.MatMateriaal@visible = UI.Kenmerken.HeeftMat;
+
+UI.BulkKenmerken.MatMateriaal@mandatory = (UI.BulkKenmerken.HeeftMat == "True");
+UI.BulkKenmerken.MatMateriaal@visible = (UI.BulkKenmerken.HeeftMat == "True");
+ MatMateriaal
+ ;ui.kenmerken.matmateriaal@mandatory;ui.kenmerken.matmateriaal@visible;ui.bulkkenmerken.matmateriaal@mandatory;ui.bulkkenmerken.matmateriaal@visible;
+
+
+ true
+ local boolean _HeeftMatVinylFiberglassKleur = (UI.Kenmerken.HeeftMat and (UI.Kenmerken.MatMateriaal.Value == "CF"));
+
+UI.Kenmerken.MatVinylFiberglassKleur@mandatory = _HeeftMatVinylFiberglassKleur;
+UI.Kenmerken.MatVinylFiberglassKleur@visible = _HeeftMatVinylFiberglassKleur;
+
+local boolean _HeeftBulkMatVinylFiberglassKleur = ((UI.BulkKenmerken.HeeftMat == "True") and (UI.BulkKenmerken.MatMateriaal.Value == "CF") and (CONFIG.Settings.IsBulkConfiguratie));
+
+UI.BulkKenmerken.MatVinylFiberglassKleur@mandatory = _HeeftBulkMatVinylFiberglassKleur;
+UI.BulkKenmerken.MatVinylFiberglassKleur@visible = _HeeftBulkMatVinylFiberglassKleur;
+ MatVinylFiberglassKleur
+ ;ui.kenmerken.matvinylfiberglasskleur@mandatory;ui.kenmerken.matvinylfiberglasskleur@visible;ui.bulkkenmerken.matvinylfiberglasskleur@mandatory;ui.bulkkenmerken.matvinylfiberglasskleur@visible;
+
+
+ true
+ local boolean _HeeftOpvullijst = (UI.Kenmerken.HeeftOpvullijstLinks or UI.Kenmerken.HeeftOpvullijstRechts);
+
+UI.Kenmerken.OpvullijstKleur@mandatory = _HeeftOpvullijst;
+UI.Kenmerken.OpvullijstKleur@visible = _HeeftOpvullijst;
+
+UI.Kenmerken.OpvullijstDikte@visible = _HeeftOpvullijst;
+
+index i of UI.Kenmerken.NietMeeleveren
+ if (UI.Kenmerken.NietMeeleveren(i).Id == "Opvullijst") then
+ UI.Kenmerken.NietMeeleveren(i)@visible = (_HeeftOpvullijst and Not(Config.Settings.NietMeeleverenVerbergen));
+ end if;
+end index;
+ Opvullijst
+ ;ui.kenmerken.opvullijstkleur@mandatory;ui.kenmerken.opvullijstkleur@visible;ui.kenmerken.opvullijstdikte@visible;
+
+
+ true
+ local boolean _HeeftVoorwandTypeC = ((UI.Kenmerken.IsBinnenlade) and (UI.Kenmerken.LadeHoogte == "C"));
+
+UI.Kenmerken.VoorwandTypeVanCBinnenlade@mandatory = _HeeftVoorwandTypeC;
+UI.Kenmerken.VoorwandTypeVanCBinnenlade@visible = _HeeftVoorwandTypeC;
+ VoorwandTypeVanCBinnenlade
+ ;ui.kenmerken.voorwandtypevancbinnenlade@mandatory;ui.kenmerken.voorwandtypevancbinnenlade@visible;
+
+
+ true
+ local boolean _HeeftVoorwandTypeM = ((UI.Kenmerken.IsBinnenlade) and (UI.Kenmerken.LadeHoogte == "M"));
+
+UI.Kenmerken.VoorwandTypeVanMBinnenlade@mandatory = _HeeftVoorwandTypeM;
+UI.Kenmerken.VoorwandTypeVanMBinnenlade@visible = _HeeftVoorwandTypeM;
+ VoorwandTypeVanMBinnenlade
+ ;ui.kenmerken.voorwandtypevanmbinnenlade@mandatory;ui.kenmerken.voorwandtypevanmbinnenlade@visible;
+
+
+ true
+ local boolean _HeeftVoorwandTypeK = ((UI.Kenmerken.IsBinnenlade) and (UI.Kenmerken.LadeHoogte == "K"));
+
+UI.Kenmerken.VoorwandTypeVanKBinnenlade@visible = _HeeftVoorwandTypeK;
+UI.Kenmerken.VoorwandTypeVanKBinnenlade@mandatory = _HeeftVoorwandTypeK;
+ VoorwandTypeVanKBinnenlade
+ ;ui.kenmerken.voorwandtypevankbinnenlade@visible;ui.kenmerken.voorwandtypevankbinnenlade@mandatory;
+
+
+ true
+ local boolean _HeeftVoorwandTypeK = ((UI.Kenmerken.IsBinnenlade) and (UI.Kenmerken.LadeHoogte == "K"));
+local boolean _HeeftVoorwandTypeM = ((UI.Kenmerken.IsBinnenlade) and (UI.Kenmerken.LadeHoogte == "M"));
+local boolean _HeeftMeenemerSet = (_HeeftVoorwandTypeK or _HeeftVoorwandTypeM);
+
+UI.Kenmerken.MeenemerSet@visible = _HeeftMeenemerSet;
+UI.Kenmerken.MeenemerSet@mandatory = _HeeftMeenemerSet;
+ MeenemerSet
+ ;ui.kenmerken.meenemerset@visible;ui.kenmerken.meenemerset@mandatory;
+
+
+
+
+ true
+
+// UI.Kenmerken.FrontBevestiging@visible = Not(Config.Settings.FrontBevestigingVerbergen);
+UI.Kenmerken.VerpakkingType@visible = Not(Config.Settings.VerpakkingTypeVerbergen);
+
+index i of UI.Kenmerken.NietMeeleveren
+ UI.Kenmerken.NietMeeleveren(i)@visible = (UI.Kenmerken.NietMeeleveren(i)@visible and Not(Config.Settings.NietMeeleverenVerbergen));
+end index;
+ Visible properties
+ ;ui.kenmerken.verpakkingtype@visible;
+
+
+ true
+ /*
+index i of UI.BulkKenmerken.NietMeeleveren
+ UI.BulkKenmerken.NietMeeleveren(i)@visible = (UI.BulkKenmerken.NietMeeleveren(i)@visible and Not(Config.Settings.NietMeeleverenVerbergen));
+end index;
+*/
+ Visible properties BulkKenmerken
+ ;
+
+
+
+ false //STATE.Saved //true
+ //local string _Language = GetArg("language");
+//local string _Model = GetModel();
+
+UI.Url.OverzichtParameters@length = 2;
+
+UI.Url.OverzichtParameters[1].Key = GetLocalizedLabel(UI.Kenmerken.LadeKleur.Value);
+UI.Url.OverzichtParameters[1].Value = GetLocalizedLabel("bla");
+
+UI.Url.OverzichtParameters[2].Key = GetLocalizedLabel(UI.Kenmerken.BodemKleur.Value);
+UI.Url.OverzichtParameters[2].Value = GetLocalizedLabel("bla");
+
+local string _BaseUrl = "http://ax-e-con-dev/econsql/VHTest/index.html";
+local string _QueryString = "";
+
+if (UI.Url.OverzichtParameters@length > 0) then
+ _QueryString = "?";
+end if;
+
+index i of UI.Url.OverzichtParameters
+ _QueryString = _QueryString + UI.Url.OverzichtParameters(i).Key + "=" + UI.Url.OverzichtParameters(i).Value;
+
+ if (i < UI.Url.OverzichtParameters@length) then
+ _QueryString = _QueryString + "&";
+ end if;
+end index;
+
+UI.Url.Overzicht = _BaseUrl + _QueryString;
+
+Output = UI.Url.Overzicht;
+
+//Flag = false;
+ Overzicht updaten
+ ;ui.url.overzichtparameters[1].key@value;ui.url.overzichtparameters[1].value@value;ui.url.overzichtparameters[2].key@value;ui.url.overzichtparameters[2].value@value;ui.url.overzicht@value;output@value;
+
+
+ (DATA.BerekendeWaarden.AfbeeldingCode <> "")
+ //local string _Url = "./images/Vanhoecke/tbx/AfbeeldingCode/tbx_AB_ER.jpg";
+local string _Url = "./images/Vanhoecke/lbx/Test/" + DATA.BerekendeWaarden.AfbeeldingCode + ".svg";
+//local string _Url = "http://res.vanhoecke.be/Images/GENERIEK/LEGRA_BOX/" + DATA.BerekendeWaarden.AfbeeldingCode + ".svg";
+
+UI.Image = _Url;
+
+//@style = "imgsrc:" + _Url + ";";
+ Image updaten
+ ;ui.image@value;
+
+
+ true
+
+local string _Model = GetModel();
+
+if not(Data.Kenmerken.LadeHoogte == "") then
+ UI.StatusBalk.Code = Data.Kenmerken.LadeHoogte ;
+ if (Data.Kenmerken.IsBinnenlade) then
+ UI.StatusBalk.Code = Data.Kenmerken.LadeHoogte + "/Z";
+ end if;
+end if;
+
+if not(Data.Kenmerken.LadeDiepte == "") then
+ UI.StatusBalk.LadeDiepte = Data.Kenmerken.LadeDiepte ;
+end if;
+
+UI.StatusBalk.CorpusBreedte = CInternal(Data.Kenmerken.CorpusBreedte) + " mm";
+
+if not(Data.Kenmerken.isBinnenBreedte) then
+ UI.StatusBalk.Wand = CInternal(Data.Kenmerken.CorpusWanddikte) + " mm";
+else
+ UI.StatusBalk.Wand = "B";
+end if;
+
+if not(Data.Kenmerken.Draagkracht == "") then
+ UI.StatusBalk.Draagkracht = Data.Kenmerken.Draagkracht + " kg" ;
+end if;
+
+
+local string _FrontBevestigingOptionLabel = DATA.Kenmerken.FrontBevestiging@id + "_" + DATA.Kenmerken.FrontBevestiging@option(DATA.Kenmerken.FrontBevestiging)@id;
+if (not(Data.Kenmerken.FrontBevestiging == "") and not(Data.Kenmerken.IsBinnenLade)) then
+ UI.StatusBalk.FrontBevestiging = GetLabel(_FrontBevestigingOptionLabel; _Model; ""; "nl");
+else
+ UI.StatusBalk.FrontBevestiging = "---";
+end if;
+
+
+if (UI.Kenmerken.HeeftMat) then
+ local string _MatMateriaalOptionLabel = "MatMateriaal_" + DATA.Kenmerken.MatMateriaal;
+ local string _MatKleurOptionLabel = switch DATA.Kenmerken.MatMateriaal
+ case "CF": "MatVinylFiberglassKleur_" + UI.Kenmerken.MatVinylFiberglassKleur.Value
+ case "AS": "MatAntislipKleur_" + UI.Kenmerken.MatAntislipKleur.Value
+ case "AF": "MatAntislipFiberKleur_" + UI.Kenmerken.MatAntislipFiberKleur.Value
+ case "AZ": "MatAntislipFlockKleur_" + UI.Kenmerken.MatAntislipFlockKleur.Value
+ else ""
+ end switch;
+
+ local string _MatMateriaal = GetLabel(_MatMateriaalOptionLabel; _Model; ""; "nl");
+ local string _MatKleur = GetLabel(_MatKleurOptionLabel; _Model; ""; "nl");
+
+ if not(Data.Kenmerken.MatMateriaal == "") then
+ UI.StatusBalk.Diverse = "Mat: " + _MatMateriaal + " , " + _MatKleur ;
+ end if;
+else
+ UI.StatusBalk.Diverse = "---";
+end if;
+
+if not(Data.Kenmerken.VerpakkingType == "") then
+ UI.StatusBalk.VerpakkingType = Data.Kenmerken.VerpakkingType ;
+end if;
+
+ Statusbalk updaten
+ ;ui.statusbalk.code@value;ui.statusbalk.ladediepte@value;ui.statusbalk.corpusbreedte@value;ui.statusbalk.wand@value;ui.statusbalk.draagkracht@value;ui.statusbalk.frontbevestiging@value;ui.statusbalk.verpakkingtype@value;
+
+
+
+ STATE.ValidationNeeded or (UI.Lijn.Aantal <> 0)
+ local double _Minimum = RANGE.Aantal.Minimum;
+local double _Maximum = RANGE.Aantal.Maximum;
+
+if UI.Lijn.Aantal@mandatory then
+ UI.Lijn.Aantal@inputvalidation = "min:" + _Minimum + ";multiplication:1;maxdecimals:0;";
+else
+ UI.Lijn.Aantal@inputvalidation = "";
+end if;
+
+ Validation Aantal
+ ;ui.lijn.aantal@rangeset;
+
+
+ (UI.Kenmerken.CorpusBreedte@visible or (UI.Kenmerken.SpaceStep.Uitvoering == "Volledig" and UI.Kenmerken.Toepassing == "SST")) and (STATE.ValidationNeeded or (UI.Kenmerken.CorpusBreedte <> 0))
+
+local string _Minimum = Replace(cstr(RANGE.CorpusBreedte.Minimum);",";".");
+local string _Maximum = Replace(cstr(RANGE.CorpusBreedte.Maximum);",";".");
+
+UI.Kenmerken.CorpusBreedte@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+
+ Validation CorpusBreedte on
+ ;ui.kenmerken.corpusbreedte@rangeset;
+
+
+ UI.Kenmerken.Toepassing == "SST" and UI.Kenmerken.SpaceStep.Uitvoering <> "Volledig"
+ UI.Kenmerken.CorpusBreedte@inputvalidation = "";
+ Validation CorpusBreedte off
+ ;ui.kenmerken.corpusbreedte@rangeset;
+
+
+ UI.Kenmerken.CorpusWanddikte@visible and (STATE.ValidationNeeded or (UI.Kenmerken.CorpusWanddikte <> 0))
+
+local string _Minimum = "1";
+local string _Maximum = "100";
+local string _multiplication = Replace("0,5";",";".");
+
+if (BEHAVIOR.IsEconAx) then
+ _multiplication = Replace("0,1";",";".");
+end if;
+
+UI.Kenmerken.CorpusWanddikte@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:" + _multiplication + ";maxdecimals:1;";
+
+ Validation CorpusWanddikte on
+ ;ui.kenmerken.corpuswanddikte@rangeset;
+
+
+ not(UI.Kenmerken.CorpusWanddikte@visible)
+ UI.Kenmerken.CorpusWanddikte@inputvalidation = "";
+ Validation CorpusWanddikte off
+ ;ui.kenmerken.corpuswanddikte@rangeset;
+
+
+ false //(UI.Kenmerken.InterneBreedte <> 0)
+ local double _Minimum = RANGE.InterneBreedte.Minimum;
+local double _Maximum = RANGE.InterneBreedte.Maximum;
+
+UI.Kenmerken.InterneBreedte@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.5;maxdecimals:1;";
+ Validation InterneBreedte
+ ;ui.kenmerken.internebreedte@rangeset;
+
+
+ (UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.X@visible) and (STATE.ValidationNeeded or (UI.Kenmerken.UitsparingData.X.BreedteRugdeel <> 0))
+ local double _Minimum = RANGE.UitsparingDataBreedteX.Minimum;
+local double _Maximum = RANGE.UitsparingDataBreedteX.Maximum;
+
+UI.Kenmerken.UitsparingData.X.BreedteRugdeel@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+ Validation UitsparingData BreedteX on
+ ;ui.kenmerken.uitsparingdata.x.breedterugdeel@rangeset;
+
+
+ not(UI.Kenmerken.UitsparingData@visible) or not(UI.Kenmerken.UitsparingData.X@visible)
+ UI.Kenmerken.UitsparingData.X.BreedteRugdeel@inputvalidation = "";
+ Validation UitsparingData BreedteX off
+ ;ui.kenmerken.uitsparingdata.x.breedterugdeel@rangeset;
+
+
+ (UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.M@visible) and (UI.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel") and (STATE.ValidationNeeded or (UI.Kenmerken.UitsparingData.M.BreedteRugdeel <> 0))
+ local double _Minimum = RANGE.UitsparingDataBreedteM.Minimum;
+local double _Maximum = RANGE.UitsparingDataBreedteM.Maximum;
+
+UI.Kenmerken.UitsparingData.M.BreedteRugdeel@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+ Validation UitsparingData BreedteM on
+ ;ui.kenmerken.uitsparingdata.m.breedterugdeel@rangeset;
+
+
+ not(UI.Kenmerken.UitsparingData@visible) or not(UI.Kenmerken.UitsparingData.M@visible)
+ UI.Kenmerken.UitsparingData.M.BreedteRugdeel@inputvalidation = "";
+ Validation UitsparingData BreedteM off
+ ;ui.kenmerken.uitsparingdata.m.breedterugdeel@rangeset;
+
+
+ (UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.Y@visible) and (STATE.ValidationNeeded or (UI.Kenmerken.UitsparingData.Y.BreedteRugdeel <> 0))
+ local double _Minimum = RANGE.UitsparingDataBreedteY.Minimum;
+local double _Maximum = RANGE.UitsparingDataBreedteY.Maximum;
+
+UI.Kenmerken.UitsparingData.Y.BreedteRugdeel@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+ Validation UitsparingData BreedteY on
+ ;ui.kenmerken.uitsparingdata.y.breedterugdeel@rangeset;
+
+
+ not(UI.Kenmerken.UitsparingData@visible) or not(UI.Kenmerken.UitsparingData.Y@visible)
+ UI.Kenmerken.UitsparingData.Y.BreedteRugdeel@inputvalidation = "";
+ Validation UitsparingData BreedteY off
+ ;ui.kenmerken.uitsparingdata.y.breedterugdeel@rangeset;
+
+
+ (UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.Z1@visible) and (STATE.ValidationNeeded or (Config.InputMode == "CreateConfig"))
+ local double _Minimum = RANGE.UitsparingDataBreedteZ1.Minimum;
+local double _Maximum = RANGE.UitsparingDataBreedteZ1.Maximum;
+
+UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+ Validation UitsparingData BreedteZ1 on
+ ;ui.kenmerken.uitsparingdata.z1.breedteuitsparing@rangeset;
+
+
+ not(UI.Kenmerken.UitsparingData@visible) or not(UI.Kenmerken.UitsparingData.Z1@visible)
+ UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing@inputvalidation = "";
+ Validation UitsparingData BreedteZ1 off
+ ;ui.kenmerken.uitsparingdata.z1.breedteuitsparing@rangeset;
+
+
+ (UI.Kenmerken.UitsparingData@visible and UI.Kenmerken.UitsparingData.Z2@visible) and (STATE.ValidationNeeded or (Config.InputMode == "CreateConfig"))
+ local double _Minimum = RANGE.UitsparingDataBreedteZ2.Minimum;
+local double _Maximum = RANGE.UitsparingDataBreedteZ2.Maximum;
+
+UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+ Validation UitsparingData BreedteZ2 on
+ ;ui.kenmerken.uitsparingdata.z2.breedteuitsparing@rangeset;
+
+
+ not(UI.Kenmerken.UitsparingData@visible) or not(UI.Kenmerken.UitsparingData.Z2@visible)
+ UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing@inputvalidation = "";
+ Validation UitsparingData BreedteZ2 off
+ ;ui.kenmerken.uitsparingdata.z2.breedteuitsparing@rangeset;
+
+
+ true
+ local double _VerwachteBreedte = UI.Kenmerken.UitsparingData.UitsparingData_VerwachteBreedte;
+local string _InputValidation = "";
+
+// opgelet: kommagetallen worden niet aanvaard bij min/max, puntgetallen wel
+// m.a.w. 200,5 wordt aanzien als 2005 ///// 200.5 wordt aanzien als 200.5 of 200,5
+
+if (UI.Kenmerken.UitsparingData@visible) then
+ local string _strVerwachteBreedte = Replace(CStr(_VerwachteBreedte); ","; "."); // TO DO: mooier via Format(value; fmt), lukt me voorlopig niet :-/
+ _InputValidation = "min:" + _strVerwachteBreedte + ";max:" + _strVerwachteBreedte + ";multiplication:0.1;maxdecimals:1;";
+end if;
+
+UI.Kenmerken.UitsparingData.UitsparingData_TotaleBreedte@inputvalidation = _InputValidation;
+
+ Validation UitsparingData TotaleBreedte
+ ;ui.kenmerken.uitsparingdata.uitsparingdata_totalebreedte@rangeset;
+
+
+ STATE.ValidationNeeded or UI.Kenmerken.SpaceStep.Sokkelbreedte <> 0
+
+local string _Minimum = Replace(cstr(RANGE.SpaceStepBreedte.Minimum);",";".");
+local string _Maximum = Replace(cstr(RANGE.SpaceStepBreedte.Maximum);",";".");
+
+if (DATA.Kenmerken.Toepassing == "SST") then
+ UI.Kenmerken.SpaceStep.Sokkelbreedte@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+else
+ UI.Kenmerken.SpaceStep.Sokkelbreedte@inputvalidation = "";
+end if;
+
+ Validation SpaceStepBreedte
+ ;ui.kenmerken.spacestep.sokkelbreedte@rangeset;
+
+
+ STATE.ValidationNeeded or UI.Kenmerken.SpaceStep.Sokkelhoogte <> 0
+
+local string _Minimum = Replace(cstr(RANGE.SpaceStepHoogte.Minimum);",";".");
+local string _Maximum = Replace(cstr(RANGE.SpaceStepHoogte.Maximum);",";".");
+
+if (DATA.Kenmerken.Toepassing == "SST") then
+ UI.Kenmerken.SpaceStep.Sokkelhoogte@inputvalidation = "min:" + _Minimum + ";max:" + _Maximum + ";multiplication:0.1;maxdecimals:1;";
+else
+ UI.Kenmerken.SpaceStep.Sokkelhoogte@inputvalidation = "";
+end if;
+
+ Validation SpaceStepHoogte
+ ;ui.kenmerken.spacestep.sokkelhoogte@rangeset;
+
+
+ BEHAVIOR.IsEconAX and (DATA.Kenmerken.Toepassing == "L" or DATA.Kenmerken.Toepassing == "SST")
+and DATA.Kenmerken.LadeHoogte <> "" and DATA.Kenmerken.LadeKleur <> "" and DATA.Kenmerken.CorpusBreedte <> 0 and DATA.Kenmerken.RugwandMateriaal == "Staal"
+
+local string _XmlRequest = "";
+local string _eConTaal = CONFIG.Language;
+local string _VhTaalCode = _eConTaal; // Nog te converteren naar vhTaalCode
+
+_XmlRequest = _XmlRequest + "<soapenv:Envelope xmlns:soapenv='http://schemas.xmlsoap.org/soap/envelope/' xmlns:v4='http://vhisie.vanhoecke.be/V4'>";
+_XmlRequest = _XmlRequest + "<soapenv:Header/>";
+_XmlRequest = _XmlRequest + "<soapenv:Body>";
+_XmlRequest = _XmlRequest + "<v4:BestaatStalenRug>";
+_XmlRequest = _XmlRequest + "<v4:Request>";
+_XmlRequest = _XmlRequest + "<v4:Header>";
+_XmlRequest = _XmlRequest + "<v4:KlantID>" + Config.Settings.KlantId + "</v4:KlantID>"; // bv. 12486
+_XmlRequest = _XmlRequest + "<v4:PersonalityID>" + Config.Settings.PersonalityId + "</v4:PersonalityID>";
+_XmlRequest = _XmlRequest + "<v4:Taal>" + _VhTaalCode + "</v4:Taal>";
+_XmlRequest = _XmlRequest + "</v4:Header>";
+_XmlRequest = _XmlRequest + "<v4:LadeHoogte>" + DATA.Kenmerken.LadeHoogte + "</v4:LadeHoogte>";
+_XmlRequest = _XmlRequest + "<v4:LadeKleur>" + DATA.Kenmerken.LadeKleur + "</v4:LadeKleur>";
+_XmlRequest = _XmlRequest + "<v4:LadeVariant>" + "LBX" + "</v4:LadeVariant>";
+_XmlRequest = _XmlRequest + "<v4:InterneBreedte>" + DATA.BerekendeWaarden.InterneBreedte + "</v4:InterneBreedte>";
+
+
+if (UI.Kenmerken.HeeftAfwijkendeRughoogte) then
+ _XmlRequest = _XmlRequest + "<v4:RugHoogte>" + DATA.Kenmerken.RugHoogte + "</v4:RugHoogte>";
+else
+ _XmlRequest = _XmlRequest + "<v4:RugHoogte>" + DATA.Kenmerken.LadeHoogte + "</v4:RugHoogte>";
+end if;
+
+_XmlRequest = _XmlRequest + "</v4:Request>";
+_XmlRequest = _XmlRequest + "</v4:BestaatStalenRug>";
+_XmlRequest = _XmlRequest + "</soapenv:Body>";
+_XmlRequest = _XmlRequest + "</soapenv:Envelope>";
+
+local string _Service = GetSetting("data.vanhoecke.connectionstring.cache.bestaatstalenrug");
+local boolean _Result = LoadFromXMLService("CONFIG.Settings.StalenRugBeschikbaar.BestaatStalenRug"; _Service; false; _XmlRequest);
+
+if (_Result) then
+ STATE.BestaatStalenRugLoaded = "WebServiceIsGeladen";
+else
+ STATE.BestaatStalenRugLoaded = "WebServiceIsNietGeladen";
+end if;
+
+ Validation Stalen Rug
+ ;state.bestaatstalenrugloaded@value;
+
+
+
+
+ not(STATE.Initialized) and (BEHAVIOR.OperationMode == "AxCreate")
+ local string _TriggerDummyM = UI.Kenmerken.UitsparingData.M.Hoogte;
+
+STATE.ProcessedAndExit = true;
+
+ ProcessedAndExit voor AxCreate
+ ;state.processedandexit@value;
+
+
+ (STATE.SavedAndExit or STATE.SavedAndContinue or STATE.ProcessedAndExit or not(BEHAVIOR.IsInteractive)) // (CONFIG.InputMode == "CreateConfig"))
+
+DATA.Lijn.InvalidFieldSet@options = InvalidFieldSet();
+DATA.Lijn.OngeldigeWaarden@length = len(DATA.Lijn.InvalidFieldSet@options);
+
+index i of DATA.Lijn.OngeldigeWaarden;
+ DATA.Lijn.OngeldigeWaarden(i) = DATA.Lijn.InvalidFieldSet@option(i)@label;
+end index;
+
+DATA.Lijn.IsGeldig = (InvalidFields() == 0);
+
+ IsGeldig
+ ;data.lijn.invalidfieldset@options;data.lijn.isgeldig@value;
+
+
+
+ STATE.LanguagesLoaded and (STATE.SavedAndExit or STATE.SavedAndContinue or (CONFIG.InputMode == "CreateConfig"))
+ local string _LadeCode = DATA.Kenmerken.LadeHoogte;
+
+if (DATA.Kenmerken.IsBinnenlade) then
+ _LadeCode = _LadeCode + "/Z";
+end if;
+
+DATA.BerekendeWaarden.LadeCode = _LadeCode;
+ Bereken LadeCode
+ ;data.berekendewaarden.ladecode@value;
+
+
+
+ true
+ DATA.Lijn.GroeperingCode = DATA.Kenmerken.Variant + "_" + DATA.Kenmerken.LadeKleur + ";" + DATA.Kenmerken.BodemKleur;
+ Bepaal GroeperingCode
+ ;data.lijn.groeperingcode@value;
+
+
+ STATE.SavedAndExit or STATE.SavedAndContinue or STATE.ProcessedAndExit or STATE.KlantVoorkeurenSaved
+ if not(UI.Kenmerken.CorpusWanddikte@visible) then
+ DATA.Kenmerken.CorpusWanddikte = 0;
+ UI.Kenmerken.CorpusWanddikte = 0;
+end if;
+
+if (UI.Kenmerken.IsBinnenlade) and (BEHAVIOR.IsEconWeb) then // and not (Config.Settings.FrontBevestigingVerbergen)
+ DATA.Kenmerken.FrontBevestiging = "";
+ UI.Kenmerken.FrontBevestiging = "";
+end if;
+
+if not(UI.Kenmerken.OpvullijstKleur@visible) then
+ DATA.Kenmerken.OpvullijstKleur = "";
+ UI.Kenmerken.OpvullijstKleur = "";
+end if;
+
+if (not(UI.Kenmerken.HeeftOpvullijstLinks) and not(UI.Kenmerken.HeeftOpvullijstRechts)) then
+ DATA.Kenmerken.NietMeeleveren.NietMeeleveren_Opvullijst = false;
+end if;
+
+if not(UI.Kenmerken.VoorwandTypeVanCBinnenlade@visible) then
+ DATA.Kenmerken.VoorwandTypeVanCBinnenlade = "";
+ UI.Kenmerken.VoorwandTypeVanCBinnenlade = "";
+end if;
+
+if not(UI.Kenmerken.VoorwandTypeVanMBinnenlade@visible) then
+ DATA.Kenmerken.VoorwandTypeVanMBinnenlade = "";
+ UI.Kenmerken.VoorwandTypeVanMBinnenlade = "";
+end if;
+
+if not(UI.Kenmerken.VoorwandTypeVanKBinnenlade@visible) then
+ DATA.Kenmerken.VoorwandTypeVanKBinnenlade = "";
+ UI.Kenmerken.VoorwandTypeVanKBinnenlade = "";
+end if;
+
+if not(DATA.Kenmerken.Toepassing in {"SY";"SP"}) then
+ DATA.Kenmerken.UitsparingData.UitsparingAantal = "";
+
+ DATA.Kenmerken.UitsparingData.X.Breedte = 0;
+ DATA.Kenmerken.UitsparingData.X.Hoogte = "";
+ DATA.Kenmerken.UitsparingData.X.Materiaal = "";
+
+ DATA.Kenmerken.UitsparingData.Y.Breedte = 0;
+ DATA.Kenmerken.UitsparingData.Y.Hoogte = "";
+ DATA.Kenmerken.UitsparingData.Y.Materiaal = "";
+
+ DATA.Kenmerken.UitsparingData.Z1.Breedte = 0;
+ DATA.Kenmerken.UitsparingData.Z1.Diepte = 0;
+ DATA.Kenmerken.UitsparingData.Z1.Hoogte = "";
+ DATA.Kenmerken.UitsparingData.Z1.Materiaal = "";
+ DATA.Kenmerken.UitsparingData.Z1.Vorm = "";
+
+ UI.Kenmerken.UitsparingData.UitsparingAantal = "";
+
+ UI.Kenmerken.UitsparingData.X.BreedteRugdeel = 0;
+ UI.Kenmerken.UitsparingData.X.Hoogte = "";
+ UI.Kenmerken.UitsparingData.X.Materiaal = "";
+
+ UI.Kenmerken.UitsparingData.Y.BreedteRugdeel = 0;
+ UI.Kenmerken.UitsparingData.Y.Hoogte = "";
+ UI.Kenmerken.UitsparingData.Y.Materiaal = "";
+
+ UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing = 0;
+ UI.Kenmerken.UitsparingData.Z1.Diepte = 0;
+ UI.Kenmerken.UitsparingData.Z1.Hoogte = "";
+ UI.Kenmerken.UitsparingData.Z1.Materiaal = "";
+ UI.Kenmerken.UitsparingData.Z1.Vorm = "";
+end if;
+
+if not(UI.Kenmerken.UitsparingData.M@visible) then
+ DATA.Kenmerken.UitsparingData.M.Breedte = 0;
+ DATA.Kenmerken.UitsparingData.M.Hoogte = "";
+ DATA.Kenmerken.UitsparingData.M.Materiaal = "";
+
+ UI.Kenmerken.UitsparingData.M.BreedteRugdeel = 0;
+ UI.Kenmerken.UitsparingData.M.Hoogte = "";
+ UI.Kenmerken.UitsparingData.M.Materiaal = "";
+end if;
+
+local string _TriggerDummy = UI.Kenmerken.UitsparingData.Z2.Hoogte;
+
+if not(UI.Kenmerken.UitsparingData.Z2@visible) then
+ DATA.Kenmerken.UitsparingData.Z2.Breedte = 0;
+ DATA.Kenmerken.UitsparingData.Z2.Diepte = 0;
+ DATA.Kenmerken.UitsparingData.Z2.Hoogte = "";
+ DATA.Kenmerken.UitsparingData.Z2.Materiaal = "";
+ DATA.Kenmerken.UitsparingData.Z2.Vorm = "";
+
+ UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing = 0;
+ UI.Kenmerken.UitsparingData.Z2.Diepte = 0;
+ UI.Kenmerken.UitsparingData.Z2.Hoogte = "";
+ UI.Kenmerken.UitsparingData.Z2.Materiaal = "";
+ UI.Kenmerken.UitsparingData.Z2.Vorm = "";
+end if;
+
+if not(UI.Kenmerken.HeeftMat) then
+ DATA.Kenmerken.MatMateriaal = "";
+ DATA.Kenmerken.MatKleur = "";
+
+ UI.Kenmerken.MatMateriaal = "";
+ UI.Kenmerken.MatAntislipFiberKleur = "";
+ UI.Kenmerken.MatAntislipFlockKleur = "";
+ UI.Kenmerken.MatAntislipKleur = "";
+ UI.Kenmerken.MatVinylFiberglassKleur = "";
+end if;
+
+if (UI.BulkKenmerken.HeeftMat == "NietWijzigen" or UI.BulkKenmerken.HeeftMat == "False") then
+ DATA.BulkKenmerken.MatMateriaal = "";
+ DATA.BulkKenmerken.MatKleur = "";
+end if;
+
+ Verborgen properties wissen
+ ;data.kenmerken.corpuswanddikte@value;ui.kenmerken.corpuswanddikte@value;data.kenmerken.frontbevestiging@value;ui.kenmerken.frontbevestiging@value;data.kenmerken.opvullijstkleur@value;ui.kenmerken.opvullijstkleur@value;data.kenmerken.nietmeeleveren.nietmeeleveren_opvullijst@value;data.kenmerken.voorwandtypevancbinnenlade@value;ui.kenmerken.voorwandtypevancbinnenlade@value;data.kenmerken.voorwandtypevanmbinnenlade@value;ui.kenmerken.voorwandtypevanmbinnenlade@value;data.kenmerken.voorwandtypevankbinnenlade@value;ui.kenmerken.voorwandtypevankbinnenlade@value;data.kenmerken.uitsparingdata.uitsparingaantal@value;data.kenmerken.uitsparingdata.x.breedte@value;data.kenmerken.uitsparingdata.x.hoogte@value;data.kenmerken.uitsparingdata.x.materiaal@value;data.kenmerken.uitsparingdata.y.breedte@value;data.kenmerken.uitsparingdata.y.hoogte@value;data.kenmerken.uitsparingdata.y.materiaal@value;data.kenmerken.uitsparingdata.z1.breedte@value;data.kenmerken.uitsparingdata.z1.diepte@value;data.kenmerken.uitsparingdata.z1.hoogte@value;data.kenmerken.uitsparingdata.z1.materiaal@value;data.kenmerken.uitsparingdata.z1.vorm@value;ui.kenmerken.uitsparingdata.uitsparingaantal@value;ui.kenmerken.uitsparingdata.x.breedterugdeel@value;ui.kenmerken.uitsparingdata.x.hoogte@value;ui.kenmerken.uitsparingdata.x.materiaal@value;ui.kenmerken.uitsparingdata.y.breedterugdeel@value;ui.kenmerken.uitsparingdata.y.hoogte@value;ui.kenmerken.uitsparingdata.y.materiaal@value;ui.kenmerken.uitsparingdata.z1.breedteuitsparing@value;ui.kenmerken.uitsparingdata.z1.diepte@value;ui.kenmerken.uitsparingdata.z1.hoogte@value;ui.kenmerken.uitsparingdata.z1.materiaal@value;ui.kenmerken.uitsparingdata.z1.vorm@value;data.kenmerken.uitsparingdata.m.breedte@value;data.kenmerken.uitsparingdata.m.hoogte@value;data.kenmerken.uitsparingdata.m.materiaal@value;ui.kenmerken.uitsparingdata.m.breedterugdeel@value;ui.kenmerken.uitsparingdata.m.hoogte@value;ui.kenmerken.uitsparingdata.m.materiaal@value;data.kenmerken.uitsparingdata.z2.breedte@value;data.kenmerken.uitsparingdata.z2.diepte@value;data.kenmerken.uitsparingdata.z2.hoogte@value;data.kenmerken.uitsparingdata.z2.materiaal@value;data.kenmerken.uitsparingdata.z2.vorm@value;ui.kenmerken.uitsparingdata.z2.breedteuitsparing@value;ui.kenmerken.uitsparingdata.z2.diepte@value;ui.kenmerken.uitsparingdata.z2.hoogte@value;ui.kenmerken.uitsparingdata.z2.materiaal@value;ui.kenmerken.uitsparingdata.z2.vorm@value;data.kenmerken.matmateriaal@value;data.kenmerken.matkleur@value;ui.kenmerken.matmateriaal@value;ui.kenmerken.matantislipfiberkleur@value;ui.kenmerken.matantislipflockkleur@value;ui.kenmerken.matantislipkleur@value;ui.kenmerken.matvinylfiberglasskleur@value;data.bulkkenmerken.matmateriaal@value;data.bulkkenmerken.matkleur@value;
+
+
+ STATE.SavedAndExit or STATE.SavedAndContinue or STATE.ProcessedAndExit
+ if (UI.Kenmerken.ProductieWijze == "") then
+ DATA.Kenmerken.ProductieWijze = "V";
+end if;
+
+if (not(UI.Kenmerken.IsBinnenlade)) then
+ DATA.Kenmerken.MeenemerSet = "Z";
+end if;
+
+if (DATA.Kenmerken.Toepassing == "SP") then
+ local double _Breedte = 158;
+
+ DATA.Kenmerken.UitsparingData.UitsparingAantal = "Enkel";
+
+ DATA.Kenmerken.UitsparingData.X.Breedte = UI.Kenmerken.UitsparingDataSpoelbak.X;
+ DATA.Kenmerken.UitsparingData.X.Hoogte = "M";
+ DATA.Kenmerken.UitsparingData.X.Materiaal = "Staal";
+
+ DATA.Kenmerken.UitsparingData.Y.Breedte = UI.Kenmerken.UitsparingDataSpoelbak.Y;
+ DATA.Kenmerken.UitsparingData.Y.Hoogte = "M";
+ DATA.Kenmerken.UitsparingData.Y.Materiaal = "Staal";
+
+ DATA.Kenmerken.UitsparingData.Z1.Breedte = UI.Kenmerken.UitsparingDataSpoelbak.Z1;
+ DATA.Kenmerken.UitsparingData.Z1.Diepte = 0;
+ DATA.Kenmerken.UitsparingData.Z1.Hoogte = "";
+ DATA.Kenmerken.UitsparingData.Z1.Materiaal = "";
+ DATA.Kenmerken.UitsparingData.Z1.Vorm = "Recht";
+end if;
+ Verborgen properties defaulten
+ ;data.kenmerken.productiewijze@value;data.kenmerken.meenemerset@value;data.kenmerken.uitsparingdata.uitsparingaantal@value;data.kenmerken.uitsparingdata.x.breedte@value;data.kenmerken.uitsparingdata.x.hoogte@value;data.kenmerken.uitsparingdata.x.materiaal@value;data.kenmerken.uitsparingdata.y.breedte@value;data.kenmerken.uitsparingdata.y.hoogte@value;data.kenmerken.uitsparingdata.y.materiaal@value;data.kenmerken.uitsparingdata.z1.breedte@value;data.kenmerken.uitsparingdata.z1.diepte@value;data.kenmerken.uitsparingdata.z1.hoogte@value;data.kenmerken.uitsparingdata.z1.materiaal@value;data.kenmerken.uitsparingdata.z1.vorm@value;
+
+
+ not(STATE.WinkelkarInfoCalculated) and STATE.LanguagesLoaded and (STATE.SavedAndExit or STATE.SavedAndContinue or (CONFIG.InputMode == "CreateConfig"))
+ STATE.WinkelkarInfoCalculated = true;
+
+local string _Model = GetModel();
+
+local string _FrontBevestigingOptionLabel = DATA.Kenmerken.FrontBevestiging@id + "_" + DATA.Kenmerken.FrontBevestiging@option(DATA.Kenmerken.FrontBevestiging)@id;
+local string _LadeKleurOptionLabel = DATA.Kenmerken.LadeKleur@id + "_" + DATA.Kenmerken.LadeKleur@option(DATA.Kenmerken.LadeKleur)@id;
+local string _BodemKleurOptionLabel = DATA.Kenmerken.BodemKleur@id + "_" + DATA.Kenmerken.BodemKleur@option(DATA.Kenmerken.BodemKleur)@id;
+local string _SokkelKleurOptionLabel = "spacestepkleur" + "_" + DATA.Kenmerken.SpaceStep.Kleur@option(DATA.Kenmerken.SpaceStep.Kleur)@id;
+
+DATA.Lijn.WinkelkarInfo@length = len(CONFIG.Database.Languages@options);
+
+for i = 1 to len(CONFIG.Database.Languages@options)
+ CONFIG.Database.Languages = CONFIG.Database.Languages@option(i)@id;
+
+ local string _TaalCode = CONFIG.Database.Languages.Name;
+
+ local string _CorpusWanddikte = " / ";
+
+ if not(DATA.Kenmerken.IsBinnenbreedte) then
+ _CorpusWanddikte = CStr(DATA.Kenmerken.CorpusWanddikte) + " mm";
+ end if;
+
+ local string _SokkeKleurInfo = GetLabel(DATA.Kenmerken.SpaceStep.Kleur@id; _Model; ""; _TaalCode) + ": " + GetLabel(_SokkelKleurOptionLabel; _Model; ""; _TaalCode);
+ local string _LadeKleurInfo = GetLabel(DATA.Kenmerken.LadeKleur@id; _Model; ""; _TaalCode) + ": " + GetLabel(_LadeKleurOptionLabel; _Model; ""; _TaalCode);
+ local string _BodemKleurInfo = GetLabel(DATA.Kenmerken.BodemKleur@id; _Model; ""; _TaalCode) + ": " + GetLabel(_BodemKleurOptionLabel; _Model; ""; _TaalCode);
+ local string _Groepering;
+
+ if (DATA.Kenmerken.Toepassing == "SST") then
+ _Groepering = "SPACESTEP - LEGRABOX - ";
+ else
+ _Groepering = "LEGRABOX - ";
+ end if;
+
+ if (DATA.Kenmerken.Toepassing == "SST") then
+ if (_TaalCode == "de") then
+ _Groepering = _Groepering + _SokkeKleurInfo + ", " + _LadeKleurInfo + ", " + _BodemKleurInfo;
+ else
+ _Groepering = _Groepering + LCase(_SokkeKleurInfo) + ", " + LCase(_LadeKleurInfo) + ", " + LCase(_BodemKleurInfo);
+ end if;
+ else
+ if (_TaalCode == "de") then
+ _Groepering = _Groepering + _LadeKleurInfo + ", " + _BodemKleurInfo;
+ else
+ _Groepering = _Groepering + LCase(_LadeKleurInfo) + ", " + LCase(_BodemKleurInfo);
+ end if;
+ end if;
+
+
+ if not(DATA.Kenmerken.Toepassing == "SST") then
+ DATA.Lijn.WinkelkarInfo(i).Aantal = CStr(DATA.Lijn.Aantal);
+ DATA.Lijn.WinkelkarInfo(i).AfbeeldingCode = DATA.BerekendeWaarden.AfbeeldingCode;
+ DATA.Lijn.WinkelkarInfo(i).CorpusBreedte = CStr(DATA.Kenmerken.CorpusBreedte) + " mm";
+ DATA.Lijn.WinkelkarInfo(i).CorpusWanddikte = _CorpusWanddikte;
+ DATA.Lijn.WinkelkarInfo(i).Draagkracht = CStr(DATA.Kenmerken.Draagkracht) + " kg";
+ DATA.Lijn.WinkelkarInfo(i).EenheidPrijs = "";
+ DATA.Lijn.WinkelkarInfo(i).FrontBevestiging = GetLabel(_FrontBevestigingOptionLabel; _Model; ""; _TaalCode);
+ DATA.Lijn.WinkelkarInfo(i).Groepering = _Groepering;
+ DATA.Lijn.WinkelkarInfo(i).LadeCode = DATA.BerekendeWaarden.LadeCode;
+ DATA.Lijn.WinkelkarInfo(i).LadeDiepte = CStr(DATA.Kenmerken.LadeDiepte) + " mm";
+ DATA.Lijn.WinkelkarInfo(i).TaalCode = _TaalCode;
+ DATA.Lijn.WinkelkarInfo(i).TotaalPrijs = "";
+ else
+ DATA.Lijn.WinkelkarInfo(i).Aantal = CStr(DATA.Lijn.Aantal);
+ DATA.Lijn.WinkelkarInfo(i).AfbeeldingCode = DATA.BerekendeWaarden.AfbeeldingCode;
+ DATA.Lijn.WinkelkarInfo(i).CorpusBreedte = "";
+ DATA.Lijn.WinkelkarInfo(i).CorpusWanddikte = "";
+ DATA.Lijn.WinkelkarInfo(i).Draagkracht = "";
+ DATA.Lijn.WinkelkarInfo(i).EenheidPrijs = "";
+ DATA.Lijn.WinkelkarInfo(i).FrontBevestiging = GetLabel(_FrontBevestigingOptionLabel; _Model; ""; _TaalCode);
+ DATA.Lijn.WinkelkarInfo(i).Groepering = _Groepering;
+ DATA.Lijn.WinkelkarInfo(i).LadeCode = DATA.BerekendeWaarden.LadeCode;
+ DATA.Lijn.WinkelkarInfo(i).LadeDiepte = "";
+ DATA.Lijn.WinkelkarInfo(i).TaalCode = _TaalCode;
+ DATA.Lijn.WinkelkarInfo(i).TotaalPrijs = "";
+ end if;
+end for;
+ WinkelkarInfo
+ ;state.winkelkarinfocalculated@value;
+
+
+ not(STATE.WinkelkarInfoDiverseCalculated) and STATE.LanguagesLoaded and (STATE.SavedAndExit or STATE.SavedAndContinue or (CONFIG.InputMode == "CreateConfig"))
+ STATE.WinkelkarInfoDiverseCalculated = true;
+
+local string _Model = GetModel();
+
+local string _ToepassingOptionLabel = DATA.Kenmerken.Toepassing@id + "_" + DATA.Kenmerken.Toepassing@option(DATA.Kenmerken.Toepassing)@id;
+local string _GeleiderTechnologieOptionLabel = DATA.Kenmerken.GeleiderTechnologie@id + "_" + DATA.Kenmerken.GeleiderTechnologie@option(DATA.Kenmerken.GeleiderTechnologie)@id;
+local string _OpvullijstKleurOptionLabel = DATA.Kenmerken.OpvullijstKleur@id + "_" + DATA.Kenmerken.OpvullijstKleur@option(DATA.Kenmerken.OpvullijstKleur)@id;
+local string _RugwandMateriaalOptionLabel = DATA.Kenmerken.RugwandMateriaal@id + "_" + DATA.Kenmerken.RugwandMateriaal@option(DATA.Kenmerken.RugwandMateriaal)@id;
+local string _VerpakkingTypeOptionLabel = DATA.Kenmerken.VerpakkingType@id + "_" + DATA.Kenmerken.VerpakkingType@option(DATA.Kenmerken.VerpakkingType)@id;
+local string _VoorwandTypeVanMBinnenladeOptionLabel = DATA.Kenmerken.VoorwandTypeVanMBinnenlade@id + "_" + DATA.Kenmerken.VoorwandTypeVanMBinnenlade@option(DATA.Kenmerken.VoorwandTypeVanMBinnenlade)@id;
+local string _VoorwandTypeVanCBinnenladeOptionLabel = DATA.Kenmerken.VoorwandTypeVanCBinnenlade@id + "_" + DATA.Kenmerken.VoorwandTypeVanCBinnenlade@option(DATA.Kenmerken.VoorwandTypeVanCBinnenlade)@id;
+local string _VoorwandTypeVanKBinnenladeOptionLabel = DATA.Kenmerken.VoorwandTypeVanKBinnenlade@id + "_" + DATA.Kenmerken.VoorwandTypeVanKBinnenlade@option(DATA.Kenmerken.VoorwandTypeVanKBinnenlade)@id;
+local string _ZijwandTypeOptionLabel = DATA.Kenmerken.ZijwandType@id + "_" + DATA.Kenmerken.ZijwandType@option(DATA.Kenmerken.ZijwandType)@id;
+local string _RugHoogteOptionLabel = DATA.Kenmerken.RugHoogte@id + "_" + DATA.Kenmerken.RugHoogte@option(DATA.Kenmerken.RugHoogte)@id;
+local string _ProductieWijzeOptionLabel = DATA.Kenmerken.ProductieWijze@id + "_" + DATA.Kenmerken.ProductieWijze@option(DATA.Kenmerken.ProductieWijze)@id;
+local string _SpaceStepBewegingstechnologieLabel = DATA.Kenmerken.SpaceStep.Bewegingstechnologie@id + "_" + DATA.Kenmerken.SpaceStep.Bewegingstechnologie@option(DATA.Kenmerken.SpaceStep.Bewegingstechnologie)@id;
+
+local double MINIMUM_BREEDTE_GEWONE_LADE = 237; // Kleiner dan deze afmeting is "Smalle lade"
+local boolean _IsSmalleLade = (DATA.BerekendeWaarden.InterneBreedte < MINIMUM_BREEDTE_GEWONE_LADE);
+
+for i = 1 to len(Config.Database.Languages@options)
+ CONFIG.Database.Languages = CONFIG.Database.Languages@option(i)@id;
+
+ local string _TaalCode = CONFIG.Database.Languages.Name;
+
+ local string _InfoSpaceStep = "";
+ local string _InfoToepassing = "";
+ local string _InfoGeleider = "";
+ local string _InfoMat = "";
+ local string _InfoZijwandType = "";
+ local string _InfoZijstabilisering = "";
+ local string _InfoOpvullijst = "";
+ local string _InfoVoorwandType = "";
+ local string _InfoMeenemerSet = "";
+ local string _InfoVerpakking = "";
+ local string _InfoRugwandMateriaal = "";
+ local string _InfoRugHoogte = "";
+ local string _InfoProductieWijze = "";
+ local string _InfoDwarsverdeling = "";
+ local string _InfoIsSmalleLade = "";
+ local string _InfoNietMeeleveren = "";
+ local string _InfoSpaceStepBewegingstechnologie = "";
+
+ local string _UitsparingAfmetingen = "";
+
+ if (UI.Kenmerken.Toepassing <> "L" and UI.Kenmerken.Toepassing <> "SST") then
+ if (UI.Kenmerken.Toepassing == "SY") then
+ local string _X = CStr(UI.Kenmerken.UitsparingData.X.BreedteRugdeel);
+ local string _M = CStr(UI.Kenmerken.UitsparingData.M.BreedteRugdeel);
+ local string _Y = CStr(UI.Kenmerken.UitsparingData.Y.BreedteRugdeel);
+ local string _Z1 = CStr(UI.Kenmerken.UitsparingData.Z1.BreedteUitsparing);
+ local string _Z2 = CStr(UI.Kenmerken.UitsparingData.Z2.BreedteUitsparing);
+
+ _UitsparingAfmetingen = _UitsparingAfmetingen + " (" +_X + "/" + _Z1;
+
+ if (UI.Kenmerken.UitsparingData.UitsparingAantal == "Dubbel") then
+ _UitsparingAfmetingen = _UitsparingAfmetingen + "/" + _M + "/" + _Z2;
+ end if;
+
+ _UitsparingAfmetingen = _UitsparingAfmetingen + "/" + _Y + ")";
+ end if;
+
+ _InfoToepassing = GetLabel(_ToepassingOptionLabel; _Model; ""; _TaalCode) + _UitsparingAfmetingen;
+ end if;
+
+ if (UI.Kenmerken.GeleiderTechnologie == "TOB") then
+ _InfoGeleider = GetLabel(_GeleiderTechnologieOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.HeeftMat) then
+ local string _MatMateriaalOptionLabel = "MatMateriaal_" + DATA.Kenmerken.MatMateriaal;
+ local string _MatKleurOptionLabel = switch DATA.Kenmerken.MatMateriaal
+ case "CF": "MatVinylFiberglassKleur_" + UI.Kenmerken.MatVinylFiberglassKleur.Value
+ case "AS": "MatAntislipKleur_" + UI.Kenmerken.MatAntislipKleur.Value
+ case "AF": "MatAntislipFiberKleur_" + UI.Kenmerken.MatAntislipFiberKleur.Value
+ case "AZ": "MatAntislipFlockKleur_" + UI.Kenmerken.MatAntislipFlockKleur.Value
+ else ""
+ end switch;
+
+ local string _MatMateriaal = GetLabel(_MatMateriaalOptionLabel; _Model; ""; _TaalCode);
+ local string _MatKleur = GetLabel(_MatKleurOptionLabel; _Model; ""; _TaalCode);
+ local string _MatLabel = GetLabel(TRL.InfoDiverse_Mat@id; _Model; ""; _TaalCode);
+
+
+ _InfoMat = _MatLabel + ": " + _MatKleur + "-" + _MatMateriaal;
+ end if;
+
+ if (UI.Kenmerken.ZijwandType == "Free") then
+ _InfoZijwandType = GetLabel(_ZijwandTypeOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.HeeftZijstabilisering) then
+ _InfoZijstabilisering = GetLabel(UI.Kenmerken.HeeftZijstabilisering@id; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.HeeftOpvullijstLinks or UI.Kenmerken.HeeftOpvullijstRechts) then
+ _InfoOpvullijst = GetLabel(TRL.InfoDiverse_Opvullijst@id; _Model; ""; _TaalCode) + ": ";
+
+ local string _Links = GetLabel(TRL.InfoDiverse_Links@id; _Model; ""; _TaalCode);
+ local string _Rechts = GetLabel(TRL.InfoDiverse_Rechts@id; _Model; ""; _TaalCode);
+
+ if (UI.Kenmerken.HeeftOpvullijstLinks and UI.Kenmerken.HeeftOpvullijstRechts) then
+ _InfoOpvullijst = _InfoOpvullijst + _Links + "+" + _Rechts;
+ else
+ if (UI.Kenmerken.HeeftOpvullijstLinks) then
+ _InfoOpvullijst = _InfoOpvullijst + _Links;
+ end if;
+
+ if (UI.Kenmerken.HeeftOpvullijstRechts) then
+ _InfoOpvullijst = _InfoOpvullijst + _Rechts;
+ end if;
+ end if;
+ end if;
+
+ if ((_InfoOpvullijst <> "") and (UI.Kenmerken.OpvullijstKleur <> "")) then
+ _InfoOpvullijst = _InfoOpvullijst + " (" + GetLabel(_OpvullijstKleurOptionLabel ; _Model; ""; _TaalCode) + ")";
+ end if;
+
+ if (UI.Kenmerken.VoorwandTypeVanMBinnenlade <> "") then
+ _InfoVoorwandType = GetLabel(UI.Kenmerken.VoorwandTypeVanMBinnenlade@id; _Model; ""; _TaalCode) + ": " + GetLabel(_VoorwandTypeVanMBinnenladeOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.VoorwandTypeVanCBinnenlade <> "") then
+ _InfoVoorwandType = GetLabel(UI.Kenmerken.VoorwandTypeVanCBinnenlade@id; _Model; ""; _TaalCode) + ": " + GetLabel(_VoorwandTypeVanCBinnenladeOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.VoorwandTypeVanKBinnenlade <> "") then
+ _InfoVoorwandType = GetLabel(UI.Kenmerken.VoorwandTypeVanKBinnenlade@id; _Model; ""; _TaalCode) + ": " + GetLabel(_VoorwandTypeVanKBinnenladeOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if ((UI.Kenmerken.MeenemerSet == "V") and UI.Kenmerken.IsBinnenlade) then
+ _InfoMeenemerSet = GetLabel(UI.Kenmerken.MeenemerSet@id; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.VerpakkingType <> "V1") then
+ _InfoVerpakking = GetLabel(_VerpakkingTypeOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.RugwandMateriaal == "Staal") then
+ _InfoRugwandMateriaal = GetLabel(UI.Kenmerken.RugwandMateriaal@id; _Model; ""; _TaalCode) + ": " + GetLabel(_RugwandMateriaalOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.HeeftAfwijkendeRugHoogte) then
+ _InfoRugHoogte = GetLabel(UI.Kenmerken.RugHoogte@id; _Model; ""; _TaalCode) + ": " + GetLabel(_RugHoogteOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if (UI.Kenmerken.ProductieWijze <> "V") then
+ _InfoProductieWijze = GetLabel(TRL.InfoDiverse_Enkel@id; _Model; ""; _TaalCode) + " " + GetLabel(_ProductieWijzeOptionLabel; _Model; ""; _TaalCode);
+ end if;
+
+ if ((UI.Kenmerken.DwarsverdelingAantal <> "") and (CLng(UI.Kenmerken.DwarsverdelingAantal) > 0)) then
+ _InfoDwarsverdeling = GetLabel(UI.Kenmerken.DwarsverdelingAantal@id; _Model; ""; _TaalCode) + " (" + GetLabel("Aantal"; _Model; ""; _TaalCode) + ": " + UI.Kenmerken.DwarsverdelingAantal + ")";
+ end if;
+
+ if _IsSmalleLade then
+ _InfoIsSmalleLade = GetLabel(TRL.InfoDiverse_IsSmalleLade@id; _Model; ""; _TaalCode);
+ end if;
+
+ index j of UI.Kenmerken.NietMeeleveren
+ local string _Separator = ", ";
+
+ if (_InfoNietMeeleveren == "") then
+ _Separator = "";
+ end if;
+
+ if (UI.Kenmerken.NietMeeleveren(j).IsSelected) and (UI.Kenmerken.NietMeeleveren(j)@visible) then
+ _InfoNietMeeleveren = _InfoNietMeeleveren + _Separator + GetLabel(UI.Kenmerken.NietMeeleveren@id + "_" + UI.Kenmerken.NietMeeleveren(j).Id; _Model; ""; _TaalCode);
+ end if;
+ end index;
+
+ if (_InfoNietMeeleveren <> "") then
+ _InfoNietMeeleveren = GetLabel(UI.Kenmerken.NietMeeleveren@id; _Model; ""; _TaalCode) + ": " + _InfoNietMeeleveren;
+
+ if (Len(_InfoNietMeeleveren) > 250) then
+ _InfoNietMeeleveren = Mid(_InfoNietMeeleveren; 1; 250) + " ...";
+ end if;
+ end if;
+
+ if (UI.Kenmerken.Toepassing == "SST") then
+ _InfoSpaceStep = GetLabel("sokkel"; _Model; ""; _TaalCode) + " " + GetLabel("afkorting_diepte"; _Model; ""; _TaalCode) + ":" + UI.Kenmerken.SpaceStep.Sokkeldiepte + "x" + GetLabel("afkorting_breedte"; _Model; ""; _TaalCode) + ":" + UI.Kenmerken.SpaceStep.Sokkelbreedte + "x" + GetLabel("afkorting_hoogte"; _Model; ""; _TaalCode) + ":" + UI.Kenmerken.SpaceStep.Sokkelhoogte;
+ if (UI.Kenmerken.SpaceStep.Bewegingstechnologie == "Servodrive") then
+ _InfoSpaceStepBewegingstechnologie = GetLabel(UI.Kenmerken.SpaceStep.Bewegingstechnologie@id; _Model; ""; _TaalCode) + ": " + GetLabel(_SpaceStepBewegingstechnologieLabel; _Model; ""; _TaalCode);
+ end if;
+
+ end if;
+
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse@length = 17;
+
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[1] = _InfoSpaceStep;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[2] = _InfoToepassing;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[3] = _InfoGeleider;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[4] = _InfoMat;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[5] = _InfoZijwandType;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[6] = _InfoZijstabilisering;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[7] = _InfoOpvullijst;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[8] = _InfoVoorwandType;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[9] = _InfoMeenemerSet;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[10] = _InfoVerpakking;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[11] = _InfoRugwandMateriaal;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[12] = _InfoRugHoogte;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[13] = _InfoProductieWijze;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[14] = _InfoDwarsverdeling;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[15] = _InfoIsSmalleLade;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[16] = _InfoNietMeeleveren;
+ DATA.Lijn.WinkelkarInfo(i).InfoDiverse[17] = _InfoSpaceStepBewegingstechnologie;
+end for;
+
+ WinkelkarInfo - InfoDiverse
+ ;state.winkelkarinfodiversecalculated@value;
+
+
+ STATE.SavedAndExit or STATE.SavedAndContinue or (CONFIG.InputMode == "CreateConfig") or (CONFIG.Backend == "axapta")
+
+ if(DATA.Kenmerken.Toepassing <> "SST") then
+ if (DATA.Kenmerken.ProductieWijze <> "V") then
+ ItemId = "9.963.542.8"
+ else
+ if (DATA.Kenmerken.VerpakkingType == "V1") then ItemId = "9.657.336.8" end if;
+ if (DATA.Kenmerken.VerpakkingType == "VHoss") then ItemId = "9.963.666.8" end if;
+ if (DATA.Kenmerken.VerpakkingType == "Probox") then ItemId = "9.963.585.8" end if;
+ if (DATA.Kenmerken.VerpakkingType == "Pallet") then ItemId = "9.963.615.8" end if;
+ end if;
+else
+ ItemId = "7.001.184.1";
+end if;
+
+// tijdelijk totdat kenmerken binnenkomen
+if (ItemId == "") then ItemId = "9.657.336.8" end if;
+
+
+ ItemId bepalen
+ ;itemid@value;
+
+
+ STATE.Cancelled
+ STATE.Cancelled = false;
+
+ReturnValue = "{\"status\":\"cancel\"}";
+
+local boolean _Result = Exit(true;false);
+ Cancel
+ ;state.cancelled@value;returnvalue@value;
+
+
+ ((STATE.SavedAndExit or STATE.SavedAndContinue) and (InvalidFields() == 0)) // or (CONFIG.Backend == "axapta")
+
+
+ Defaults voor verborgen properties
+ ;
+
+
+ not(BEHAVIOR.IsInteractive) //(CONFIG.Settings.OperationMode == "Extern")
+ if ((UI.Kenmerken.Toepassing <> "SY") and not(UI.Kenmerken.HeeftAfwijkendeRugHoogte)) then
+ DATA.Kenmerken.RugHoogte = DATA.Kenmerken.LadeHoogte;
+end if;
+ RugHoogte
+ ;data.kenmerken.rughoogte@value;
+
+
+ (CONFIG.Settings.OperationMode == "Extern")
+ if (UI.Kenmerken.Toepassing == "SP") then
+ DATA.Kenmerken.RugwandMateriaal = "Staal";
+else
+ DATA.Kenmerken.RugwandMateriaal = "Hout";
+end if;
+ RugwandMateriaal
+ ;data.kenmerken.rugwandmateriaal@value;
+
+
+
+
+ STATE.ProcessedAndExit
+
+STATE.ProcessedAndExit = false;
+STATE.ValidationNeeded = true;
+
+
+ ProcessAndExit
+ ;state.processedandexit@value;state.validationneeded@value;
+
+
+ STATE.SavedAndExit
+ STATE.SavedAndExit = false;
+STATE.ValidationNeeded = true;
+
+if (InvalidFields() == 0) then
+ ReturnValue = "{\"status\":\"ok\",\"name\":\"" + ElementName(CONFIG.ConfigurationName) + "\",\"version\":\"" + ElementVersion(CONFIG.ConfigurationName) + "\"}";
+
+ local boolean _Result = SaveAndExit();
+else
+ STATE.WinkelkarInfoCalculated = false;
+ STATE.WinkelkarInfoDiverseCalculated = false;
+
+ local string _Feedback = "";
+
+ _Feedback = _Feedback + "<b>" + TRL.BewarenError@label + ":" + "</b>";
+ _Feedback = _Feedback + "<ul style='list-style-type:square;'>";
+
+ for i = 1 to Len(DATA.Lijn.InvalidFieldSet@options)
+ local string _PropertyName = DATA.Lijn.InvalidFieldSet@option(i)@id;
+ local string _Label = CStr(Eval(_PropertyName + "@label"));
+
+ _Feedback = _Feedback + "<li>";
+ _Feedback = _Feedback + _Label;
+ _Feedback = _Feedback + "</li>";
+ end for;
+
+ _Feedback = _Feedback + "</ul>";
+
+ local long _FeedbackResult = MsgBox(_Feedback);
+end if;
+ SaveAndExit
+ ;state.savedandexit@value;state.validationneeded@value;returnvalue@value;
+
+
+ STATE.SavedAndContinue
+ STATE.SavedAndContinue = false;
+STATE.ValidationNeeded = true;
+
+if (InvalidFields() == 0) then
+ ReturnValue = "{\"status\":\"ok\",\"name\":\"" + ElementName(CONFIG.ConfigurationName) + "\",\"version\":\"" + ElementVersion(CONFIG.ConfigurationName) + "\",\"continue\":\"true\"}";
+
+ local boolean _Result = SaveAndExit();
+else
+ STATE.WinkelkarInfoCalculated = false;
+ STATE.WinkelkarInfoDiverseCalculated = false;
+
+ local string _Feedback = "";
+
+ _Feedback = _Feedback + "<b>" + TRL.BewarenError@label + ":" + "</b>";
+ _Feedback = _Feedback + "<ul style='list-style-type:square;'>";
+
+ for i = 1 to Len(DATA.Lijn.InvalidFieldSet@options)
+ local string _PropertyName = DATA.Lijn.InvalidFieldSet@option(i)@id;
+ local string _Label = CStr(Eval(_PropertyName + "@label"));
+
+ _Feedback = _Feedback + "<li>";
+ _Feedback = _Feedback + _Label;
+ _Feedback = _Feedback + "</li>";
+ end for;
+
+ _Feedback = _Feedback + "</ul>";
+
+ local long _FeedbackResult = MsgBox(_Feedback);
+end if;
+ SaveAndContinue
+ ;state.savedandcontinue@value;state.validationneeded@value;returnvalue@value;
+
+
+ STATE.KlantVoorkeurenSaved
+ STATE.KlantVoorkeurenSaved = false;
+
+local boolean _Result;
+
+_Result = SetArg("saveas"; ElementName(CONFIG.KlantVoorkeurenConfigurationName));
+_Result = eCon.UI.Tasks.Functions.Save(false);
+
+local string _Feedback = "";
+
+if (_Result) then
+ _Feedback = _Feedback + "<b>" + TRL.BewarenKlantVoorkeurenSucces@label + "</b>";
+ _Feedback = _Feedback + "<ul style='list-style-type:square;'>";
+
+ for i = 1 to Len(CONFIG.Defaults.KlantVoorkeuren@options)
+ local string _PropertyName = CONFIG.Defaults.KlantVoorkeuren@option(i)@id;
+ local string _Label = CStr(Eval(_PropertyName + "@id"));
+ local string _Id = CStr(Eval(_PropertyName));
+ local string _Type = CStr(Eval(_PropertyName + "@Type"));
+
+ if ((_Type == "String") and(_Id <> "")) then
+ _Feedback = _Feedback + "<li>";
+ _Feedback = _Feedback + GetLocalizedLabel(_Label) + ": " + GetLocalizedLabel(_Label + "_" + _Id); //eval(_PropertyName));
+ _Feedback = _Feedback + "</li>";
+ end if;
+
+ if ((_Type == "Double") and(CDbl(_Id) > 0)) then
+ _Feedback = _Feedback + "<li>";
+ _Feedback = _Feedback + GetLocalizedLabel(_Label) + ": " + _Id;
+ _Feedback = _Feedback + "</li>";
+ end if;
+
+ if (_Type == "Boolean") then
+ local boolean _IsNietMeeleveren = CBool(InStr(1; LCase(_Label); LCase("NietMeeleveren_")));
+ local long _PositionOfUnderscore = InStrRev(LCase(_PropertyName); "_");
+ local string _ShortName = Mid(LCase(_PropertyName); _PositionOfUnderscore + 1);
+
+ if (_IsNietMeeleveren and CBool(_Id) and (LCase(_ShortName) in CONFIG.NietMeeleverenExtern@options)) then
+ _Feedback = _Feedback + "<li>";
+ _Feedback = _Feedback + DATA.Kenmerken.NietMeeleveren@label + ": " + GetLocalizedLabel(_Label);
+ _Feedback = _Feedback + "</li>";
+ end if;
+
+ if not(_IsNietMeeleveren) then
+ _Feedback = _Feedback + "<li>";
+ _Feedback = _Feedback + GetLocalizedLabel(_Label) + ": " + GetLocalizedLabel(_Label + "_" + _Id);
+ _Feedback = _Feedback + "</li>";
+ end if;
+ end if;
+ end for;
+
+ _Feedback = _Feedback + "</ul>";
+else
+ _Feedback = _Feedback + "<b>" + TRL.BewarenKlantVoorkeurenError@label + "</b>";
+end if;
+
+local long _FeedbackResult = MsgBox(_Feedback);
+
+_Result = SetArg("saveas"; ElementName(CONFIG.ConfigurationName)); // originele ConfigurationName terugzetten
+ SaveKlantVoorkeuren
+ ;state.klantvoorkeurensaved@value;
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ BAIAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ BQMAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgEAAAAAAAACAgAAAAAAAAIDAAAAAAAAAgQAAAAAAAABCQAAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQEAAAAAAAACAQAAAAAAAAMBAAAAAAAACAEAAAAAAAAJAQAAAAAAAAEDAAAAAAAACQMAAAAAAAABBQAAAAAAAAIFAAAAAAAA
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQQCAAAAAAACBAIAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQYAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgEAAAAAAAACBQAAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQIAAAAAAAACAgAAAAAAAAMCAAAAAAAABQIAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQIAAAAAAAACAgAAAAAAAAMCAAAAAAAABwIAAAAAAAAIAgAAAAAAAAkCAAAAAAAAAQMAAAAAAAACAwAAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgIAAAAAAAACAwAAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgIAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgIAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQIAAAAAAAADAgAAAAAAAAUCAAAAAAAAAQMAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ BAIAAAAAAAAEAwAAAAAAAAIEAAAAAAAAAwQAAAAAAAAEBAAAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQMAAAAAAAADAwAAAAAAAAQDAAAAAAAABQMAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgEDAAAAAAACAgMAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AwUBAAAAAAADBQMAAAAAAAMFBAAAAAAABAEFAAAAAAAHAQUAAAAAAAIDBQAAAAAAAwUFAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQEDAgAAAAABAwUCAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+ AQIAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgUDAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgICAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+ AgIAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ BgECAAAAAAAHAQIAAAAAAAgBAgAAAAAACQECAAAAAAADAgIAAAAAAAUCAgAAAAAABgICAAAAAAAHAgIAAAAAAAgCAgAAAAAACQICAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQIBAAAAAAADAgEAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQIBAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgQAAAAAAAADBAAAAAAAAAQEAAAAAAAABQQAAAAAAAAGBAAAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ BQMAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AgIAAAAAAAADAgAAAAAAAAQCAAAAAAAABQIAAAAAAAAGAgAAAAAAAAIDAAAAAAAAAwMAAAAAAAAEAwAAAAAAAAUDAAAAAAAABgMAAAAAAAACBAAAAAAAAAMEAAAAAAAABAQAAAAAAAAFBAAAAAAAAAYEAAAAAAAA
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ BAIAAAAAAAA=
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ AQcCAAAAAAACBwIAAAAAAAMHAgAAAAAABAcCAAAAAAABCAIAAAAAAAQIAgAAAAAAAQkCAAAAAAAECQIAAAAAAA==
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
\ No newline at end of file
Index: production/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.trl
===================================================================
diff -u -r2564 -r2918
--- production/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.trl (.../development/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.trl) (revision 2564)
+++ production/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.trl (.../production/models/POC Bulkwijzigingen/POCBulk LBX Configurator,1.0.0.trl) (revision 2918)
@@ -486,6 +486,54 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
@@ -501,7 +549,7 @@
-
+
@@ -651,7 +699,7 @@
-
+
@@ -753,7 +801,7 @@
-
+
@@ -768,15 +816,15 @@
-
+
-
+
@@ -980,7 +1028,7 @@
-
+
@@ -1033,7 +1081,7 @@
-
+
@@ -1103,7 +1151,7 @@
-
+
@@ -1138,5 +1186,38 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
\ No newline at end of file