//
// mbm_scripts.js
//
// Modification Log
// 6/21/07 - SCB: original version

function HomePage()
{
 parent.location="/";
}

function CloseIt()
{
window.opener = top;
window.close();
}

function ShowStops()
{
URL = document.LANSA.STOPSURL.value;
var randomstr = ' ';
randomstr = randomString();
newwindow = window.open(URL,randomstr,'width=1075,height=775,toolbar=yes, location=yes,directories=yes,status=yes,menubar=yes,scrollbars=yes,copyhistory=no, resizable=yes');
newwindow.focus();
}

function randomString() {
	var chars = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXTZabcdefghiklmnopqrstuvwxyz";
	var string_length = 8;
	var randomstring = '';
	for (var i=0; i<string_length; i++) {
		var rnum = Math.floor(Math.random() * chars.length);
		randomstring += chars.substring(rnum,rnum+1);
		}
		return(randomstring);
}


/* function randomString(var randomstring) {
	var chars = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXTZabcdefghiklmnopqrstuvwxyz";
	var string_length = 8;
	var randomstring = '';
	for (var i=0; i<string_length; i++) {
		var rnum = Math.floor(Math.random() * chars.length);
		randomstring += chars.substring(rnum,rnum+1);
	}
}*/


function CHECKLOAD()
{
if (document.getElementById) {  // DOM3 = IE5, NS6
document.getElementById('hidepage').style.visibility = 'hidden';
}
else {
if (document.layers) {  // Netscape 4
document.hidepage.visibility = 'hidden';
}
else {  // IE 4
document.all.hidepage.style.visibility = 'hidden';
      }
   }

}

/*Loop through screen fields and Validate*/
function sc11m04_validate()
{
var answer = '';
var error;
    for (var i = 0; i<document.LANSA.elements.length; i++) 
 {
         answer = '';
         answer += document.LANSA.elements[i].name;

		  /********************************************************************************/
		 /* Verify Original Password */
		 /********************************************************************************/
		  if (answer == "S_OPASS")
		 {
		 
		 if ((validate_oldpass(document.LANSA.elements[i],error) == false))
		 {
		 return;
		 }
		 }
		  /********************************************************************************/
		 /* Verify New Password */
		 /********************************************************************************/
		 if (answer == "S_PASS")
		 {
		 
		 if ((validate_newpass(document.LANSA.elements[i],error) == false))
		 {
		 return;
		 }
		 
		 }
		 /********************************************************************************/
		 /* Verify Verified Password */
		 /********************************************************************************/
		  if (answer == "S_VPASS")
		 {
		 
		 if ((validate_verpass(document.LANSA.elements[i],error) == false))
		 {
		 return;
		 }
		 
		 }
	
     
 }
document.LANSA.STDRENTRY.value = 'V';
HandleEvent('SC11M04', 'ChangePassword', document.LANSA, null);
}

function sc11m04_ChangePrefs(txt)
{
var answer = '';
var error;
    for (var i = 0; i<document.LANSA.elements.length; i++) 
 {
         answer = '';
         answer += document.LANSA.elements[i].name;
		  /********************************************************************************/
		 /* Verify reply */
		 /********************************************************************************/
		  if (answer == "S_REPLY")
		 {
		 
		 if ((validate_reply(document.LANSA.elements[i],error) == false))
		 {
		 return;
		 }
		 }
		  /********************************************************************************/
		 /* Verify Email */
		 /********************************************************************************/
		 if (answer == "S_EMAIL")
		 {
		 
		 if ((validate_email(document.LANSA.elements[i],error) == false))
		 {
		 return;
		 }
		 
		 }
		 /********************************************************************************/
		 /* Verify Email Against First Email */
		 /********************************************************************************/
		 if (answer == "S_EMAIL2")
		 {
		 if ((verify_email(document.LANSA.elements[i],error) == false))
		 {
		 return;
		 }
		 
		 }
			
     
 }
if (txt =='Update')
{
document.LANSA.STDRENTRY.value = 'U';
HandleEvent('SC11M04', 'ChangePrefs', document.LANSA, null);
}
if (txt =='Submit')
{
document.LANSA.STDRENTRY.value = 'S';
HandleEvent('SC11M04', 'ChangePrefs', document.LANSA, null);
}
}

function validate_oldpass(obj,error)
{
arrFormValidation = new Array();
idx=0;
var req_error="Original Password is Required";
var num_of_rules = 1;

arrFormValidation[idx++] =
  				[
					["req",req_error]
				];
			
			for(var itrobj=0; itrobj < num_of_rules; itrobj++) 
 			{ 
 			
			  if (validateData2(obj,arrFormValidation[0][itrobj][0],arrFormValidation[0][itrobj][1]) == false) 
       { 
	     obj.focus();
         return false; 
       }
	}
			
}


function validate_newpass(obj,error)
{
arrFormValidation = new Array();
idx=0;
var min_error="New Password Must Be at  Least 8 characters";
var max_error="New Password Must Be Less Than 16";
var mixed_error="New Password Must Contain at Least One Character and One Digit";
var num_of_rules = 4;

arrFormValidation[idx++] =
  				[
					["mixed",mixed_error],
					["minlen=8",min_error],
					["maxlen=16",max_error],
					["req"]
				];
			
			for(var itrobj=0; itrobj < num_of_rules; itrobj++) 
 			{ 
 			
			  if (validateData2(obj,arrFormValidation[0][itrobj][0],arrFormValidation[0][itrobj][1]) == false) 
       { 
	     obj.focus();
         return false; 
       }
			
			
 			}
			
}

function validate_verpass(obj,error)
{
arrFormValidation = new Array();
idx=0;
var check_error="Verify Password Must Match New Password";
var req_error="Verify Password is Required";
var num_of_rules = 1;

arrFormValidation[idx++] =
  				[
					["req",req_error]
				];
			
			for(var itrobj=0; itrobj < num_of_rules; itrobj++) 
 			{ 
 			
			  if (validateData2(obj,arrFormValidation[0][itrobj][0],arrFormValidation[0][itrobj][1]) == false) 
       { 
	     obj.focus();
         return false; 
       }
	 /* Other checks */  
	  if (document.LANSA.S_PASS.value != document.LANSA.S_VPASS.value)
	   {
	    obj.focus();
		alert('Verify Password Must Match New Password')
		return false
	   }
	   
			
			
 			}
			
}

function validate_reply(obj,error)
{
arrFormValidation = new Array();
idx=0;
var req_error="Reply Required";
var num_of_rules = 1;

arrFormValidation[idx++] =
  				[
					["req",req_error]
				];
			
			for(var itrobj=0; itrobj < num_of_rules; itrobj++) 
 			{ 
 			
			  if (validateData2(obj,arrFormValidation[0][itrobj][0],arrFormValidation[0][itrobj][1]) == false) 
       { 
	     obj.focus();
         return false; 
       }
	
			
			
 			}
			
}

function validate_email(obj,error)
{
arrFormValidation = new Array();
idx=0;
var inv_error="Not a Valid Email Address";
var num_of_rules = 1;

arrFormValidation[idx++] =
  				[
					["email",inv_error]						
				];
			
			for(var itrobj=0; itrobj < num_of_rules; itrobj++) 
 			{ 
 			
			  if (validateData2(obj,arrFormValidation[0][itrobj][0],arrFormValidation[0][itrobj][1]) == false) 
       { 
	     obj.focus();
         return false; 
       }
	
			
			
 			}
			
}

function verify_email(obj,error)
{
arrFormValidation = new Array();
idx=0;
var inv_error="Verify Email Does Not Match";
var num_of_rules = 1;

arrFormValidation[idx++] =
  				[
					["veremail",inv_error]						
				];
			
			for(var itrobj=0; itrobj < num_of_rules; itrobj++) 
 			{ 
 			
			  if (validateData2(obj,arrFormValidation[0][itrobj][0],arrFormValidation[0][itrobj][1]) == false) 
       { 
	     obj.focus();
         return false; 
       }
	
			
			
 			}
			
}



function validateEmail(email)
{
// a very simple email validation checking. 
// you can add more complex email checking if it helps 
    var splitted = email.match("^(.+)@(.+)$");
    if(splitted == null) return false;
    if(splitted[1] != null )
    {
      var regexp_user=/^\"?[\w-_\.]*\"?$/;
      if(splitted[1].match(regexp_user) == null) return false;
    }
    if(splitted[2] != null)
    {
      var regexp_domain=/^[\w-\.]*\.[A-Za-z]{2,4}$/;
      if(splitted[2].match(regexp_domain) == null) 
      {
	    var regexp_ip =/^\[\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\]$/;
	    if(splitted[2].match(regexp_ip) == null) return false;
      }// if
      return true;
    }
return false;
}

/* function validateData 
*  Checks each field in a form 
*  Called from validateForm function 
*/ 


function validateData2(objValue,strValidateStr,strError) 
{ 

    var epos = strValidateStr.search("="); 
	var  command  = ""; 
    var  cmdvalue = ""; 
    if(epos >= 0) 
    { 
     command  = strValidateStr.substring(0,epos); 
     cmdvalue = strValidateStr.substr(epos+1); 
    } 
    else 
    { 
     command = strValidateStr; 
    } 
	

    switch(command) 
    { 
        case "req": 
        case "required": 
         { 
           if(eval(objValue.value.length) == 0) 
           { 
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name + " : Required Field"; 
              }//if 
              alert(strError); 
              return false; 
           }//if 
           break;             
         }//case required 
        case "maxlength": 
        case "maxlen": 
          { 
             if(eval(objValue.value.length) >  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : "+cmdvalue+" characters maximum "; 
               }//if 
               alert(strError + "\n[Current length = " + objValue.value.length + " ]"); 
               return false; 
             }//if 
             break; 
          }//case maxlen 
        case "minlength": 
        case "minlen": 
           { 
             if(eval(objValue.value.length) <  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : " + cmdvalue + " characters minimum  "; 
               }//if               
               alert(strError + "\n[Current length = " + objValue.value.length + " ]"); 
               return false;                 
             }//if 
             break; 
            }//case minlen 
        case "alnum": 
        case "alphanumeric": 
           { 
              var charpos = objValue.value.search("[^A-Za-z0-9]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
               if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Only alpha-numeric characters allowed "; 
                }//if 
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break; 
           }//case alphanumeric 
		   case "mixed": 
           { 
              var charpos = objValue.value.search("[^A-Za-z]"); 
			  var numpos = objValue.value.search("[^0-9]");
			  if(objValue.value.length > 0 &&  (charpos < 0 || numpos < 0)) 
              { 
               if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Must Contain At Least One Character and One Digit "; 
                }//if 
                alert(strError); 
                return false; 
              }//if 
              break; 
           }//case alphanumeric 
		   
		   
		   
		   
        case "num": 
        case "numeric": 
           { 
              var charpos = objValue.value.search("[^0-9]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Only digits allowed "; 
                }//if               
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break;               
           }//numeric 
        case "alphabetic": 
        case "alpha": 
           { 
              var charpos = objValue.value.search("[^A-Za-z]"); 
              if(objValue.value.length > 0 &&  charpos >= 0) 
              { 
                  if(!strError || strError.length ==0) 
                { 
                  strError = objValue.name+": Only alphabetic characters allowed "; 
                }//if                             
                alert(strError + "\n [Error character position " + eval(charpos+1)+"]"); 
                return false; 
              }//if 
              break; 
           }//alpha 
        case "email": 
          { 
               if(!validateEmail(objValue.value)) 
               { 
                 if(!strError || strError.length ==0) 
                 { 
                    strError = objValue.name+": Enter a valid Email address "; 
                 }//if                                               
                 alert(strError); 
                 return false; 
               }//if 
           break; 
          }//case email 
 		case "veremail": 
          {    if (document.LANSA.S_EMAIL.value != document.LANSA.S_EMAIL2.value) 
               {  
                 strError = "Verify Email Does Not Match"; 
                 alert(strError); 
                 return false; 
               }
           break; 
          }//case email 

        case "lt": 
        case "lessthan": 
         { 
            if(isNaN(objValue.value)) 
            { 
              alert(objValue.name+": Should be a number "); 
              return false; 
            }//if 
            if(eval(objValue.value) >=  eval(cmdvalue)) 
            { 
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name + " : value should be less than "+ cmdvalue; 
              }//if               
              alert(strError); 
              return false;                 
             }//if             
            break; 
         }//case lessthan 
        case "gt": 
        case "greaterthan": 
         { 
            if(isNaN(objValue.value)) 
            { 
              alert(objValue.name+": Should be a number "); 
              return false; 
            }//if 
             if(eval(objValue.value) <=  eval(cmdvalue)) 
             { 
               if(!strError || strError.length ==0) 
               { 
                 strError = objValue.name + " : value should be greater than "+ cmdvalue; 
               }//if               
               alert(strError); 
               return false;                 
             }//if             
            break; 
         }//case greaterthan 
        case "regexp": 
         { 
            if(!objValue.value.match(cmdvalue)) 
            { 
              if(!strError || strError.length ==0) 
              { 
                strError = objValue.name+": Invalid characters found "; 
              }//if                                                               
              alert(strError); 
              return false;                   
            }//if 
           break; 
         }//case regexp 
        case "dontselect": 
         { 
            if(objValue.selectedIndex == null) 
            { 
              alert("BUG: dontselect command for non-select Item"); 
              return false; 
            } 
            if(objValue.selectedIndex == eval(cmdvalue)) 
            { 
             if(!strError || strError.length ==0) 
              { 
              strError = objValue.name+": Please Select one option "; 
              }//if                                                               
              alert(strError); 
              return false;                                   
             } 
             break; 
         }//case dontselect 
    }//switch 
    return true; 
} 