/*
07-May-09 12:26:10 AM
	add inlist to sub for $
	usage inlist('RCL',['INV_RCL_IGN']) would return 1 orhterwise -1
Saturday, May 30, 2009
	add setValue in dbUse for assigning value to column
*/

function can_u_view(){
	var rightno			= "guest_view";
	var rightname	= "ผู้เยี่ยมชมระบบ";
	if ((issupervisor=="1") || (checkrights(userid,rightno,rightname,false,false) == "-1")) { 
		return true;		
	}else{
		return false;
	}

}

function alertSize() {
  var myWidth = 0, myHeight = 0;
  if( typeof( window.innerWidth ) == 'number' ) {
    //Non-IE
    myWidth = window.innerWidth;
    myHeight = window.innerHeight;
  } else if( document.documentElement && ( document.documentElement.clientWidth || document.documentElement.clientHeight ) ) {
    //IE 6+ in 'standards compliant mode'
    myWidth = document.documentElement.clientWidth;
    myHeight = document.documentElement.clientHeight;
  } else if( document.body && ( document.body.clientWidth || document.body.clientHeight ) ) {
    //IE 4 compatible
    myWidth = document.body.clientWidth;
    myHeight = document.body.clientHeight;
  }
  return [myWidth,myHeight];
//  window.alert( 'Width = ' + myWidth );
 // window.alert( 'Height = ' + myHeight );
}

function tsdnodefault(event){
	if (AW.ie){
		event.keyCode = 0;
	}else{
		event.preventDefault(); 
		event.stopPropagation();
	}
}

function ischanged(title,obj,fldvalue,namecolumn){
	/*
		title	= "น้ำหนัก (mailcharge.kgs)"
		obj	= txtkgs
		fld		= mr.kgs
		if (lnkgs != mr.kgs){
			lcupdatelog += "น้ำหนัก (mailcharge.kgs)"+char(13);
			lcupdatelog += " จาก : "+iif(mr.kgs =='','null',mr.kgs)+" เป็น : "+iif(lnkgs =='','null',lnkgs)+char(13);
		}
	*/
	var retval = "";
	var newvalue,oldvalue,newtext,oldtext;
	if (obj.getType()=="tsdinput"){
		if (obj.getControlText() != fldvalue){
			retval += title + char(13);
			retval += " จาก : "+iif(fldvalue=="","null",fldvalue)+" เป็น : "+iif(obj.getControlText()=="","null",obj.getControlText())+char(13);
		}
		return retval;
	}else if(obj.getType()=="tsdnumber"){
		oldvalue = iif(fldvalue=="","null",val(fldvalue));
		newvalue = iif(isNaN(obj.getValue()),"null",obj.getValue());
		if (oldvalue != newvalue){
			retval += title + char(13);
			retval += " จาก : "+iif(fldvalue=="","null",fldvalue)+" เป็น : "+iif(isNaN(obj.getValue()),"null",obj.getControlText())+char(13);
		}
		return retval;
	}else if(obj.getType()=="tsddate"){
		oldvalue		= iif(obj.getYearType()=="thai",thaildate(fldvalue),engldate(fldvalue));
		newvalue	= obj.getControlText();
		if(oldvalue != newvalue){
			retval += title + char(13);
			retval += " จาก : "+iif(oldvalue=="","null",oldvalue)+" เป็น : "+iif(newvalue=="","null",newvalue)+char(13);
		}
		return retval;
	}else if(obj.getType()=="tsdlookup"){
		oldvalue		= fldvalue;
		newvalue	= obj.getDataID();
		if(oldvalue != newvalue){
			retval += title + char(13);
			retval += " จาก : "+iif(oldvalue=="","null","["+oldvalue+"] "+namecolumn)+" เป็น : "+iif(newvalue=="","null","["+newvalue+"] "+obj.getControlText())+char(13);
		}
		return retval;
	}else if(obj.getType()=="tsdradio"){
		oldvalue		= fldvalue;
		newvalue	= obj.getValue();
		if(oldvalue != newvalue){
			retval += title + char(13);
//			retval += " จาก : "+iif(oldvalue=="","null","["+oldvalue+"] "+obj.getOptionArray(oldvalue))+" เป็น : "+iif(newvalue=="","null","["+newvalue+"] "+obj.getOptionArray(newvalue))+char(13);
			retval += " จาก : "+iif(((oldvalue=="")||(oldvalue==0)),"null","["+oldvalue+"] "+obj.getOptionArray(oldvalue))+" เป็น : "+iif(((newvalue=="")||(newvalue==0)),"null","["+newvalue+"] "+obj.getOptionArray(newvalue))+char(13);
		}
		return retval;
	}else if(obj.getType()=="tsdcombo"){
		oldvalue		= fldvalue;
		newvalue	= obj.getListItemID();
		if(oldvalue != newvalue){
			retval += title + char(13);
			retval += " จาก : "+iif(oldvalue=="","null","["+oldvalue+"] "+obj.getListItem(oldvalue))+" เป็น : "+iif(newvalue=="-1","null","["+newvalue+"] "+obj.getListItem(newvalue))+char(13);
		}
		return retval;
	}else if(obj.getType()=="tsdcheckbox"){
		oldvalue		= fldvalue;
		newvalue	= iif(obj.getControlValue(),"1","0");
		if(oldvalue != newvalue){
			retval += title + char(13);
			retval += " จาก : "+iif(oldvalue=="","null",oldvalue)+" เป็น : "+iif(newvalue=="-1","null",newvalue)+char(13);
		}
		return retval;
	}else if(obj.getType()=="tsdedit"){
		if(isNaN(namecolumn)){
			if(obj.getControlText() != fldvalue){
				retval += title + char(13);
				retval += " ไม่ได้จำครับ"+char(13);
			}
		}else{
			if(obj.getControlText() != fldvalue){
				retval += title + char(13);
				retval += " จาก : "+iif(fldvalue=="","null",replace(fldvalue,"\n",char(32)))+char(13);
				retval += " เป็น : "+iif(obj.getControlText()=="","null",replace(obj.getControlText(),"\n",char(32)))+char(13);
			}
		}
		return retval;
	}else{
		return retval;
	}
}

function	updatelog_add(lcdbname,lnid){
	var cmd = "select updatewhen from "+lcdbname+" where id="+lnid;
	var chk = new dbUse(cmd,dsn);
	var updatelog = "'"+thaidatetime(chk.updatewhen)+" เพิ่มโดย "+username+" ที่เครื่อง "+nodeaddress+"'"+char(13);
	cmd = "update "+lcdbname+" set updatelog="+updatelog+" where id="+lnid;
	sqlpt(cmd,dsn);
	return true;
}

function updatelog_edit(lcdbname,getid,lcupdatelog,xupdatelog){
	var cmd = "select updatewhen from "+lcdbname+" where id="+getid;
	var chk = new dbUse(cmd,dsn);
	xupdatelog = replace(xupdatelog,"\n",char(13));
	updatelog = thaidatetime(chk.updatewhen)+" แก้ไขโดย "+username+" ที่เครื่อง "+nodeaddress+char(13);
	updatelog += lcupdatelog;
	updatelog += "-----------------------------------------------------------------------------------------------------------"+char(13)+xupdatelog;
	cmd = "update "+lcdbname+" set updatelog='"+cleanquote(updatelog)+"' where id="+getid;
	sqlpt(cmd,dsn);
	return true;
}

function tsdcandelete(lalist,lnid){
	var lcdbname,cmd,chk,i;
	var retval = false;
	for (i=0;i<lalist.length;i++){
		lcdbname = getdbname(lalist[i][0],"");
		cmd = "select count(*) as cnt from "+lcdbname+" where "+lalist[i][1]+"="+lnid+" and delby is null";
		chk = new dbUse(cmd,dsn);
		if (val(chk.cnt)>0){ alert( "มีข้อมูลที่ต้องการจะลบถูกอ้างถึงในตาราง"+lalist[i][2]+" อยู่ "+chk.cnt+" รายการ\nต้องไปลบเหล่านั้นให้หมดเสียก่อนจึงจะลบข้อมูลนี้ได้" ); 
			retval = false;
			break;
		}
	}
	return retval;
}

function isthaichr( lcstr ){
	var i;
	var chkstr = "ภถคตจขชๆไำฎพฑะธณรนฯยญบฐลฟฤหฆกฏดโเฌาษสศวซงผปแฉอฮทมฒใฬฝฦ";
	for (i=0;i<lcstr.length;i++){
		if (chkstr.indexOf(substr(lcstr,i,1)) != -1){ return true; }
	}
	return false;
}


function timeassecond( ctime ){
	var xx = val(substr(ctime,1,2))*3600;
	var yy = val(substr(ctime,4,2))*60;
	return xx + yy;
}

function timeasstring(nseconds){
	var lnhour,lnmin,lnsec;
	lnhour = val( (nseconds/3600) % 24,10) ;
	lnmin	 = val( (nseconds/60) % 60,10);
	lnsec	 = val(nseconds % 60,10);
	return strzero(lnhour,2)+":"+strzero(lnmin,2)+":"+strzero(lnsec,2);
}

function difftime(starttime,endtime){
	var xx = timeassecond(endtime);
	var yy = timeassecond(starttime);
	if (endtime < starttime){
		var zz = timeasstring(86400+xx-yy);
	}else{
		var zz = timeasstring(0+xx-yy);
	}

	return zz;
}


function proper(text){
	if (text==""){
		return text;
	}
	if(text.indexOf(" ")==-1){
		return upper(substr(text,1,1))+lower(substr(text,2));		
	}else{
		var atext = text.split(" ");
		var retval = "";
		for (var i=0;i<atext.length;i++){
			retval += upper(substr(atext[i],1,1))+lower(substr(atext[i],2))+" ";		
		}
		return substr(retval,1,retval.length-1);
	}
}

function isStrEq(src,dest){
	return (src == dest);
}

function isNumEq(src,dest){
	if ((typeof(src)=='number') && (isNaN(src))) {
		src = "";
	}else{
		src = str(src);
	}
	if ((typeof(dest)=='number') && (isNaN(dest))) {
		dest = "";
	}else{
		dest = str(dest);
	}
	if ((src=="") && (dest=="")){
		return true;
	}else if ((src!="") && (dest=="")){
		return false;
	}else if ((src=="") && (dest!="")){
		return false;
	}else{
		return str(val(src)) == str(val(dest));
	}
}

function now(){
	return new Date();
}

function ctod(cstr){

}

function day(dateobj){
	return val(dateobj.getMonth());
}

function month(dateobj){
	return val(dateobj.getMonth())+1;
}

function year(dateobj){
	return val(dateobj.getFullYear());
}

function findnextrow(vr,idcol){
	var lnrec = val(vr.recno);
	// ถ้าอยู่ที่บรรทัดสุดท้าย เอา id ของรายการก่อนหน้า
	if (lnrec+1 == vr.rowcount){
		// เช็คว่ามีรายการเดียวมั้ย
		if  (vr.rowcount > 1){
			vr.go(lnrec-1);
			var xx = "vr."+idcol;
			retid = eval(xx);
		}else{
			retid = "-1";
		}
	}else{
		vr.go(lnrec+1);
		var xx = "vr."+idcol;
		retid = eval(xx);
	}
	return retid;
}

function lower(text){
	return text.toLowerCase();
}


function upper(text){
	return text.toUpperCase();
}

function tsdseries(text){
// 1,2,3,7,9,10,11, = 1-3,7,9-11
	var retval = "";
	var alist,i;
	// เอาคอมมาขวาออก
	if (right(text,1)==","){ text = substr(text,1,text.length-1); }

	// ถ้าไม่มี comma กั้นก็ return เลย
	if (text.indexOf(",")==-1){ return text; }

	// ทำ alist ให้เป็น array จาก text
	alist = text.split(",");

	retval = "";
	var lastitem = 0;
	for (i=0;i<alist.length;i++){
		if (lastitem==0){
			retval += alist[i];
		}else{
			if (val(alist[i])-1 != lastitem){
				retval += "," + alist[i];
			}else if ((val(alist[i])-1==lastitem) && (i==alist.length-1)) {
				retval += "-" + alist[i];
			}else if ((val(alist[i])-1==lastitem) && (i<alist.length-1)) {
				if (val(alist[i+1]) != val(alist[i])+1) {
					retval += "-"+alist[i];
				}
			}
		}
		lastitem = val(alist[i]);
	}
	return retval;
}

function calcchecksum(pvcode){
	var sum1,sum2,sum3,sum4,sum5;
	pvcode = substr(pvcode,1,12);
	sum1   = val(substr(pvcode,2 ,1))+
				 val(substr(pvcode,4 ,1))+
				 val(substr(pvcode,6 ,1))+
				 val(substr(pvcode,8 ,1))+
				 val(substr(pvcode,10,1))+
				 val(substr(pvcode,12,1));
	sum2   = sum1 * 3;
	sum3   = val(substr(pvcode,1,1))+
				 val(substr(pvcode,3,1))+
				 val(substr(pvcode,5,1))+
				 val(substr(pvcode,7,1))+
				 val(substr(pvcode,9,1))+
				 val(substr(pvcode,11,1));
	sum4   = sum2+sum3;
	sum4   = val(right(alltrim(str(sum4)),1));
	if(sum4 == 0){
		  sum5 = 0;
	}else{
		  sum5   = 10-sum4;
	}
	pvcode = pvcode+str(sum5,1,0);
	return pvcode;
}

function DateAdd(timeU,byMany,dateObj) {
	var millisecond=1;
	var second=millisecond*1000;
	var minute=second*60;
	var hour=minute*60;
	var day=hour*24;
	var year=day*365;

	var newDate;
	var dVal=dateObj.valueOf();
	switch(timeU) {
		case "ms": newDate=new Date(dVal+millisecond*byMany); break;
		case "s": newDate=new Date(dVal+second*byMany); break;
		case "mi": newDate=new Date(dVal+minute*byMany); break;
		case "h": newDate=new Date(dVal+hour*byMany); break;
		case "d": newDate=new Date(dVal+day*byMany); break;
		case "y": newDate=new Date(dVal+year*byMany); break;
	}
	return newDate;
}

function inlist(chk,alist){
	for (var i=0;i<alist.length;i++){
		if (chk==alist[i]){
			return i;
		}
	}
	return -1;
}


function webchar(value,mode){
	// mode = w/r w called before replace, r=call before show
	if (mode=="w"){
		value = replace(value,'"',"&dq");
		value = replace(value,"'","&sq");
		value = replace(value,";","&sm");
	}else{
		value = replace(value,'&dq','"');
		value = replace(value,'&sq',"'");
		value = replace(value,'&sm',';');
	}
	return value;
}

function getdbname(ctable,calias) {
	// dbname ถูก declare ใน tsdglobal แล้ว
	var cretval;
	var nlength = dbname.length;
	var cdbname = systemdb;
	var ctbl = alltrim(ctable);
	var i;
	for (i=0; i<nlength; i++) {
		if (alltrim(dbname[i][0]) == ctbl ) {
			cdbname = alltrim(dbname[i][1]);
			break;
		}
	}
	if (calias == "") {
		cretval = cdbname+".dbo."+ctable;
	}else {
		cretval = cdbname+".dbo."+ctable+" "+calias;
	}
	return cretval;
}


function checkrights(lnuserid,lcrightno,lcrightname,lcanauthorize,lprompt){
	var cmd;
	var lcdbname;
	var lnrightid;
	lcdbname = systemdb+".dbo.rights";
	cmd	= "select * from "+lcdbname+" where no = '"+lcrightno+"'"
	var c_rights = new dbUse(cmd,dsn);
	if (c_rights.rowcount==0){
		cmd = "insert "+lcdbname+"(no,name,addby) values ('"+lcrightno+"','"+lcrightname+"',"+lnuserid+")"
		lnrightid = sqlinsert(cmd,dsn);
	} else {
		lnrightid = c_rights.id;
		if (c_rights.name != lcrightname) {
			cmd = "update "+lcdbname+" set name='"+lcrightname+"' where id="+lnrightid;
			sqlpt(cmd,dsn);
		}
	}

	var lhasright = check_right(lnuserid,lnrightid);
	if (lhasright) {return lnuserid;}
	// ไม่มีสิทธิ
	if ((! lcanauthorize) && (! lprompt)) { return -1;}
	if ((! lcanauthorize) && (lprompt)) { alert( "คุณไม่มีสิทธิทำงานในส่วนนี้ \n"+lcrightno+" :: "+lcrightname+"\nกรุณาติดต่อผู้ดูแลระบบ"); return -1;}
	// canauthorize
	if (! confirm( "คุณไม่มีสิทธิทำงานในส่วนนี้ \n"+lcrightno+" :: "+lcrightname+"\nต้องให้ผู้มีสิทธิมาอนุญาติ")) { return -1;}
	/*
	var win = parent.tsdmodal("อนุมัติสิทธิ "+lcrightno,'/tsdlib/own/rightauthorize.html',270,185);
	win.retval = "";
	win.setCloseCallback(fromgetconhead);
	win.showCenter(true);
	*/

	var win_dialog	= "resizeble:no; center:yes; dialogwidth:270px; dialogheight:185px; status:no;";
	retval = "";  
	window.showModalDialog('/tsdlib/own/rightauthorize.html',window,win_dialog)
	if (retval=="") {return -1;}
	lhasright = check_right(retval,lnrightid);
	if (lhasright) {
		return retval;
	} else { 
		alert( "ผู้ใช้คนนี้ก็ไม่มีสิทธิ" );
		return -1;
	}
	return -1;
}

function fromauthorize(win){

}

function check_right(lnuserid,lnrightid){
	var lcdbname,cmd;

	if (lnuserid == 1) { return true; }
	lcdbname = systemdb+".dbo.users"
	cmd = "select * from "+lcdbname+" where id="+lnuserid;
	var c_users = new dbUse(cmd,dsn);
	if (c_users.issupervisor=='1') { return true; }

	var lnusergroupid = c_users.usergroupid;
	lcdbname = systemdb+".dbo.rightusergroup";
//	cmd 	= "select * from "+lcdbname+" where usergroupid="+lnusergroupid+" and rightid="+lnrightid+" and delby is null";
	cmd 	= "select * from "+lcdbname+" where usergroupid="+lnusergroupid+" and rightid="+lnrightid;
	var c_rug = new dbUse(cmd,dsn);
	if (c_rug.rowcount==0) {
		lcdbname = systemdb+".dbo.rightuser";
//		cmd = "select * from "+lcdbname+" where userid="+lnuserid+" and rightid="+lnrightid+" and righttype='+' and delby is null";
		cmd = "select * from "+lcdbname+" where userid="+lnuserid+" and rightid="+lnrightid+" and righttype='+'";
		var c_ru = new dbUse(cmd,dsn);
		if (c_ru.rowcount==0) {
			return false;
		}else{
			return true;
		}
	}else{
		lcdbname = systemdb+".dbo.rightuser";
//		cmd = "select * from "+lcdbname+" where userid="+lnuserid+" and rightid="+lnrightid+" and righttype='-' and delby is null";
		cmd = "select * from "+lcdbname+" where userid="+lnuserid+" and rightid="+lnrightid+" and righttype='-'";
		var c_ru = new dbUse(cmd,dsn);
		if (c_ru.rowcount==0) {
			return true;
		}else{
			return false;
		}
	}
}


function findrowat( text,adata,colno ) {
	var retval = -1;
	var data = "";
	var i;
	for (i=0; i<adata.length; i++){
		data = adata[i][colno];
		if(data == text){
			retval = i;
			break;
		}
	}
	if (retval==-1){
		for (i=0; i<adata.length; i++){
			data = adata[i][colno];
			if (data.indexOf(text) != -1) {
				retval = i;
				break;
			}
		}
	}
	text = upper(text);
	if (retval==-1){
		for (i=0; i<adata.length; i++){
			data = upper(adata[i][colno]);
			if (data.indexOf(text) != -1) {
				retval = i;
				break;
			}
		}
	}

	retval = iif(retval==-1,0,retval);
	return retval;
}


function browsekeys(e) {
	// if (window.event) e = window.event;  
	var srcEl = e.srcElement? e.srcElement : e.target; 
	if (e.keyCode==13) { doselect(); }
	if (e.keyCode==27) { doclose(); }
//	if (e.keyCode==38) { e.keyCode=9; }
	if (e.keyCode==123){ 
		if (typeof(cmdsubmit)!="undefined"){
			if (cmdsubmit.getControlDisabled()==false){
				dosubmit('0');
			}
		}
	}
	if (!AW.ie){
		if (e.keyCode=116){
			e.keyCode = 505;
		}
	}
//alert( e.shiftKey
}

function getkeys(e) {
	var srcEl = e.srcElement? e.srcElement : e.target; 
//    var e  = (e) ? e : ((event) ? event : null);
 //   var node = (e.target) ? e.target : ((e.srcElement) ? e.srcElement : null);
  //  if ((e.keyCode == 13) && (node.type=="text")) {e.keyCode=9;}
	if (e.keyCode==13) { 
//		enter2tab(e);
	}
	if (e.keyCode==123) { if(cmdsave.getControlDisabled()==false){dosave();} }
	if (e.keyCode==27) { doclose(); }
	//f9
	if ((e.keyCode==120) && (typeof(chkmultiple)=='object')){ 
		if (chkmultiple.getControlDisabled()==false){
			var value = chkmultiple.getControlValue();
			if (value){
				chkmultiple.setControlValue(false);
			}else{
				chkmultiple.setControlValue(true);
			}
		}
	}

}

function enter2tab(e){
	var srcEl = e.srcElement? e.srcElement : e.target; 
	if ((srcEl.tagName != "TEXTAREA") && (srcEl.tagName != 'BUTTON')){
		if (AW.ie){
			e.keyCode = 9;
		}else{
			if ((typeof(gagetlist)=="object")&&(1==2)){
				var lcid = srcEl.id;
				var lcobj = substr(lcid,1,at("-",lcid)-1);
				var i,found=-1;
				for (i=0;i<gagetlist.length;i++){
					if (lower(gagetlist[i][1])==lower(lcobj)){
						found = i;
						break;
					}
				}
				if (found != -1){
					if (found<gagetlist.length){
						var nextitem = found+1;
						var check,focus,pass;
						i = nextitem;
						while (true){
							pass = "check = "+gagetlist[i][1]+"."+gagetlist[i][2];
							eval(pass);
							if(typeof(parent.Windows)=="object"){
//								parent.Windows.getWindow(winid).setStatusBar(pass);
							}
							if (check){
								focus = gagetlist[i-1][1]+".focus()";
								parent.Windows.getWindow(winid).setStatusBar(focus);
								eval(focus);
								focus = gagetlist[i][1]+".focus()";
								eval(focus);
								break;
							}
							i++;
							if (i==gagetlist.length){
								i=0;
							}
							if (i==found){break;}
						}
					}
				}
			}
		}
	}
}

function getchunk( str ){
	var	lnat		= str.indexOf("[");
	var	lnlen	= str.substr(0,lnat);
	var	retval	= str.substr(lnat,lnlen);
	var	lntotal	= lnat.toString.length+retval.length;
	return retval;
}

function stripchunk( str ){
	var	lnat		= str.indexOf("[");
	var	lnlen	= str.substr(0,lnat);
	var	retval	= str.substr(lnat,lnlen);
	lntotal	= lnlen.length + retval.length;
	return str.substr(lntotal);
}

function toarray(mydata){
var	i =	0;
var	acursor	= new Array();
	while (mydata != "") {
		xx = getchunk(mydata);
		acursor[i] = xx;
		mydata = stripchunk(mydata);
		i++;
	}
	return acursor;
}


function dbUse(cmd,datasource,user,pw ){
	if(typeof(isdebug) == "undefined"){
		isdebug = false;
	}
	if(typeof(user)!="undefined"){
		var mydata = sqlptout(cmd,datasource,user,pw);
	}else{
		//if(isdebug) alert("Before sqlpt()");
		if(isdebug){
			var mydata = newsqlpt(cmd,datasource);
		}else{
			var mydata = sqlpt(cmd,datasource);
		}
		//if(isdebug) alert("Done sqlpt()");
	}
	
//	alert(mydata);
// mydata =	len[['name1','type1','len1'],['name2','type2','len2'],...]]
//					len[['row0col0','row0col1'],['row1col0','row1col1']	....  ]]

	var	chk = mydata.substr(0,1);
	var	chkstr = "0123456789";
	var i;
	if (chkstr.indexOf(chk)==-1){
		alert( cmd+"\n"+mydata );
		this.colarray = [[]];
		this.datarray  = [[]];
		this.recno = 0;
		this.rowcount = 0;
		this.colcount = 0;
		this.bof = true;
		this.eof = true;
	} else {
//		alert( mydata );
		//if(isdebug) alert("before toarray()");
		mydata = toarray(mydata);
		//if(isdebug) alert("before eval()");
		this.colarray = eval(mydata[0]);

/* old routine
		// must escape before eval
//		alert(mydata[1]);
		var aa = escape(mydata[1]);
//		alert(aa);
		// replace back special array characters [['xxx','xxxx'],['yyyy','yyyy']]
		var cc = replace(aa,"%5B%5B%27","[['");
		cc = replace(cc,"%27%5D%5D","']]");
		cc = replace(cc,"%27%5D%2C%5B%27","'],['");
		cc = replace(cc,"%27%2C%27","','");
		// for empty array
		cc = replace(cc,"%5B%5B%5D%5D","[[]]");
		// now convert cc into array dd using eval
		var dd = eval(cc);
		// once cc is now an array, unescape each element back
		for(ii=0;ii<dd.length;ii++){
			for(jj=0;jj<dd[ii].length;jj++){
				dd[ii][jj] = unescape(dd[ii][jj]);
				dd[ii][jj] = replace(dd[ii][jj],"/m","\n");
			}
		}
		this.dataarray = dd;
*/
		// new routine 8/3/52
		var myrowdata = mydata[1];
		myrowdata = myrowdata.substr(1,myrowdata.length-1);
		myrowdata = myrowdata.substr(0,myrowdata.length-1);
		if (myrowdata != "[]") {
			var x_x,y_y,my_i,my_j;
			var dd	= new Array();
			my_i = 0;
			var slashm,atemp;
			while (myrowdata != ""){
				x_x = myrowdata.substr(0,myrowdata.indexOf("]")+1);
				y_y = x_x.substr(2,x_x.length-2);
				y_y = y_y.substr(0,y_y.length-2);
				// เช็คว่ามี /m หรือไม่ ถ้ามีต้อง for next replace /m ด้วย \n หลัง split
				slashm = y_y.indexOf("/m");
				atemp = y_y.split("','");
				if (slashm != 0) {
					for (my_j=0;my_j<atemp.length;my_j++ ) {
						if (atemp[my_j].indexOf("/m")!=0) {
							atemp[my_j] = replace(atemp[my_j],"/m","\n");
						}
					}
				}
				dd[my_i] = atemp;
				my_i++;
				if (myrowdata == x_x) {
					myrowdata = "";
				} else {
					myrowdata = myrowdata.substr(x_x.length+1,myrowdata.length-x_x.length);
				}
			}
			this.dataarray = dd;
		} else {
			this.dataarray = [[]];
		}
		this.recno = 0;
		if (this.dataarray[0].length==0){
			this.rowcount =	0;
			this.bof = true;
			this.eof = true;
		} else {
			this.rowcount =	this.dataarray.length;
			this.bof = false;
			this.eof = false;
		}
		this.columncount = this.colarray.length;
	}
	/* 
		use associative array to assign value of each column
		for example, if the object is named 'mr', 
		it's associative array can be refered to as mr['id'] or mr.id,
		since assigning value via mr.id requires using eval() ie. eval("this."+xx+"="+fldvalue),
		when there're cr/lf or ', escape() must be used and this complicates thing.
		However assinging value via mr['id'] doesn't require escape() and code looks much cleaner.
	*/
	var	xx;
	if (this.rowcount != 0) {
		for (i=0;i<this.columncount;i++) {
			xx = this.colarray[i][0];
			this[xx] = alltrim(this.dataarray[this.recno][i]);
//			this[xx].type = this.colarray[i][1];
//			this[xx].length = this.colarray[i][2];
		}
	} else {
		for (i=0;i<this.columncount;i++) {
			xx = this.colarray[i][0];
			this[xx] = "";
//			this[xx].type = this.colarray[i][1];
//			this[xx].length = this.colarray[i][2];
		}
	}
	this.reccount = function() {
		return this.rowcount;
	}

	this.setValue = function(colname,rowno,value){
		for (var i=0;i<this.columncount;i++) {
			if (this.colarray[i][0]==colname){
				this.dataarray[rowno][i] = value;
			}
		}
		this.flddata();
	}

	this.zap = function(){
		this.dataarray = new Array();
		this.rowcount = 0;
		this.bof = true;
		this.eof = true;
		this.flddata();
	}


	this.flddata = function() {
		var	i;
		var	xx;
		for (i=0;i<this.columncount;i++) {
			xx = this.colarray[i][0];
			if (this.dataarray[this.recno]==null){
				this[xx]  = "";
			}else{
				this[xx]  = this.dataarray[this.recno][i];
			}
		}
	};

	this.go = function(nrecno)	{
		this.recno = nrecno;
		this.flddata();
	};


	this.gotop = function()	{
		this.recno = 0;
		this.flddata();
	};

	this.gobott	= function() {
		this.recno = this.rowcount-1;
		this.flddata();
	};

	this.skip = function() {
		this.recno = this.recno+1;
		this.flddata();
	};

	this.fldtype = function(lcname)	{
		var	i;
		for	(i=0;i<this.columncount;i++){
			if (this.colarray[i][0]==lcname){
				return this.colarray[i][1];
			}
		}
		return 'undefined';
	};

	this.fldlen	= function(lcname) {
		var	i;
		for	(i=0;i<this.columncount;i++){
			fld1 = this.colarray[i][0];
			if (fld1==lcname){
				return this.colarray[i][2];
			}
		}
		return 'undefined';
	};

	this.find =	function(findwhat,findin){
			var	i;
			var	j;
			var	colno=-1;
			
			for	(j=0;j<this.columncount;j++){
				if (this.colarray[j][0]	== findin) {
					colno=j;
				}
			}
//			alert("findwhat="+findwhat+" and findin="+findin+" and colno="+colno);
			if (colno==-1) {return -1;}

			for	(i=0;i<this.rowcount;i++) {
				if	(this.dataarray[i][colno]==findwhat) {
						this.recno = i;
						this.flddata()
						return i;
					}
				}
			this.recno = this.rowcount-1;
			for	(i=0;i<this.columncount;i++) {
				xx = this.colarray[i][0];
				this[xx]  = alltrim(this.dataarray[this.recno][i])+"';";
			}
			return -1;
	};

}

function newsqlpt(cmd,datasource) {
	if(typeof(isdebug)=="undefined") isdebug = false;
	//if(isdebug) alert("Before escape()");
	var	lccmd =	escape(cmd);
	if (!AW.ie){
		//if(isdebug) alert("Before replace()");
		lccmd = replace(lccmd,"%0A","%0D%0A");
	}
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/newajax.php?mysession="+mysession);
	r.setRequestMethod("POST");
	r.setParameter("cmd", lccmd	);
	r.setParameter("dsn", datasource );
	r.setAsync(false); 
	r.setRequestHeader("User-Agent", "Explorer");  
	//if(isdebug) alert("Before request()");
	r.request(); 
	//if(isdebug) alert("Before getresponsetext()");
	var	xx = r.getResponseText() ;
	return xx;
}

function sqlpt(cmd,datasource) {
	if(typeof(isdebug)=="undefined") isdebug = false;
	//if(isdebug) alert("Before escape()");
	var	lccmd =	escape(cmd);
	if (!AW.ie){
		//if(isdebug) alert("Before replace()");
		lccmd = replace(lccmd,"%0A","%0D%0A");
	}
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/ajax.php?mysession="+mysession);
	r.setRequestMethod("POST");
	r.setParameter("cmd", lccmd	);
	r.setParameter("dsn", datasource );
	r.setAsync(false); 
	r.setRequestHeader("User-Agent", "Explorer");  
	//if(isdebug) alert("Before request()");
	r.request(); 
	//if(isdebug) alert("Before getresponsetext()");
	var	xx = r.getResponseText() ;
	return xx;
}

function sqlptout(cmd,datasource) {
	var	lccmd =	escape(cmd);
	if (!AW.ie){
		lccmd = replace(lccmd,"%0A","%0D%0A");
	}
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/ajaxout.php");
	r.setRequestMethod("POST");
	r.setParameter("cmd", lccmd	);
	r.setParameter("dsn", datasource );
	r.setAsync(false); 
	r.setRequestHeader("User-Agent", "Explorer");  
	r.request(); 
	var	xx = r.getResponseText() ;
	return xx;
}

function sqlinsert(cmd,datasource) {
	var	lccmd =	escape(cmd);
	if (!AW.ie){
		lccmd = replace(lccmd,"%0A","%0D%0A");
	}
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/insert.php?mysession="+mysession);
	r.setRequestMethod("POST");
	r.setParameter("cmd", lccmd	);
	r.setParameter("dsn", datasource );
	r.setAsync(false); 
	r.request(); 
	var	xx = r.getResponseText() ;
//	alert( xx );
	return xx;
}
//245,248,338
function createdbname() {
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/createdbname.php?mysession="+mysession);
//	r.setRequestMethod("POST");
	r.setAsync(false); 
	r.request(); 
	var	xx = r.getResponseText() ;
//	alert( xx );
	return xx;
}

function createglobalvars() {
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/createglobalvars.php?mysession="+mysession);
//	r.setRequestMethod("POST");
	r.setAsync(false); 
	r.request(); 
	var	xx = r.getResponseText() ;
//	alert( xx );
	return xx;
}

function phpdeletefile(filename){
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/phpdeletefile.php?mysession="+mysession+"&filename="+filename);
//	r.setRequestMethod("POST");
	r.setAsync(false); 
	r.request(); 
	var	xx = r.getResponseText() ;
//	alert( xx );
	return xx;
}

function tsdgetimagesize(imgpath) {
	var	lccmd =	imgpath
	if (!AW.ie){
//		lccmd = replace(lccmd,"%0A","%0D%0A");
	}
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/tsdgetimagesize.php?mysession="+mysession);
	r.setRequestMethod("POST");
	r.setParameter("imgpath", lccmd	);
	r.setAsync(false); 
	r.request(); 
	var	xx = r.getResponseText() ;
	//alert(xx);
	return eval(xx);
}


function getimgsize(imgpath) {
	var	lccmd =	imgpath
	if (!AW.ie){
//		lccmd = replace(lccmd,"%0A","%0D%0A");
	}
	var	r =	new	AW.HTTP.Request; 
	r.setURL("/tsdlib/own/getimgsize.php?mysession="+mysession);
	r.setRequestMethod("POST");
	r.setParameter("imgpath", lccmd	);
	r.setAsync(false); 
	r.request(); 
	var	xx = r.getResponseText() ;
//	alert( xx );
	return eval(xx);
}

function tsdwheretext(lcvalue,lccolname){
	var cretval,xx;
	if (substr(lcvalue,1,1)=="!"){
		lcvalue = lcvalue.substr(1);
		if (lcvalue.charAt(0)=="=")	{
			xx = lcvalue.substr(1);
			cretval = lccolname+"<>'"+cleanquote(xx)+"'"
		} else {
			if (lcvalue.indexOf("%") !=	-1)	{
				cretval = lccolname+" NOT LIKE '"+cleanquote(lcvalue)+"'";
			} else {
				cretval = lccolname+" NOT LIKE '%"+cleanquote(lcvalue)+"%'";
			}
		}
	}else{
		if (lcvalue.charAt(0)=="=")	{
			xx = lcvalue.substr(1);
			cretval = lccolname+"='"+cleanquote(xx)+"'"
		} else {
			if (lcvalue.indexOf("%") !=	-1)	{
				cretval = lccolname+" LIKE '"+cleanquote(lcvalue)+"'";
			} else {
				cretval = lccolname+" LIKE '%"+cleanquote(lcvalue)+"%'";
			}
		}
	}
	return cretval;
}

function tsdstringwhere(lcwhere,lccolname,lcvalue){
	var	lcaddwhere;
	if(typeof(lccolname)=="object"){
		lcaddwhere = "";
		var lcorwhere = "";
		for(var i=0;i<lccolname.length;i++){
			if(lcvalue==""){
				lcorwhere = lccolname[i]+" is null";
			}else{
				lcorwhere = tsdwheretext(lcvalue,lccolname[i]); 
			}
			if(i==lccolname.length-1){
				lcaddwhere += lcorwhere;
			}else{
				lcaddwhere += lcorwhere+" or ";
			}
		}
		lcaddwhere = "("+lcaddwhere+")";
	}else{
		if(lcvalue==""){
			lcaddwhere = lccolname+" is null"
		}else{
			if(lcvalue.indexOf(",")!=-1){
				lcaddwhere = "";
				var avalue = lcvalue.split(",");
				for (var i=0;i<avalue.length;i++){
					if(i==avalue.length-1){
						lcaddwhere += tsdwheretext(avalue[i],lccolname);
					}else{
						if(substr(avalue[i],1,1)=="!"){
							lcaddwhere += tsdwheretext(avalue[i],lccolname)+" and ";
						}else{
							lcaddwhere += tsdwheretext(avalue[i],lccolname)+" or ";
						}
					}
				}
				lcaddwhere = "("+lcaddwhere+")";
			}else{
				lcaddwhere = tsdwheretext(lcvalue,lccolname);
			}
		}
	}
	if (lcwhere	== "") {
		return lcaddwhere;
	} else {
		return lcwhere + " AND "+lcaddwhere;
	}
}

function tsdbetweenwhere(lcwhere,lccolname,lcfromvalue,lctovalue){
	var	lcaddwhere;
	lcaddwhere = "";
	if ((lcfromvalue !=	"")	&& (lctovalue != "")){
		lcaddwhere = lccolname+">="+lcfromvalue+" AND "+lccolname+"<="+lctovalue;
	}else if ((lcfromvalue !=	"")	&& (lctovalue == "")){
		lcaddwhere = lccolname+">="+lcfromvalue;
	}else if ((lcfromvalue ==	"")	&& (lctovalue != "")){
		lcaddwhere = lccolname+"<="+lctovalue;
	}else{
		lcaddwhere = lccolname+" is null";
	}
	return iif(lcwhere=="",lcaddwhere,lcwhere+" and "+lcaddwhere);
}

function tsdstrbetweenwhere(lcwhere,lccolname,lcfromvalue,lctovalue){
	var	lcaddwhere;
	lcaddwhere = "";
	if ((lcfromvalue !=	"")	&& (lctovalue != "")){
		lcaddwhere = lccolname+">='"+lcfromvalue+"' AND "+lccolname+"<='"+lctovalue+"'";
	}else if((lcfromvalue !=	"")	&& (lctovalue == "")){
		lcaddwhere = lccolname+">='"+lcfromvalue+"'";
	}else if((lcfromvalue ==	"")	&& (lctovalue != "")){
		lcaddwhere = lccolname+"<='"+lctovalue+"'";
	}else{
		lcaddwhere = lccolname+" is null";
	}
	return iif(lcwhere=="",lcaddwhere,lcwhere+" and "+lcaddwhere);
}

function tsdnumberwhere(lcwhere,lccolname,lcvalue){
	var	lcaddwhere;
	if(lcvalue==""){
		lcaddwhere = lccolname+" is null"
	}else{
		if((substr(lcvalue,1,1)!= "-") && (lcvalue.indexOf("-") != -1)){
			var lcsplit = lcvalue.split("-");
			lcaddwhere = lccolname+">="+lcsplit[0]+" and "+lccolname+"<="+lcsplit[1];
		}else if((substr(lcvalue,1,1)==">") || (substr(lcvalue,1,1)=="<")){
			lcaddwhere = lccolname+lcvalue;
		}else if(lcvalue.indexOf(",")!=-1){
			if(right(lcvalue,1)==","){lcvalue=substr(lcvalue,1,lcvalue.length-1);}
			lcaddwhere = lccolname+" in ("+lcvalue+")";
		}else{
			lcaddwhere = lccolname+"="+lcvalue;
		}
	}
	return iif(lcwhere=="",lcaddwhere,lcwhere+" and "+lcaddwhere);
}

function txtchange(lcname){
	var	chkobj;
	var	txtobj;
	var	chkval;
	chkobj = document.getElementById("chk"+lcname);
	txtobj = document.getElementById("txt"+lcname);
	if (txtobj.value ==	"")	{
		chkobj.checked = false;
	} else {
		chkobj.checked = true;
	}
	return true;
}

function chkclicked(lcname){
	var	chkobj;
	var	txtobj;
	var	chkval;
	chkobj = document.getElementById("chk"+lcname);
	txtobj = document.getElementById("txt"+lcname);
	chkval = chkobj.checked
	if (chkval)	{
		txtobj.focus();
	} 
	return true;
}


function spanclicked(lcname){
	var	chkobj;
	var	txtobj;
	var	chkval;
	chkobj = document.getElementById("chk"+lcname);
	txtobj = document.getElementById("txt"+lcname);
	chkval = chkobj.checked
	if (chkval)	{
		chkobj.checked = false;
	} else {
		chkobj.checked = true;
		txtobj.focus();
	}
	return true;
}

function disabledtext(myfield,e){
	return false;
}

function numbersonly(myfield, e, dec)
{
var	key;
var	keychar;

if (window.event)
   key = window.event.keyCode;
else if	(e)
   key = e.which;
else
   return true;
keychar	= String.fromCharCode(key);

// control keys
if ((key==null)	|| (key==0)	|| (key==8)	|| 
	(key==9) ||	(key==13) || (key==27) )
   return true;

// numbers
else if	((("0123456789").indexOf(keychar) >	-1))
   return true;

// decimal point jump
else if	(dec &&	(keychar ==	"."))
   {
   myfield.form.elements[dec].focus();
   return false;
   }
else
   return false;
}


// for fox's old time sake
// iif(isempty(stdata.fld('fatherid')),'-1',stdata.fld(fatherid));
function iif(what,if_true,if_false)	{
	if (what){
		return if_true;
	} else {
		return if_false;
	}
}

function isempty(what){
	if (typeof(what)=="undefined"){
		return true;
	}
	if (what=="undefine") {
		return true;
	}
	if (typeof(what)=="number"){
		return (isNaN(what) || (what==0));
	}
	if (typeof(what)=="string"){
		return what==""
	}
	return false;
}

function ltrim(sString)	{
	if (sString==null){ return ""; }
	if (sString=="undefined"){ return ""; }
	while (sString.substring(0,1) == ' '){
		sString	= sString.substring(1, sString.length);
	}
return sString;
}

function rtrim(sString)	 {
	if (sString==null){ return ""; }
	if (sString=="undefined"){ return ""; }
	while (sString.substring(sString.length-1, sString.length) == '	') {
		sString	= sString.substring(0,sString.length-1);
	}
return sString;
}


function alltrim(sString) {
	if (sString==null){ return ""; }
	if (sString=="undefined"){ return ""; }
	while (sString.substring(0,1) == ' ') {
		sString	= sString.substring(1, sString.length);
	}
	while (sString.substring(sString.length-1, sString.length) == '	'){
		sString	= sString.substring(0,sString.length-1);
	}
	return sString;
}

function left(str, n){
	if (n <= 0)
		return "";
	else if	(n > String(str).length)
		return str;
	else
		return String(str).substring(0,n);
}

function right(str,	n){
	if (n <= 0)
	   return "";
	else if	(n > String(str).length)
	   return str;
	else {
	   var iLen	= String(str).length;
	   return String(str).substring(iLen, iLen - n);
	}
}

function substr(str,from,to){
	if (to==null){
		if (from > String(str).length){ return ''; }
		if (from <= 0) {from = 1;}
		return String(str).substring(from-1,String(str).length);
	}else{
		if (from > String(str).length) {return '';}
		if (from <= 0) {from = 1;}
		if (from+to-1 >= String(str).length) { return String(str).substring(from-1,String(str).length) };
		return String(str).substring(from-1,from+to-1);
	}
}


function numtrim(str){
var	retval,retval1,tail;
if (str.indexOf(".") ==	-1){
	if (str=="")
	{
		return "0";
	}else{
		return str;
	}
} else {
	retval = str.split(".");
	retval1	= retval[0];
	if (retval1=="") {retval1="0";}
	tail = retval[1];
	while (right(tail,1)=="0") {
		if (tail.length=0) {
			break;
		}
		tail = tail.substr(0,tail.length-1);
	}
	if (tail=="") {
		return retval1;
	} else {
		return retval1+"."+tail;
	}
	}
}

function cleanquote(str) {
	var	retval;
	if (str=="") {	return str;	}
	retval	= replace(str,"[","(");
	retval	= replace(retval,"]",")");			
	retval	= replace(retval,"'","\'\'");
	retval	= replace(retval,";",'~');
//	alert( retval );
	return retval;
}

function replace(fullString,text,by) {
// Replaces	text with by in	string
	var	strLength =	fullString.length, txtLength = text.length;
	if ((strLength == 0) ||	(txtLength == 0)) return fullString;

	var	i =	fullString.indexOf(text);
	if ((!i) &&	(text != fullString.substring(0,txtLength))) return	fullString;
	if (i == -1) return	fullString;

	var	newstr = fullString.substring(0,i) + by;

	if (i+txtLength	< strLength)
		newstr += replace(fullString.substring(i+txtLength,strLength),text,by);

	return newstr;
}

function trans(	xnumstr,xpicstr	){
var	retval;
var	picstr = new String(xpicstr);
var	numstr = new String(xnumstr);
var	obj	= new NumberFormat(numstr);

if (picstr.indexOf(".")	!= -1) {
	var	xx = picstr.split(".");
	var	lnPlaces = xx[1].length;
	}else{
	var	lnPlaces = 0
	}

if (picstr.indexOf(",")	!= -1) {
	var	lSep = true
	}else{
	var	lSep = false
	}
obj.setPlaces(lnPlaces );
obj.setSeparators( lSep	);
retval = obj.toFormatted();
return retval;
}

function at(what,inwhat){
	if (inwhat.indexOf(what)==-1) { return 0; }
	return inwhat.indexOf(what)+1;
}

function rat(atwhat,inwhat){
	var	i;
	for	(i=inwhat.length; i>=0;	i--) {
		if (inwhat.substr(i,1) == atwhat) {
			return i+1;
		}
	}
	return -1;
}

function replicate(what,howmany){
	var lcretval = "";
	for (var i=1;i<=howmany;i++){
		lcretval += what;
	}
	return lcretval;
}

function val(str,base){
	if (typeof(str)=="number"){ return str; }
	if (str.indexOf(".") != -1){
		if((typeof(debugging) != "undefined") && (debugging)){
			alert( str+" to float" );
		}
		return parseFloat(str);
	}else{
		if((typeof(debugging) != "undefined") && (debugging)){
			alert( str+" to int" );
		}
		if (base== null){
			return parseInt(str,10);
		}else{
			return parseInt(str,base);
		}
	}
}

function str(number){
	if (isNaN(number)){ return ""; }
	return number.toString();
}

function strzero(number,len){
	if (typeof(number)=="number"){
		return right( '00000000000'+str(number),len );
	}
	if (typeof(number)=="string"){
		return right( '00000000000'+str(val(number)),len );
	}
	return '';
}

function iseven(num) {
  return !(num % 2);
}

function isodd(num) {
  return !iseven(num);
}


function dtos(date)	{
	var	ndate, sdate, day, month, year;
	if (date ==	""){ return ""; }
	ndate	= date.split(" ");
	sdate		= ndate[0].split("-");
	year		= val(sdate[0]);
	year		= String(year);
	month	= strzero(val(sdate[1]),2);
	day		= strzero(val(sdate[2]),2);

	date = year+month+day;
	return date;
}

function getfiscalyear(date){
	var	ndate, sdate, day, month, year;
	if (date ==	""){ return ""; }
	ndate	= date.split(" ");
	sdate		= ndate[0].split("-");
	year		= val(sdate[0]);
	month	= val(sdate[1]);
	year += 543;
	if (month>9) { year++; }
	return year.toString();
}

function datetext(date) {
	if (date == ""){ return ""; }
// date = 2009-08-07 12:00:00
	var	ndate, sdate, day, month, year;
	ndate	= date.split(" ");
	sdate		= ndate[0].split("-");
	year		= val(sdate[0]);
	year		= String(year);
	month	= sdate[1]; // strzero(parseInt(sdate[1]),2);
//	alert( date+" "+sdate[2] );
	day		= sdate[2]; //strzero(parseFloat(sdate[2]),2);
	return month+'/'+day+'/'+year;
}

function engsdate(date) {
	var	ndate, sdate, day, month, year;
	if (date ==	"")
	{
		return "";
	}
	ndate =	date.split(" ");
	sdate =	ndate[0].split("-");
	year = val(sdate[0]);
	year = String(year);
	month =	sdate[1];
	day	= sdate[2];

	date = day+"/"+month+"/"+right(year,2);
	return date;
}

function engldate(date) {
	var	ndate, sdate, day, month, year;
	if (date ==	"")
	{
		return "";
	}
	ndate =	date.split(" ");
	sdate =	ndate[0].split("-");
	year = val(sdate[0]);
	year = String(year);
	month =	sdate[1];
	day	= sdate[2];

	date = day+"/"+month+"/"+year;
	return date;
}


function thaisdate(date) {
	var	ndate, sdate, day, month, year;
	if (date ==	"")
	{
		return "";
	}
	ndate =	date.split(" ");
	sdate =	ndate[0].split("-");
	year = val(sdate[0])+543;
	year = String(year);
	month =	sdate[1];
	day	= sdate[2];

	date = day+"/"+month+"/"+right(year,2);
	return date;
}

function thaildate(date) {
	var	ndate, sdate, day, month, year;
	if (date ==	"")
	{
		return "";
	}
	ndate =	date.split(" ");
	sdate =	ndate[0].split("-");
	year = val(sdate[0])+543;
	year = String(year);
	month =	sdate[1];
	day	= sdate[2];

	date = day+"/"+month+"/"+year;
	return date;
}

function thaidate2text(date){
	if (date==""){ return ""; }
	var ndate = date.split("/");
	var day		= ndate[0];
	var month	= ndate[1];
	var year		= str(val(ndate[2])-543);
	return month+"/"+day+"/"+year;
}

function thaidatetime( date	) {
	var	ndate, sdate, day, month, year;
	if (date ==	"")
	{
		return "";
	}
	ndate =	date.split(" ");
	sdate =	ndate[0].split("-");
	year = val(sdate[0])+543;
	year = String(year);
	month =	sdate[1];
	day	= sdate[2];

	date = day+"/"+month+"/"+year+" "+ndate[1].substr(0,8);
	return date;
}

function timepart( date	){
	var	ndate;
	if (date=="") {	return ""; }
	ndate =	date.split(" ");
	return ndate[1];
}

function thaismdate(date) {
	var	ndate, sdate, day, month, year,	cmonth;
	if (date ==	"")
	{
		return "";
	}
	ndate =	date.split(" ");
	sdate =	ndate[0].split("-");
	year = val(sdate[0])+543;
	year = String(year);
	month =	val(sdate[1]);
	day	= sdate[2];
	cmonth = athmonthshort[month-1];
	date = day+" "+cmonth+""+right(year,2);
	return date;
}

function thai2sqldate(text){
	if (text == "") { return ""; }
	var datepart	= text.split("/");
	var nday		= datepart[0];
	var nmonth	= datepart[1];
	var nyear		= val( datepart[2])-543;
	if (dsn=='oracle'){
		return nday+'/'+nmonth+'/'+nyear;
	} else {
		return nmonth+'/'+nday+'/'+nyear;
	}
}

function ShowDateFromTo(fromdate,todate){
	var lcfrom,lcto,lnday
	if ((fromdate=="") && (todate=="")) { return ""; }
	if ((fromdate != "") && (todate != ""))
	{
		lcfrom	= dtos(fromdate);
		lcto		= dtos(todate);
		if ( lcfrom.substr(0,8) == lcto.substr(0,8) )				// วันเดียวกัน
		{
			return thaismdate(fromdate);
		} else if (lcfrom.substr(0,6) == lcto.substr(0,6))		// เดือนเดียวกัน
		{
			lnday = val(right(lcfrom,2));
			return lnday.toString()+"-"+thaismdate(todate);
		} else if (lcfrom.substr(0,4) == lcto.substr(0,4))
		{
			lcfrom = thaismdate(fromdate);
			return lcfrom.substr(0,rat(".",lcfrom))  +"-"+thaismdate(todate);
		} else
		{
			return thaismdate(fromdate)+"-"+thaismdate(todate);
		}
	} else if ((fromdate!="") && (todate==""))
	{
		return thaismdate(fromdate);
	} else if ((fromdate=="") && (todate != ""))
	{
		return thaismdate(todate);
	}	
}


function truefalse(uvalue) {
	if (uvalue == 1) {
		return true; } 
		else {
		return false; }
}

function abs(value){
	if (typeof(value)=="string"){
		value = val(value);
	}
	if (value < 0) { 
		return value*-1;
	}else{
		return value;
	}
}

function int(number){
	number = number.toString();
	if (number.indexOf(".")==-1){
		return number;
	}else{
		return val(number.substr(0,number.indexOf(".")));
	}
}

function tsdround(num, dec) {
//	var result = Math.round(num*Math.pow(10,dec))/Math.pow(10,dec);
	var cpow	= "1"+replicate('0',dec+1);
	var npow	= val(cpow);
	var result	=	str(Math.round(num*npow)/npow);
	if (right(result,1)=='5'){
		var added = val("0."+replicate('0',dec)+"1");
		num += added;
		cpow	= "1"+replicate('0',dec);
		npow	= val(cpow);
		result	=	str(Math.round(num*npow)/npow);
	}else{
		cpow	= "1"+replicate('0',dec);
		npow	= val(cpow);
		result	=	str(Math.round(num*npow)/npow);
	}
	return val(result);
}

function NumberFormat(num, inputDecimal)
{
this.VERSION = 'Number Format v1.5.4';
this.COMMA = ',';
this.PERIOD = '.';
this.DASH = '-'; 
this.LEFT_PAREN = '('; 
this.RIGHT_PAREN = ')'; 
this.LEFT_OUTSIDE = 0; 
this.LEFT_INSIDE = 1;  
this.RIGHT_INSIDE = 2;  
this.RIGHT_OUTSIDE = 3;  
this.LEFT_DASH = 0; 
this.RIGHT_DASH = 1; 
this.PARENTHESIS = 2; 
this.NO_ROUNDING = -1 
this.num;
this.numOriginal;
this.hasSeparators = false;  
this.separatorValue;  
this.inputDecimalValue; 
this.decimalValue;  
this.negativeFormat; 
this.negativeRed; 
this.hasCurrency;  
this.currencyPosition;  
this.currencyValue;  
this.places;
this.roundToPlaces; 
this.truncate; 
this.setNumber = setNumberNF;
this.toUnformatted = toUnformattedNF;
this.setInputDecimal = setInputDecimalNF; 
this.setSeparators = setSeparatorsNF; 
this.setCommas = setCommasNF;
this.setNegativeFormat = setNegativeFormatNF; 
this.setNegativeRed = setNegativeRedNF; 
this.setCurrency = setCurrencyNF;
this.setCurrencyPrefix = setCurrencyPrefixNF;
this.setCurrencyValue = setCurrencyValueNF; 
this.setCurrencyPosition = setCurrencyPositionNF; 
this.setPlaces = setPlacesNF;
this.toFormatted = toFormattedNF;
this.toPercentage = toPercentageNF;
this.getOriginal = getOriginalNF;
this.moveDecimalRight = moveDecimalRightNF;
this.moveDecimalLeft = moveDecimalLeftNF;
this.getRounded = getRoundedNF;
this.preserveZeros = preserveZerosNF;
this.justNumber = justNumberNF;
this.expandExponential = expandExponentialNF;
this.getZeros = getZerosNF;
this.moveDecimalAsString = moveDecimalAsStringNF;
this.moveDecimal = moveDecimalNF;
this.addSeparators = addSeparatorsNF;
if (inputDecimal == null) {
this.setNumber(num, this.PERIOD);
} else {
this.setNumber(num, inputDecimal); 
}
this.setCommas(true);
this.setNegativeFormat(this.LEFT_DASH); 
this.setNegativeRed(false); 
this.setCurrency(false); 
this.setCurrencyPrefix('$');
this.setPlaces(2);
}
function setInputDecimalNF(val)
{
this.inputDecimalValue = val;
}
function setNumberNF(num, inputDecimal)
{
if (inputDecimal != null) {
this.setInputDecimal(inputDecimal); 
}
this.numOriginal = num;
this.num = this.justNumber(num);
}
function toUnformattedNF()
{
return (this.num);
}
function getOriginalNF()
{
return (this.numOriginal);
}
function setNegativeFormatNF(format)
{
this.negativeFormat = format;
}
function setNegativeRedNF(isRed)
{
this.negativeRed = isRed;
}
function setSeparatorsNF(isC, separator, decimal)
{
this.hasSeparators = isC;
if (separator == null) separator = this.COMMA;
if (decimal == null) decimal = this.PERIOD;
if (separator == decimal) {
this.decimalValue = (decimal == this.PERIOD) ? this.COMMA : this.PERIOD;
} else {
this.decimalValue = decimal;
}
this.separatorValue = separator;
}
function setCommasNF(isC)
{
this.setSeparators(isC, this.COMMA, this.PERIOD);
}
function setCurrencyNF(isC)
{
this.hasCurrency = isC;
}
function setCurrencyValueNF(val)
{
this.currencyValue = val;
}
function setCurrencyPrefixNF(cp)
{
this.setCurrencyValue(cp);
this.setCurrencyPosition(this.LEFT_OUTSIDE);
}
function setCurrencyPositionNF(cp)
{
this.currencyPosition = cp
}
function setPlacesNF(p, tr)
{
this.roundToPlaces = !(p == this.NO_ROUNDING); 
this.truncate = (tr != null && tr); 
this.places = (p < 0) ? 0 : p; 
}
function addSeparatorsNF(nStr, inD, outD, sep)
{
nStr += '';
var dpos = nStr.indexOf(inD);
var nStrEnd = '';
if (dpos != -1) {
nStrEnd = outD + nStr.substring(dpos + 1, nStr.length);
nStr = nStr.substring(0, dpos);
}
var rgx = /(\d+)(\d{3})/;
while (rgx.test(nStr)) {
nStr = nStr.replace(rgx, '$1' + sep + '$2');
}
return nStr + nStrEnd;
}
function toFormattedNF()
{	
var pos;
var nNum = this.num; 
var nStr;            
var splitString = new Array(2);   
if (this.roundToPlaces) {
nNum = this.getRounded(nNum);
nStr = this.preserveZeros(Math.abs(nNum)); 
} else {
nStr = this.expandExponential(Math.abs(nNum)); 
}
if (this.hasSeparators) {
nStr = this.addSeparators(nStr, this.PERIOD, this.decimalValue, this.separatorValue);
} else {
nStr = nStr.replace(new RegExp('\\' + this.PERIOD), this.decimalValue); 
}
var c0 = '';
var n0 = '';
var c1 = '';
var n1 = '';
var n2 = '';
var c2 = '';
var n3 = '';
var c3 = '';
var negSignL = (this.negativeFormat == this.PARENTHESIS) ? this.LEFT_PAREN : this.DASH;
var negSignR = (this.negativeFormat == this.PARENTHESIS) ? this.RIGHT_PAREN : this.DASH;
if (this.currencyPosition == this.LEFT_OUTSIDE) {
if (nNum < 0) {
if (this.negativeFormat == this.LEFT_DASH || this.negativeFormat == this.PARENTHESIS) n1 = negSignL;
if (this.negativeFormat == this.RIGHT_DASH || this.negativeFormat == this.PARENTHESIS) n2 = negSignR;
}
if (this.hasCurrency) c0 = this.currencyValue;
} else if (this.currencyPosition == this.LEFT_INSIDE) {
if (nNum < 0) {
if (this.negativeFormat == this.LEFT_DASH || this.negativeFormat == this.PARENTHESIS) n0 = negSignL;
if (this.negativeFormat == this.RIGHT_DASH || this.negativeFormat == this.PARENTHESIS) n3 = negSignR;
}
if (this.hasCurrency) c1 = this.currencyValue;
}
else if (this.currencyPosition == this.RIGHT_INSIDE) {
if (nNum < 0) {
if (this.negativeFormat == this.LEFT_DASH || this.negativeFormat == this.PARENTHESIS) n0 = negSignL;
if (this.negativeFormat == this.RIGHT_DASH || this.negativeFormat == this.PARENTHESIS) n3 = negSignR;
}
if (this.hasCurrency) c2 = this.currencyValue;
}
else if (this.currencyPosition == this.RIGHT_OUTSIDE) {
if (nNum < 0) {
if (this.negativeFormat == this.LEFT_DASH || this.negativeFormat == this.PARENTHESIS) n1 = negSignL;
if (this.negativeFormat == this.RIGHT_DASH || this.negativeFormat == this.PARENTHESIS) n2 = negSignR;
}
if (this.hasCurrency) c3 = this.currencyValue;
}
nStr = c0 + n0 + c1 + n1 + nStr + n2 + c2 + n3 + c3;
if (this.negativeRed && nNum < 0) {
nStr = '<font color="red">' + nStr + '</font>';
}
return (nStr);
}
function toPercentageNF()
{
nNum = this.num * 100;
nNum = this.getRounded(nNum);
return nNum + '%';
}
function getZerosNF(places)
{
var extraZ = '';
var i;
for (i=0; i<places; i++) {
extraZ += '0';
}
return extraZ;
}
function expandExponentialNF(origVal)
{
if (isNaN(origVal)) return origVal;
var newVal = parseFloat(origVal) + ''; 
var eLoc = newVal.toLowerCase().indexOf('e');
if (eLoc != -1) {
var plusLoc = newVal.toLowerCase().indexOf('+');
var negLoc = newVal.toLowerCase().indexOf('-', eLoc); 
var justNumber = newVal.substring(0, eLoc);
if (negLoc != -1) {
var places = newVal.substring(negLoc + 1, newVal.length);
justNumber = this.moveDecimalAsString(justNumber, true, parseInt(places));
} else {
if (plusLoc == -1) plusLoc = eLoc;
var places = newVal.substring(plusLoc + 1, newVal.length);
justNumber = this.moveDecimalAsString(justNumber, false, parseInt(places));
}
newVal = justNumber;
}
return newVal;
} 
function moveDecimalRightNF(val, places)
{
var newVal = '';
if (places == null) {
newVal = this.moveDecimal(val, false);
} else {
newVal = this.moveDecimal(val, false, places);
}
return newVal;
}
function moveDecimalLeftNF(val, places)
{
var newVal = '';
if (places == null) {
newVal = this.moveDecimal(val, true);
} else {
newVal = this.moveDecimal(val, true, places);
}
return newVal;
}
function moveDecimalAsStringNF(val, left, places)
{
var spaces = (arguments.length < 3) ? this.places : places;
if (spaces <= 0) return val; 
var newVal = val + '';
var extraZ = this.getZeros(spaces);
var re1 = new RegExp('([0-9.]+)');
if (left) {
newVal = newVal.replace(re1, extraZ + '$1');
var re2 = new RegExp('(-?)([0-9]*)([0-9]{' + spaces + '})(\\.?)');		
newVal = newVal.replace(re2, '$1$2.$3');
} else {
var reArray = re1.exec(newVal); 
if (reArray != null) {
newVal = newVal.substring(0,reArray.index) + reArray[1] + extraZ + newVal.substring(reArray.index + reArray[0].length); 
}
var re2 = new RegExp('(-?)([0-9]*)(\\.?)([0-9]{' + spaces + '})');
newVal = newVal.replace(re2, '$1$2$4.');
}
newVal = newVal.replace(/\.$/, ''); 
return newVal;
}
function moveDecimalNF(val, left, places)
{
var newVal = '';
if (places == null) {
newVal = this.moveDecimalAsString(val, left);
} else {
newVal = this.moveDecimalAsString(val, left, places);
}
return parseFloat(newVal);
}
function getRoundedNF(val)
{
val = this.moveDecimalRight(val);
if (this.truncate) {
val = val >= 0 ? Math.floor(val) : Math.ceil(val); 
} else {
val = Math.round(val);
}
val = this.moveDecimalLeft(val);
return val;
}
function preserveZerosNF(val)
{
var i;
val = this.expandExponential(val);
if (this.places <= 0) return val; 
var decimalPos = val.indexOf('.');
if (decimalPos == -1) {
val += '.';
for (i=0; i<this.places; i++) {
val += '0';
}
} else {
var actualDecimals = (val.length - 1) - decimalPos;
var difference = this.places - actualDecimals;
for (i=0; i<difference; i++) {
val += '0';
}
}
return val;
}
function justNumberNF(val)
{
newVal = val + '';
var isPercentage = false;
if (newVal.indexOf('%') != -1) {
newVal = newVal.replace(/\%/g, '');
isPercentage = true; 
}
var re = new RegExp('[^\\' + this.inputDecimalValue + '\\d\\-\\+\\(\\)eE]', 'g');	
newVal = newVal.replace(re, '');
var tempRe = new RegExp('[' + this.inputDecimalValue + ']', 'g');
var treArray = tempRe.exec(newVal); 
if (treArray != null) {
var tempRight = newVal.substring(treArray.index + treArray[0].length); 
newVal = newVal.substring(0,treArray.index) + this.PERIOD + tempRight.replace(tempRe, ''); 
}
if (newVal.charAt(newVal.length - 1) == this.DASH ) {
newVal = newVal.substring(0, newVal.length - 1);
newVal = '-' + newVal;
}
else if (newVal.charAt(0) == this.LEFT_PAREN
&& newVal.charAt(newVal.length - 1) == this.RIGHT_PAREN) {
newVal = newVal.substring(1, newVal.length - 1);
newVal = '-' + newVal;
}
newVal = parseFloat(newVal);
if (!isFinite(newVal)) {
newVal = 0;
}
if (isPercentage) {
newVal = this.moveDecimalLeft(newVal, 2);
}
return newVal;
}

function Hash(){
	for( var i=0; i < arguments.length; i++ )
		for( n in arguments[i] )
			if( arguments[i].hasOwnProperty(n) )
				this[n] = arguments[i][n];
}

	// Hash.version = 1.00;	// Original version
	// Hash.version = 1.01;	// Added ability to initialize in the constructor
	// Hash.version = 1.02;	// Fixed document bug that showed a non-working example (thanks mareks)
	//Hash.version = 1.03;	// Removed returning this from the constructor (thanks em-dash)
	Hash.version = 1.04;	// Missed some 'var' declarations (thanks Twey)


	Hash.prototype = new Object();

	Hash.prototype.keys = function(){
		var rv = [];
		for( var n in this )
			if( this.hasOwnProperty(n) )
				rv.push(n);
		return rv;
	}

	Hash.prototype.length = function(){
		return this.keys().length();
	}

	Hash.prototype.values = function(){
		var rv = [];
		for( var n in this )
			if( this.hasOwnProperty(n) )
				rv.push(this[n]);
		return rv;
	}

	Hash.prototype.slice = function(){
		var rv = [];
		for( var i = 0; i < arguments.length; i++ )
			rv.push(
				( this.hasOwnProperty( arguments[i] ) )
					? this[arguments[i]]
					: undefined
			);
		return rv;
	}

	Hash.prototype.concat = function(){
		for( var i = 0; i < arguments.length; i++ )
			for( var n in arguments[i] )
				if( arguments[i].hasOwnProperty(n) )
					this[n] = arguments[i][n];
		return this;
	}

/* 
	8/6/52 ใช้กับ labresult ของ dgr
*/

function significant(lndigit,lnnum){
	var i;
	var cnumber = lnnum.toString();
	var intpart = parseInt(cnumber);
	intpart = intpart.toString();
	var decat = at(".",cnumber);
	if (decat==0){
		var decpart = "";
	}else{
		decpart = substr(cnumber,at(".",cnumber)+1);
		decpart = parseInt(decpart);
		decpart = decpart.toString();
	}
	var allpart = iif(intpart=='0','',intpart)+decpart;
//	alert( allpart );
	if (allpart.length<=lndigit){
		return lnnum;
	}else{
		var lnadd,lnretval,lcretval;
		var lnsignificant	= parseInt( substr(allpart,1,lndigit) ); // 1255
		var lntoround		= parseInt( substr(allpart,lndigit+1,1) ); // 2
		var lnafterround	= parseInt( substr(allpart,lndigit+2,1) ); // 2
		if (lnafterround >= 5){
			lntoround ++;
		}
		if (lntoround < 5){ lnadd = 0; }
		if (lntoround > 5){ lnadd = 1; }
		if (lntoround==5){
			var lnbeforeround = parseInt( right(lnsignificant.toString(),1) );
			if (iseven(lnbeforeround)){
				lnadd = 0;
			}else{
				lnadd = 1;
			}
		}
		// 1225 --> 12
		lnretval = lnsignificant + lnadd;
		lcretval = lnretval.toString();
		lcretval = lcretval+replicate("0",allpart.length-lcretval.length);
		//1225.5
		// 12255
		// decat = 5
		if (decat != 0){
			if (intpart=='0'){
				lcretval = "0."+lcretval;
			}else{
				lcretval = substr(lcretval,1,decat-1)+"."+substr(lcretval,decat);
			}
		}
		return parseFloat(lcretval);
	}
}

function char(num){
	return String.fromCharCode(num);
}

shortcut = {
	'all_shortcuts':{},//All the shortcuts are stored in this array
	'add': function(shortcut_combination,callback,opt) {
		//Provide a set of default options
		var default_options = {
			'type':'keydown',
			'propagate':false,
			'disable_in_input':false,
			'target':document,
			'keycode':false
		}
		if(!opt) opt = default_options;
		else {
			for(var dfo in default_options) {
				if(typeof opt[dfo] == 'undefined') opt[dfo] = default_options[dfo];
			}
		}

		var ele = opt.target;
		if(typeof opt.target == 'string') ele = document.getElementById(opt.target);
		var ths = this;
		shortcut_combination = shortcut_combination.toLowerCase();

		//The function to be called at keypress
		var func = function(e) {
			e = e || window.event;
			
			if(opt['disable_in_input']) { //Don't enable shortcut keys in Input, Textarea fields
				var element;
				if(e.target) element=e.target;
				else if(e.srcElement) element=e.srcElement;
				if(element.nodeType==3) element=element.parentNode;

				if(element.tagName == 'INPUT' || element.tagName == 'TEXTAREA') return;
			}
	
			//Find Which key is pressed
			if (e.keyCode) code = e.keyCode;
			else if (e.which) code = e.which;
			var character = String.fromCharCode(code).toLowerCase();
			
			if(code == 188) character=","; //If the user presses , when the type is onkeydown
			if(code == 190) character="."; //If the user presses , when the type is onkeydown

			var keys = shortcut_combination.split("+");
			//Key Pressed - counts the number of valid keypresses - if it is same as the number of keys, the shortcut function is invoked
			var kp = 0;
			
			//Work around for stupid Shift key bug created by using lowercase - as a result the shift+num combination was broken
			var shift_nums = {
				"`":"~",
				"1":"!",
				"2":"@",
				"3":"#",
				"4":"$",
				"5":"%",
				"6":"^",
				"7":"&",
				"8":"*",
				"9":"(",
				"0":")",
				"-":"_",
				"=":"+",
				";":":",
				"'":"\"",
				",":"<",
				".":">",
				"/":"?",
				"\\":"|"
			}
			//Special Keys - and their codes
			var special_keys = {
				'esc':27,
				'escape':27,
				'tab':9,
				'space':32,
				'return':13,
				'enter':13,
				'backspace':8,
	
				'scrolllock':145,
				'scroll_lock':145,
				'scroll':145,
				'capslock':20,
				'caps_lock':20,
				'caps':20,
				'numlock':144,
				'num_lock':144,
				'num':144,
				
				'pause':19,
				'break':19,
				
				'insert':45,
				'home':36,
				'delete':46,
				'end':35,
				
				'pageup':33,
				'page_up':33,
				'pu':33,
	
				'pagedown':34,
				'page_down':34,
				'pd':34,
	
				'left':37,
				'up':38,
				'right':39,
				'down':40,
	
				'f1':112,
				'f2':113,
				'f3':114,
				'f4':115,
				'f5':116,
				'f6':117,
				'f7':118,
				'f8':119,
				'f9':120,
				'f10':121,
				'f11':122,
				'f12':123
			}
	
			var modifiers = { 
				shift: { wanted:false, pressed:false},
				ctrl : { wanted:false, pressed:false},
				alt  : { wanted:false, pressed:false},
				meta : { wanted:false, pressed:false}	//Meta is Mac specific
			};
                        
			if(e.ctrlKey)	modifiers.ctrl.pressed = true;
			if(e.shiftKey)	modifiers.shift.pressed = true;
			if(e.altKey)	modifiers.alt.pressed = true;
			if(e.metaKey)   modifiers.meta.pressed = true;
                        
			for(var i=0; k=keys[i],i<keys.length; i++) {
				//Modifiers
				if(k == 'ctrl' || k == 'control') {
					kp++;
					modifiers.ctrl.wanted = true;

				} else if(k == 'shift') {
					kp++;
					modifiers.shift.wanted = true;

				} else if(k == 'alt') {
					kp++;
					modifiers.alt.wanted = true;
				} else if(k == 'meta') {
					kp++;
					modifiers.meta.wanted = true;
				} else if(k.length > 1) { //If it is a special key
					if(special_keys[k] == code) kp++;
					
				} else if(opt['keycode']) {
					if(opt['keycode'] == code) kp++;

				} else { //The special keys did not match
					if(character == k) kp++;
					else {
						if(shift_nums[character] && e.shiftKey) { //Stupid Shift key bug created by using lowercase
							character = shift_nums[character]; 
							if(character == k) kp++;
						}
					}
				}
			}
			
			if(kp == keys.length && 
						modifiers.ctrl.pressed == modifiers.ctrl.wanted &&
						modifiers.shift.pressed == modifiers.shift.wanted &&
						modifiers.alt.pressed == modifiers.alt.wanted &&
						modifiers.meta.pressed == modifiers.meta.wanted) {
				callback(e);
	
				if(!opt['propagate']) { //Stop the event
					//e.cancelBubble is supported by IE - this will kill the bubbling process.
					e.cancelBubble = true;
					e.returnValue = false;
	
					//e.stopPropagation works in Firefox.
					if (e.stopPropagation) {
						e.stopPropagation();
						e.preventDefault();
					}
					return false;
				}
			}
		}
		this.all_shortcuts[shortcut_combination] = {
			'callback':func, 
			'target':ele, 
			'event': opt['type']
		};
		//Attach the function with the event
		if(ele.addEventListener) ele.addEventListener(opt['type'], func, false);
		else if(ele.attachEvent) ele.attachEvent('on'+opt['type'], func);
		else ele['on'+opt['type']] = func;
	},

	//Remove the shortcut - just specify the shortcut and I will remove the binding
	'remove':function(shortcut_combination) {
		shortcut_combination = shortcut_combination.toLowerCase();
		var binding = this.all_shortcuts[shortcut_combination];
		delete(this.all_shortcuts[shortcut_combination])
		if(!binding) return;
		var type = binding['event'];
		var ele = binding['target'];
		var callback = binding['callback'];

		if(ele.detachEvent) ele.detachEvent('on'+type, callback);
		else if(ele.removeEventListener) ele.removeEventListener(type, callback, false);
		else ele['on'+type] = false;
	}
}