Index: _csp/www/vhLibLogging.csp =================================================================== diff -u --- _csp/www/vhLibLogging.csp (revision 0) +++ _csp/www/vhLibLogging.csp (revision 3) @@ -0,0 +1,318 @@ + + + + + + + + + + + #($G(CspPageTitle, ..%ClassName(0))_$G(OnServer))# + + + + + + + + + + + +

#($$$UCase($G(CspPageTitle, ..%ClassName(0)))_$G(OnServer))#

+ + +
+ 
#(sqlLOGAllFields)#
+
+ + + + + +
+

SQL Query:

+ + 		+

 

+

+ +
+ +
+   +   +
+ +
+ Show Query Editor + +
+
+
+ + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
 #(ColumnName)#
#($S(blnAddLink:">", 1:" "))#
#($S($L(tmpVal):tmpVal,1:" "))#
 +
+

+ Summary: + #($S($L(tmpDataSummary):tmpDataSummary, 1:" "))# +

+ 
#($S($L(tmpVal):tmpVal,1:" "))#
+
+ 		+
+ 
+#($E(tmpVal,1,32000))#
+
+
+
+
+
+ + + + + + + + + Index: _csp/www/DynaPlugReport.css =================================================================== diff -u --- _csp/www/DynaPlugReport.css (revision 0) +++ _csp/www/DynaPlugReport.css (revision 3) @@ -0,0 +1,65 @@ + BODY { color:black; font-size:12px; line-height:15px; font-family:Arial,Helvetica; list-style-type:square; text-align:center; background-color:#FFFFFF;} + TD { color:black; font-size:12px; line-height:15px; font-family:Arial,Helvetica; list-style-type:square; } + TH { color:white; font-size:12px; line-height:15px; font-family:Arial,Helvetica; list-style-type:square; background-color:#888888; font-weight:bold;} + + TABLE.Head { border-collapse:collapse; margin:0; background-color:white; } + TABLE.LinkToTBox { border-collapse:collapse; margin:0; background-color:white; } + TABLE.Visie { border-collapse:collapse; margin:0; background-color:white; vertical-align:middle} + TABLE.Visie TD { text-align:left; } + + TABLE { border-collapse:collapse; margin:0; background-color:#EEEEEE; } + FORM { font-size:12px; } + A:hover { text-decoration:underline; } + A { text-decoration:underline; color:red; color:#900; } + A:link { color:red; } + A:visited { color:red; } + .Small { font-size:10px;} + + .Title { font-size:24px; color:red; font-weight:bold; } + + TD.Group { background-color:#CCCCCC; font-weight:bold; } + + .BorderNone { border:none; } + .BorderAll { border:solid black 1px; } + .BorderLeft { border-left:solid black 1px; } + .BorderRight { border-right:solid black 1px; } + .BorderTop { border-top:solid black 1px; } + .BorderBottom { border-bottom:solid black 1px; } + .BorderAll2 { border:solid #FF460A 1px; } + .BorderLeft2 { border-left:solid #FF460A 1px; } + .BorderRight2 { border-right:solid #FF460A 1px; } + .BorderTop2 { border-top:solid #FF460A 1px; } + .BorderBottom2 { border-bottom:solid #FF460A 1px; } + .clsHoofding { font-weight:bold; font-size:16px; margin:0; padding:2px; color:#FF460A; background-color:#CCCCCC; + text-align:center; vertical-align:middle; width:400px; line-height:30px; border:solid #FF460A 2px; } + .clsHfdKlant { font-weight:bold; text-align:left; margin:0; padding:0px; padding-left:20px; border:none; } + .clsAangemeldAls { font-size:11px; color:#060606; } + .clsWizardBtn { height:22px; line-height:18px; font-size:13px; font-weight:bold; text-decoration:none; color:white; padding-left:10px; padding-right:10px; + margin:0px; text-align:center; border:solid black 1px; background-color:#FF460A; cursor:pointer; cursor:hand; } + .clsBtnDisabled { color:white; background-color:#AAAAAA; cursor:default; } + .clsTmrSkeleton { position:relative; height:auto; width:100%; color:#FFFFFF; background-color:#AAAAAA; border:none; padding:2px; } + + .clsSectionH { height:20; font-weight:bold; margin:0; color:white; background-color:#AAAAAA; vertical-align:middle; cursor:default; } + .clsOrderDtls { border:solid #AAAAAA 1px; } + .clsOvzHeading1 { font-weight:bold; color:#FF460A; text-decoration:underline; } + .clsOvzDataLbl { height:16px; line-height:14px; padding-right:2px; } + .clsOvzData { height:16px; line-height:14px; font-weight:bold; } + .clsTableOrdList { border:none; } + .clsTableOrdListH { font-weight:bold; text-decoration:underline; font-size:13px; margin:0; padding:5px; color:black; + text-align:center; vertical-align:top; cursor:default; } + .clsTableMatenOvz { border:none; background-color:#DADADA; } + .clsTableMainH { font-weight:bold; font-size:13px; margin:0; padding:5px; color:white; background-color:#AAAAAA; + text-align:center; vertical-align:top; border:solid black 1px; cursor:default; } + .clsMRowOdd { border:none; border-left:solid black 1px; border-right:solid black 1px; } + .clsMRowEven { border:none; border-left:solid black 1px; border-right:solid black 1px; background-color:#EEEEEE; } + .clsMCorpusInfo { border:none; border-left:solid black 1px; border-right:solid black 1px; background-color:#CCCCCC; font-weight:bold; } + .clsMRowLastX { border-bottom:solid black 1px; } + .clsUnitSmall { font-size:10px; } + .clsInputBtns { text-align:left; vertical-align:top; background-color:#FFFFFF; } /* same background-color as body */ + .clsMColQty { border-left:double black 3px; } + .clsOvzTotAant { text-align:center; vertical-align:top; } + .clsOvzPrices { text-align:right; vertical-align:top; padding-right:10px; font-weight:bold; } + .clsOvzPriceErr { text-align:center; text-decoration:underline; color:#FF460A; } + .clsOvzPriceOther { text-align:center; text-decoration:none; } + .clsXtraInfo { margin:10px; margin-right:30px; font-weight:bold; } + .clsGroupDiv { border:solid black 1px; width:750; margin:5px; margin-bottom:20px; } Index: _csp/www/testWVhadev.csp =================================================================== diff -u --- _csp/www/testWVhadev.csp (revision 0) +++ _csp/www/testWVhadev.csp (revision 3) @@ -0,0 +1,34 @@ + + + + + + + + Cache Server Page + + + + + + + My page body on hadev #((Test)_$ZDT($h))# + + Index: _csp/www/DynaPlugReportVHisieTable.csp =================================================================== diff -u --- _csp/www/DynaPlugReportVHisieTable.csp (revision 0) +++ _csp/www/DynaPlugReportVHisieTable.csp (revision 3) @@ -0,0 +1,107 @@ + + + + + + + + + + + + + + + + + + + +
Overzicht van de ge�mporteerde producten in vhisie
+ + + + + + + + + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","ReferenceVH","L",pxWebShop.Taal))#:#(pxWebShop.WebShopID)#
 
+ + + + + + + +
Er werden geen losse onderdelen gevonden in deze dynalog import
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","ProductDescription","L",pxWebShop.Taal))##(##class(Res.Vertaling).GetVertalingPlus("DP","OfferteRef","L",pxWebShop.Taal))##(##class(Res.Vertaling).GetVertalingPlus("DP","Amount","L",pxWebShop.Taal))##(##class(Res.Vertaling).GetVertalingPlus("DP","UnitPrice","L",pxWebShop.Taal))##(##class(Res.Vertaling).GetVertalingPlus("DP","Total","L",pxWebShop.Taal))#
#(pxWebShop.Lijnen.Data("Tekst"))#
#(pxWebShop.Lijnen.Data("Tekst"))#
#($G(pxWebShop.Lijnen.Data("ProductNaam")))##($G(pxWebShop.Lijnen.Data("OfferteRef")))##(pxWebShop.Lijnen.Data("Aantal"))##($FN(pxWebShop.Lijnen.Data("ENettoPrijs"),".",2)_" "_$S($G(pxWebShop.Lijnen.Data("GrootteOrde"))="H":"%",1:""))##($FN(pxWebShop.Lijnen.Data("Totaal"),".",2)_" "_pxWebShop.Lijnen.Data("Munt"))#
+ + + + + Index: _csp/www/DynaPlugReportTBXTable.csp =================================================================== diff -u --- _csp/www/DynaPlugReportTBXTable.csp (revision 0) +++ _csp/www/DynaPlugReportTBXTable.csp (revision 3) @@ -0,0 +1,205 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
#(..WebTextValue("Kleurkeuze",Taal,"L"))#
+
#(..WebTextValue("Design",Taal,"L")_"/"_..WebTextValue("Ladezijden",Taal,"L"))# :
+ + 		+
#($G(arWSVTL("KLR_DS")))#
+ + 		+
#($TR(..WebTextValue("Bodem&Rug",Taal,"L")," ",""))# :
+ +
#($S(0:..WebTextValue("Kleur",Taal,"L")_" ", 1:"")_..WebTextValue("Relingen",Taal,"L"))# :
+ +
#($S(0:..WebTextValue("Kleur",Taal,"L")_" ", 1:"")_..WebTextValue($S(0:"VerhoogdeZijwand",1:"VullingGlas"),Taal,"L"))# :
+ 		+
#($G(arWSVTL("KLR_KB")))#
+ +
#($G(arWSVTL("KLR_RK")))#
+ +
#($G(arWSVTL("KLR_KV")))#
+
#(..WebTextValue("Maten",Taal,"L"))#
 
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
#(arVTL("TH","LT") )##(arVTL("TH","CB") )##(arVTL("TH","WD") )##(arVTL("TH","LD") )##(arVTL("TH","DK") )##(arVTL("TH","FB") )##(arVTL("TH","BX") )##(arVTL("TH","DIV"))##(arVTL("TH","Aant"))# #(..WebTextValue("PrijsAKPrefix",Taal,"L"))# #(..WebTextValue("PrijsPerStukTH",Taal,"L"))##(..WebTextValue($S(WSOrd.TotPrijs>0:"PrijsPerStukTH", 1:"InfoTH"),Taal,"L"))#
#(arWSVTL("LN",i,"LT"))##(arWSVTL("LN",i,"CB"))##(arWSVTL("LN",i,"WD"))##(arWSVTL("LN",i,"LD"))##(arWSVTL("LN",i,"DK"))##(arWSVTL("LN",i,"FB"))##(arWSVTL("LN",i,"BX"))##(arWSVTL("LN",i,"DIV"))##(arWSVTL("LN",i,"AANT"))# #(arWSVTL("LN",i,"PRIJS"))#
 #(..WebTextValue("PrijsTotaal",Taal,"L"))#:#(WSOrd.TotAantal)# #($S($G(arWSVTL("TotPrijs"))="":" ",1:arWSVTL("TotPrijs")))#
+ + + + + + + + Index: _csp/www/DynaPlugReport.csp =================================================================== diff -u --- _csp/www/DynaPlugReport.csp (revision 0) +++ _csp/www/DynaPlugReport.csp (revision 3) @@ -0,0 +1,412 @@ + + + + + + + + + + + + + + + + + + + + + + + +#(##class(Res.Vertaling).GetVertalingPlus("DP","DP_OFFERTE","L",Taal))# + + + + + + + +
+ + + + + + + + + + + + + + + + + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","DP_OFFERTE","L",Taal))#
#(##class(Res.Vertaling).GetVertalingPlus("DP","Name","L",Taal))#:#(pxWebShop.LeveringsAdres.Naam)#
#(##class(Res.Vertaling).GetVertalingPlus("DP","Address","L",Taal))#:#(pxWebShop.LeveringsAdres.StraatNrBus)#
#(pxWebShop.LeveringsAdres.WoonPlaats)#
+ + + + + + + + + + + + + + + + + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","DP_OFFERTE","L",Taal))#
#(##class(Res.Vertaling).GetVertalingPlus("DP","Name","L",Taal))#:#(pxTBXWeb.KlantInfoAdres.Naam)#
#(##class(Res.Vertaling).GetVertalingPlus("DP","Address","L",Taal))#:#(pxTBXWeb.KlantInfoAdres.StraatNrBus)#
#(pxTBXWeb.KlantInfoAdres.WoonPlaats)#
+ +
+ + + +
+ + + + + + +   + + + + + + +   + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","EDINr","L",Taal))#: #(WsOrd.OrderNr)##(##class(Res.Vertaling).GetVertalingPlus("DP","TBXOrder_Reference","L",Taal))#: #(WsOrd.Commissie)##(WsOrd.TotPrijs_ " EUR")#
#($TR(txtHideDetails,"'",""))#
+
+
+ +
+ + + + +
+ + + #(##class(Res.Vertaling).GetVertalingPlus("DP","TBXOrder_Order","L",Taal))# + + #(##class(Res.Vertaling).GetVertalingPlus("DP","TBXOrder_AllReadyOrdered","L",pxWebShop.Taal))# + +
+
+
+ + + + + +
+ + + + + + + + + + +   + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","EDINr","L",Taal))# : #(pxWebShop.WebShopID)##(##class(Res.Vertaling).GetVertalingPlus("DP","Reference","L",Taal))#: #(pxWebShop.CommReferentie)##("

0:">"_$justify(pxWebShop.Totaal,"",2)_" "_pxWebShop.Munt,1:" style=""color:#CC0033;"">"_"Geen totaal mogelijk")_"

")#
#($TR(txtHideDetails,"'",""))#
+
+
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","ProductDescription","L",Taal))##(##class(Res.Vertaling).GetVertalingPlus("DP","Amount","L",Taal))##(##class(Res.Vertaling).GetVertalingPlus("DP","UnitPrice","L",Taal))##(##class(Res.Vertaling).GetVertalingPlus("DP","Total","L",Taal))#
#(pxWebShop.Lijnen.Data("Tekst"))#
#(pxWebShop.Lijnen.Data("Tekst"))#
#($G(pxWebShop.Lijnen.Data("ProductNaam")))##(pxWebShop.Lijnen.Data("Aantal"))##($FN(pxWebShop.Lijnen.Data("ENettoPrijs"),".",2)_" "_$S($G(pxWebShop.Lijnen.Data("GrootteOrde"))="H":"%",1:""))##($FN(pxWebShop.Lijnen.Data("Totaal"),".",2)_" "_pxWebShop.Lijnen.Data("Munt"))#
+
+
+ + + + + + #(##class(Res.Vertaling).GetVertalingPlus("DP","WebShop_Order_AllReadyOrdered","L",Taal))# + + +
+ + #(##class(Res.Vertaling).GetVertalingPlus("DP","WebShop_Order","L",Taal))#
+
+
+ + + + + + + + + + + + + + + + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","OrderReference","L",Taal))# :
#(##class(Res.Vertaling).GetVertalingPlus("DP","DeliveryTime","L",Taal))# : + + + + +
#(##class(Res.Vertaling).GetVertalingPlus("DP","Remark","L",Taal))# :
+ +
+
#(##class(Res.Vertaling).GetVertalingPlus("DP","OpenPageInDefaultBrowser","L",Taal))#
+ + + + + + + + + + + + + Index: _csp/www/VH_LibIO.js =================================================================== diff -u --- _csp/www/VH_LibIO.js (revision 0) +++ _csp/www/VH_LibIO.js (revision 3) @@ -0,0 +1,196 @@ +// +-+-+-+-+-+-+-+-+-+-+-+-+-+ +// | Input-Output Library | +// +-+-+-+-+-+-+-+-+-+-+-+-+-+ + + +// Simple functions on JS-variables +// ================================ + +function isUndef (jsVar) { + return (typeof(jsVar)=="undefined"); +} + +// function Number_toFixed(d) +if (!isUndef(Number)&&(!isUndef(Number.prototype))){ + if (isUndef(Number.prototype.toFixed)){ + function Number_toFixed(d) { + var n = this; + d = d || 2; + var f = Math.pow(10, d); + n = Math.round(n * f) / f; + n += Math.pow(10, - (d + 1)); + n += ''; + return (d==0 ? n.substring(0, n.indexOf('.')) : n.substring(0, n.indexOf('.') + d + 1)); + } + Number.prototype.toFixed = Number_toFixed; + } +} + +function RightStr (str, nChar) { + return str.substr(str.length-nChar, nChar); +} + +function isNumberInt(inputString) { + return (!isNaN(parseInt(inputString)) ? true : false); +} + +function MinVal(num1,num2) { + return (num1>num2 ? num2: num1); +} + +function MaxVal(num1,num2) { + return (num1 -1) return true; + return false; + } + var exists = false; + for (var i=0;i<=objList.options.length-1;i++) { + if (text == objList.options[i].text) exists = true; + } + if (exists) return; + if (navigator.appName != "Netscape") { + var oOption = document.createElement("OPTION"); + oOption.text = text; + oOption.value = value; + objList.add(oOption); + } else { + objList.options[objList.length] = new Option(text, value); + } +} +function UpdateCboItems (ComboName, ItemsList, Delim) { + var oCombo=document.getElementById(ComboName); + var oOpt,blnDisabled; + var blnAll = (ItemsList.replace(Delim,"")=="*"); + ItemsList=Delim+ItemsList+Delim; + for (var i=0;i<=oCombo.options.length-1;i++) { + oOpt=oCombo.options[i]; + blnDisabled = (!blnAll) && (ItemsList.indexOf(Delim+oOpt.value+Delim) < 0); + oOpt.style.color=(blnDisabled ? ColorOptDisabled : ""); + oOpt.disabled=blnDisabled; + } +} +// Operations on Controls (such as Input Text/Option/CheckBox/...) +// ================================================================ + +function GetValTxt (FldName) { + var obj=document.getElementById(FldName); + if (!obj) return(""); + return (obj.value=="" ? "" : obj.value); +} + +function GetValChk (FldName) { // returns boolean (true/false) + var obj=document.getElementById(FldName); + if (!obj) return(""); + return obj.checked; +} + +function SetValTxt (FldName,NewVal) { + var obj=document.getElementById(FldName); + if (isUndef(NewVal)) NewVal=""; + if (obj) obj.value=NewVal; +} + +function SetValChk (FldName,blnVal) { + var obj=document.getElementById(FldName); + if (isUndef(blnVal)) blnVal=false; + if (obj) obj.checked=blnVal; +} + +function GetValCbo (FldName) { + var obj=document.getElementById(FldName); + if (!obj) return(""); + return ( (obj.selectedIndex < 0) ? "" : obj.options[obj.selectedIndex].value); +} + +function SetValCbo (FldName,NewVal) { + var obj=document.getElementById(FldName); + if (isUndef(NewVal)) NewVal=""; + if (obj) cspSetSelectValue (obj,NewVal); +} + +function SafeFocusSet (obj,blnMsg) { + if (!obj) return false; + try { obj.focus(); } + catch (exception) { + if (blnMsg) alert("Could not set focus to " + obj + " \"" + obj.id + "\""); + return false; + } + return true; +} + + +// Routines for Cach� compatibility +// ================================ + +function DollarGet (Val,Dfl) { + return (isUndef(Val) || (Val==null) ? "" : Val); +// return (isUndef(Val) ? (Dfl || "") : Val); +} + +function cArrayToPieces (ar1dim,D) { + if (isUndef(ar1dim[0])) ar1dim.shift(); // Eerste element weghalen + return ar1dim.join(D); +} + +function cPiecesToArray (sList,D) { + if (isUndef(sList)) return ""; + return sList.split(D); +} + Index: _csp/www/Quotation.csp =================================================================== diff -u --- _csp/www/Quotation.csp (revision 0) +++ _csp/www/Quotation.csp (revision 3) @@ -0,0 +1,312 @@ + + + + + HALUX PRIJSBEREKENING + + + + + + + + + + + +

No access to this page

#($CASE(sAccess, "XXXNO PSW":"Password is required (PSW)", "NO PSW":"", "WRONG PSW":"Incorrect password (PSW)", :""))# + + +
+
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + +
 #($P(sData, "\", 1))#
+ + + + + + + + + + + + + + + + + + + + + + + + + + +
#($$VERTAAL^Res.PI.Teksten("Profiel",Taal))# + +
 #($$VERTAAL^Res.PI.Teksten("Vulling",Taal))# +
   #($$VERTAAL^Res.PI.Teksten("Gehard",Taal))#
 #($$VERTAAL^Res.PI.Teksten("Hoogte",Taal))#
 #($$VERTAAL^Res.PI.Teksten("Breedte",Taal))#
+
+ + + + + + + + + + + + + + + + + + +
 #($$VERTAAL^Res.PI.Teksten("Beslag",Taal))# +      +
 #($$VERTAAL^Res.PI.Teksten("Aantal",Taal))#
 AVENTOS +
+
+ + + + + + + + + + + + + + + + +
  + + + + + + + + + +
+ #($$VERTAAL^Res.PI.Teksten("Rugboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Doorboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Frezing",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("IntZijboring",Taal))#
+ 		 
+ + + + + + + + + +
+ #($$VERTAAL^Res.PI.Teksten("Rugboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Doorboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Frezing",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("IntZijboring",Taal))#
+ 		+ + + + +
+ + + +
+ #($$VERTAAL^Res.PI.Teksten("Boring",Taal))#
+
+ 		+ + + + + + + + + +
+ #($$VERTAAL^Res.PI.Teksten("Rugboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Doorboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Frezing",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("IntZijboring",Taal))#
+
  + + + + + + + + + +
+ #($$VERTAAL^Res.PI.Teksten("Rugboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Doorboring",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("Frezing",Taal))#
+ #($$VERTAAL^Res.PI.Teksten("IntZijboring",Taal))#
+ 		 
+
+ + + + + + + + + + + + + + + + + + +
#($$VERTAAL^Res.PI.Teksten("Aantal",Taal))#
+
+
+
+ + + + + Index: _csp/www/CalcPrice.js =================================================================== diff -u --- _csp/www/CalcPrice.js (revision 0) +++ _csp/www/CalcPrice.js (revision 3) @@ -0,0 +1,206 @@ +// Array for different AVENTOS types: each element contains a (piece-delimited) list of BorQty +var arAvBor = Array(); +arAvBor["AV-B.HF.BO.2"] = "2;2||2;2|||||||||||||4|||"; +arAvBor["AV-B.HF.BO.3"] = "3;3||3;3|||||||||||||6|||"; +arAvBor["AV-B.HF.BO.4"] = "4;4||4;4|||||||||||||8|||"; +arAvBor["AV-B.HF.ON.2"] = "2;2||2;2|||2|||||2||||||||"; +arAvBor["AV-B.HF.ON.3"] = "3;3||3;3|||2|||||2||||||||"; +arAvBor["AV-B.HF.ON.4"] = "4;4||4;4|||2|||||2||||||||"; +arAvBor["AV-B.HK"] = "|||||4|||||4||||||||"; +arAvBor["AV-B.HS"] = "|||||4|||||4||||||||"; +arAvBor["AV-B.HL"] = "|||||4|||||4||||||||"; +arAvBor["AV-S.HF.BO.2"] = "4||4|||||||||||||||4|6"; +arAvBor["AV-S.HF.BO.3"] = "6||6|||||||||||||||6|8"; +arAvBor["AV-S.HF.BO.4"] = "8||8|||||||||||||||8|10"; +arAvBor["AV-S.HF.ON.2"] = "4||4|||||2|3||||2|3|||||"; +arAvBor["AV-S.HF.ON.3"] = "6||6|||||2|3||||2|3|||||"; +arAvBor["AV-S.HF.ON.4"] = "8||8|||||2|3||||2|3|||||"; +arAvBor["AV-S.HK"] = "|||||||2;2|2;2||||2;2|2;2|||||"; +arAvBor["AV-S.HS"] = "|||||||2;2|2;2||||2;2|2;2|||||"; +arAvBor["AV-S.HL"] = "|||||||2;2|2;2||||2;2|2;2|||||"; +arAvBor["AV-Test.HK"]="1;2||3|6;6|||2||||||||||||3"; +arAvBor["AV-Test.HF"]="2|1||2||"; + +var arAvFldsBorID; +var lstAvFldsBorIDs = "PBRug|PBDoor|PBFrees|PBIntZ||PLRug|PLDoor|PLFrees|PLIntZ||PRRug|PRDoor|PRFrees|PRIntZ||PORug|PODoor|POFrees|POIntZ"; +var ColorOptDisabled= "#dddddd"; + +/*** ------------------------------- ***/ +function cboProfielChange () { + var ProfID = GetValueCbo(document.getElementById("Profiel")); + var ProfType = GetProfielType(ProfID); // returns "B" or "S" (Breed or Smal) + UpdateBeslagChoices (ProfType); + UpdateAventosChoices (ProfType); + ClearPrijs(); +} +function GetProfielType (ProfID) { + if (ProfID.substr(0,2)=="PS") return "S"; + if (ProfID.substr(0,2)=="PB") return "B"; + return ""; +} +function GetBslListFromProfiel (ProfType) { + if (ProfType=="" || ProfType=="*") return "*"; // alles + if (ProfType=="B") return "BLUMS;BLUMSKLR;BLUMSINSALU;FERS;FERSSVD;FORS;GRSS;HETS;HETSSVD;HETS4829;INDS;MEPS;MEPSOPTIMA;REGULA_SM;SALS"; + if (ProfType=="S") return "BLUMK;BLUMKBM;BLUMK120;FERK;FORK;GRSK;HETK;INDK;SALK"; + return ""; +} +function GetAvListFromProfiel (ProfType) { + if (ProfType=="" || ProfType=="*") return "*"; // alles + if (ProfType=="B") return "AV-B.HF.BO.2;AV-B.HF.BO.3;AV-B.HF.BO.4;AV-B.HF.ON.2;AV-B.HF.ON.3;AV-B.HF.ON.4;AV-B.HK;AV-B.HS;AV-B.HL"; + if (ProfType=="S") return "AV-S.HF.BO.2;AV-S.HF.BO.3;AV-S.HF.BO.4;AV-S.HF.ON.2;AV-S.HF.ON.3;AV-S.HF.ON.4;AV-S.HK;AV-S.HS;AV-S.HL"; + return ""; +} + +/*** ------------------------------- ***/ +function cboBeslagChange () { + ClearPrijs(); + BeslagAantal(); +} +function cboBeslagOnExit () { + var cboBsl=document.getElementById("Beslag"); + if (cboBsl.selectedIndex==-1 || cboBsl.options[cboBsl.selectedIndex].disabled) SetBeslagValue(""); +} +function SetBeslagValue (NewVal) { + SetValCbo("Beslag",NewVal); + cboBeslagChange(); +} +function UpdateBeslagChoices (ProfType) { + var BslList=GetBslListFromProfiel(ProfType); + UpdateCboItems ("Beslag", ";"+BslList, ";"); + if (BslList=="*" || BslList=="" || BslList.indexOf(";")>-1) cboBeslagOnExit (); + else { + var FirstVal=cPiecesToArray(BslList, ";")[0]; + SetBeslagValue(FirstVal); + } +} + +/*** ------------------------------- ***/ +function cboAventosChange () { + var AventosID = GetValueCbo(document.getElementById("cboAventos")); + AventosFillBorFlds(AventosID); + ClearPrijs(); + // Geen ander beslag in combinatie met Aventos: disable "Beslag" + var objAantBeslag = document.getElementById('AantalBeslag'); + RestrictAccess (objAantBeslag, (AventosID=="")); + objAantBeslag.value = (AventosID=="" ? "" : 0); + RestrictAccess (document.getElementById('Beslag'), (AventosID=="")); + LabelSetVisible("lblBeslagInfo",(AventosID=="")) +} +function cboAventosOnExit () { + var cboAV=document.getElementById("cboAventos"); + if (cboAV.selectedIndex==-1 || cboAV.options[cboAV.selectedIndex].disabled) SetAventosValue(""); +} +function SetAventosValue (NewVal) { + SetValCbo("cboAventos",NewVal); + cboAventosChange(); +} +function UpdateAventosChoices (ProfType) { + var AvList=GetAvListFromProfiel(ProfType); + UpdateCboItems ("cboAventos", ";"+AvList, ";"); + if (AvList=="*" || AvList=="" || AvList.indexOf(";")>-1) cboAventosOnExit (); + else { + var FirstVal=cPiecesToArray(AvList, ";")[0]; + SetAventosValue(FirstVal); + } +} +function AventosFillBorFlds (AventosID) { +// arAvFldsBorID = lstAvFldsBorIDs.split("|"); // this is done once, in the Initialize() function + var lstAvBor = ""; + if (AventosID != "") lstAvBor=arAvBor[AventosID]; // returns a piece-delimited list + var arBorFlds = lstAvBor.split("|"); // pieces to list (read: js-array) + for (i=0; i