var gCurrentObjectList=false;function ObjectList(N,B,D,H,T){if(gCurrentObjectList){return gCurrentObjectList}else{gCurrentObjectList=this}this.setCurrent=F;this.highlight=I;this.unhighlight=C;this.navigate=E;this.setHeader=L;this.reload=P;this.xmlReload=G;this.blank=J;this.onchange=Q;this.filter=S;this.filterKeyPress=R;this.delayedFilter=O;this.getElementOrText=A;this.setType=M;this.setOwner=K;this.lType=this.getElementOrText(N);this.lFilter=this.getElementOrText(B);this.lHolder=this.getElementOrText(D);this.lTitle=this.getElementOrText(T);this.lSchema=this.getElementOrText(H);this.lCurrent=null;this.gLastFilteredKey=false;this.timer=0;return ;function K(U){if(typeof (this.lSchema)=="object"){this.lSchema.value=U}else{this.lSchema=U}}function M(U){if(typeof (this.lType)=="object"){this.lType.value=U}else{this.lType=U}}function A(V){var U=$x(V);return(U)?U:V}function Q(U){this.blank();this.lCurrent=null;this.setHeader(" ");this.reload();this.filter()}function J(){this.unhighlight();vFrame.src="about:blank"}function P(U,V,X,W){this.xmlReload(U,V,X,W);return }function G(U,V,X,W){if(X||U!=this.lType.value){if(U!=this.lType.value){gLastTab=false}if(U){this.setType(U)}htmldb_getObjectListXML(this.lHolder,typeof (this.lType)=="object"?this.lType.value:this.lType,typeof (this.lSchema)=="object"?this.lSchema.value:this.lSchema,"1","10000","DIVASXML",null,"o(this.id)","o")}if(V){this.setCurrent(V,W)}if(this.lCurrent){this.lCurrent=$x(this.lCurrent.id);this.highlight(W)}top.$x_Show("obLeftColumn");top.$x_Show($x("htmldbDropHere").rows[0]);top.$x("OB_FIND").value=""}function S(){html_Find(this.lHolder,this.lFilter.value)}function F(V,W){this.unhighlight();this.lCurrent=$x(V);var U=new htmldb_Get(null,4500,"INTERNAL_APPLICATION_PROCESS=171513520394208759",0);U.add("OB_OBJECT_ID",this.lCurrent.id);var X=U.get();U=null;if(X&&X.indexOf("ERROR:")>0){alert(X.substr(6))}else{if(X){this.setOwner(X)}}if(W!=false){this.highlight()}this.setHeader()}function C(){this.setHeader(" ");if(this.lCurrent){if(this.lCurrent.className.indexOf("_V")>0){this.lCurrent.className="o_V"}else{this.lCurrent.className="o_I"}}}function I(U){if(this.lCurrent){if(this.lCurrent.className.indexOf("_V")>0){this.lCurrent.className="o_C_V"}else{this.lCurrent.className="o_C_I"}}if(U!=false){this.navigate()}}function L(U){U=(U)?U:this.lCurrent.innerHTML;$s(this.lTitle,U)}function E(){var X=null;if(!gLastTab){X=this.lType.value+"_DETAIL"}else{X=gLastTab.split(":")[1]}var V="f?p=4500:"+X+":"+$x("pInstance").value;var W=window.frames.dbaseContent.document.getElementById("htmldbPage");if(W&&(this.lType.value!="PROCEDURE"&&this.lType.value!="FUNCTION"&&this.lType.value!="PACKAGE"&&this.lType.value!="TRIGGER")){var U=new htmldb_Get(null,null,null,null,null,"f",V.substring(2));var Y=U.get(null,'<div id="htmldbPage">','<a name="END"></a>');get=null;W.innerHTML=Y}else{vFrame.src=V}gLastTab=V}function R(U){this.gLastFilteredKey=new Date();setTimeout(gCurrentObjectList.delayedFilter,1000)}function O(){gCurrentObjectList.timer=0;if(((new Date()-gCurrentObjectList.gLastFilteredKey))>1000){gCurrentObjectList.filter()}else{if(gCurrentObjectList.timer==0){gCurrentObjectList.timer=1;setTimeout(gCurrentObjectList.delayedFilter,250)}}}};