function get_radio_var(obj)
{
	for (i_get_radio_var=0;i_get_radio_var<obj.length ;i_get_radio_var++ )
	{
		if (obj[i_get_radio_var].checked )
		{
			return obj[i_get_radio_var].value
		}//if (obj[i_get_radio_var].checked )
	}//for (i_get_radio_var=0;i_get_radio_var<obj.length ;i_get_radio_var++ )
}//function get_radio_var(obj)


function copytwo2result(var_name)
{
	m1_var = 'JAVAVAR_'+var_name+'_1'
	m1_e  = eval(m1_var)
	m2_var = 'JAVAVAR_'+var_name+'_2'
	m2_e  = eval(m2_var)
	morg_var = 'JAVAVAR_'+var_name+'_org'
	m_org  = eval(morg_var)
	
    m2len = m2_e.length ; 
	m_org_de = '';
	m_org_value = '';
    for ( i=0; i<m2len ; i++)
	{
		m_org.value =  m_org.value+m_org_de+m2_e.options[i].value;
		m_org_de = ','
	}//for ( i=0; i<m2len ; i++)
}//function copytwo2result()

function one2two(var_name) 
{
	//alert('hello')
	m1_var = 'JAVAVAR_'+var_name+'_1'
	m1_e  = eval(m1_var)
	m2_var = 'JAVAVAR_'+var_name+'_2'
	m2_e  = eval(m2_var)
	morg_var = 'JAVAVAR_'+var_name+'_org'
	m_org  = eval(morg_var)

	m1len = m1_e.length ;
    for ( i=0; i<m1len ; i++)
	{
        if (m1_e.options[i].selected == true ) 
		{
            m2len = m2_e.length;
            m2_e.options[m2len]= new Option(m1_e.options[i].text);
            m2_e.options[m2len].value = m1_e.options[i].value;
        }//if (m1.options[i].selected == true ) 
    }//for ( i=0; i<m1len ; i++)
    for ( i = (m1len -1); i>=0; i--)
	{
        if (m1_e.options[i].selected == true ) 
		{ m1_e.options[i] = null;      }
    }//for ( i = (m1len -1); i>=0; i--)
}//function one2two() 

function two2one(var_name) 
{
	m1_var = 'JAVAVAR_'+var_name+'_1'
	m1_e  = eval(m1_var)
	m2_var = 'JAVAVAR_'+var_name+'_2'
	m2_e  = eval(m2_var)
	morg_var = 'JAVAVAR_'+var_name+'_org'
	m_org  = eval(morg_var)

	m2len = m2_e.length ;
    for ( i=0; i<m2len ; i++)
	{
        if (m2_e.options[i].selected == true ) 
		{
            m1len = m1_e.length;
            m1_e.options[m1len]= new Option(m2_e.options[i].text);
            m1_e.options[m1len].value = m2_e.options[i].value;
        }//if (m2.options[i].selected == true ) 
    }//for ( i=0; i<m2len ; i++)
    for ( i=(m2len-1); i>=0; i--)
	{
        if (m2_e.options[i].selected == true ) 
		{ m2_e.options[i] = null;}
    }//for ( i=(m2len-1); i>=0; i--)
}//function two2one() 




function gotolink(obj) 
{
		document.URL=obj;
}//function gotolink(obj) 

function NewWin_setting(mypage,settings ,name)
{
	window.open(mypage,name,settings);
}//function NewWin_setting(mypage,settings)


function NewWin(mypage)
{var win1 = null;
var settings='width=750,height=500,scrollbars=yes,location=yes,directories=yes,status=yes,menubar=yes,toolbar=yes,resizable=yes,left=20,top=20';
//name = random();
win1 = window.open(mypage,name,settings);
}


function submit_get(object,actions) {
	//example submit_get(document.formname,'action')
        object.encoding = 'text/plain';
		object.action = actions;
        object.method = 'GET';
		object.submit();
}

function submit_post(object,actions) 
{
	//example submit_post(document.formname,'action')
//        object.encoding = 'text/plain';
		object.action = actions;
		object.method = 'POST';
		object.submit();
}

function showObj(name) {
    var e = document.all(name);
	if (e.style.display == "none") {
        e.style.display = "";
    }
}

function hideObj(name) {
    var e = document.all(name);
    if (e.style.display == "") {
        e.style.display = "none";
    }
}

function showObjs(name_grp) {
	var e_arr = name_grp.split(",");
	for (i=0;i<e_arr.length ;i++ )
	{
		e = document.all(e_arr[i]);
		e.style.display = "";
	}
}

function hideObjs(name_grp) {
	var e_arr = name_grp.split(",");
	for (i=0;i<e_arr.length ;i++ )
	{
		ae = document.all(e_arr[i]);
		ae.style.display = "none";
	}
}


function set_BGColor(id_grp,color)
{
	var e_arr = id_grp.split(",");
	for (i_set_BGColor=0;i_set_BGColor<e_arr.length ;i_set_BGColor++ )
	{
		e = document.all(e_arr[i_set_BGColor]);
		e.style.backgroundColor = color;
	}//for (i=0;i<e_arr.length ;i++ )
}//function set_BGColor(id_grp,color)


function flipflop_showhideObjs(name_grp)
{
	var e_arr = name_grp.split(",");
	for (i=0;i<e_arr.length ;i++ )
	{
		e = document.all(e_arr[i]);
		if (e.style.display == "none") 
		{e.style.display = "";} else {e.style.display = "none";}
	}//for (i=0;i<e_arr.length ;i++ )
} //function flipflop_showhideObjs(name_grp)


function swap_showhideObjs(showObj_name,hideObj_name) {
	hideObjs(hideObj_name);
	showObjs(showObj_name);
}

function showhideObj(name) {
    var e = document.all(name);
    if (e.style.display == "none") {
        e.style.display = "";
    }
    else {
     e.style.display = "none";
  }
}


function checkInt(objName) {
var intfield = objName;
objName.value = objName.value.trim();
if (chkInt(objName.value) == false) {
intfield.select();
alert("ตัวเลขไม่ถูกต้อง โปรดป้อนใหม่อีกครั้ง")
intfield.focus();
return false;
}
else {
return true;
}
}

function chkInt(num)
{
var parsednum;
var pat;
var res = new Array();
pat = /(\.)/g;
res = num.match(pat);
if(res!=null)
if(res.length>0)
return false;
pat=/(\D)/g;
res=num.match(pat);
if(res!=null)
if(res.length>1)
return false;
else //If Length is one
if(res[0]=='-')
{
parsednum=parseInt(num);
if(parsednum==num)
return true;
else
return false;
}
else
return false;
else
return true;
}

function checkFloat(objName) {
var Floatfield = objName;
if ((chkPercent(objName.value) == false) ){
Floatfield.select();
alert("ตัวเลขไม่ถูกต้อง โปรดป้อนใหม่อีกครั้ง")
Floatfield.focus();
return false;
}
else {
return true;
}
}

function checkPercent(objName) {
var Percentfield = objName;
if ((chkPercent(objName.value) == false) || (Percentfield.value > 100) ){
Percentfield.select();
alert("ตัวเลขไม่ถูกต้อง โปรดป้อนใหม่อีกครั้ง")
Percentfield.focus();
return false;
}
else {
return true;
}
}
function chkPercent(num)
{
var parsednum;
var pat;
var res = new Array();
pat = /(\.)/g;
res = num.match(pat);
if(res!=null)
        if(res.length>1)
        return false;
pat=/(\D)/g;
res=num.match(pat);
if(res!=null)
        if(res.length>2)
        return false;
        else
                if(res.length==1)
                        if(res[0]=='-' || res[0]=='.')
                        return true;
                else
                        return false;
else //res.length is 2
        if(res[0]=='-' && res[1]=='.')
        {
        parsednum=parsePercent(num);
        if(parsednum==num)
                return true;
        else
                return false;
        }
else
return false;
else
return true;
}

function chkdd(obj_d,obj_m) 
{
	if (obj_m.value==4 || obj_m.value==6 || obj_m.value==9 || obj_m.value==11 ) {
		obj_d.length = 30;
		setIndex = obj_d.selectedIndex;
		for (i = 0; i < 30 ; i++) {
			obj_d.options[i].text = i+1;
		}
		obj_d.selectedIndex = setIndex;
	}
	else if (obj_m.value==2) {	
		obj_d.length = 29;
		setIndex = obj_d.selectedIndex;
		for (i = 0; i < 29 ; i++) {
			obj_d.options[i].text = i+1;
		}
		obj_d.selectedIndex = setIndex;
	}
	else {
		obj_d.length = 31;
		setIndex = obj_d.selectedIndex;
		for (i = 0; i < 31 ; i++) {
			obj_d.options[i].text = i+1;
		}
		obj_d.selectedIndex = setIndex;
	}
} //function chkdd(obj_d,obj_m)


function chkdd2(obj_d,obj_m) 
{  // with  show  header day , month , year

	if (obj_m.value==1 || obj_m.value==3 || obj_m.value==5 || obj_m.value==7 || obj_m.value==8 || obj_m.value==10 || obj_m.value==12) {
		obj_d.length = 32;
		setIndex = obj_d.selectedIndex;
		for (i = 1; i <= 31 ; i++) {
			obj_d.options[i].text = i;
		}
		obj_d.selectedIndex = setIndex;
	}
	else if (obj_m.value==2) {	
		obj_d.length = 30;
		setIndex = obj_d.selectedIndex;
		for (i = 1; i <= 29 ; i++) {
			obj_d.options[i].text = i;
		}
		obj_d.selectedIndex = setIndex;
	}
	else {
		obj_d.length = 31;
		setIndex = obj_d.selectedIndex;
		for (i = 1; i <= 30 ; i++) {
			obj_d.options[i].text = i;
		}
		obj_d.selectedIndex = setIndex;
	}

} //function chkdd2(obj_d,obj_m)

function IsEng(st)
{//return true is English chareter '0-9,A-Z,a-z, _ ' and no space
	for(var i=0; i<st.length; i++) 	
	{
		if(		(	(st.charAt(i) >= 'A') && (st.charAt(i) <= 'Z')		) ||
				(	(st.charAt(i) >= 'a') &&	(st.charAt(i) <= 'z')			) ||
				(	(st.charAt(i) >= '0') &&	(st.charAt(i) <= '9') 		) ||
				(	(st.charAt(i) == '_')	 )
			)
		{ ;
		} else return false ;// of  if 
	}//	for(var i=0; i<st.length; i++) 	
	return true;
}//function IsEng(st)

function IsEmpty(szStr) 
{ //return true is empty
	// return false is not empty
	for(var i=0; i<szStr.length; i++) 	{
		if(szStr.charAt(i) != ' ') 		{
			return false;
		}
	}
	return true;
}//function IsEmpty(szStr) 

function Empty_chk(obj,alert_mes)
{ //return false is empty
	// return true  is not empty
	if (IsEmpty(obj.value))
	{				
		alert(alert_mes);
		obj.focus(); return false; 
	}//if (IsEmpty(val))
	return true;
}//function Empty_chk(val)

String.prototype.trim = function()    //// trims white space off both ends of this string
{
 return( (ar=/^\s*([\s\S]*\S+)\s*$/.exec(this)) ? ar[1] : "" ); 
}

function outputMoney(number) 
{
    return outputDollars(Math.floor(number-0) + '') + outputCents(number - 0);
}

function outputDollars(number) {
    if (number.length <= 3)
        return (number == '' ? '0' : number);
    else {
        var mod = number.length%3;
        var output = (mod == 0 ? '' : (number.substring(0,mod)));
        for (i_dollars=0 ; i_dollars < Math.floor(number.length/3) ; i_dollars++) {
            if ((mod ==0) && (i_dollars ==0))
                output+= number.substring(mod+3*i_dollars,mod+3*i_dollars+3);
            else
                output+= ',' + number.substring(mod+3*i_dollars,mod+3*i_dollars+3);
        }
        return (output);
    }
}

function outputCents(amount) {
    amount = Math.round( ( (amount) - Math.floor(amount) ) *100);
    return (amount < 10 ? '.0' + amount : '.' + amount);
}


function powerXY(powerX,powerY)
{
	//X^Y
	return (Math.exp(powerY * Math.log (powerX) ))
}//function powerXY(x,y)

function MyRound(MyRound_Number,MyRound_digit)
{
	MyRound_10 = powerXY(10,MyRound_digit) + 0.000000000000001; 
	MyRound_10 = Math.round(MyRound_10);

	MyRound_result = MyRound_Number * MyRound_10 ; 

	MyRound_result = Math.round(MyRound_result);

	MyRound_result =  MyRound_result / MyRound_10;
	return MyRound_result;
	
}//function MyRound(MyRound_Number,MyRound_digit)

function Empty_chk_GRP(form_name,GRP,alert_mes)
{	//ตรวจสอบว่าเป็น input  GRP มีค่าหรือไม่
	//GRP ชื่อของ object และใช้ , เป็นตัวคั่น  เช่น aaa,bbb,ccc..... 
	// form_name ชื่อ form
	//return false is empty
	// return true  is not empty
	var GRP_ARR = GRP.split(',') 
	var ev, e,j , i ,v 
	for (i = 0; i < GRP_ARR.length ; i ++)
	{
		e = GRP_ARR[i]
		v = 'document.' + form_name + '.'+ e
		ev  = eval(v)
		if (! Empty_chk(ev,alert_mes) ) return false;
	}//for (i = 0; i < GRP_ARR.length ; i ++)	
	return true;
}//function Empty_chk_GRP(GRP,alert_mes)

function Float_chk_GRP(form_name,GRP)
{  //ตรวจสอบว่าเป็น input  GRP เป็นตัวเลขทศนิยมหรือไม่
	//GRP ชื่อของ object และใช้ , เป็นตัวคั่น  เช่น aaa,bbb,ccc..... 
	// form_name ชื่อ form
	//return false is empty
	// return true  is not empty
	var GRP_ARR = GRP.split(',') 
	var ev, e,j , i ,v 
	for (i = 0; i < GRP_ARR.length ; i ++)
	{
		e = GRP_ARR[i]
		v = 'document.' + form_name + '.'+ e
		ev  = eval(v)
		if (! checkFloat(ev) ) return false;
	}//for (i = 0; i < GRP_ARR.length ; i ++)	
	return true;
}//function float_chk_GRP(form_name,GRP,alert_mes)

function Int_chk_GRP(form_name,GRP)
{  //ตรวจสอบว่าเป็น input  GRP เป็นตัวเลขหรือไม่
	//GRP ชื่อของ object และใช้ , เป็นตัวคั่น  เช่น aaa,bbb,ccc..... 
	// form_name ชื่อ form
	//return false is empty
	// return true  is not empty
	var GRP_ARR = GRP.split(',') 
	var ev, e,j , i ,v 
	for (i = 0; i < GRP_ARR.length ; i ++)
	{
		e = GRP_ARR[i]
		v = 'document.' + form_name + '.'+ e
		ev  = eval(v)
		if (!checkInt(ev) ) return false;

	}//for (i = 0; i < GRP_ARR.length ; i ++)	
	return true;
}//function Int_chk_GRP(form_name,GRP,alert_mes)

function Enable_GRP(form_name,GRP)
{ //จะ enable input GRP
	var GRP_ARR = GRP.split(',') 
	var ev, e,j , i ,v 
	for (i = 0; i < GRP_ARR.length ; i ++)
	{
		e = GRP_ARR[i]
		v = 'document.' + form_name + '.'+ e
		ev  = eval(v)
		ev.disabled = false;
	}//for (i = 0; i < GRP_ARR.length ; i ++)	
	return true;
}//function Enable_GRP(form_name,GRP)

function conv_DMY2YMD(obj)
{  // convert date
	//obj.value = dd-mm-yyyy ส่วน yyyy ถ้าเป็น 25xx จะแปลงเป็น 20xx ด้วย
	var  DMY , YMD , d , y
	d = obj.value
	DMY = d.split('-')
	if (DMY.length < 2)
	{
		DMY = d.split('/')
	}
	if (DMY.length < 2)
	{
		return false;
	}
	y = eval(DMY[2])
	if (y > 2500) 
	{y = y - 543;}
	obj.value = y + '-' + DMY[1] + '-' + DMY[0]
}//function conv_DMY2YMD(obj)


function conv_DMY2YMD_GRP(form_name,GRP)
{
	var GRP_ARR = GRP.split(',') 
	var ev, e,j , i ,v 
	for (i = 0; i < GRP_ARR.length ; i ++)
	{
		e = GRP_ARR[i]
		v = 'document.' + form_name + '.'+ e
		ev  = eval(v)
		conv_DMY2YMD(ev)
	}//for (i = 0; i < GRP_ARR.length ; i ++)
}//function conv_DMY2YMD_GRP(form_name,GRP,deli='-')