profoundjs/htdocs/profoundui/proddata/js/genie.js

Profound.js Framework and Server

function ca(){return function(b){return b}}function da(){return function(){}}function va(b){return function(){return b}}var wa,N="genie",Ca="5250";var Ga=0,Ja=-20,Ka=[],Ma=[],Sa={};N=="genie"&&window.parent==window&&window.history.forward(1);var Ta=typeof window.pui=="object"?pui.serverURL:null;window.pui={};if(Ta)pui.serverURL=Ta;var Ua=navigator.userAgent.toLowerCase();pui.is_edge=Ua.indexOf("edg/")!=-1;pui.is_ie=false;pui.is_opera=Ua.indexOf("opera")!=-1||Ua.indexOf("opr/")!=-1;pui.is_chrome=!pui.is_edge&&Ua.indexOf("chrome")!=-1;pui.is_safari=!pui.is_edge&&!pui.is_chrome&&Ua.indexOf("safari")!=-1;pui.is_firefox=Ua.indexOf("firefox")!=-1;
pui.is_android=Ua.indexOf("android")!=-1;pui.is_quirksmode=document.compatMode=="BackCompat";pui.is_ios=Ua.indexOf("iphone")!=-1||Ua.indexOf("ipad")!=-1||Ua.indexOf("ipod")!=-1;var Va,Wa,$a,ab;Va=/trident\/([0-9]{1,}[.0-9]{0,})/;ab=Va.exec(Ua);if(ab!=null)Wa=parseFloat(ab[1]);if(!pui.is_opera){Va=/msie ([0-9]{1,}[.0-9]{0,})/;ab=Va.exec(Ua);if(ab!=null)$a=parseFloat(ab[1])}if(Wa||$a){pui.is_ie=true;pui.ie_mode=$a||Wa+4;if(pui.ie_mode<11)pui.is_old_ie=true;pui.ie_version=Wa?Wa+4:$a}pui.secLevel=0;
pui.He=null;pui.multX=null;pui.multY=null;pui.defaultDateFormat="MM/DD/YY";pui.is_touch="ontouchstart"in window;pui.touchDevice=pui.is_touch;pui.is_mouse_capable=false;pui.designer={};pui.designer["initial keywords"]=[];pui.designer.currentDisplay={};pui.ide={};pui.cloud={};pui.cloud.views={};pui.social={};pui.cnv={};pui.cnv.jO={};pui.fi={};pui.toolbox={};pui.toolbox.add=da();pui["field exit key"]=107;pui["field exit minus key"]=109;pui["no connection status"]=false;pui["client side timeout"]=true;
pui.ny={"*ISO":1,"*USA":2,"*EUR":3,"*JIS":4,"*MDY":5,"*DMY":6,"*YMD":7,"*JUL":8,"*JOB":10};pui.oy={"/":1,"-":2,".":3,",":4," ":5,"*BLANK":5,"*JOB":7};pui.py={"*ISO":1,"*USA":2,"*EUR":3,"*JIS":4,"*HMS":9};pui.qy={".":3,",":4," ":5,"*BLANK":5,":":6,"*JOB":7};
pui.bL=["abstract","arguments","await","boolean","break","byte","case","catch","char","class","const","continue","debugger","default","delete","do","double","else","enum","eval","export","extends","false","final","finally","float","for","function","goto","if","implements","import","in","instanceof","int","interface","let","long","native","new","null","package","private","protected","public","return","short","static","super","switch","synchronized","this","throw","throws","transient","true","try",
"typeof","var","void","volatile","while","with","yield"];pui.ea=false;pui.mm=null;pui["function key pattern"]="^(F|CA|CF|CK|CMD)([0-9]{1,2})([=:-])(.*)$";pui["special key pattern"]="^(Enter|PageUp|PageDown|Rollup|RollDown|RollDn|PgUp|PgDn|Help|Print)([=-])(.*)$";pui.Ym=0;pui["session timeout retries"]=0;pui.FN=0;pui.Hm=false;pui.vN="profoundjs.com";pui.dN="http://www.w3.org/2000/svg";pui.Sw={};pui["text file name pattern"]=/.+\.(css|js|json|html|htm|xml|txt|csv|sh|md|sql|scn|lst|xml|conf|php|log|ts|less|scss|cpp|ejs|vue|ts|jsx)$/i;
pui["always allow field exit"]=false;pui.dup={};pui.dup["char"]="\u25cf";pui.dup.keyCode=45;pui.dup.shift=true;pui.dup.ctrl=false;pui.dup.alt=false;pui.wf={WO:{},iP:{},plugins:{},addPlugin:function(b){var a=pui.wf.plugins,c=b.category;a[c]||(a[c]={});a[c][b.name]=b}};pui["add combo style properties to choice list"]=true;window.pui||(window.pui={});window.pui.baseVersion="6";window.pui.fixPackVersion="32.0";window.pui.version=window.pui.baseVersion+"."+window.pui.fixPackVersion;pui.genie={};pui.genie.config={};pui.genie.varsToRestore={};pui.genie.displaySize=80;pui.genie.alertMsg="";pui.genie.focusFieldNum=0;pui.genie.focusPos=0;pui.genie.tm=null;pui.genie.isCustomized=false;pui.genie.formSubmitted=false;pui.genie.setContainerWidth=true;pui.genie.containerWidth="";pui.genie.menuFieldStartRow=1;pui.genie.menuFieldEndRow=99;pui.genie.menuFieldStartColumn=1;pui.genie.menuFieldEndColumn=999;pui.genie["use size attribute"]=false;pui.genie.hideSubfileOptionText=false;
pui.genie.detectSubfileOptions=true;pui.genie.inputFields=[];pui.genie["close atrium tab on timeout"]=false;pui.genie["browser handles home key"]=false;pui.genie.config.enterButton=false;pui.genie.config.hiColor="#5588BB";pui.genie.config.hiFontColor="white";pui.genie.config.hideSubfileOpt=false;pui.genie.config.hideFKeyNames=false;pui.genie.config.functionKeyButtons=false;pui.genie.config.separateSubfileLines=false;pui.genie.config.detectSubfile=true;pui.genie.config.detectSubfilePatterns=false;
pui.genie.config.detectSubfileEndPlus=true;pui.genie.config.pagingBar=false;pui.genie.config.stripedSubfile=false;pui.genie.config.oddRowColor="#f0f0f0";pui.genie.config.evenRowColor="#d0d0f0";pui.genie.config.outlineSubfile=true;pui.genie.config.subfileOutlineColor="yellow";pui.genie.config.enlargeHeadings=true;pui.genie.config.preventAutoTab=false;pui.genie.config.overtypeMode=true;pui.genie.config.highlightOnFocus=false;pui.genie.config.detectDateFields=true;pui.genie.config.detectMenus=true;
pui.genie.config.setFieldBackground=false;pui.genie.config.useFixedFont=false;pui.genie.config.optionHeadings="OPT,SEL,ACT,X";pui.genie.config.subfileHeadingRows=2;pui.genie.config.detectSubfileMore=true;pui.genie.config.subfileMoreText="More...";pui.genie.config.subfileBottomText="Bottom";pui.genie.config.alertErrors=false;pui.genie.config.autoSizeFont=false;pui.genie.config.confirmOnClose=false;pui.genie.config.closeMessage=null;pui.genie.config.autoDisconnect=false;
pui.genie.config.browserAutoComplete=false;pui.genie.config.inputPadding=4;pui.genie.config.detectWindowBorder=true;pui.genie.config.hideSubfileOptionText=false;pui.genie.config.adjustWindowBorders=true;pui.genie.config.subfileStartLine=null;pui.genie.config.subfileEndLine=null;pui.genie.config.enableKeyAhead=false;pui.genie.config.keepInputFields=false;pui.genie.config.autoEnableEmptyElements=false;
pui.genie.config.specialKeyMap={SYSRQ:{code:27,shift:true},ATTN:{code:27},HELP:{code:112,alt:true},CLEAR:{code:19}};var fb=false,hb=false,ib=1,mb=false,ob=false,qb,sb=null,vb=null,xb=null,yb="",zb=null,Ab=null,Eb=null,Fb=0,Gb=0,Ib=0,Jb=null,Kb=false,Lb=false,Mb=false,Ob=null,Pb=[],Qb=false;var Rb={defaultSkin:true,enableDesigner:true,timeout:true,host:true,port:true,forceAccelerator:true,workStnFieldId:true,multX:true,multY:true};
function Sb(){var b;for(b in pui.genie.config.globalConfig)Rb[b]||(pui.genie.config[b]=pui.genie.config.globalConfig[b]);for(b in pui.genie.config.skinConfig)Rb[b]||(pui.genie.config[b]=pui.genie.config.skinConfig[b]);if(typeof pui.genie.config.keyMap=="object")for(var a in pui.genie.config.keyMap)pui.genie.config.specialKeyMap[a.toUpperCase()]=pui.genie.config.keyMap[a]};function Tb(b){document.body.style.fontFamily=pui.genie.config.useFixedFont?"Monospace":"";var a,c,d,e={};if(pui.genie.Pj!=null&&pui.genie.Pj.length>0){Ub();Wb();Xb()}var f=Yb(),h,i=pui.genie.config.minFKeyRow,m="";if(document.body.currentStyle)m=document.body.currentStyle.backgroundColor;else if(window.getComputedStyle)m=document.defaultView.getComputedStyle(document.body,null).getPropertyValue("background-color");for(h=0;h<f.length;h++){a=f[h];var l=Zb(a);if(l!=-1)if(a.id.indexOf("window")==0){var r=
a.getAttribute("borderAttr");if(r!=null&&r!=null){var k;a:{l=void 0;k=void 0;l=void 0;var o=void 0;c=void 0;d=void 0;o="."+("A"+r).toUpperCase();c="DIV"+o;for(r=0;r<document.styleSheets.length;r++){l=document.styleSheets[r];if(l.cssRules)k=l.cssRules;else if(l.rules)k=l.rules;for(var p=0;p<k.length;p++){l=k[p];d=l.selectorText.toUpperCase();if(d==o||d==c){k={color:l.style.color||null,backgroundColor:l.style.backgroundColor||null};break a}}}k=void 0}if(k.backgroundColor!=null)a.style.borderColor=k.backgroundColor;
if(k.color!=null)a.style.color=k.color}}else{c=a.innerHTML;if(c.substr(0,7)=="http://"||c.substr(0,8)=="https://"){c="<a href=\"JavaScript:pui.openURL('"+$b(c)+"');\">"+c+"</a>";a.innerHTML=c}for(;c.indexOf(String.fromCharCode(160))!=-1;)c=c.replace(String.fromCharCode(160),"&nbsp;");k=a.getAttribute("pass");if(k==null)k="1";k=parseInt(k);o=a;d=o.id;if(d!=null&&d.substr(0,2)=="D_"){d=document.getElementById("I"+d.substr(1));if(d!=null&&d.tagName=="INPUT"&&(d.type=="text"||pui.Pe(d.type))&&bc(ec(o).toUpperCase())==
bc(d.value.toUpperCase())){o.id="";o.style.visibility="hidden"}}a:{o=a;d=c;r=m;if(d.length>=3&&(d.substr(0,1)==":"&&d.substr(d.length-1,1)==":"||d.substr(0,1)=="."&&d.substr(d.length-1,1)==".")){p=true;for(var q=1;q<d.length-1;q++)if(d.substr(q,1)!="."){p=false;break}if(p==true){if(pui.genie.config.detectWindowBorder==true)o.style.fontFamily="Monospace";o="dotted";break a}}if(pui.genie.config.adjustWindowBorders==true&&(d=="&nbsp;"||d==" ")){p="";if(o.currentStyle)p=o.currentStyle.backgroundColor;
else if(window.getComputedStyle)p=document.defaultView.getComputedStyle(o,null).getPropertyValue("background-color");if(p!=""&&p!="transparent"&&p!=r&&parseInt(o.style.width)==pui.multX){o.style.top=parseInt(o.style.top)-4+"px";o.style.height=pui.multY+4+"px";o="space";break a}}o=d.substr(0,1)=="|"&&d.substr(d.length-1,1)=="|"?"dashed":""}if(a.YG!==true){d=c;r=void 0;p=void 0;var u=void 0,v=void 0;v=void 0;q=void 0;u=void 0;if(pui.is_old_ie){r=[];v=d.split("&nbsp;");for(q=0;q<v.length;q++)r=r.concat(v[q].split(" "))}else r=
d.split(/ |&nbsp;/);var t=[],y=r.length;for(q=0;q<y;q++){p=r[q];var A="",B="";if(q<y-1)A=r[q+1];if(q<y-2)B=r[q+2];if(p.toUpperCase()=="PRESS"&&A.toUpperCase()=="ENTER"){p=p+"&nbsp;"+A;r[q]=p;r.splice(q+1,1);y=r.length;A="";if(q<y-1)A=r[q+1]}var G={};t.push(fc(p,1,A,B,G));if(G.Pz){p=p+"&nbsp;"+A;r[q]=p;r.splice(q+1,1);y=r.length}}for(q=0;q<r.length-1;q++)if(t[q]!=""&&t[q+1]==""&&r[q+1]!=""){r[q]+="&nbsp;"+r[q+1];r.splice(q+1,1);t.splice(q+1,1);q-=1}y=false;A="";for(q=0;q<r.length;q++){p=r[q];B=t[q];
if(q!=0)A+="&nbsp;";if(B!=""){y=true;G="";if(pui.genie.config.hideFKeyNames){v=false;if(u=pui.Mh(pui["function key pattern"])){u.lastIndex=0;if((u=u.exec(p))&&u.length>=5){p=u[4];v=u[1].length+u[2].length+u[3].length;for(u=0;u<v;u++)G+="&nbsp;";v=true}}if(!v)if(u=pui.Mh(pui["special key pattern"])){u.lastIndex=0;if((u=u.exec(p))&&u.length>=4){p=u[3];v=u[1].length+u[2].length;for(u=0;u<v;u++)G+="&nbsp;";v=true}}if(!v){v=p.split("=");if(v.length<2)v=p.split("-");if(v.length>=2&&(v[0].length==2||v[0].length==
3)&&v[0].substr(0,1)=="F"){G="&nbsp;&nbsp;&nbsp;";if(v[0].length==3)G+="&nbsp;";p=p.substr(v[0].length+1)}}}A+=G+"<a href=\"JavaScript:pressKey('"+B+"');\">"+p+"</a>"}else A+=r[q]}d=y?A:d;if(d!=c)if(i==null||d.indexOf("pressKey('option")>=0)a.innerHTML=d;else{c=l;l=a.parentNode.layerInfo;if(l!=null){c+=l.row;c+=(pui.genie.displaySize==80?24:27)-l.height-l.row+1}if(c>=i)a.innerHTML=d}else if(pui.genie.config.detectMenus==true){a=a;l=a.id.split("_");if(!(l.length<3)){d=Number(l[2]);if(!isNaN(d)){r=
ec(a);p=void 0;q=void 0;t=void 0;y=void 0;c=void 0;A=void 0;if(r.length==2){p=r.substr(0,1);q=r.substr(1,1);if(p>="0"&&p<="9"&&q=="."){c=p;A="D_"+l[1]+"_"+String(d+3)}}if(r.length==3){p=r.substr(0,1);q=r.substr(1,1);t=r.substr(2,1);if(q>="0"&&q<="9"&&t=="."){if(p==" "||p==String.fromCharCode(160))c=q;if(p>="0"&&p<="9")c=p+q;A="D_"+l[1]+"_"+String(d+4)}}if(r.length==4){p=r.substr(0,1);q=r.substr(1,1);t=r.substr(2,1);y=r.substr(3,1);if(t>="0"&&t<="9"&&y=="."){if(q==" "||q==String.fromCharCode(160))c=
t;else if(p==" "||p==String.fromCharCode(160))c=q+t;else if(p>="0"&&p<="9")c=p+q+t;A="D_"+l[1]+"_"+String(d+5)}}if(c!=null){c="option"+c;l=gc(A);if(l!=null){a.innerHTML="<a href=\"JavaScript:pressKey('"+c+"');\">"+a.innerHTML+"</a>";l.innerHTML="<a href=\"JavaScript:pressKey('"+c+"');\">"+l.innerHTML+"</a>"}}}}}}if(fb&&k>1&&f[h].className.indexOf("A27")==-1){if(e[k]==null){a=document.createElement("div");a.style.position="absolute";a.style.backgroundColor=hc(document.body,"background color");a.x1=
parseInt(f[h].style.left);a.x2=a.x1;a.y1=parseInt(f[h].style.top);a.y2=a.y1;a.yz=0;f[h].parentNode.insertBefore(a,f[h]);e[k]=a}else{a=e[k];k=parseInt(f[h].style.left);c=parseInt(f[h].style.top);var F;if(f[h].innerText)F=f[h].innerText.length;else if(f[h].textContent)F=f[h].textContent.length;if(F>1)k+=f[h].clientWidth;if(k<a.x1)a.x1=k;if(k>a.x2)a.x2=k;if(c<a.y1)a.y1=c;if(c>a.y2)a.y2=c}if(o!="")a.yz+=1}if(f[h].id&&f[h].id.length>=2&&f[h].id.substr(0,2)=="D_"||f[h].getAttribute("rowcol")!=null){kc(f[h],
"mouseover",lc);kc(f[h],"mouseout",mc);kc(f[h],"click",nc);f[h].getAttribute("menuIndex")!=null&&kc(f[h],"click",oc)}}}for(h in e){a=e[h];a.style.left=a.x1+"px";a.style.top=a.y1+"px";a.style.width=a.x2-a.x1+pui.multX+"px";a.style.height=a.y2-a.y1+pui.multY+"px";if(a.yz>=2)a.setAttribute("backgroundid","B_"+(Math.round(a.y1/pui.multY)+1)+"_"+(Math.round(a.x1/pui.multX)-1));else{a.style.visibility="hidden";a.style.display="none"}}rc();pui.genie.config.functionKeyButtons&&sc();if(pui.genie.config.setFieldBackground==
true){e=hc(document.body,"background color");f=document.getElementById(Ca).getElementsByTagName("div");for(h=0;h<f.length;h++)if(!(f[h].id&&f[h].id=="hiDiv"))if(!(f[h].ih&&f[h].ih==true))if(hc(f[h],"background color")=="transparent")f[h].style.backgroundColor=e}pui.genie.subfileInfo=null;if(pui.genie.config.detectSubfile&&!pui.ea)pui.genie.config.detectSubfilePatterns?vc():wc();!document.getElementById("hiDiv")&&!document.getElementById("subfile")&&pui.JH(b);if(pui.genie.config.enlargeHeadings&&!pui.genie.config.setFieldBackground){b=
document.getElementsByTagName("div");for(e=0;e<b.length;e++){f=b[e];if(f.parentNode.parentNode.grid==null&&(Zb(f)==1||Zb(f)==2)&&f.className=="A22"){h=f.offsetWidth;f.style.fontSize="16px";f.style.filter="progid:DXImageTransform.Microsoft.Shadow(color=#9999CC, direction=135, strength=2);";i=f.offsetWidth;h=i-h;f.style.left=parseInt(f.style.left)-h/2+"px"}}}pui.genie.config.detectDateFields&&xc();if(pui.genie.config.autoSizeFont){yc();kc(window,"resize",yc)}if(pui.is_ie&&pui.genie.config.overtypeMode!=
false){b=document.getElementsByTagName("input");for(e=0;e<b.length;e++)if((b[e].type=="text"||pui.Pe(b[e].type)||b[e].type=="")&&!b[e].disabled&&!b[e].readOnly)if(b[e].attachEvent){b[e].attachEvent("onbeforepaste",zc);b[e].attachEvent("onkeydown",Ac)}else{b[e].addEventListener("beforepaste",zc,false);b[e].addEventListener("onkeydown",Ac,false)}}if(pui.genie.config.keepInputFields){if(document.main.keepInputFields)b=document.main.keepInputFields;else{b=Ec("input","keepInputFields");b.type="hidden";
document.main.appendChild(b)}b.value="1"}if(pui.dirSeparator==null)pui.dirSeparator="/";pui.breakMessagesInit();pui.genie.afterInit!=null&&pui.genie.afterInit()};keyAhead=new (function(){this.Qi=null;this.QC=this.Dz=false;var b=this;this.record=function(a){if(pui.genie.formSubmitted)if(window.name==null||window.name=="")window.name=a;else window.name+=","+a};this.play=function(){b.QC=true;var a=window.name;window.name="";a=a.split(",");var c=false;if(b.Qi!=null)if(b.Qi.currentStyle){if(b.Qi.currentStyle.textTransform.toLowerCase()=="uppercase")c=true}else if(window.getComputedStyle)if(document.defaultView.getComputedStyle(b.Qi,null).getPropertyValue("text-transform").toLowerCase()==
"uppercase")c=true;for(var d=0;d<a.length;d++){var e=false,f=a[d];if(f.substr(0,5)=="shift"){e=true;f=f.substr(5)}f=Number(f);switch(f){case 0:break;case 16:break;default:var h=String.fromCharCode(f),i=true;if(e&&!b.Dz)i=false;if(!e&&b.Dz)i=false;if(c)i=false;if(i&&f>=65&&f<=90)h=h.toLowerCase();if(b.Qi!=null){e=b.Qi.value;e=e.substr(0,pui.genie.focusPos)+h+e.substr(pui.genie.focusPos+(pui.genie.config.overtypeMode?1:0));b.Qi.value=e;pui.genie.focusPos+=1}break}}b.QC=false}});function rc(b){var a=document.getElementById(Ca),c;a=b!=null?Array(b):a.getElementsByTagName("input");for(var d=0;d<a.length;d++){b=a[d];var e=b.id;if(e&&e.length>=2&&(e.substr(0,2)=="I_"||e.substr(0,2)=="R_"||e.substr(0,2)=="C_")||b.getAttribute("rowcol")!=null||b.fieldInfo!=null&&b.fieldInfo.type=="I"){if(b.type!="hidden"&&b.type!="button"&&b.type!="submit"&&!b.disabled){pui.genie.config.browserAutoComplete||b.setAttribute("autocomplete","off");c=b.getAttribute("num");if(c==null||c=="000"||c=="010")kc(b,
"keydown",Fc);else if(c=="011")kc(b,"keydown",Gc);else if(c=="101")kc(b,"keydown",Hc);else if(c=="111")kc(b,"keydown",Ic);else if(c=="001")kc(b,"keydown",Jc);else if(c=="110"){kc(b,"keydown",Kc);kc(b,"contextmenu",Kc)}c=b.getAttribute("autoEnter");if(c!=null)if((b.type=="radio"||b.type=="checkbox")&&c!="00")kc(b,"click",Lc);else pui.Bf(b)&&c=="Y"&&kc(b,"keyup",Mc);kc(b,"focus",Oc);kc(b,"blur",Pc);kc(b,"change",Qc);kc(b,"mouseover",lc);kc(b,"mouseout",mc);kc(b,"mousedown",Rc);kc(b,"mouseup",Sc);kc(b,
"keyup",Tc);kc(b,"blur",Uc);b.Uq=0;kc(b,"mouseup",pui.hn);kc(b,"mousedown",pui.hn);kc(b,"keyup",pui.hn);if(b.getAttribute("ME")=="Y"&&b.getAttribute("MF")!="Y"){Pb.push(b);if(b.fieldInfo!=null){b.fieldInfo.Ks=[];for(c=0;c<a.length;c++)a[c].id!=e&&a[c].fieldInfo!=null&&a[c].fieldInfo.Ir==b.fieldInfo.Ir&&b.fieldInfo.Ks.push(a[c])}}b.fieldInfo&&b.fieldInfo.dup==true&&kc(b,"keydown",pui.lA)}}else if(e&&e.length>=2&&e.substr(0,2)=="S_"&&b.type=="button"&&b.getAttribute("pushButtonIndex")!=null){kc(b,"focus",
nc);kc(b,"click",Vc)}else if(e&&e.length>=2&&e.substr(0,2)=="S_"&&(b.type=="radio"||b.type=="checkbox"))kc(b,"keydown",Fc);else if(b.tagName=="TEXTAREA"){kc(b,"focus",function(f){Wc(f).related instanceof Array&&Oc(f)});kc(b,"blur",function(f){Wc(f).related instanceof Array&&Pc(f)})}}}function Vc(b){b=b||window.event;b=b.target||b.srcElement;document.getElementById("pushButtonIndex").value=b.getAttribute("pushButtonIndex");Xc(b.getAttribute("key"))}
function oc(b){b=b||window.event;b=b.target||b.srcElement;document.forms.main.menuIndex.value=b.getAttribute("menuIndex");Yc(b.id);bd("enter")}function nc(b){b=b||window.event;b=Wc(b);if(b.tagName=="A")b=b.parentNode;b=b.fieldInfo;if(b!=null&&b.row!=null&&b.col!=null){pui.response.crow=b.row;pui.response.ccol=b.col}}function Rc(){ob=true}function Sc(){ob=false}
function sc(){for(var b=document.getElementsByTagName("a"),a=0,c=null,d=b.length-1;d>=0;d-=1){var e=b[d],f=e.href;f=f.replace("JavaScript:","javascript:");var h=e.parentNode,i=h.innerHTML.substr(0,2).toLowerCase()==="<a";if(c!=h)a=0;c=h;if(h.tagName=="DIV"&&f.indexOf("javascript:pressKey('")>=0&&f.indexOf("pressKey('option")<0){f=f.replace("javascript:pressKey('","");f=f.replace("');","");var m=document.createElement("input");m.type="button";m.style.position="absolute";m.style.left=h.offsetLeft+e.offsetLeft-
a+"px";m.style.top=h.offsetTop+"px";m.style.paddingLeft="2px";m.style.paddingRight="2px";m.style.paddingTop="0px";m.style.paddingBottom="0px";m.style.overflow="visible";m.className="button";m.fkey=f;if(h.className.indexOf("A27")!=-1)m.className+=" hide";m.onclick=function(k){k=Wc(k);if(!k.fkey)for(var o=k.parentElement;o;){k=o;if(k.fkey)break;o=k.parentElement}bd(k.fkey)};m.value=ec(e);if(!pui.is_quirksmode)m.style.width=(cd(m.value)+0.5)*pui.multX+"px";h.parentNode.insertBefore(m,h);m.style.zIndex=
h.currentStyle?h.currentStyle.zIndex:window.getComputedStyle?document.defaultView.getComputedStyle(h,null).getPropertyValue("z-index"):10;m.style.zIndex=Number(m.style.zIndex)+1;if(i){hyperlinkSize=ec(e).length*pui.multX;a+=hyperlinkSize;h.style.left=parseInt(h.style.left)+hyperlinkSize+"px"}else{i="";for(var l=ec(e).length,r=0;r<l;r++)i+="\u00a0";h.insertBefore(document.createTextNode(i),e)}e.parentNode.removeChild(e);e=false;if(h.getElementsByTagName("a").length>0)e=true;else if($b(ec(h))!="")e=
true;else{i=hc(h,"background color");if(i!=null&&typeof i=="string"&&i.substr(0,1)=="#"&&pui["fkey buttons compatibility mode"]==false)e=true}if(e){m.id=h.parentNode.tagName.toUpperCase()=="DIV"?h.id.substr(0,h.id.length-3)+"_"+f+h.id.substr(h.id.length-3):h.id+"_"+f;if(pui["fkey buttons compatibility mode"]==true)m.id=h.id}else{m.id=h.id;h.parentNode.removeChild(h)}}}}
function cd(b){for(var a=0,c=0;c<b.length;c++){var d=b.charCodeAt(c);if(d>=13312&&d<=40959||d>=63744&&d<=64255)a+=2;else a++}return a}
function xc(){function b(k,o){setTimeout(function(){k.calimg==null&&dd(k,o)},2)}var a=pui.genie.config.defaultDateFormat;a||(a=pui.defaultDateFormat?pui.defaultDateFormat:"MM/DD/YY");var c=a.substr(2,1),d=null,e=null;if(c=="."||c=="/"){d=2;e=5}if(a=="YYYY-MM-DD"){d=4;e=7;c="-"}else if(a=="YYYY/MM/DD"){d=4;e=7;c="/"}if(!(d==null||e==null))for(var f=a.length,h=document.getElementsByTagName("input"),i=0;i<h.length;i++){var m=h[i],l=false;if((m.type=="text"||pui.Pe(m.type))&&m.maxLength==f&&!m.readOnly&&
m.value.substr(d,1)==c&&m.value.substr(e,1)==c){l=true;for(j=0;j<f;j++)if(j!=d&&j!=e){var r=m.value.substr(j,1);if(r!=" "&&(r<"0"||r>"9"))l=false}}l&&b(m,a)}}function zc(b){if(pui.is_ie){b=Wc(b);var a=pui.genie.dj.getSelection(),c=pui.genie.dj.Kv(b);a=a.length;ed(b);pui.genie.dj.wH(c,c+a,b)}}function Ac(b){var a=Wc(b);if(!b)b=window.event;b.keyCode==45&&b.shiftKey!=true&&b.ctrlKey!=true&&ed(a)}
function ed(b){var a=fd(b),c=b.value;for(c=bc(c);c.length<a;)c+=" ";b.value=c;if(b.createTextRange!=null)if(b=b.createTextRange()){b.moveStart("character",a);b.collapse();b.select()}}
function gd(){if(!pui.Og){var b;pui.genie.alertMsg!=""&&pui.alert(pui.genie.alertMsg);if(pui.genie.focusFieldNum==0&&pui.genie.ca==null)if(pui.genie.inputFields.length>0)pui.genie.tm=hd();else{pui.focusOnContainer();pui.genie.tm=null}else{b=pui.genie.ca;pui.genie.tm=b;if(b.comboBoxWidget!=null)b=b.comboBoxWidget.H();if(b!=null&&b.parentTabPanel!=null&&b.parentTab!=null&&b.style!=null&&b.style.visibility=="hidden"&&b.getAttribute("tabindex")!="-1"){var a=gc(b.parentTabPanel);a!=null&&a.setTab(b.parentTab)}if(b!=
null&&b.style!=null&&b.style.visibility!="hidden"&&b.getAttribute("tabindex")!="-1"){try{if(!pui.is_touch||pui.is_mouse_capable)pui.is_ie&&pui.ie_version>=11?setTimeout(function(){b.focus()},100):b.focus();else Yc(b.id);if(pui.is_ie&&pui.ie_version<11&&b.createTextRange!=null){b.select();var c=b.createTextRange();if(c!=null&&c.collapse!=null&&c.select!=null){c.collapse();c.select()}b.focus()}}catch(d){}if(pui.genie.config.enableKeyAhead){keyAhead.Qi=b;keyAhead.play()}}else pui.genie.tm=hd()}}}
function hd(){var b=null;if(document.forms.main.elements[0]!=null){var a=/hide/,c,d=document.forms.main.length;for(c=0;c<d;c++){var e=document.forms.main.elements[c],f=e.className;if(e.type!="hidden"&&e.type!="submit"&&(e.type!="button"||e.type=="button"&&e.getAttribute("pushButtonIndex")!=null)&&e.tagName!="FIELDSET"&&e.style.visibility!="hidden"&&!e.disabled&&!e.readOnly&&!f.match(a)){try{b=e;b.focus();if(pui.is_old_ie&&b.createTextRange!=null){b.select();var h=b.createTextRange();if(h!=null&&h.collapse!=
null&&h.select!=null){h.collapse();h.select()}b.focus()}}catch(i){}break}}}return b}
function jd(b){if(document.forms.main.elements[0]!=null){var a=/hide/,c,d=document.forms.main.length;for(c=0;c<d;c++){var e=document.forms.main.elements[c],f=e.className;if((e.type=="text"||pui.Pe(e.type)||e.tagName=="SELECT")&&!e.disabled&&!e.readOnly&&!f.match(a)&&Zb(e)>=pui.genie.menuFieldStartRow&&Zb(e)<=pui.genie.menuFieldEndRow&&kd(e)>=pui.genie.menuFieldStartColumn&&kd(e)<=pui.genie.menuFieldEndColumn){a=null;if(e.style.visibility=="hidden"){c=document.getElementsByTagName("textarea");if(c!=
null&&c.length>=1){c=c[0];if(c.related&&c.related.length>=1&&c.related[0]==e)a=c}}e.value=b;if(e.fieldInfo!=null&&e.fieldInfo.idx!=null)pui.response[e.fieldInfo.idx]=e;if(a!=null){a.value=b;if(a.fieldInfo!=null&&a.fieldInfo.idx!=null)pui.response[a.fieldInfo.idx]=a}bd("Enter");break}}}}
function Xc(b){var a;if(N=="genie")if(!(pui.ea&&pui.mm.WI(b)==true))if(Ga!=0)setTimeout(function(){Xc(b)},50);else{if(qb&&qb.getAttribute("MF")=="Y"&&qb.dirty&&qb.tagName=="INPUT"&&(qb.type=="text"||pui.Pe(qb.type))){var c=qb.getAttribute("maxLength");qb.getAttribute("signedNumeric")=="Y"&&c--;if(c!=null&&qb.value.length<c){ld(qb,"blur",Pc);pui.alert(pui.getLanguageText("runtimeMsg","MF"));kc(qb,"blur",Pc);return}}if(Qb&&!pui.genie.fy[b])for(a=0;a<Pb.length;a++){c=Pb[a];if(!c.dirty){if(c.parentTabPanel!=
null&&c.parentTab!=null){var d=gc(c.parentTabPanel);d!=null&&d.setTab!=null&&d.setTab(c.parentTab)}pui.alert(pui.getLanguageText("runtimeMsg","ME"));try{c.focus()}catch(e){}return}}if(qb&&qb.id&&qb.id.length>=2&&qb.id.substr(0,2)=="I_")if(qb.type&&(qb.type=="text"||pui.Pe(qb.type)))if(Uc(null,qb)==false)return;for(a=0;a<document.forms.main.elements.length;a++)if(document.forms.main.elements[a].name==b&&document.forms.main.elements[a].type=="hidden"){d=document.forms.main.elements[a];break}if(d!=null)d.value=
"On";else{d=document.createElement("INPUT");d.type="hidden";d.name=b;d.value="On";document.forms.main.appendChild(d)}pui.genie.bM();pui.OD(b)}}pui.genie.bM=function(){for(var b=document.getElementById(Ca).getElementsByTagName("textarea"),a=0;a<b.length;a++){var c=b[a];if(c.related!=null)for(var d=c.value.replace(/\r/g,"").split("\n"),e=0;e<c.related.length;e++){var f=c.related[e];f.value=e<d.length?d[e]:"";if(f.fieldInfo!=null&&f.fieldInfo.idx!=null)pui.response[f.fieldInfo.idx]=f}}};
function md(b){var a="";b=String(b);b=b.toUpperCase();switch(b){case "ENTER":case "RETURN":a="F1";break;case "F1":case "F01":case "CF01":case "CF1":case "CA01":case "CA1":a="31";break;case "F2":case "F02":case "CF02":case "CF2":case "CA02":case "CA2":a="32";break;case "F3":case "F03":case "CF03":case "CF3":case "CA03":case "CA3":a="33";break;case "F4":case "F04":case "CF04":case "CF4":case "CA04":case "CA4":a="34";break;case "F5":case "F05":case "CF05":case "CF5":case "CA05":case "CA5":a="35";break;
case "F6":case "F06":case "CF06":case "CF6":case "CA06":case "CA6":a="36";break;case "F7":case "F07":case "CF07":case "CF7":case "CA07":case "CA7":a="37";break;case "F8":case "F08":case "CF08":case "CF8":case "CA08":case "CA8":a="38";break;case "F9":case "F09":case "CF09":case "CF9":case "CA09":case "CA9":a="39";break;case "F10":case "CF10":case "CA10":a="3A";break;case "F11":case "CF11":case "CA11":a="3B";break;case "F12":case "CF12":case "CA12":a="3C";break;case "F13":case "CF13":case "CA13":a=
"B1";break;case "F14":case "CF14":case "CA14":a="B2";break;case "F15":case "CF15":case "CA15":a="B3";break;case "F16":case "CF16":case "CA16":a="B4";break;case "F17":case "CF17":case "CA17":a="B5";break;case "F18":case "CF18":case "CA18":a="B6";break;case "F19":case "CF19":case "CA19":a="B7";break;case "F20":case "CF20":case "CA20":a="B8";break;case "F21":case "CF21":case "CA21":a="B9";break;case "F22":case "CF22":case "CA22":a="BA";break;case "F23":case "CF23":case "CA23":a="BB";break;case "F24":case "CF24":case "CA24":a=
"BC";break;case "PAGEUP":case "ROLLDOWN":case "ROLLDDN":case "ROLLDN":a="F4";break;case "PAGEDOWN":case "PAGEDN":case "ROLLUP":a="F5";break;case "QUIT":case "DISCONNECT":a="QUIT";break;case "ATTN":case "ATTENTION":a="ATTN";break;case "SRQ":case "SYSRQ":case "SYSREQ":case "SYSREQUEST":case "SYSTEMREQ":case "SYSTEMREQUEST":a="SYSRQ";break;case "ERRORHELP":a="ERRORHELP";break;case "HELP":a="F3";break;case "PRINT":a="F6";break;case "ROLLLEFT":a="D9";break;case "ROLLRIGHT":a="DA";break;case "CLEAR":a=
"BD";break;case "HOME":a="F8";break}return a}
function nd(b){var a=null;b=b.toUpperCase();switch(b){case "F1":a="Enter";break;case "31":a="F1";break;case "32":a="F2";break;case "33":a="F3";break;case "34":a="F4";break;case "35":a="F5";break;case "36":a="F6";break;case "37":a="F7";break;case "38":a="F8";break;case "39":a="F9";break;case "3A":a="F10";break;case "3B":a="F11";break;case "3C":a="F12";break;case "B1":a="F13";break;case "B2":a="F13";break;case "B3":a="F15";break;case "B4":a="F16";break;case "B5":a="F17";break;case "B6":a="F18";break;
case "B7":a="F19";break;case "B8":a="F20";break;case "B9":a="F21";break;case "BA":a="F22";break;case "BB":a="F23";break;case "BC":a="F24";break;case "F4":a="PageUp";break;case "F5":a="PageDown";break;case "F3":a="Help";break;case "F6":a="Print";break;case "F8":a="Home";break;case "D9":a="RollLeft";break;case "DA":a="RollRight";break;case "BD":a="Clear";break}return a}function od(b){var a="";switch(b){case 13:a="F1";break;case 33:a="F4";break;case 34:a="F5";break}return a}
pui.genie.onkeyup=function(b){if(!b)b=window.event;if(b.keyCode==16)mb=false};
pui.genie.onkeydown=function(b){if(N=="genie")if(document.forms.main!=null){if(!b)b=window.event;var a=b.keyCode,c,d=Wc(b);if(d!=null){c=d.className;if(c!=null){if(c.indexOf("ace")>=0&&pd())return;if(c.indexOf("editor-textarea")>=0&&pd())return}}if(pui.Su)pui.Iq(b);else{if(pui.genie.config.enableKeyAhead){var e;if(b.Ff)e=b.Ff&&Event.Fl;if(!b.Ff)e=b.shiftKey;e?keyAhead.record("shift"+a):keyAhead.record(a)}if(a==16)mb=true;c=a-111;if(b.ctrlKey&&c==9)pui.downloadJSON();else if(!pui.genie["browser handles home key"]&&
a==36){a=false;if(d!=null&&pui.genie.tm!=null&&pui.genie.tm.id==d.id)if(pui.genie.dj.Kv(d)==0){bd("HOME");a=true;if(pui.is_old_ie&&pui.ie_mode>=5)try{b.keyCode=0}catch(f){}}a||gd()}else{d=pui.genie.UA(b);if(d!=""){if(d=="HELP"&&pui["5250"].state=="P")d="ERRORHELP";qd(b);bd(d);if(pui.is_old_ie&&pui.ie_mode>=5)try{b.keyCode=0}catch(h){}}else{if(c>=1&&c<=12){qd(b);if(!pui.is_old_ie||pui.ie_mode<5||c>1||b.shiftKey){if(b.shiftKey)c+=12;else if(b.Ff&&Event.Fl)c+=12;bd(c<10?"CF0"+c:"CF"+c);if(pui.is_old_ie&&
pui.ie_mode>=5)try{b.keyCode=0}catch(i){}}}else{d=od(a,b);if(d!=""){qd(b);Xc(d);if(pui.is_old_ie&&pui.ie_mode>=5)try{b.keyCode=0}catch(m){}}}if(a!=16)mb=false}}}}};function rd(b){if(!mb){if(!b)b=window.event;if(b.altKey)pui["5250"].state=="P"?bd("ErrorHelp"):bd("Help");else bd("F1")}}
function Tc(b){if(pui.genie.Ps){var a,c,d;if(!pui.is_opera){if(!b)b=window.event;a=b.keyCode;b=b.target||b.srcElement;c=Number(b.getAttribute("maxLength"));if(a>=65&&a<=90||a>=48&&a<=57||a==186||a==188||a==190||a==191||a==192||a==59||a>=219&&a<=222||a==106||a==pui["field exit key"]||a==pui["field exit minus key"]||a==109||a==110||a==111||a==61||a==32||a>=96&&a<=105){Qb=true;pui.genie.eC(b);if(b.tagName!="SELECT")if(!(b.tagName=="INPUT"&&!pui.Bf(b))){a=fd(b);if(a<0)a=b.value.length;if(b.fieldInfo&&
b.fieldInfo.DBCSDataType&&b.fieldInfo.DBCSDataType!="G"){d=sd(bc(b.value));if(d>c)for(td=1;td<=d;td++){b.value=b.value.slice(0,-1);d=sd(bc(b.value));if(d<=c)break}}if(a>=c&&b.getAttribute("FE")!="Y"&&(!pui.is_touch||pui.is_mouse_capable))ud(b)}}}}}pui.genie.eC=function(b){b.dirty=true;if(b.fieldInfo!=null&&b.fieldInfo.Ks!=null)for(var a=0;a<b.fieldInfo.Ks.length;a++)b.fieldInfo.Ks[a].dirty=true};
function vd(b){var a,c,d,e=/hide/,f=Zb(b,true),h=kd(b,true);a=999;for(var i=c=0;i<document.forms.main.elements.length;i++){var m=document.forms.main.elements[i],l=m.className,r=false;if(m.type!="hidden"&&m.type!="button"&&m.type!="submit"&&m.tagName!="FIELDSET"&&!m.disabled&&!m.readOnly&&m.style.visibility!="hidden"&&!l.match(e))r=true;if(m.tagName=="INPUT"&&m.type=="hidden"){l=m.getAttribute("pui_menu_id");if(typeof l=="string"){m=gc(l);r=true}}if(r){r=Zb(m,true);l=kd(m,true);if(r>f&&(r<a||r==a&&
Math.abs(l-h)<Math.abs(c-h))){c=l;a=r;d=m}}}if(d!=null){a=fd(b);if(a>=0){pui.genie.focusPos=a+kd(b)-kd(d);if(pui.genie.focusPos<0)pui.genie.focusPos=0;a=Number(d.getAttribute("maxLength"));if(pui.genie.focusPos>=a){pui.genie.focusPos=a;if($b(d.value)=="")pui.genie.focusPos=0}}else pui.genie.focusPos=0;try{d.focus()}catch(k){return false}}return d==null||d.parentNode!=b.parentNode?false:true}
function wd(b){for(var a,c,d,e=/hide/,f=Zb(b,true),h=kd(b,true),i=c=a=0;i<document.forms.main.elements.length;i++){var m=document.forms.main.elements[i],l=m.className,r=false;if(m.type!="hidden"&&m.type!="button"&&m.type!="submit"&&m.tagName!="FIELDSET"&&!m.disabled&&!m.readOnly&&m.style.visibility!="hidden"&&!l.match(e))r=true;if(m.tagName=="INPUT"&&m.type=="hidden"){l=m.getAttribute("pui_menu_id");if(typeof l=="string"){m=gc(l);r=true}}if(r){r=Zb(m,true);l=kd(m,true);if(r<f&&(r>a||r==a&&Math.abs(l-
h)<Math.abs(c-h))){c=l;a=r;d=m}}}if(d!=null){a=fd(b);if(a>=0){pui.genie.focusPos=a+kd(b)-kd(d);a=Number(d.getAttribute("maxLength"));if(pui.genie.focusPos>=a){pui.genie.focusPos=a;if($b(d.value)=="")pui.genie.focusPos=0}}else pui.genie.focusPos=0;try{d.focus()}catch(k){return false}}return d==null||d.parentNode!=b.parentNode?false:true}pui.wr=function(b){b=b.parentNode;if(b.comboBoxWidget!=null)b=b.parentNode;if(b.parentNode!=null&&b.parentNode.grid!=null)b=b.parentNode.parentNode;return b};
pui.NB=function(b){var a=b.parentNode;if(b.comboBoxWidget)a=a.parentNode;if(a.parentNode!=null&&a.parentNode.grid!=null)return true;return false};
function ud(b,a){if(!(pui.genie.config.preventAutoTab&&a)){var c,d,e,f,h,i,m=/hide/,l=Zb(b,true),r=kd(b,true);c=999;d=0;f=999;h=0;if(b.fieldInfo&&b.fieldInfo.cursor_prog){var k=document.forms.main.elements["InputField"+(b.fieldInfo.cursor_prog-1)];if(k&&!k.disabled&&!k.readOnly&&k.style.visibility!="hidden"&&!k.className.match(m))e=k}if(!e){for(k=0;k<document.forms.main.elements.length;k++){var o=document.forms.main.elements[k],p=o.className,q=false;if(o.type!="hidden"&&o.type!="button"&&o.type!=
"submit"&&o.tagName!="FIELDSET"&&!o.disabled&&!o.readOnly&&o.style.visibility!="hidden"&&!p.match(m))q=true;if(o.tagName=="INPUT"&&o.type=="hidden"){p=o.getAttribute("pui_menu_id");if(typeof p=="string"){o=gc(p);q=true}}if(q){q=Zb(o,true);p=kd(o,true);if((q>l||q==l&&p>r)&&(q<c||q==c&&p<d)){d=p;c=q;e=o}if(q<f||q==f&&p<h){h=p;f=q;i=o}}}if(e==null)e=i}d=c=null;if(e!=null){c=pui.wr(b);d=pui.wr(e)}if(e!=null&&d==c){pui.genie.focusPos=0;try{e.focus()}catch(u){return false}return true}else return false}}
function yd(b,a,c){var d;if(!(pui.genie.config.preventAutoTab&&c)){var e,f,h,i,m,l,r=/hide/,k=Zb(b,true),o=kd(b,true);e=-1;f=0;i=-1;m=0;if(b.fieldInfo&&b.fieldInfo.idx>=0){var p=b.fieldInfo&&b.fieldInfo.idx+1;for(c=0;c<document.forms.main.elements.length;c++){d=document.forms.main.elements[c];if(d.fieldInfo&&d.fieldInfo.cursor_prog&&d.fieldInfo.cursor_prog==p)if((d=d)&&!d.disabled&&!d.readOnly&&d.style.visibility!="hidden"&&!d.className.match(r)){h=d;break}}}if(!h){for(c=0;c<document.forms.main.elements.length;c++){d=
document.forms.main.elements[c];var q=d.className;p=false;if(d.type!="hidden"&&d.type!="button"&&d.type!="submit"&&d.tagName!="FIELDSET"&&!d.disabled&&!d.readOnly&&d.style.visibility!="hidden"&&!q.match(r))p=true;if(d.tagName=="INPUT"&&d.type=="hidden"){q=d.getAttribute("pui_menu_id");if(typeof q=="string"){d=gc(q);p=true}}if(p){p=Zb(d,true);q=kd(d,true);if((p<k||p==k&&q<o)&&(p>e||p==e&&q>f)){f=q;e=p;h=d}if(p>i||p==i&&q>m){m=q;i=p;l=d}}}if(h==null)h=l}c=l=null;if(h!=null){l=pui.wr(b);c=pui.wr(h)}if(h!=
null&&c==l){pui.genie.focusPos=h.getAttribute("maxLength");if(pui.genie.focusPos==null)pui.genie.focusPos=0;if(a!=null)pui.genie.focusPos=a;try{h.focus()}catch(u){return false}return true}else return false}}
function Ub(){var b=pui.Mh(pui["function key pattern2"],true);if(b){b=new pui.ak({pattern:b,No:pui.qd(pui.genie.config.minFKeyRow,1),Cm:5,Sr:function(a){return!isNaN(a.key)&&a.key>=1&&a.key<=24},Jm:function(a){return{prefix:a[1].trim(),key:parseInt(a[2],10),label:a[4]}},aj:"fkeys2",Bw:function(a){return a.prefix+a.key},ym:function(a,c){c.innerHTML="<a href=\"JavaScript:pressKey('CF"+(a.key<10?"0":"")+a.key+"');\">"+(pui.genie.config.hideFKeyNames?a.label:a.prefix+a.key+"="+a.label)+"</a>";c.YG=true}});
Dd(b);Ed(b);Fd(b)}}
function Xb(){var b,a,c;if(c=pui.Mh(pui["menu pattern"],true)){var d={};Dd(new pui.ak({pattern:c,Cm:4,Jm:function(i){return{key:i[1]}},FB:function(i,m,l,r,k){return m.row==l&&(r==m.col||r>m.col&&r<k)},zC:function(i,m){var l=i.row,r=i.col,k={opt:i.key,div:m};if(d[l]==null)d[l]={};if(d[l][r]==null)d[l][r]=[];d[l][r].push(k)},xv:true}));for(b in d){b=parseInt(b,10);for(a in d[b]){a=parseInt(a,10);var e=a-1,f=a+1;for(c=b+1;c<pui.genie.Pj.length;c++){var h=false;if(d[c]!=null)if(d[c][e]!=null){h=true;
d[c][e].above=true}else if(d[c][a]!=null){h=true;d[c][a].above=true}else if(d[c][f]!=null){h=true;d[c][f].above=true}if(h){d[b][a].below=true;break}else if(pui["menu pattern mode"]==1&&pui.genie.Pj[b].substring(e,e+3)!="   ")break}}}for(b in d){b=parseInt(b,10);for(a in d[b]){a=parseInt(a,10);if(d[b][a].above||d[b][a].below)for(c=0;c<d[b][a].length;c++){e=d[b][a][c].opt;f=d[b][a][c].div;h=f.innerHTML;if(h.indexOf("<a href=")<0)f.innerHTML="<a href=\"javascript:pressKey('option"+e+"');\">"+h+"</a>"}}}}}
function Wb(){var b=pui.Mh(pui["special key pattern2"],true);if(b){b=new pui.ak({pattern:b,No:pui.qd(pui.genie.config.minFKeyRow,1),Cm:4,Jm:function(a){var c=a[1];if(pui["special key map"]!=null&&pui["special key map"][c]!=null)c=pui["special key map"][c];return{key:a[1],keyName:c,label:a[a.length-1]}},aj:"spkeys",Bw:function(a){return a.keyName},ym:function(a,c){c.innerHTML="<a href=\"JavaScript:pressKey('"+a.keyName+"');\">"+(pui.genie.config.hideFKeyNames?a.label:a.key+"="+a.label)+"</a>"}});Dd(b);
Ed(b);Fd(b)}}
function fc(b,a,c,d,e){var f="",h=" ",i=" ",m=" ",l=" ",r=" ",k=" ",o=" ";i=" ";l="";h=Gd(b,a,1);i=Gd(b,a+1,1);m=Gd(b,a+2,1);l=Gd(b,a+3,1);r=l.toUpperCase();k=Gd(b,a+4,1);o=k.toUpperCase();if(pui.genie.config.detectMenus==true)if(c!=null){var p;if(c!="")p=c.substr(0,1).toUpperCase();else if(d!="")p=d.substr(0,1).toUpperCase();if(p!=null){if(b.length==2&&h>="0"&&h<="9"&&i=="."&&pui.genie.Qr(p)){f="option"+h;e.Pz=true}if(b.length==3&&h>="0"&&h<="9"&&i>="0"&&i<="9"&&m=="."&&pui.genie.Qr(p)){f="option"+
Gd(b,a,2);e.Pz=true}}}else{if(h>="0"&&h<="9"&&(Gd(b,a+1,2)==". "||Gd(b,a+1,7)==".&nbsp;")&&pui.genie.Qr(r))f="option"+h;if(h>="0"&&h<="9"&&i>="0"&&i<="9"&&(Gd(b,a+2,2)==". "||Gd(b,a+2,7)==".&nbsp;")&&pui.genie.Qr(o))f="option"+Gd(b,a,2)}if(a!=1)if(Gd(b,a-1,1)!=" ")if(a>6){if(Gd(b,a-6,6)!="&nbsp;")return""}else return"";if(c=pui.Mh(pui["function key pattern"])){c.lastIndex=0;if(c=c.exec(b)){b=parseInt(c[2],10);f="CF";if(b<10)f+="0";f+=b;return f}}else{if(Gd(b,a,1)=="F"){if(i>="1"&&i<="9"&&(Gd(b,a+
2,1)=="="||Gd(b,a+2,1)=="-"))f="CF0"+Gd(b,a+1,1);if(i=="0"||i=="1"||i=="2"){m=Gd(b,a+2,1);if(m>="0"&&m<="9"&&(Gd(b,a+3,1)=="="||Gd(b,a+3,1)=="-"))f="CF"+Gd(b,a+1,2)}}if(Gd(b,a,2).toUpperCase()=="CK"||Gd(b,a,2).toUpperCase()=="CF"||Gd(b,a,2).toUpperCase()=="CA")if(m>="1"&&m<="9"&&(l=="="||l=="-"))f="CF0"+m;else if(m=="0"||m=="1"||m=="2")if(l>="0"&&l<="9"&&(k=="="||k=="-"))f="CF"+m+l;if(Gd(b,a,3).toUpperCase()=="CMD"){if(l>="1"&&l<="9"&&(k=="-"||k=="="))f="CF0"+Gd(b,a+3,1);i=Gd(b,a+5,1);if((l=="1"||
l=="2")&&k>="0"&&k<="9"&&(i=="-"||i=="="))f="CF"+Gd(b,a+3,2)}}if(c=pui.Mh(pui["special key pattern"])){c.lastIndex=0;if(c=c.exec(b)){f=c[1];if(pui["special key map"]!=null&&pui["special key map"][f]!=null)f=pui["special key map"][f];if(f.length>2)f=f.substr(0,1).toUpperCase()+f.substr(1).toLowerCase();switch(f){case "Pgup":case "Pageup":case "Rolldn":case "Rolldown":f="PageUp";break;case "Pgdn":case "PageDown":case "Rollup":f="PageDown";break}return f}}else{l=Gd(b,a,6);if(l=="Enter="||l=="ENTER="||
pui.genie.config.enterButton==true&&Gd(b,a,16).toUpperCase()=="PRESS&NBSP;ENTER")f="Enter";if(Gd(b,a,5).toUpperCase()=="PGUP-"||Gd(b,a,5).toUpperCase()=="PGUP=")f="PageUp";if(Gd(b,a,5).toUpperCase()=="PGDN-"||Gd(b,a,5).toUpperCase()=="PGDN=")f="PageDown";if(Gd(b,a,7).toUpperCase()=="ROLLUP-"||Gd(b,a,7).toUpperCase()=="ROLLUP=")f="PageDown";if(Gd(b,a,7).toUpperCase()=="ROLLDN-"||Gd(b,a,7).toUpperCase()=="ROLLDN=")f="PageUp";if(Gd(b,a,5).toUpperCase()=="HELP-"||Gd(b,a,5).toUpperCase()=="HELP=")f="Help";
if(Gd(b,a,6).toUpperCase()=="PRINT-"||Gd(b,a,6).toUpperCase()=="PRINT=")f="Print"}if(pui.genie.config.detectSubfileMore==true){c=$b(pui.genie.config.subfileMoreText);d=c.length;if(!pui.genie.config.detectSubfilePatterns&&Gd(b,a,d)==c)f="PageDown"}return f}pui.genie.Qr=function(b){return b!=" "&&(b<"0"||b>"9")};function Gd(b,a,c){return c?b.substr(a-1,c):b.substr(a-1)}
function wc(){var b,a,c,d,e,f,h=document.getElementsByTagName("div"),i=document.getElementsByTagName("input"),m=f=null,l,r,k;c=pui.genie.config.optionHeadings.toUpperCase().split(",");e=pui.genie.config.subfileMoreText;d=pui.genie.config.subfileBottomText;for(l=0;l<h.length;l++){k=h[l].innerHTML;if(k=="&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"+d||k=="&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"+e||k=="&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A href=\"javascript:pressKey('PageDown');\">"+e+"</A>"||k=="&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href=\"JavaScript:pressKey('PageDown');\">"+
e+"</a>"||k=="&nbsp;&nbsp;&nbsp;&nbsp;Bottom&nbsp;&nbsp;"||k==d||k==e||k=="<A href=\"javascript:pressKey('PageDown');\">"+e+"</A>")m=h[l];for(var o=0;o<c.length;o++){b=k.toUpperCase();var p=k.substr(0,c[o].length+1).toUpperCase(),q=k.substr(0,c[o].length+6).toUpperCase(),u=c[o],v=u+" ",t=u+"&NBSP;";if(b==u||p==v||q==t)if(f==null){f=h[l];break}else{b=h[l].parentNode;if(b!=null&&b.id!=null&&b.id.substr(0,6)=="window")if(f.parentNode==null||f.parentNode.id==null||f.parentNode.id.substr(0,6)!="window"){f=
h[l];break}}}}Fb=0;if(f!=null){b=f.parentNode;if(b!=null&&b.id!=null&&b.id.substr(0,6)=="window"){xb=b;xb.NO=parseInt(xb.style.top);yb=xb.id.substr(6)}if(xb==null){r=h[h.length-1].parentNode;if(gc("window1")!=null||r!=null&&r.id!=null&&r.id.substr(0,6)=="window")return}Gb=Zb(f);Ib=kd(f);for(r=Gb+1;r<=Gb+pui.genie.config.subfileHeadingRows;r++){for(k=Ib;k<Ib+3;k++){l="I_"+r+"_"+k;if(xb!=null)l+="_W"+yb;l=document.getElementById(l);if(l!=null&&(xb==null||l.parentNode==xb)){Fb=k;break}}if(Fb!=0)break}}if(sb!=
null&&typeof sb=="number"&&vb!=null&&typeof vb=="number"){Fb=sb;r=vb;Gb=vb-1;Ib=sb}k=0;if(pui.genie.config.subfileStartLine!=null&&pui.genie.config.subfileEndLine!=null&&Number(pui.genie.config.subfileStartLine)>0&&Number(pui.genie.config.subfileEndLine)>0){e=true;d=document.getElementById(Ca);for(a=Number(pui.genie.config.subfileStartLine);a<=Number(pui.genie.config.subfileEndLine);a++){k++;pui.genie.config.stripedSubfile&&Hd(d,Fb,a,e);for(l=0;l<h.length;l++){c=h[l];b=c.parentNode;b!=null&&b.id!=
null&&b.id.substr(0,6)=="window"||c.id!="popcal"&&Id(c,a,e)}for(l=0;l<i.length;l++){f=i[l];b=f.parentNode;b!=null&&b.id!=null&&b.id.substr(0,6)=="window"||Id(f,a,e)}e=!e}}else if(Fb>0){if(pui.genie.config.hideSubfileOpt){f.style.visibility="hidden";f.value="";l=document.getElementById("D_"+a+"_"+Fb+(xb!=null?"_W"+yb:""));if(l!=null)l.style.visibility="hidden"}a=r;l="I_"+a+"_"+Fb;if(xb!=null)l+="_W"+yb;f=document.getElementById(l);l=document.getElementById("I_"+(a+1)+"_"+Fb+(xb!=null?"_W"+yb:""));
c=document.getElementById("I_"+(a+2)+"_"+Fb+(xb!=null?"_W"+yb:""));if(f!=null&&l==null&&c!=null&&f.maxLength==c.maxLength){ib=2;hb=true}else{e=document.getElementById("I_"+(a+3)+"_"+Fb+(xb!=null?"_W"+yb:""));if(f!=null&&l==null&&c==null&&e!=null&&f.maxLength==e.maxLength){ib=3;hb=true}else{d=document.getElementById("I_"+(a+4)+"_"+Fb+(xb!=null?"_W"+yb:""));if(f!=null&&l==null&&c==null&&e==null&&d!=null&&f.maxLength==d.maxLength){ib=4;hb=true}else{o=document.getElementById("I_"+(a+5)+"_"+Fb+(xb!=null?
"_W"+yb:""));if(f!=null&&l==null&&c==null&&e==null&&d==null&&o!=null&&f.maxLength==o.maxLength){ib=5;hb=true}else if(f!=null&&l==null){e=xb!=null?xb.getElementsByTagName("div"):h;p=b=o=d=false;for(l=0;l<e.length;l++){c=e[l];c=Zb(c);if(c==a+1)d=true;if(c==a+2)o=true;if(c==a+3)b=true;if(c==a+4)p=true}if(d){ib=2;hb=true;if(o){ib++;if(b){ib++;p&&ib++}}}}}}}for(e=true;f!=null&&(xb==null||f.parentNode==xb);){k++;if(pui.genie.config.hideSubfileOpt){f.style.visibility="hidden";f.value="";l=document.getElementById("D_"+
a+"_"+Fb+(xb!=null?"_W"+yb:""));if(l!=null)l.style.visibility="hidden"}d=document.getElementById(Ca);if(pui.genie.config.separateSubfileLines&&xb==null){l=document.createElement("div");c=a+1;if(hb==true)c+=ib-1;l.style.zIndex=1;l.style.width=(78.5-Fb)*pui.multX+"px";l.style.height="1px";l.style.padding="0px";l.style.position="absolute";l.style.left=(Fb+3)*pui.multX+"px";l.style.top=c*pui.multY+Ja-1+"px";l.style.backgroundColor="#5588BB";l.style.overflow="hidden";d.appendChild(l)}pui.genie.config.stripedSubfile&&
Hd(d,Fb,a,e);for(l=0;l<h.length;l++)h[l].id!="popcal"&&Id(h[l],a,e,Fb);for(l=0;l<i.length;l++)i[l].id!=f.id&&Id(i[l],a,e,Fb);e=!e;a+=ib;l="I_"+a+"_"+Fb+(xb!=null?"_W"+yb:"");f=document.getElementById(l)}}if(k>0&&Fb>0){if(m!=null){h=Zb(m);if(h>=a){k=k+h-a;k+=pui.is_old_ie?0.75:0.5}}if(pui.genie.config.outlineSubfile){a=document.createElement("div");h=k;if(hb==true)h*=ib;a.style.zIndex=1;i=pui.genie.displaySize+2;if(xb!=null)i=parseInt(xb.offsetWidth/pui.multX)+1;a.style.width=(i-Fb)*pui.multX+"px";
a.style.height=pui.multY*h+10+"px";a.style.border="2px solid "+pui.genie.config.subfileOutlineColor;a.style.position="absolute";h=Fb;if(xb!=null)h-=2;a.style.left=h*pui.multX+"px";a.style.top=r*pui.multY-5+Ja+"px";a.style.filter="progid:DXImageTransform.Microsoft.Shadow(color=white, direction=135, strength=3);";h=xb;if(h==null)h=document.getElementById(Ca);h.appendChild(a)}if(xb==null){a=document.createElement("input");a.type="button";a.value="Up";a.style.position="absolute";a.style.left=(pui.genie.displaySize+
3)*pui.multX+"px";a.style.top=r*pui.multY+Ja+"px";a.style.width="40px";a.style.fontFamily="Arial Narrow";a.style.fontSize="10px";a.id="up_button";a.onclick=function(){bd("PageUp")};xb!=null?xb.appendChild(a):document.getElementById(Ca).appendChild(a);a=document.createElement("input");a.type="button";a.value="Down";a.style.position="absolute";a.style.left=(pui.genie.displaySize+3)*pui.multX+"px";a.style.top=(r+1)*pui.multY+Ja+"px";a.style.width="40px";a.style.fontFamily="Arial Narrow";a.style.fontSize=
"10px";a.id="down_button";a.onclick=function(){bd("PageDown")};xb!=null?xb.appendChild(a):document.getElementById(Ca).appendChild(a)}}if(k>0){Eb=document.createElement("div");Eb.style.zIndex=1;r=(pui.genie.displaySize+0.5-Fb)*pui.multX;if(xb!=null)r=(parseInt(xb.offsetWidth/pui.multX)+1-Fb)*pui.multX+4;a=pui.is_old_ie?pui.multY:String(pui.multY-2);if(hb==true)a*=ib;Eb.style.width=String(r)+"px";Eb.style.height=a+"px";Eb.style.backgroundColor=pui.genie.config.hiColor;Eb.style.visibility="hidden";Eb.style.cursor=
"pointer";Eb.style.position="absolute";r=(Fb+1)*pui.multX;if(xb!=null)r=(Fb-2)*pui.multX;Eb.style.left=String(r)+"px";Eb.id="hiDiv";xb!=null?xb.appendChild(Eb):document.getElementById(Ca).appendChild(Eb)}if(Fb>0){pui.genie.subfileInfo={};pui.genie.subfileInfo.inputColumn=Fb;r=Jd();if(r!=""){Jb=document.createElement("div");Jb.style.zIndex=99;Jb.style.display="none";Jb.style.position="absolute";Jb.id="menuDiv";Jb.innerHTML=r;document.body.appendChild(Jb);document.oncontextmenu=Kd;document.onclick=
Ld}}}
function Hd(b,a,c,d){var e=pui.genie.config.adjustColumns==true||pui.genie.config.adjustColumns=="true",f=a*pui.multX;if(e){f+=pui.multX;if(xb!=null)f-=pui.multX*3}if(xb!=null){a=parseInt(xb.style.width)-(a+1)*pui.multX;if(e)a+=pui.multX*3}else a=(pui.genie.displaySize+0.5-a+1)*pui.multX;if(e)a-=pui.multX;var h=document.createElement("div");h.style.zIndex=2;h.style.width=a+"px";e=pui.multY;if(hb)e*=ib;h.style.height=String(e)+"px";h.style.position="absolute";h.style.left=f+"px";h.style.top=c*pui.multY+
Ja-1+"px";h.style.cursor="pointer";if(d)h.style.backgroundColor=pui.genie.config.oddRowColor;if(!d)h.style.backgroundColor=pui.genie.config.evenRowColor;h.setAttribute("subfileLine",c);h.setAttribute("stripeid","stripe"+c);h.onmouseover=function(){if(!pd())if(Jb==null||Jb.style.display=="none"){Md(c);if(pui.genie.config.hiColor!="transparent")h.style.backgroundColor=Eb.style.backgroundColor}};h.onmouseout=function(){if(!pd())if(Jb==null||Jb.style.display=="none"){Nd(zb);if(pui.genie.config.hiColor!=
"transparent"){if(d)h.style.backgroundColor=pui.genie.config.oddRowColor;if(!d)h.style.backgroundColor=pui.genie.config.evenRowColor}}};xb!=null?xb.appendChild(h):b.appendChild(h)}
function Id(b,a,c,d){if((Zb(b)==a||hb&&Zb(b)==a+1||hb&&ib>=3&&Zb(b)==a+2||hb&&ib>=4&&Zb(b)==a+3||hb&&ib>=5&&Zb(b)==a+4)&&b.id!=null&&b.parentNode!=document.body&&(xb==null||b.parentNode==xb)){if(d!=null)if(kd(b)<d)return;b.setAttribute("subfileLine",a);b.style.cursor="pointer";if(pui.genie.config.stripedSubfile&&c!=null&&pui.genie.config.setFieldBackground){if(c)b.style.backgroundColor=pui.genie.config.oddRowColor;if(!c)b.style.backgroundColor=pui.genie.config.evenRowColor}if(b.tagName!="INPUT"){kc(b,
"click",Od);kc(b,"dblclick",Pd)}}}function Ld(){if(Jb!=null)if(Jb.style.display!="none"){Jb.style.display="none";Nd(Ab,true);if(Kb)Kb=false;else Nd(zb)}}
function Jd(b){function a(v,t){if(!o[v+"="+t]){o[v+"="+t]=true;k+='<tr onMouseOver="pui.genie.hover(this);" onMouseOut="pui.genie.unhover(this);" onClick="selectMenuOption(\''+v+"');\"><td>"+t+"</td></tr>";p.push(t);q.push(v)}}var c,d,e,f,h,i,m,l,r,k="",o={},p=[],q=[];if(pui["subfile menu choices"]!=null){for(d=0;d<pui["subfile menu choices"].length;d++){r=pui["subfile menu choices"][d];l=null;if(pui["subfile menu choice values"]!=null)l=pui["subfile menu choice values"][d];if(l==null)l="";a(l,r)}pui["subfile menu choices"]=
null;pui["subfile menu choice values"]=null}else{c=Yb();if(d=pui.Mh(pui["subfile option pattern2"],true)){c=new pui.ak({pattern:d,Cm:3,Jm:function(v){return{key:v[1],label:v[v.length-1]}},aj:"sfmenu",ym:function(v){if(pui.genie.config.showMenuOptionCode==true)v.label=v.key+"="+v.label;a(v.key,v.label)}});Dd(c);Qd(c);pui.genie.hideSubfileOptionText==true&&Fd(c)}else{var u=pui.Mh(pui["subfile option pattern"],true);for(d=0;d<c.length;d++)if(Zb(c[d])!=-1)if(!(Zb(c[d])>=Gb))if(!(xb!=null&&c[d].parentNode!=
xb)){if(c[d]&&c[d].fieldInfo&&c[d].fieldInfo.attr){l=c[d].fieldInfo.attr;if(l=="27"||l=="2F"||l=="37"||l=="3F")continue}if(c[d].id.indexOf("window")!==0){e=c[d].innerHTML;if(u){u.lastIndex=0;for(f=u.exec(e);f!=null&&f.length==4;){l=f[1];r=f[f.length-1];if(pui.genie.hideSubfileOptionText)c[d].style.visibility="hidden";if(pui.genie.config.showMenuOptionCode==true)r=f[0];a(l,r);f=u.exec(e)}}else{e=e.replace(/&nbsp;/g," ");f=e.split(" ");for(e=0;e<f.length;e++){r=l="";h=f[e].substr(0,1);i=f[e].substr(1,
1);m=f[e].substr(2,1);if((h>="A"&&h<="Z"||h>="0"&&h<="9")&&i=="="){l=h;r=f[e].substr(2,f[e].length-2);if(pui.genie.hideSubfileOptionText)c[d].style.visibility="hidden"}if(h>="0"&&h<="9"&&i>="0"&&i<="9"&&m=="="){l=h+i;r=f[e].substr(3,f[e].length-3);if(pui.genie.hideSubfileOptionText)c[d].style.visibility="hidden"}if(pui.genie.config.showMenuOptionCode==true)r=f[e];if(l!=""){for(h=e+1;h<f.length;h++){if(f[h]=="")break;if(f[h].substr(1,1)=="=")break;if(f[h].substr(2