function set_ShippingAddress(){

	frmObj = document.address_info;
	if (frmObj.same.checked == true){
		frmObj.s_state.selectedIndex = frmObj.state.selectedIndex;
		frmObj.s_address.value = frmObj.address.value;
		frmObj.s_phone.value = frmObj.phone.value;
		frmObj.s_city.value = frmObj.city.value;
		frmObj.s_zipcode.value = frmObj.zipcode.value;
		frmObj.s_last_name.value = frmObj.last_name.value;
		frmObj.s_first_name.value = frmObj.first_name.value;
		frmObj.s_address.value = frmObj.address.value;
	}

}
function stringFilter (input,fchars) {
	s = input;
	filteredValues = fchars;     // Characters stripped out
	var i;
	var returnString = "";
	for (i = 0; i < s.length; i++) {  // Search through string and append to unfiltered values to returnString.
		var c = s.charAt(i);
		if (filteredValues.indexOf(c) == -1) {
			returnString += c;
		}
	}
	return returnString;
}
function formatUsPhone(field,frmObj){
	
	pn = field.value;
	slen = pn.length;
	pn = stringFilter(pn,"()- ");
	var newp = '';
	for (i=0; i<slen; i++){
	  	val = pn.charAt(i);
		if (i == 0){
			newp = '(';
		}
		if (i == 3){
			newp += ') ';
		}
		if (i == 6){
			newp += '-';
		}
		if (i == 10){
			break;
		}
		newp += val;
	}
	field.value = newp;
}
function addrVal(frm){

	errors = '';
	if (frm.patient_name.value == ''){
		errors += "Required Patient Name\n";
	}
	if (frm.patient_tel.value == ''){
		errors += "Required Patient Telephone\n";
	}
	if (frm.patient_tel.value.length < 14){
		errors += "Invalid Patient Telephone must be (XXX) XXX-XXXX\n";
	}
	if (frm.ref_doc.value == ''){
		errors += "Required Referring Physician or Referring Nutritionist:\n";
	}
	if (frm.cust_email.value == ''){
		errors += "Required E-Mail:\n";
	}

	if (frm.first_name.value == ''){
		errors += "Required First Name\n";
	}
	if (frm.last_name.value == ''){
		errors += "Required Last Name\n";
	}
	if (frm.address.value == ''){
		errors += "Required Address\n";
	}
	if (frm.city.value == ''){
		errors += "Required City\n";
	}

	if (frm.state.selectedIndex == 0){
		errors += "Required State\n";
	}
	if (frm.zipcode.value == ''){
		errors += "Required Zip Code\n";
	}
	if (frm.phone.value == ''){
		errors += "Required Phone\n";
	}
	if (frm.phone.value.length < 14){
		errors += "Invalid Phone must be (XXX) XXX-XXXX\n";
	}
	if (frm.s_first_name.value == ''){
		errors += "Required Billing  First Name\n";
	}
	if (frm.s_last_name.value == ''){
		errors += "Required Billing  Last Name\n";
	}
	if (frm.s_address.value == ''){
		errors += "Required Billing  Address\n";
	}
	if (frm.s_city.value == ''){
		errors += "Required Billing  City\n";
	}
	if (frm.s_state.selectedIndex == 0){
		errors += "Required Billing  State\n";
	}
	if (frm.s_zipcode.value == ''){
		errors += "Required Billing  Zip Code\n";
	}
	if (frm.s_phone.value == ''){
		errors += "Required Billing  Phone\n";
	}
	if (frm.s_phone.value.length < 14){
		errors += "Invalid Billing Phone must be (XXX) XXX-XXXX\n";
	}
	if (errors){
		alert(errors);
		return false;
	}

}