// These are the routines that enable the Hospital_etool expert checklist pages.
//
// 19-Jun-03 Tom Brown reformatting and fixes
// 02-Apr-03 Tom Brown Creation
//
function setQues(num, quest, numStr)
{
//alert("num:"+num+" ques:"+ques+" string:"+numStr);
ques[num] = new Array();
if (!ques[num])
{
alert("question "+num+" was not correctly allocated.");
return;
}
ques[num].num = num; // just a check to make sure the questions were programmed in order.
ques[num].quest = quest;
ques[num].numStr = numStr;
ques[num].na;
ques[num].consider;
if (num > quesMax) quesMax = num;
quesCnt++;
}
function reset()
{
var q;
for(q=1; q<=quesMax; q++)
{
if (ques[q] != null)
{
//alert("looking for:document.forms.quiz."+ques[q].numStr+"/"+quesMax);
var qu = eval("document.forms.quiz."+ques[q].numStr);
if (!qu)
{
//alert("didn't find:"+q);
}
else if (qu && ques[q] != null)
{
//alert("status:"+qu.value+" length:"+qu.length);
//qu.checked = false;
for (var i=0; i < qu.length; i++)
{
if (qu[i].checked)
{
//alert("value["+i+"]:"+qu[i].value);
qu[i].checked = false;
}
}
}
}
}
}
function report()
{
var str='toolbar=no,directories=no,location=no,status=yes,menubar=yes,resizable=yes,scrollbars=yes,width=500,height=400'
Win1 = window.open("", "", str)
Win1.document.open()
Win1.document.write("")
Win1.document.write("
"+ReportTitleString+"
")
//Win1.document.write("The following questions that were answered with \"N/A\" or \"Consider\" may need re-evaluation:
")
Win1.document.write("Your checklist answers indicate the following questions may need further consideration:
")
//Win1.document.write("
Here are some HTML tags, text, and a button ")
//Win1.document.write("that are written to the document stream.
")
//Win1.document.write("")
Win1.document.write("")
Win1.document.close()
}
function doAnswers(name)
{
document.write("
")
document.write("
")
document.write("
")
document.write("
")
document.write("
")
document.write("
")
}
function doEmptyTextTypingArea()
{
document.write("