﻿var runInParentWindow=false;
var showProgress=true;
//(1)////////////////////////////////////////////////////////////////////////////////
function BMF_getCurrectString(thestr){
thestr=thestr.replace(/&lt;/g,'<');
thestr=thestr.replace(/&gt;/g,'>');
thestr=thestr.replace(/&amp;/g,'&');
return thestr;
}
//(1)////////////////////////////////////////////////////////////////////////////////
function BMF_setWaitMessages(messFillCombo,messDoOperation,messGetForm){
BMF_waitMessFillCombo=messFillCombo;
BMF_waitMessDoOperation=messDoOperation;
BMF_waitMessGetForm=messGetForm;
}
//(1)////////////////////////////////////////////////////////////////////////////////
function BMF_getServiceInnerText(s){
    var ss=new String(BMF_getCurrectString(s));
    ss=ss.replace('<?xml version="1.0" encoding="utf-8"?>','');
    ss=ss.replace('<string xmlns="http://www.bornamehr.com">','');
    ss=ss.replace('</string>','');
    ss=ss.replace('<string xmlns="http://www.bornamehr.com" />','');
    return ss;
}
//(1)////////////////////////////////////////////////////////////////////////////////
function BMF_getXmlHttp(){
var xmlHttp = false;
try {
    xmlHttp = new XMLHttpRequest();
    if (xmlHttp.overrideMimeType){
        xmlHttp.overrideMimeType('text/xml');
        }
    }
catch (e) {
    try {
        xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");
        }
    catch (e) {
        try {
            xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
            }
        catch (E) {
            return false;
            }
        }
    }
return xmlHttp;
}

//(1)////////////////////////////////////////////////////////////////////////////////

function BMF_fillCombo(){
var url=arguments[0];
var nextOp=arguments[1];
var r=GEBI(arguments[2]);
var xmlHttp = false;

    xmlHttp=BMF_getXmlHttp();
if (!xmlHttp)
    return;
var c=r.options.length;
for (var i=0;i<c;i++){
    r.options[0]=null;
    }
var empoption = new Option(BMF_waitMessFillCombo,0);
r.options[0] = empoption;
xmlHttp.open(BMF_connectionMethod,url,true);
xmlHttp.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
var selectedItem=NaN ;
var retSTR='';
var lastC=3;
var vall;
for(var argCount=3;argCount<arguments.length-1; argCount+=2){
//    if (arguments[argCount+1] && GEBI(arguments[argCount+1]))
//        vall=GEBI(arguments[argCount+1]).value;
//    else
        vall=arguments[argCount+1];
        
    if (argCount==3){
        retSTR+=arguments[argCount]+'='+vall;
        }
        
        else{
            retSTR+="&"+arguments[argCount]+'='+vall;
            }
            lastC=argCount+1;
        }
        if ((lastC==3 && arguments.length==4) ||(lastC!=3 && lastC==arguments.length-2)){
                if (GEBI(arguments[arguments.length-1])){
                    selectedItem=GEBI(arguments[arguments.length-1]).value;
                }else{
                    selectedItem=arguments[arguments.length-1];
                    }
                }
        
xmlHttp.onreadystatechange=function(){
    if (xmlHttp.readyState==4){
        if (xmlHttp.status==200 ){
            var ss=BMF_getServiceInnerText(xmlHttp.responseText);
            ss=ss.replace(/\n/g,'');
            ss=ss.replace(/\r/g,'');
            if (ss.substring(0,7)=='reload:'){
                if (window.parent)
                    window.parent.location.href=ss.substring(7,ss.length );
                    else
                    location.href=ss.substring(7,ss.length );
                return;
                }
            eval(ss);
            var counter=0;
            for (var i=0;i<arr.length;i+=2){
                option = new Option(arr[i],arr[i+1]);
                if (!isNaN(selectedItem) && arr[i+1]==selectedItem)
                    option.selected='selected';
                r.options[counter] = option;
                counter++;
                }
            eval(nextOp);
        }
    }
return;
};

    xmlHttp.send(retSTR);
    return xmlHttp;
    
}
//(1)////////////////////////////////////////////////////////////////////////////////
function BMF_doOperation(){
if (GEBIPlace(arguments[2])==1 || runInParentWindow==true){
//alert (GEBIPlace(arguments[2]));
//alert(runInParentWindow);
runInParentWindow=false;
window.parent.BMF_doOperation.apply(this,arguments);

return 0;
}
var url=arguments[0];
var nextOp=arguments[1];
var targetPlace=arguments[2];
if (showProgress){
    var waitMess_local=(BMF_waitMessDoOperation=='')?'<img align="center" src="'+BMF_progImg+'" />':'<p align="center" style="font-size:10pt;font-family:tahoma;direction:rtl;"><img  src="'+BMF_progImg+'" /><br/><br/><br/>'+BMF_waitMessDoOperation+'</p>';
    if (targetPlace==''){
        }
        else if (targetPlace=='BMFmsgbox'){
                BMFmsgbox('نتیجه عملیات',waitMess_local);
                }
        else {
                GEBI(targetPlace).innerHTML=waitMess_local;
                }
}
var xmlHttp = false;
xmlHttp=BMF_getXmlHttp();
xmlHttp.open(BMF_connectionMethod,url,true);
xmlHttp.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
xmlHttp.onreadystatechange=function(){
    if (xmlHttp.readyState==4){
        if (xmlHttp.status==200 ){
            var ss=BMF_getServiceInnerText(xmlHttp.responseText);
            ss=ss.replace(/\n/g,'');
            ss=ss.replace(/\r/g,'');
            if (ss.substring(0,7)=='reload:'){
                if (window.parent)
                    window.parent.location.href=ss.substring(7,ss.length );
                    else
                    location.href=ss.substring(7,ss.length );
                }
                else{
                    if (targetPlace==''){
                    }   else if (targetPlace=='BMFmsgbox'){
                        BMFmsgbox('نتیجه عملیات',ss);
                            }else {
                                GEBI(targetPlace).innerHTML=ss;
                                }
                    eval(nextOp);
                    }
                }
            }
        return;
    };
var retSTR='';
var vall;
for(var argCount=3;argCount<arguments.length-1; argCount+=2){
//    if (arguments[argCount+1] && GEBI(arguments[argCount+1]))
//        vall=GEBI(arguments[argCount+1]).value;
//    else
        vall=arguments[argCount+1];
        
    if (argCount==3){
        retSTR+=arguments[argCount]+'='+vall;
        }
        
        else{
            retSTR+="&"+arguments[argCount]+'='+vall;
            }
        }
xmlHttp.send(retSTR);
return xmlHttp;
}
//(1)////////////////////////////////////////////////////////////////////////////////

function BMF_getForm(){
if (GEBIPlace(arguments[2])==1 || runInParentWindow==true){
runInParentWindow=false;

return window.parent.BMF_getForm.apply(this,arguments);
}
var url= arguments[0];
var nextOp= arguments[1];
var targetPlace=arguments[2];
if (showProgress){

    var waitMess_local=(BMF_waitMessGetForm=='')?'<img align="center" src="'+BMF_progImg+'" />':'<p align="center" style="font-size:10pt;font-family:tahoma;direction:rtl;"><img  src="'+BMF_progImg+'" /><br/><br/><br/>'+BMF_waitMessGetForm+'</p>';
    if (targetPlace==''){
                    }   else if (targetPlace=='BMFmsgbox'){
                        BMFmsgbox('نتیجه عملیات',waitMess_local);
                            }
                            else{
                                GEBI(targetPlace).innerHTML=waitMess_local;
                            }
}
            var u=new String(url);
            
            while(u.search(/[/]/g)!=-1){
            u=u.slice(u.search(/[/]/g)+1,u.length);
            }
            u=u.slice(0,u.search(/[.]/g));
            u=u.toLowerCase();
            try{
            //document.title=BMF_scriptAddr+u+'.js';
                BMFdhtmlLoadScript(BMF_scriptAddr+u+'.js')
                }catch(e){}
            
    xmlHttp=BMF_getXmlHttp();
if (!xmlHttp)
    return;

xmlHttp.open(BMF_connectionMethod,url,true);
xmlHttp.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
xmlHttp.onreadystatechange=function(){
    if (xmlHttp.readyState==4){
        if (xmlHttp.status==200 ){
            var ss= new String(BMF_getCurrectString(xmlHttp.responseText));
            ss=ss.replace('<form','<div').replace('</form','</div');
            ss=ss.replace('runat="server"','');
            ss=ss.replace('action','title');
            ss=ss.replace('html','div').replace('html','div');
            ss=ss.replace('_VIEWSTATE','ABA');
            ss=ss.replace('__VIEWSTATE','ABA');
            ss=ss.replace('__EVENTVALIDATION','ABA').replace('__EVENTVfloatPDATION','ABA');
            ss=ss.replace(/\n/g,'');
            ss=ss.replace(/\r/g,'');
            if (ss.substring(0,7)=='reload:'){
                if (window.parent)
                    window.parent.location.href=ss.substring(7,ss.length );
                    else
                    location.href=ss.substring(7,ss.length );
                return;
                }
            if (targetPlace==''){
                    }   else if (targetPlace=='BMFmsgbox'){
                        BMFmsgbox('نتیجه عملیات',ss);
                            }else if (GEBI(targetPlace)){
                                GEBI(targetPlace).innerHTML=ss;
                                GEBI(targetPlace).title='';
                            }
            try{
                eval(u+'_onload();');
            }catch(e){}
            try{
            var i=0;
            if (GEBI(targetPlace)){
                while (GEBI(targetPlace).getElementsByTagName("script").length >i)
                {
                    eval(GEBI(targetPlace).getElementsByTagName("script").item(i).innerHTML);
                    i++;
                }
            }
            }catch(e){}
            try{
                BMFAutotab_setNextToall();
            }catch(e){}
            
            try{
                eval(nextOp);
            }catch(e){}
            
            }
        }
    return;
    };
var retSTR="";//
var vall;
for(var argCount=3;argCount<arguments.length-1; argCount+=2){
//    if (arguments[argCount+1] && GEBI(arguments[argCount+1]))
//        vall=GEBI(arguments[argCount+1]).value;
//    else
        vall=arguments[argCount+1];
        
    if (argCount==3){
        retSTR+=arguments[argCount]+'='+vall;
        }
        
        else{
            retSTR+="&"+arguments[argCount]+'='+vall;
            }
        }

xmlHttp.send(retSTR);
return xmlHttp;
}
//(1)////////////////////////////////////////////////////////////////////////////////
function BMF_ExecuteScript(){
if (GEBIPlace(arguments[2])==1 || runInParentWindow==true){
runInParentWindow=false;
window.parent.BMF_ExecuteScript.apply(this,arguments);
return 0;
}
var _curTargetPlaceInnerHTML='';
var url=arguments[0];
var nextOp=arguments[1];

var targetPlace=arguments[2];
if (GEBI(targetPlace))
    _curTargetPlaceInnerHTML=GEBI(targetPlace).innerHTML;
if (showProgress){    
var waitMess_local=(BMF_waitMessDoOperation=='')?'<img align="center" src="'+BMF_progImg+'" />':'<p align="center" style="font-size:10pt;font-family:tahoma;direction:rtl;"><img  src="'+BMF_progImg+'" /><br/><br/><br/>'+BMF_waitMessDoOperation+'</p>';
    

    if (targetPlace==''){
        }
        else if (targetPlace=='BMFmsgbox'){
                BMFmsgbox('نتیجه عملیات',waitMess_local);
                }
        else {
                GEBI(targetPlace).innerHTML='<img src="'+BMFsmallprog+'" />';
                }
}
var xmlHttp = false;

    xmlHttp=BMF_getXmlHttp();
    
xmlHttp.open(BMF_connectionMethod,url,true);
xmlHttp.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
xmlHttp.onreadystatechange=function(){
    var initalTargetPlaceInnerHtml=_curTargetPlaceInnerHTML;
    if (xmlHttp.readyState==4){
        if (xmlHttp.status==200 ){
            var ss=BMF_getServiceInnerText(xmlHttp.responseText);
            ss=ss.replace(/\n/g,'');
            ss=ss.replace(/\r/g,'');
            if (ss.substring(0,7)=='reload:'){
                if (window.parent)
                    window.parent.location.href=ss.substring(7,ss.length );
                    else
                    location.href=ss.substring(7,ss.length );
                }
                else{
                           
                            
                    if (targetPlace==''){
                        
                    }   else if (targetPlace=='BMFmsgbox'){
                        //BMFmsgbox('نتیجه عملیات',ss);
                            }else if(GEBI(targetPlace)){
                                GEBI(targetPlace).innerHTML=initalTargetPlaceInnerHtml;
                           }
                    eval(ss);
                    eval(nextOp);
                    }
                }
            }
        return;
    };
var retSTR='';
var vall;
for(var argCount=3;argCount<arguments.length-1; argCount+=2){
//    if (arguments[argCount+1] && GEBI(arguments[argCount+1]))
//        vall=GEBI(arguments[argCount+1]).value;
//    else
        vall=arguments[argCount+1];
        
    if (argCount==3){
        retSTR+=arguments[argCount]+'='+vall;
        }
        
        else{
            retSTR+="&"+arguments[argCount]+'='+vall;
            }
        }
xmlHttp.send(retSTR);
return xmlHttp;
}
