<%
var kEvent = { accessDenied:0, failedEmail:1, failedPassword:2, login:4, logout:5, addAction:10, editAction:11, deleteAction:12, addRole:20, editRole:21, deleteRole:22, addUser:30, editUser:31, deleteUser:32, editOptionSet:40, addOptionPlan:50, editOptionPlan:51, deleteOptionPlan:52, addVestPlan:60, editVestPlan:61, deleteVestPlan:62, addGrant:70, editGrant:71, deleteGrant:72, pageView:255 };
var kAccessLevel = { noAccess:0, readOnly:1, edit:2, admin:3, su:4 };
var loginError = { noError:0, failedEmail:1, failedPassword:2 };

var root = Request.ServerVariables("SCRIPT_NAME")();
var url = root+((url=Request.ServerVariables("QUERY_STRING")()).length>0?"?":"")+url;
var page = root.substr(root.lastIndexOf("/")+1);

function AddLog(eventType,foreignKey,data){
	DebugOut('AddLog('+eventType+','+foreignKey+','+data+')',2);
	if (data==null && eventType==kEvent.pageView) data = url;
	data = data==null ? "NULL" : SQLString(data);
	var ip = Request.ServerVariables("REMOTE_ADDR")();
	ExecuteSQL("sp_InsertLog",SQLString(ip),eventType,Session("userID")?Session("userID"):null,foreignKey,data);
}

Math.randomMax=function(max,float){ max=Math.random()*max; return float?max:Math.round(max) }

Date.prototype.customFormat = function(formatString){
	var YYYY,YY,MMMM,MMM,MM,M,DDDD,DDD,DD,D,hhh,hh,h,mm,m,ss,s,ampm,AMPM,dMod,th;
	var dateObject = this;
	YY = ((YYYY=dateObject.getFullYear())+"").substr(2,2);
	MM = (M=dateObject.getMonth()+1)<10?('0'+M):M;
	MMM = (MMMM=["January","February","March","April","May","June","July","August","September","October","November","December"][M-1]).substr(0,3);
	DD = (D=dateObject.getDate())<10?('0'+D):D;
	DDD = (DDDD=["Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday"][dateObject.getDay()]).substr(0,3);
	th=(D>=10&&D<=20)?'th':((dMod=D%10)==1)?'st':(dMod==2)?'nd':(dMod==3)?'rd':'th';
	formatString = formatString.replace("#YYYY#",YYYY).replace("#YY#",YY).replace("#MMMM#",MMMM).replace("#MMM#",MMM).replace("#MM#",MM).replace("#M#",M).replace("#DDDD#",DDDD).replace("#DDD#",DDD).replace("#DD#",DD).replace("#D#",D).replace("#th#",th);

	h=(hhh=dateObject.getHours());
	if (h==0) h=24;
	if (h>12) h-=12;
	hh = h<10?('0'+h):h;
	AMPM=(ampm=hhh<12?'am':'pm').toUpperCase();
	mm=(m=dateObject.getMinutes())<10?('0'+m):m;
	ss=(s=dateObject.getSeconds())<10?('0'+s):s;
	return formatString.replace("#hhh#",hhh).replace("#hh#",hh).replace("#h#",h).replace("#mm#",mm).replace("#m#",m).replace("#ss#",ss).replace("#s#",s).replace("#ampm#",ampm).replace("#AMPM#",AMPM);
}
Date.prototype.sqlDate = function(){ return this.customFormat("'#MM#/#DD#/#YYYY#'") }
Date.prototype.sqlDateTime = function(){ return this.customFormat("'#MM#/#DD#/#YYYY# #hhh#:#mm#:#ss#'") }
Date.prototype.standardFormat = function(){ return this.customFormat("#MM#/#DD#/#YYYY#") }

Array.prototype.applyToEach=function(f){ for (var i=0,len=this.length;i<len;i++) f(this[i],i,i==0,i==len-1) }

Number.prototype.round=function(decimals,returnAsString,decimalSeparator){
	var n,factor,breakPoint,whole,frac;
	if (!decimals) decimals=0;
	factor=Math.pow(10,decimals);
	n=(this.valueOf()+"");
	if (!returnAsString) return Math.round(n*factor)/factor;
	if (!decimalSeparator) decimalSeparator=".";
	if (n==0) return "0."+((factor+"").substr(1));
	breakPoint=(n=Math.round(n*factor)+"").length-decimals;
	whole = n.substr(0,breakPoint);
	if (decimals>0){
		frac = n.substr(breakPoint);
		if (frac.length<decimals) frac=(Math.pow(10,decimals-frac.length)+"").substr(1)+frac;
		return whole+decimalSeparator+frac;
	}else return whole+((Math.pow(10,-decimals)+"").substr(1));
}
Number.prototype.toInteger=function(thousandsSeparator){
	var n,startAt,intLen;
	if (thousandsSeparator==null) thousandsSeparator=",";
	n = this.round(0,true);
	intLen=n.length;
	if ((startAt=intLen%3)==0) startAt=3;
	for (var i=0,len=Math.ceil(intLen/3)-1;i<len;i++)n=n.insertAt(i*4+startAt,thousandsSeparator);
	return n;
}
Number.prototype.toCurrency=function(noFractions,currencySymbol,decimalSeparator,thousandsSeparator){
	var n,startAt,intLen;
	if (currencySymbol==null) currencySymbol="$";
	if (decimalSeparator==null) decimalSeparator=".";
	if (thousandsSeparator==null) thousandsSeparator=",";
	n = this.round(noFractions?0:2,true,decimalSeparator);
	intLen=n.length-(noFractions?0:3);
	if ((startAt=intLen%3)==0) startAt=3;
	for (var i=0,len=Math.ceil(intLen/3)-1;i<len;i++)n=n.insertAt(i*4+startAt,thousandsSeparator);
	return currencySymbol+n;
}

String.prototype.insertAt=function(loc,strChunk){
	return (this.valueOf().substr(0,loc))+strChunk+(this.valueOf().substr(loc))
}


function SQLVariableFromRequest(varName,isNum){
	var val = Request(varName)();
	if (val==null || val=="" || val=="null") return "NULL";
	if (isNum) return isNaN(val*=1)?"NULL":val;
	 return "'"+val.replace(/'/g,"''")+"'"
}
function SQLString(str){
	var sqlstr = /^'.*'$/;
	return sqlstr.test(str=str.toString())?str:("'"+str.replace(/'/g,"''")+"'");
}
function SQLDateFromRequest(varName,withTime){
	var val = new Date(Request(varName)());
	if (val==new Date(null) || isNaN(val)) return "NULL";
	return withTime?val.sqlDate():val.sqlDateTime();
}


function MyEncrypt(str){
	var cryptor = Server.CreateObject("AspCrypt.Crypt");
	var strSalt = "ss";
	var encryptedStr = cryptor.Crypt(strSalt, str);
	delete cryptor;
	return encryptedStr;
}


var connection;
function OpenConnection(){
	DebugOut("OpenConnection()",2);
	connection = Server.CreateObject("ADODB.Connection");
	connection.connectionstring = Application("connectionString");
	connection.Open();
	DebugOut(" -- OpenConnection successful",4);
}
function CloseConnection(){
	DebugOut("CloseConnection()",2);
	if (!this.connection) return;
	connection.Close();
	connection=null;
	delete connection;
	DebugOut(" -- CloseConnection successful",4);
}
function ExecuteSQL(sqlString){
	for (var i=1,len=arguments.length;i<len;i++) sqlString+=(i==1?" ":",")+arguments[i];
	DebugOut('ExecuteSQL("'+sqlString+'")',1);
	if (!connection) OpenConnection();

	var adStateOpen=1;
	var resultsAsVBArray;
	var rs = connection.Execute(sqlString);
	if (!rs || rs.State!=adStateOpen || rs.BOF || rs.EOF) resultsAsVBArray = new EmptyVBArray();
	else resultsAsVBArray = rs.GetRows();
	if (rs.State==adStateOpen) rs.Close();
	delete rs;
	DebugOut('ExecuteSQL("'+sqlString+'") -- returning '+(resultsAsVBArray.ubound(2)+1)+' rows',4);

	return resultsAsVBArray;
}
function EmptyVBArray(){
	DebugOut("EmptyVBArray()",4);
	this.dimensions = function(){ return 0 };
	this.ubound = this.lbound = function(){ return -1 };
	this.getItem = this.toArray = function(){ return null };
}
function IterableFlavor(vbArray){
	DebugOut("IterableFlavor("+vbArray+")",2);
	for (var i=0,a=[],len=vbArray.ubound(2);i<=len;i++){
		for (var j=1,p={},len2=arguments.length;j<len2;j++){
			p[arguments[j]]=vbArray.getItem(j-1,i);
		}
		a[i]=p;
	}
	DebugOut("IterableFlavor("+vbArray+") -- returning "+i+" records",4);
	return a;
}
function AssignProperties(vbArray){
	DebugOut("AssignProperties("+vbArray+")",4);
	if (vbArray.dimensions()==0) return null;
	for (var j=1,o={},len=arguments.length;j<len;j++) o[arguments[j]]=vbArray.getItem(j-1,0);
	return o;
}


function DebugOut(msg,lv){
	if (lv<0 || (this.debugLevel!=null && debugLevel!=false && debugLevel>=lv)){
		Response.Write("<xmp>"+msg+"</xmp>\n");
		if (Response.Buffer) Response.Flush();
	}
}


function GetSelect(optionSetName,selectedIDs){
	//selectedIDs can be a single ID, or an array of IDs which should be selected
	if (!selectedIDs) selectedIDs=[];
	if (!selectedIDs.slice) selectedIDs=[selectedIDs];
	for (var i=0,len=selectedIDs.length;i<len;i++) selectedIDs['s'+selectedIDs[i]]=true;
	var opts = IterableFlavor(ExecuteSQL("sp_GetOptions",null,SQLString(optionSetName)),'id','name');
	var sel='';
	for (var i=0,len=opts.length;i<len;i++) sel+='<option value="'+opts[i].id+'"'+(selectedIDs['s'+opts[i].id]?' selected':'')+'>'+opts[i].name+'</option>';

	return sel;
}

var reqd = '<span class="reqd help" title="this is a required field">*</span>';
%>