	function POBJSUpdate(obj)
	{
                if(obj.getAttribute("allowpobjs")==undefined || obj.getAttribute("allowpobjs")==1)
                {
                //alert(obj.name);
                var frm=obj.form;
                var objnames=","+frm.getAttribute("p_OBJS")+",";

                        if(objnames.indexOf(","+obj.getAttribute("name")+",")==-1)
                        frm.setAttribute("p_OBJS",frm.getAttribute("p_OBJS")+","+obj.getAttribute("name"));

                        try{GLB_MODIFIED=true;}catch(e){};
                }
	}

//----------------------------------------
function escapeNON_UTF8(tval)
{
return escape(tval).replace(/\+/g, "%2B");
}

function escapeA(tval)
{
        try {
//alert(GLB_ISUTF8);
                if(GLB_ISUTF8==undefined)GLB_ISUTF8="0";

                if(GLB_ISUTF8=="1"){ return encodeURIComponent(tval).replace(/\+/g, "%2B"); } //UTF8
                else return escape(tval).replace(/\+/g, "%2B");
        } catch(e) {return escape(tval).replace(/\+/g, "%2B");}
}

function getXmlHttpRequestObject() {
	if (window.XMLHttpRequest) {
		return new XMLHttpRequest();
	} else if(window.ActiveXObject) {
		return new ActiveXObject("Microsoft.XMLHTTP");
	} else {
		alert("Your Browser Sucks!\nIt's about time to upgrade don't you think?");
	}
}
var PSTRUN_OBJ;
var PSTRUN_CUSTFUNC_B,PSTRUN_CUSTFUNC_A;
var GLB_DEBUG_VAL;
        function _URLRUN(turl,tCUSTFUNC_B,tCUSTFUNC_A,tASYNC_FLAG)
        {
                if(tCUSTFUNC_B==undefined)tCUSTFUNC_B="";
                if(tCUSTFUNC_A==undefined)tCUSTFUNC_A="";
                if(tASYNC_FLAG==undefined)tASYNC_FLAG=true;

        PSTRUN_CUSTFUNC_B=tCUSTFUNC_B;
        PSTRUN_CUSTFUNC_A=tCUSTFUNC_A;

        turl=turl.replace(/\+/g, "%2B");

                try{document.getElementById("StatusDiv").style.visibility="visible";document.getElementById("StatusDiv").style.display="block";}catch(e){}
        PSTRUN_OBJ = getXmlHttpRequestObject();
        PSTRUN_OBJ.onreadystatechange = HANDLE_PSTRUN_OBJ;
        PSTRUN_OBJ.open('GET', turl, tASYNC_FLAG);
        PSTRUN_OBJ.send(null);
        var browser=navigator.appName;

                if(tASYNC_FLAG==false && browser=="Netscape") HANDLE_PSTRUN_OBJ();

        //window.open(turl);


        }

        function _URLRUNP(turl,parameters,tCUSTFUNC_B,tCUSTFUNC_A,tASYNC_FLAG)
        {
                if(tCUSTFUNC_B==undefined)tCUSTFUNC_B="";
                if(tCUSTFUNC_A==undefined)tCUSTFUNC_A="";
                if(tASYNC_FLAG==undefined)tASYNC_FLAG=true;
        PSTRUN_CUSTFUNC_B=tCUSTFUNC_B;
        PSTRUN_CUSTFUNC_A=tCUSTFUNC_A;

        turl=turl.replace(/\+/g, "%2B");
        //alert(parameters);
        PSTRUN_OBJ = getXmlHttpRequestObject();
        PSTRUN_OBJ.onreadystatechange = HANDLE_PSTRUN_OBJ;
        PSTRUN_OBJ.open('POST', turl, tASYNC_FLAG);
        PSTRUN_OBJ.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
        PSTRUN_OBJ.setRequestHeader("Content-length", parameters.length);
        PSTRUN_OBJ.setRequestHeader("Connection", "close");
        PSTRUN_OBJ.send(parameters);
        }

        function _PSTRUN (sid,frm,ftype,objid,params)
        {
                try{document.getElementById("StatusDiv").style.visibility="visible";document.getElementById("StatusDiv").style.display="block";}catch(e){}
        PSTRUN_OBJ = getXmlHttpRequestObject();

                if(PSTRUN_OBJ)
                {
                var parameters="";
                //-------
                frm=eval(frm);
                var objname=frm.getAttribute("p_OBJS");

                var fld=new Array();
                var fld_temp=new Array();

                var i=-1;
                var loca="";

                        if(objname.indexOf(",")==0) objname=objname.substr(1,objname.length-1);

                        while(objname!="")
                        {
                        i++;
                        var ara=objname.substr(0,objname.indexOf(","));
                                if(ara=="")
                                {
                                ara=objname;
                                objname="";
                                }
                                else
                                objname=objname.substr(objname.indexOf(",")+1,objname.length-objname.indexOf(",")-1);

                        //alert(ara);

                        fld[i]=new Object();
                        fld[i].item=ara;
                                try {
                                if(eval("frm."+ara).getAttribute("xtype")=="CMVLOOKUP" || eval("frm."+ara).getAttribute("xtype")=="CMVTEXTAREA")
                                qtypeval=eval("frm."+ara).getAttribute("codevalues");
                                else
                                qtypeval=eval("frm."+ara).value;
                                }catch(e) {
                                alert('Form Objesi \'' + ara + '\' bulunamadı.\r\nİşlem devam edemez.');
                                        try{document.getElementById("StatusDiv").style.visibility="";document.getElementById("StatusDiv").style.display="block";}catch(e){}
                                return false;
                                }
                        //alert(qtypeval);

                                if(eval("frm."+ara).getAttribute("EXTABLE")!=undefined && eval("frm."+ara).getAttribute("EXTABLE")!=null)
                                {
                                fld[i].extable=eval("frm."+ara).getAttribute("EXTABLE");
                                fld[i].exqtype=eval("frm."+ara).getAttribute("EXQTYPE");
                                fld[i].expk=eval("frm."+ara).getAttribute("EXPK");
                                        if(fld[i].exqtype==undefined)fld[i].exqtype="";
                                        if(fld[i].expk==undefined)fld[i].expk="";
                                }
                                else
                                fld[i].extable="";

                                try
                                {

                                        if(eval("frm."+ara).getAttribute("tty")=="mny")
                                        {
                                        qtypeval=qtypeval.replace(/,/g,"");
                                        //alert(qtypeval);
                                        }
                                } catch(e) { }

                        fld[i].value=qtypeval;
                        }

                //alert("0");
                parameters+="&p_SID=" + escapeA(sid);
                //alert("1");
                parameters+="&p_FTYPE=" + escapeA(ftype);
                //alert("2");
                parameters+="&p_OBJECTID=" + escapeA(objid);
                //alert("3");
                parameters+="&p_PARAMS=" + escapeA(params);
                //alert("4");
                parameters+="&p_FRMID=" + escapeA(frm.id);
                //alert("5");

                        try {  if(frm.getAttribute("p_URL")!=undefined) parameters+="&p_URL=" + escapeA(frm.getAttribute("p_URL")); } catch(e) { }
                        try {
                                if(frm.getAttribute("p_QTYPE")!="PROC")
                                {
                                        if(frm.getAttribute("p_LOG")==undefined) parameters+="&p_LOG=" + "A";
                                        else parameters+="&p_LOG=" + escapeA(frm.getAttribute("p_LOG"));
                                }
                        } catch(e) { }

                        try { parameters+="&p_QTYPE=" + escapeA(frm.getAttribute("p_QTYPE")); } catch(e) { }
                        try { parameters+="&p_TBLNAME=" + escapeA(frm.getAttribute("p_TBLNAME")); } catch(e) { }
                        try { parameters+="&p_PKNAME=" + escapeA(frm.getAttribute("p_PKNAME")); } catch(e) { }
                        try { parameters+="&p_PK=" + escapeA(frm.getAttribute("p_PK")); } catch(e) { }
                        try { parameters+="&p_PROC=" + escapeA(frm.getAttribute("p_PROC")); } catch(e) { }
                        try { if(frm.getAttribute("p_CUSTFUNC")!=undefined)parameters+="&p_CUSTFUNC=" + escapeA(frm.getAttribute("p_CUSTFUNC")); } catch(e) { }

                        for(var i=0;i<fld.length;i++)
                        {
                        parameters+="&" + fld[i].item + "=" + escapeA(fld[i].value);

                                if(fld[i].extable!="")
                                {
                                parameters+="&p__ex__table__" + fld[i].item + "=" + escapeA(fld[i].extable);
                                parameters+="&p__ex__qtype__" + fld[i].item + "=" + escapeA(fld[i].exqtype);
                                parameters+="&p__ex__pk__" + fld[i].item + "=" + escapeA(fld[i].expk);
                                }
                        }

                parameters=parameters.substr(1,parameters.length-1);
                //-------
                //alert(parameters);
                PSTRUN_OBJ.onreadystatechange = HANDLE_PSTRUN_OBJ;
                PSTRUN_OBJ.open('POST', "/FUNCTIONS/_PSTRUN.asp", true);
                PSTRUN_OBJ.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
                PSTRUN_OBJ.setRequestHeader("Content-length", parameters.length);
                PSTRUN_OBJ.setRequestHeader("Connection", "close");
                PSTRUN_OBJ.send(parameters);


                }

                try{if(GLB_MODIFIED!=undefined)GLB_MODIFIED=false;}catch(e){}
        return false;
        }

        function HANDLE_PSTRUN_OBJ()
        {
                try {GLB_NEED_REFRESH=true;}catch(e){}

                if (PSTRUN_OBJ.readyState == 4)
                {
                        try{document.getElementById("StatusDiv").style.visibility="";document.getElementById("StatusDiv").style.display="block";}catch(e){}
                var str=PSTRUN_OBJ.responseText;
                GLB_DEBUG_VAL=str;
		var hh;
//alert(str);
                        if(PSTRUN_CUSTFUNC_A!="" && PSTRUN_CUSTFUNC_A!=undefined){try{eval(PSTRUN_CUSTFUNC_A);}catch(e){alert("0001 CUSTOM FUNCTION -A- HATA OLUŞTU\r\n"+(e.name+" - "+e.message+"\r\n\r\n")+PSTRUN_CUSTFUNC_A);}}

                        try
                        {
                        var sepstr="//||//";
                        var re = new RegExp ("<script>", 'gi') ;
                        var re2 = new RegExp ("</script>", 'gi') ;
                        str=str.replace(re,"\r\n");
                        str=str.replace(re2,"\r\n");
                        hh=str;

                                while(hh.indexOf(sepstr)>0)
                                {
                                var ss=hh.substr(0,hh.indexOf(sepstr)-1);
                                eval(ss);
                                hh=hh.substr(hh.indexOf(sepstr)+sepstr.length+1,hh.length-(hh.indexOf(sepstr)+sepstr.length));
                                }

                                if(hh!="") eval(hh);
                        //eval(str);
                        }catch(e){alert("0000 HATA OLUŞTU\r\n"+(e.name+" - "+e.message+"\r\n\r\n")+hh);}

                        if(PSTRUN_CUSTFUNC_B!="" && PSTRUN_CUSTFUNC_B!=undefined){try{eval(PSTRUN_CUSTFUNC_B);}catch(e){alert("0002 CUSTOM FUNCTION -B- HATA OLUŞTU\r\n"+(e.name+" - "+e.message+"\r\n\r\n")+PSTRUN_CUSTFUNC_B);}}
                }
        //PSTRUN_OBJ=null;
        }

