// rkModuleV7a.js
//
// JS functions for Module Handling
//
// Copyright (c) 2001-2007 K Baker-Munton t/a Kintok
//
// 21-Jun-2006 KBM  Started
// JSLint "helper"
/*global alert, confirm, document, eval, location, navigator, parent, window */
var strChoices = ["", "", "", "", "", ""];
var g_rkModuleLastChoice = "";
function rkdmSelectGet(strForm, strSelect){var pForm;pForm = document.forms[strForm];if (typeof(pForm) == "undefined"){alert("rkdmSelectGet(1):" + strForm + " invalid");return "undefined";}pForm = pForm[strSelect];if (typeof(pForm) == "undefined"){alert("rkdmSelectGet(2):" + strSelect + " invalid");return "undefined";}return pForm;}
function rkdmOnChange(strForm, strSelect1, strSelect2){var pItem1;var pItem2;pItem1 = rkdmSelectGet(strForm, strSelect1);if (typeof(pItem1) == "undefined"){alert("rkdmOnChange(1):" + strForm + ":" + strSelect1 + " invalid");return "undefined";}pItem2 = rkdmSelectGet(strForm, strSelect2);if (typeof(pItem2) == "undefined"){alert("rkdmOnChange(2):" + strForm + ":" + strSelect2 + " invalid");return "undefined";}
//TODO	ClearTop()
if(pItem.name == "PARAMVALUE1"){rkdmChangeModel2(pItem1, 1, pItem2, 2);}}
function rkdmPopulateFirstLevel(strForm, strSelect){var lenI;var intI;var intTo;var strTempList = new Array();var opt;var pSelect;pSelect = rkdmSelectGet(strForm, strSelect);if (pSelect == "undefined"){alert("rkdmPopulateFirstLevel:Form/Select Invalid");return -1;}lenI = ModelArray.length - 1;intTo = 1;pSelect.options.length = 1;for(intI = 0; intI <= lenI; intI++){if (strTempList["" + ModelArray[intI][1]] != true){opt = new Option(ModelArray[intI][1], ModelArray[intI][1]);pSelect.options[intTo] = opt;intTo++;strTempList["" + ModelArray[intI][1]] = true;}}}
function rkdmChangeModel(strForm, strSelectRoot, intOffsetFrom, intOffsetTo){var pSelectFrom;var pSelectTo;pSelectFrom = rkdmSelectGet(strForm, strSelectRoot + intOffsetFrom);if (typeof(pSelectFrom) == "undefined"){alert("rkdmOnChange(1):" + strForm + ":" + strSelectRoot + intOffsetFrom + " invalid");return "undefined";}pSelectTo = rkdmSelectGet(strForm, strSelectRoot + intOffsetTo);if (typeof(pSelectTo) == "undefined"){alert("rkdmOnChange(2):" + strForm + ":" + strSelectRoot + intOffsetTo + " invalid");return "undefined";}
return rkdmChangeModel2(pSelectFrom, pSelectTo, strForm, strSelectRoot, intOffsetFrom, intOffsetTo);}
function rkdmChangeModel2(pSelectFrom, pSelectTo, strForm, strSelectRoot, intOffsetFrom, intOffsetTo){var blnSelected;var strDebug;var strRowDebug;var lenI;var intI;var blnMatch;var intMatchedItem;var intMaxLevel;var pModule;var strProductCode;var intTo;var opt;var strTemp;var strTempList = new Array();strDebug = "";intMatchedItem = -1;intMaxLevel = -1;strChoices[intOffsetFrom] = pSelectFrom.options[pSelectFrom.selectedIndex].value;if (pSelectFrom.selectedIndex === 0 ){pSelectTo.length = 1;pSelectTo.options[0].text = "--- Select ---";}else{lenI = ModelArray.length - 1;intTo = 1;pSelectTo.options.length = 1;if (intOffsetFrom < 2){strTemp = strSelectRoot +"2";document.forms[strForm].elements[strTemp].options.length = 1;document.forms[strForm].elements[strTemp].defaultSelected = 0;}if (intOffsetFrom < 3){strTemp = strSelectRoot +"3";document.forms[strForm].elements[strTemp].options.length = 1;document.forms[strForm].elements[strTemp].defaultSelected = 0;}if (intOffsetFrom < 4){strTemp = strSelectRoot +"4";document.forms[strForm].elements[strTemp].options.length = 1;document.forms[strForm].elements[strTemp].defaultSelected = 0;}for(intI = 0; intI <= lenI; intI++){strRowDebug = "";blnMatch = true;for (intJ = 1; intJ <= 5; intJ++){if (blnMatch == true && strChoices[intJ] !== "" && ModelArray[intI][intJ] !== "" && strChoices[intJ] !== ModelArray[intI][intJ]){blnMatch = false;}if (blnMatch === true && intMaxLevel < intJ && ModelArray[intI][intJ] !== ""){intMaxLevel = intJ;}}if (blnMatch == true && intMatchedItem != -2){if (intMatchedItem == -1){intMatchedItem = intI;} else{intMatchedItem = -2;}}blnPreceeding = true;for (intJ = 1; blnPreceeding == true && intJ < intOffsetFrom; intJ++){if (ModelArray[intI][intJ] != strChoices[intJ]){blnPreceeding = false;}}if (blnPreceeding == true){if (ModelArray[intI][intOffsetTo] !== "" && strTempList["" + ModelArray[intI][intOffsetTo]] != true && ModelArray[intI][intOffsetFrom] === pSelectFrom.value){blnSelected = (strChoices[intOffsetTo] == ModelArray[intI][intOffsetTo]) ? true : false;opt = new Option(ModelArray[intI][intOffsetTo], ModelArray[intI][intOffsetTo], false, blnSelected);pSelectTo.options[intTo] = opt;strTempList["" + ModelArray[intI][intOffsetTo]] = true;intTo++;}}}strTemp = strSelectRoot +"2";document.forms[strForm].elements[strTemp].disabled = (document.forms[strForm].elements[strTemp].options.length == 1) ? true : false;strTemp = strSelectRoot +"3";document.forms[strForm].elements[strTemp].disabled = (document.forms[strForm].elements[strTemp].options.length == 1) ? true : false;strTemp = strSelectRoot +"4";document.forms[strForm].elements[strTemp].disabled = (document.forms[strForm].elements[strTemp].options.length == 1) ? true : false;if (intMatchedItem >= 0){if (g_rkModuleLastChoice !== ""){pModule = MM_findObj(g_rkModuleLastChoice);pModule.style.display = 'none';}strTemp = "MOD_" + ModelArray[intMatchedItem][0];pModule = MM_findObj(strTemp);pModule.style.display = 'block';g_rkModuleLastChoice = strTemp;}}}