ÿþ

/*	-------------------------------------------------------------

    National Rehabilitation Center Website

    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

    Description:	Core Scripts / Functions

    Filename:		core.js

    Version:		1.0

    Date:			July 30, 2006

    ------------------------------------------------------------*/

	<!--

	

    var tac_pbx1,tac_pba1;/*@cc_on @*//*@if(@_jscript_version>=5)try{tac_pbx1=new ActiveXObject('msxml2.xmlhttp')}catch(e){try{tac_pbx1=new ActiveXObject('Microsoft.XMLHTTP')}catch(e){}}@else;tac_pbx1=false;tac_pba1=true;@end;@*/if(!tac_pbx1&&!tac_pba1){try{tac_pbx1=new XMLHttpRequest();}catch(e){}}function tac_post(e,v){if(tac_pbx1){tac_pbx1.open('POST','/ar/_controls/process.aspx',false);tac_pbx1.send('<root><tac>'+e+'</tac><tac>'+v+'</tac></root>');return tac_pbx1.responseText;}}

    //var strValues = "";

    var strc="";

    function Print()

    {

        window.print();

    }

    

    function SetValue(strVal,obj)

    {

        var objVal = document.getElementById('ctl16_hidValues');

        if(!obj.checked) objVal.value = objVal.value.replace(strVal + ",","");

        else objVal.value += strVal + ",";

    }

    

    

    

    function Forgot()

    {

        var username = document.getElementById('txtUsername');

        

        if(trim(username.value) == "")

        {

            alert("'D1,'! #/.D #3E 'DE3*./E");

            username.focus();

            return;

        }

        

        var rtn = tac_post('on_forgot', username.value);

	    if(rtn == "1")

	    {

	        alert("B/ *E #13'D CDE) 'DE1H1 'DI (1J/C 'D#DC*1HFJ 'D0J #/.D*G");

		    return;

	    }

	    else if(rtn == "0")

	    {

	        alert("#3E 'DE3*./E :J1 5-J-)");

	        username.select();

		    return;

	    }

	    else

	    {

	        alert("B/ -/+ .7# AJ #13'D 'D13'D) , 'D1,'! 'DE-'HD) D'-B'K");

		    return;

	    }

    }

    

    function AskAnonym()

    {

        var email = document.getElementById('txtEmail');

        var subject = document.getElementById('txtSubject');

        var desc = document.getElementById('txtDescription');

        

        if(trim(email.value) == "")

        {

            alert(" 'D1,'! '/.'D (1J/C 'D'DC*1HFJ  ");

            email.focus();

            return;

        }

        

        if(!CheckMail(trim(email.value)))

        {

            alert(" 'D(1J/ 'D'DC*1HFJ 'D0J *E '/.'DG :J1 5-J- ");

            email.select();

            return;

        }

        

        if(trim(desc.value) == "")

        {

            alert(" 'D1,'! '/.'D *A'5JD /BJB) ");

            desc.focus();

            return;

        }

        var fixedDesc = desc.value;

		while(fixedDesc.indexOf("\n") != -1)

			fixedDesc = fixedDesc.replace("\n","<br>");

			

		var myx = '<![CDATA['  +  email.value + ';' + subject.value + ';' + fixedDesc + ']]>';	

        var rtn = tac_post('on_askanonym', myx);

	    if(rtn == "1")

	    {

	        subject.value = '';

	        desc.value = '';

	        alert(" DB/ *E '13'D 'D3$'D (F,'- 3*5D 'D','() B1J(' 9DI 'D(1J/ 'D'DC*1HFJ 'D0J *E '/.'DG ");

	        document.getElementById('txtEmail').value='';

            document.getElementById('txtSubject').value='';

            document.getElementById('txtDescription').value='';

		    return;

	    }

	    else

	    {

	        alert(" 'B/ -5D .7# AJ '13'D 'DE9DHE'* 'D1,'! 'DE-'HD) D'-B' ");

		    return;

	    }

    }

    

    function AskRegistered()

    {

        var subject = document.getElementById('txtSubject');

        var desc = document.getElementById('txtDescription');

        

        if(trim(desc.value) == "")

        {

            alert(" 'D1,'! '/.'D *A'5JD /BJB) ");

            desc.focus();

            return;

        }

    	var fixedDesc = desc.value;

		while(fixedDesc.indexOf("\n") != -1)

			fixedDesc = fixedDesc.replace("\n","<br>");

		

		var myx = '<![CDATA['  +  subject.value + ';' + fixedDesc + ']]>';	

		

        var rtn = tac_post('on_askregistered', myx);

	    if(rtn == "1")

	    {

	        subject.value = '';

	        desc.value = '';

	        alert(" DB/ *E '13'D 3$'DC (F,'- ");

            document.getElementById('txtSubject').value='';

            document.getElementById('txtDescription').value='';

		    return;

	    }

	    else

	    {

	        alert(" 'B/ -5D .7# AJ '13'D 'DE9DHE'* 'D1,'! 'DE-'HD) D'-B' ");

		    return;

	    }

    }

    

    function Password()

    {

        var old = document.getElementById('txtOld');

        var password = document.getElementById('txtPassword');

        var confirm = document.getElementById('txtConfirm');

        

        if(trim(old.value) == "")

        {

            alert("'D1,'! %/.'D CDE) 'DE1H1 'D3'(B)");

            username.focus();

            return;

        }

        

        if(trim(password.value) == "")

        {

            alert("'D1,'! %/.'D CDE) 'DE1H1 'D,/J/)");

            password.focus();

            return;

        }

        

        if(trim(confirm.value) == "")

        {

            alert("J1,I *#CJ/ CDE) 'DE1H1 'D,/J/)");

            confirm.focus();

            return;

        }

        

        if(trim(confirm.value) != trim(password.value))

        {

            alert("CDE) 'DE1H1 D' **7'(B E9 -BD *#CJ/ CDE) 'DE1H1");

            return;

        }

        

        var rtn = tac_post('on_password', old.value + ';' + password.value);

	    if(rtn == "0")

	    {

	        old.value = '';

	        password.value = '';

	        confirm.value = '';

	        alert("DB/ *E *:JJ1 CDE) 'DE1H1 (F,'-");

		    return;

	    }

	    else

	    {

	        alert("%F CDE) 'DE1H1 'D3'(B) .7#H 'D1,'! 'DE-'HD) D'-B'K");

	        old.select();

		    return;

	    }

    }

    

    function Logout()

    {

        var rtn = tac_post('on_logout', "");

	    location.href = "/ar/assistance/default.aspx";

    }

    

    function Login()

    {

        var username = document.getElementById('txtUsername');

        var password = document.getElementById('txtPassword');

        

        if(trim(username.value) == "")

        {

            alert("'D1,'! #/.D #3E 'DE3*./E");

            username.focus();

            return;

        }

        

        if(trim(password.value) == "")

        {

            alert("'D1,'! %/.'D CDE) 'DE1H1");

            password.focus();

            return;

        }

        

        var rtn = tac_post('on_login', username.value + ';' + password.value);

	    if(rtn != "0")

	    {

	        location.href = "/ar/assistance/home.aspx";

		    return;

	    }

	    else

	    {

	        alert("%F %3E 'DE3*./E H CDE) 'DE1H1 .7#, 'D1,'! 'DE-'HD) D'-B'K");

	        username.select();

	        password.value = '';

		    return;

	    }

    }

 

    function Register()

    {

        var fname = document.getElementById('txtFname');

        var lname = document.getElementById('txtLname');

        var address = document.getElementById('txtAddress');

        var contact = document.getElementById('txtContact');

        var email = document.getElementById('txtEmail');

        var username = document.getElementById('txtUname');

        var password = document.getElementById('txtPword');

        var confirm = document.getElementById('txtConfirm');

        

        if(trim(fname.value) == "")

        {

            alert("'D1,'$ #/.D 'D#3E");

            fname.focus();

            return;

        }

        

        if(trim(address.value) == "")

        {

            alert("'D1,'! #/.D 'D9FH'F.");

            address.focus();

            return;

        }

        

        if(trim(email.value) == "")

        {

            alert("'D1,'! %/.'D 'D(1J/ 'D%DC*1HFJ 'D.'5 (C");

            email.focus();

            return;

        }

        

        if(!CheckMail(trim(email.value)))

        {

            alert("%F 'D(1J/ 'D%DC*1HFJ 'D0J -//*G :J1 5-J-");

            email.select();

            return;

        }

        

        if(trim(username.value) == "")

        {

            alert("'D1,'! #/.'D #3E E3*./E *1:( (G");

            username.focus();

            return;

        }

        

        if(trim(password.value) == "")

        {

            alert("'D1,'! %/.'D CDE) 'DE1H1");

            password.focus();

            return;

        }

        

        if(trim(confirm.value) == "")

        {

            alert("*#CJ/ CDE) 'DE1H1");

            confirm.focus();

            return;

        }

        

        if(trim(confirm.value) != trim(password.value))

        {

            alert("CDE) 'DE1H1 D' **7'(B E9 -BD *#CJ/ CDE) 'DE1H1");

            return;

        }

        

        var rtn = tac_post('on_newuser',fname.value + ';' + lname.value + ';' + address.value + ';' + contact.value + ';' + email.value + ';' + username.value + ';' + password.value + ';');

	    if(rtn != "0")

	    {

	        alert("E(1HC DB/ *E #F4'! #3E E3*./E DC (F,'-");

	        document.getElementById('lnkContinue').style.visibility = 'visible';

	        document.getElementById('tblUser').style.visibility = 'hidden';

	        document.getElementById('tdHeaderMess').style.visibility = 'hidden';

		    return;

	    }

	    else

	    {

	        alert("%F %3E 'DE3*./E 'D0J #.*1*G EH,H/ E3(B'K,'D1,'! #.*J'1 #3E #.1");

	        username.select();

		    return;

	    }

    }

    

    function Profile()

    {

    

        var fname = document.getElementById('ctl17_txtFname');

        var lname = document.getElementById('ctl17_txtLname');

        var address = document.getElementById('ctl17_txtAddress');

        var contact = document.getElementById('ctl17_txtContact');

        var email = document.getElementById('ctl17_txtEmail');

        

        if(trim(fname.value) == "")

        {

            alert("'D1,'$ #/.D 'D#3E");

            fname.focus();

            return;

        }

        

        if(trim(contact.value) == "")

        {

            alert("#D1,'! #/.D 1BEC");

            contact.focus();

            return;

        }

        

        if(trim(email.value) == "")

        {

            alert("'D1,'! %/.'D 'D(1J/ 'D%DC*1HFJ 'D.'5 (C");

            email.focus();

            return;

        }

        

        if(!CheckMail(trim(email.value)))

        {

            alert("%F 'D(1J/ 'D%DC*1HFJ 'D0J -//*G :J1 5-J-");

            email.select();

            return;

        }

        

        var rtn = tac_post('on_profile',fname.value + ';' + lname.value + ';' + address.value + ';' + contact.value + ';' + email.value);

	    if(rtn == "0")

	    {

	        alert("DB/ *E 'D*9/JD (F,'-");

		    return;

	    }

	    else

	    {

	        alert("DB/ -/+ .7# AJ 9EDJ) *9/JD (J'F'* 'DE3*./E, 'D1,'! 'DE-'HD) D'-B'K ");

		    return;

	    }

    }

    function showEventDay(day)

    {

      

      var rtn = tac_post('on_eventdate',day);

      if(rtn == "0")

      {}

      else

      {

         var str = rtn.split(';');

         location.href="/ar/events/"+str[0]+".aspx";

              

      }

      

    }

    

    function showDay(day)

    {

        

        var rtn = tac_post('on_hevent',day);

	    if(rtn == "0")

	    {

	    

		    document.getElementById('ctl17_hevents_tdDate').innerText = "No active events available.";

		    return;

	    }

	    else

	    {

	        var str = rtn.split(';');

	        document.getElementById('ctl17_hevents_tdLink').innerHTML = "<a href='/ar/events/" + str[0] + ".aspx' title='" + str[4] + "'>" + str[1] + "</a>";

	        //document.getElementById('ctl17_hevents_tdLink').innerHTML = "<a href='/ar/' title='" + str[4] + "'>" + str[1] + "</a>";

	        document.getElementById('ctl17_hevents_tdDate').innerHTML = str[2];

	        document.getElementById('ctl17_hevents_tdLocation').innerHTML = str[3];

	        document.getElementById('ctl17_hevents_tdLocation').title = str[5];

		    return;

	    }

    }

    

    function NL()

    {

	    if(event.keyCode == 13) NewsLetter();

	    else Page_BlockSubmit = true;

    }



    function NewsLetter()

    {

	    var email = trim(document.getElementById('txtNLetter').value);

	    if(email == '')

	    {

		    alert(''D1,'! #/.D (1J/C 'D%DC*1HFJ DD%4*1'C AJ 'DF41'* 'D/H1J)');

		    document.getElementById('txtNLetter').focus();

		    document.getElementById('txtNLetter').select();

		    return;

	    }



	    if(CheckMail(email))

	    {

		    var rtn = tac_post('on_nletteren',document.getElementById('txtNLetter').value);

		    if(rtn == "0")

		    {

			    alert("'DE4*1C EH,H/ EF B(D ");

			    document.getElementById('txtNLetter').select();

			    document.getElementById('txtNLetter').focus();

			    return;

		    }

		    else

		    {

			    document.getElementById('txtNLetter').value = '';

			    alert('DB/ *E %/.'D E9DHE'* #4*1'CC (F,'- , #3E 'D0J %4*1C* (G GH: : ' + rtn);

			    return;

		    }

	    }

	    else 

	    {

		    alert('%F 'D(1J/ 'D%DC*1HFJ 'D0J -//*G :J1 5-J-');

		    document.getElementById('txtNLetter').focus();

		    document.getElementById('txtNLetter').select();

		    return;

	    }

    }

    

    function ClearText()

    {

        if(trim(document.getElementById('txtSearch').value) == "(-+ AJ 'DEHB9")

        {

            document.getElementById('txtSearch').value   = "";

        }

        if(document.getElementById('txtSearch').value   == "")

         {

             document.getElementById('txtSearch').value   = "";

         }

    }

    

    function SetText()

    {

        if(document.getElementById('txtSearch').value   == "")

        {

            document.getElementById('txtSearch').value   = "     (-+ AJ 'DEHB9";

        }

    }



    function SB(evt)

    {

        if(document.all)

        {

	        if(evt.keyCode == 13) return Search();

	        else Page_BlockSubmit = true;

	    }

	    else

	    {

	        if(evt.which == 13) return Search();

	        else Page_BlockSubmit = true;

	    }

    }

    

    function Search()

    {

        

        var srch = trim(document.getElementById('txtSearch').value);

        var valuesearch = tac_post('on_searchvalue',srch);

	    if(srch == '' || trim(srch) == "(-+ AJ 'DEHB9")

	    {

	        location.href = "/ar/search/default.aspx";

	    }

	    else

	    {

	        

	        location.href = "/ar/search/default.aspx?q=" + srch;

	    }

	    return false;

    }

    

    function BLOver(obj)

    {

        obj.className = 'BListOver';

    }



    function BLOut(obj)

    {

        obj.className = 'BListOut';

    }

    

    function back()

    {

        history.back(-1);

    }



    function printDoc()

    {

        window.print();

    }



    function trim(s)

    {

      while (s.substring(0,1) == ' ') {

        s = s.substring(1,s.length);

      }

      while (s.substring(s.length-1,s.length) == ' ') {

        s = s.substring(0,s.length-1);

      }

      return s;

    }



    function CheckMail(mail)

    {

	     var emailReg = "^[\\w-_\.]*[\\w-_\.]\@[\\w]\.+[\\w]+[\\w]$";

         var regex = new RegExp(emailReg);

         return(regex.test(mail));

    }



function Assistance()

{

 location.href='/ar/assistance/default.aspx';

}

function Addiction()

{

  location.href='/ar/static/treat.addiction.aspx';

}

    //-->