function fntogelt6(eltvsbver ) { if (eltvsbver) { eltvsbval ="none"; } else { eltvsbval ="block"; } return eltvsbval; } function fntogelt5(eltobjref, eltvsbver ) { if (! eltobjref ) { return; }
else { eltobjref.style.display =fntogelt6(eltvsbver ); } } function fntogelt4(eltid_valref, eltvsbref ) { var eltrngobj; var tbldocelt; var eltobjloc; var eltvsbver; if (! document.getElementById ) { return; } else {
eltobjloc = document.getElementById(eltid_valref ); if (! eltobjloc ) { return; } else { if (! eltvsbref ) { eltvsbver = (eltobjloc.style.display != "none"); } else { eltvsbver = !eltvsbref; } fntogelt5(eltobjloc, eltvsbver ); } } }
function fntogelt3b(eltid_valref ) { var eltobjloc = document.getElementById(eltid_valref ); var eltvsbver = (eltobjloc.style.display != "none" ); if (eltvsbver ) { eltobjloc.style.display ="none"; } else { eltobjloc.style.display ="block"; } }
function fntogelt2(caller, eltid_valref ) { var eltobjloc; if (document.getElementById(eltid_valref ) ) { eltobjloc = document.getElementById(eltid_valref ); if (eltobjloc.style.display == "block" ) { eltobjloc.style.display = "none";
caller.innerHTML='<img src="al2lib01/icotogitm_y1.gif" alt="Open" />'; } else { eltobjloc.style.display = "block"; caller.innerHTML='<img src="al2lib01/icotogitm_n1.gif" alt="Close" />'; } } } function fntogelt1(caller, eltid_valref )  {
var eltobjloc; if (document.getElementById(eltid_valref ) )  { eltobjloc = document.getElementById(eltid_valref).style; if (eltobjloc.display == 'block' ) { eltobjloc.display = 'none';
if (caller.hasChildNodes()) caller.firstChild.src = 'al2lib01/icotogitm_y1.gif'; } else { eltobjloc.display = 'block'; if (caller.hasChildNodes()) caller.firstChild.src = 'al2lib01/icotogitm_n1.gif'; } } } function fntogrngdiv4( eltrngid_ref,
toghrfclsref, togeltclsref, togopnkeyref  ) { var eltrngid_len =0; var toghrfclslen =0; var togeltclslen =0; var togopnkeyloc =''; var eltrngobj; var tbltoghrf; var taghrfntl; var rowhrfidx; var hrftagstr; var hrfclsstr; var hrfclslef;
var hrfclsidm; var hrfkd1str; var togeltclslen; var tbltogelt; var tageltntl =0; var roweltidx; var eltclsstr; var eltclslef; var eltclsidm; var eltkd1str; var hrftogntl =0; var elttogntl =0; eltrngobj = document.getElementById(eltrngid_ref );
if (eltrngobj) { if (toghrfclsref.length > 0 ) { toghrfclslen = toghrfclsref.length; tbltoghrf = eltrngobj.getElementsByTagName("a" ); taghrfntl = tbltoghrf.length; for (rowhrfidx= 0; (rowhrfidx < taghrfntl ); rowhrfidx++ ) {
hrftagstr =tbltoghrf[rowhrfidx].tagName; hrfid_str =tbltoghrf[rowhrfidx].id; hrfclsstr =tbltoghrf[rowhrfidx].className; hrfclslef =hrfclsstr.substr(0, toghrfclslen ); hrfclsidm =(hrfclslef == toghrfclsref ); hrfkd1str =''; if (hrfclsidm ) {
if (tbltoghrf[rowhrfidx].hasChildNodes()) { if (togopnkeyref == 'open' ) { hrfkd1str = 'al2lib01/icotogitm_n1.gif';  } if (togopnkeyref == 'close') { hrfkd1str = 'al2lib01/icotogitm_y1.gif'; } tbltoghrf[rowhrfidx].firstChild.src =hrfkd1str;
hrftogntl += 1; } } } } } if (togeltclsref.length > 0 ) { togeltclslen = togeltclsref.length; tbltogelt = eltrngobj.getElementsByTagName("div" ); tageltntl = tbltogelt.length; for (roweltidx= 0; (roweltidx < tageltntl ); roweltidx++ ) {
elttagstr =tbltogelt[roweltidx].tagName; eltid_str =tbltogelt[roweltidx].id; eltclsstr =tbltogelt[roweltidx].className; eltclslef =eltclsstr.substr(0, togeltclslen ); eltclsidm =(eltclslef == togeltclsref ); eltkd1str =''; if (eltclsidm ) {
if (togopnkeyref == 'open'  ) { eltkd1str = 'block'; } if (togopnkeyref == 'close' ) { eltkd1str = 'none';  } tbltogelt[roweltidx].style.display =eltkd1str; elttogntl += 1; } } } return (elttogntl +hrftogntl ); } function fntogrngtagattprf1(
eltrngid_ref, elttagsltref, eltattsltref, eltattprfref, togopnkeyref ) { var eltrngid_lmx =0; var elttagsltlmx =0; var eltattsltlmx =0; var eltattprflmx =0; var elttagsltall ='*'; eltrngid_loc = fntrmall(eltrngid_ref);
elttagsltloc = fntrmall(elttagsltref); elttagsltlmx = elttagsltloc.length; if (elttagsltlmx < 1 ) { elttagsltloc = elttagsltall; } else { elttagsltloc = elttagsltloc.toUpperCase(); } eltattsltloc = fntrmall(eltattsltref).toUpperCase();
eltattprfloc = fntrmall(eltattprfref); eltrngid_lmx = eltrngid_loc.length; eltattsltlmx = eltattsltloc.length; eltattprflmx = eltattprfloc.length; eltrngid_loc = eltrngid_ref; elttagsltloc = '*'; if (elttagsltlmx > 0 ) {
elttagsltloc = elttagsltref.toUpperCase(); } eltattsltloc = eltattsltref.toUpperCase(); eltattprfloc = eltattprfref; var togopnkeyloc =''; togopnkeyloc = fntrmall(togopnkeyref ).toLowerCase(); var tblrngtagobj =[]; var rngtagobjnmx = 0;
tblrngtagobj = fntblrngtagobj1(eltrngid_loc, elttagsltall, 'OBJ' ); fnmsg1(vln, tblrngtagobj ); rngtagobjnmx = tblrngtagobj.length; var tblslcattobj =[]; var slcattobjnmx = 0; var rngtagobj; var rngtagsltobj; var rngtagsltstr ='';
var rngtagobjtyp; var eltattvalidm =vln; var slcattidx = -1; var eltrngobj; var eltkd1str = ''; var elttogntl =  0; rngtagidx = -1; while (rngtagidx < (rngtagobjnmx -1 ) ) { rngtagidx ++; rngtagobj = tblrngtagobj[rngtagidx]; eltattvalidm =
fntagattprfval1( eltattsltloc, eltattprfloc, rngtagobj ); eltkd1str =''; if (eltattvalidm ) { slcattidx += 1; if (togopnkeyloc == 'open'  ) { eltkd1str = 'block'; } if (togopnkeyloc == 'close' ) { eltkd1str = 'none';  }
rngtagobj.style.display = eltkd1str; elttogntl += 1; } } return elttogntl; }