// Global functions
// Sweeps Rules Auto change requires some variable to be set on the page itself.
// calculates seconds on a page
var loadtime = new Date();
function elapsedTime()
{
var subtime = new Date();
var elapsed = (subtime.getTime()-loadtime.getTime())/1000;
return elapsed;
}
//base64 encryption code
function encode64(str) {
var b64c="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_";
var a1,a2,a3,out="",tlen=0, ndx=0;
var packet;
var data = str;
packet=data.substring(0,3);
while (packet.length) {
a1=packet.charCodeAt(0);
if (packet.length>=2)
a2=packet.charCodeAt(1);
else
a2=0;
if (packet.length>=3)
a3=packet.charCodeAt(2);
else
a3=0;
out += b64c.charAt((a1/4)) + b64c.charAt((a1%4)*16+(a2/16))
if (packet.length > 1) {
out+=b64c.charAt(((a2%16)*4)+(a3/64));
if (packet.length > 2)
out+=b64c.charAt((a3%64));
else
out+="=";
}
else
out += "==";
ndx+=3;
packet=data.substring(ndx,ndx+3);
}
return out;
}
// Q and C link
// Use together with the qandc.html include statment
function openQC()
{
var coidv = document.iRegForm.COID.value;
var pageURL = encode64(location.href);
var subV = "";
var qcurl;
var elements = document.iRegForm.elements.length
for (var i = 0; i <= elements - 1; i++)
{
if(document.iRegForm.elements[i].name == "SubVers"){
subV=document.iRegForm.elements[i].value; break;}
}
if (subV != ""){var qcurl = "/qc/qcstart.shtml?w=w&pURL="+pageURL+"&COID=" + coidv+subV;}
else {
qcurl = "/qc/qcstart.shtml?w=w&pURL="+pageURL+"&COID=" + coidv;
}
qandcWindow=window.open(qcurl,'qandc','width=600,height=400,scrollbars=yes');
qandcWindow.focus();
}
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// will only work with the expose servlet in place
// This will create hidden inputs as part of the form and populate it with hidden fields '
// function should be called before the close form tag
//set the defintion for undefiened for all browsers
var undef
function stamp()
{
var subtime = new Date();
var stamp = subtime.getTime()
var stampStr = stamp.toString()
var shortStamp = stampStr.toString().substr(stampStr.length-6)
return shortStamp
}
//encode
var hD="0123456789ABCDEFGHIJKLMNOPQRSTUV";
function d2h(d) {
var h = hD.substr(d&31,1);
while(d>31) {d>>=4;h=hD.substr(d&31,1)+h;}
return h;
}
//Creates a unique id based info from the server and local macine. Requires echo on main page.
function setID(){
//if (items["IP_Addr"] == undef){document.location = entryPage+'?e=1'}
if (document.iRegForm.PANSESSIONID.value == ""){
ips = IP_Addr.split(".")
ip = ips.join("");
var rn=Math.floor(Math.random()*999)
//alert(times+ip+rn+stamp())
document.iRegForm.PANSESSIONID.value = d2h(times)+d2h(ip)+d2h(rn)+d2h(stamp())
}
}
//check to see if the survay has been started from the beginning.
function rightPage(){
if (document.iRegForm.e_NAME_F == undef) {document.location = entryPage+'?e=2'}
}
// set uploadid
function uID(){
// an i entry is added with each page load after a submit.
if(currentPage == "single"){document.iRegForm.UPLOADID.value = "";}
else {
var id = items["i"]
if (id.toString().indexOf(",") >= 0){
var uID = items["i"].length}
else {uID = 1}
document.iRegForm.UPLOADID.value = uID;
}
}
//set qsitems array from search string
function setTest(defaultKey)
{
qs = document.location.search
splitQS = qs.split("&")
joinedQS = splitQS.join(",")
splitQS = joinedQS.split("=")
joinedQS = splitQS.join(",")
splitQS = joinedQS.split("?")
joinedQS = splitQS.join("")
splitQS = joinedQS.split(",")
var loc = 1
items = new Array()
for (var i = 0; i <= splitQS.length-1; i++)
{
if (loc != i){
items[splitQS[i]] = splitQS[i+1];
loc = i+1}
}
}
// set hidden fields place before the close form tag and after all other inputs.
function setHidden(){
//document.writeln(" HIDDEN VALUES ")
for (var v in items){
values = items[v]
if (document.getElementById(v) == null && v != "page" ){
if (values.toString().indexOf(",") >= 0)
{
for (i=0; i <= values.length - 1; i++){
//document.writeln(" "+v+ " = " +values[i])
document.writeln("")
}
}
else{
//document.writeln(" "+v+ " = ")
document.writeln("")
}
}
}
}
// This will populate any existing inputs in the form with any data posted to the form with the correct enames.
// function should be called after the close form tag
// the page variable should be the page number the function is called from
function populate(page,backFile){
rightPage()
backF = backFile;
var ename;
var t;
var n = document.iRegForm.elements.length;
for (var i = 0; i <= n-1; i++){
ename = document.iRegForm.elements[i].name;
t = document.iRegForm.elements[i].type;
if (t == "hidden"){
debugFields += ename+","; //seting fields to show in debug
}
if (document.getElementById(ename) != null && items[ename] != undef){
//text and hidden
if(t == "text" || t == "hidden"){document.iRegForm[ename].value = items[ename]; continue;}
//Checkboxes
if (t == "checkbox"){
//set values when only one checkbox exists
if (document.iRegForm[ename].length == undef){document.iRegForm[ename].checked = true;}
else {var checkLen = document.iRegForm[ename].length;
// sets checkbox if only one needs to be checked
if (items[ename][0] == undef){
checkValue = items[ename]
for (var c = 0; c <= checkLen - 1; c++)
{
if (document.iRegForm[ename][c].value == checkValue){document.iRegForm[ename][c].checked = true; continue;}
}
}
// sets checkbox if multiple boxes need to be checked
else{
var enameLen = items[ename].length;
for (var l = 0; l <= enameLen - 1; l++){
checkValue = items[ename][l]
for (var c = 0; c <= checkLen - 1; c++)
{
if (document.iRegForm[ename][c].value == checkValue){document.iRegForm[ename][c].checked = true; continue;}
}
}
}
}
}
//radios
if (t == "radio"){
with (document){
rValue = items[ename]
var rLen = iRegForm[ename].length;
for (var r = 0; r <= rLen - 1; r++)
{
if (iRegForm[ename][r].value == rValue){iRegForm[ename][r].checked = true; continue;}
}
}
}
// select-one
if (t == "select-one"){
with (document){
sValue = items[ename]
var sLen = iRegForm[ename].length;
for (var s = 0; s <= sLen - 1; s++)
{
if (iRegForm[ename].options[s].value == sValue){iRegForm[ename].options[s].selected = true; continue;}
}
}
}
if (t == "select-multiple" ){
with (document){
//multiple selects set sinlge response
if (items[ename][0] == undef){
sValue = items[ename]
var sLen = iRegForm[ename].length;
for (var s = 0; s <= sLen - 1; s++)
{
if (iRegForm[ename].options[s].value == sValue){iRegForm[ename].options[s].selected = true; continue;}
}
}
//multiple selects set multiple responses
else {
items[ename]
var iLen = items[ename].length;
var sLen = iRegForm[ename].length;
for (var s = 0; s <= sLen - 1; s++)
{
for (var sv = 0; sv <= iLen - 1; sv++){
if (iRegForm[ename].options[s].value == items[ename][sv]){iRegForm[ename].options[s].selected = true; continue;}
}
}
}
}
}
}
}
uID();
document.iRegForm.X34.value = page;
document.iRegForm.X26.value = IP_Addr;
if (lang == 1){document.iRegForm.X25.value = "100"; document.iRegForm.lang.value = "1";}
if (lang == 2){document.iRegForm.X25.value = "010"; document.iRegForm.lang.value = "2";}
if (lang == 3){document.iRegForm.X25.value = "001"; document.iRegForm.lang.value = "3";}
}
function doBack(){
if (items["e_NAME_F"] == "1776"){document.iRegForm.action = baseAction+"?-urls-="+backURL+","+databypassURL+"&end=end&";}
else {document.iRegForm.action = baseAction+"?-urls-="+backURL+","+dataURL+"&end=end&";}
document.iRegForm.submit();
}
// JavaScript Document
//page number
var qnum = 1;
function qNum(start){
if(start != 0){qnum = start}
document.write(' '+qnum+'.' )
qnum=qnum+1;
}
// DYNAMIC CONTENT SCRIPTS
// resets the values as content is shown and hidden
function qReset(args, offset){
//args grabs any args the callin function may have been sent.
//offset the index of the args array where the input manes start.
if(args.length > offset) {
for ( var i = offset; i= 1){
splitQS = qs.split("&")
joinedQS = splitQS.join(",")
splitQS = joinedQS.split("=")
joinedQS = splitQS.join(",")
splitQS = joinedQS.split("?")
joinedQS = splitQS.join("")
splitQS = joinedQS.split(",")
var loc = 1
for (var i = 0; i <= splitQS.length-1; i++)
{
if (loc != i){
items[splitQS[i].toUpperCase()] = unescape(splitQS[i+1]);
loc = i+1}
}
}
}
function debugCard(thisform){
var debugArray = debugFields.split(",");
var debugHTML = "
Debug: hidden values shown below D & L Version ="+dnlVersion+" "
debugHTML += "Form action = "+document.iRegForm.action+" "
for (v = 0; v < debugArray.length-1; v++){
values = document.iRegForm[debugArray[v]].value;
debugHTML += debugArray[v]+" = "+values+" "
}
debugHTML += ' '
document.getElementById("debug_txt").innerHTML = debugHTML;
document.location.hash = "debugResuts"
}
function debugSubmit(){
if (document.iRegForm.e_NAME_F.value == "predebug"){document.iRegForm.e_NAME_F.focus();
document.getElementById("debug_txt").innerHTML = "";
}
else{debugnext = true;}
}
// populate the birth year current year - 91
function setDOBYear(){
var indexVal = 1
if(document.getElementById("DOBYYYY") != null){
if(document.iRegForm.DOBYYYY.type != "hidden"){
for (var by = Year_Now; by > Year_Now-91; by-- )
{
document.iRegForm.DOBYYYY.options[indexVal] = new Option(by,by);
indexVal++;
}
if (items["DOBYYYY"] != undef && items["DOBYYYY"] != ""){
document.iRegForm.DOBYYYY.options[(Year_Now+1)-parseInt(items["DOBYYYY"])].selected = true;
}
}
// if the back button is pressed populate so it is not lost
}
}
//-->