//Len(String) : Returns the number of characters in a string
//===========================================================

        function Len(str)
        /***
                IN: str - the string whose length we are interested in

                RETVAL: The number of characters in the string
        ***/
        {  return String(str).length;  }
        


//Mid(string, start, length): Returns a specified number of characters from a
//                            string
//============================================================================

        function Mid(str, start, len)
        /***
                IN: str - the string we are LEFTing
                    start - our string's starting position (0 based!!)
                    len - how many characters from start we want to get

                RETVAL: The substring from start to start+len
        ***/
        {
                // Make sure start and len are within proper bounds
                if (start < 0 || len < 0) return "";

                var iEnd, iLen = String(str).length;
                if (start + len > iLen)
                        iEnd = iLen;
                else
                        iEnd = start + len;

                return String(str).substring(start,iEnd);
        }


// Keep in mind that strings in JavaScript are zero-based, so if you ask
// for Mid("Hello",1,1), you will get "e", not "H".  To get "H", you would
// simply type in Mid("Hello",0,1)

// You can alter the above function so that the string is one-based.  Just
// check to make sure start is not <= 0, alter the iEnd = start + len to
// iEnd = (start - 1) + len, and in your final return statement, just
// return ...substring(start-1,iEnd)


function InStr(strSearch, charSearchFor)
/*
InStr(strSearch, charSearchFor) : Returns the first location a substring (SearchForStr)
                           was found in the string str.  (If the character is not
                           found, -1 is returned.)
                           
Requires use of:
	Mid function
	Len function
*/
{
	for (i=0; i < Len(strSearch); i++)
	{
	    if (charSearchFor == Mid(strSearch, i, 1))
	    {
			return i;
	    }
	}
	return -1;
}

function FormatCurrency(num,decimalNum,bolLeadingZero,bolParens,bolCommas)
/**********************************************************************
	IN:
		NUM - the number to format
		decimalNum - the number of decimal places to format the number to
		bolLeadingZero - true / false - display a leading zero for
										numbers between -1 and 1
		bolParens - true / false - use parenthesis around negative numbers
		bolCommas - put commas as number separators.										
 
	RETVAL:
		The formatted number!		
 **********************************************************************/
{
	var tmpStr = new String(FormatNumber(num,decimalNum,bolLeadingZero,bolParens,bolCommas));

	if (tmpStr.indexOf("(") != -1 || tmpStr.indexOf("-") != -1) {
		// We know we have a negative number, so place 'P' inside of '(' / after '-'
		if (tmpStr.charAt(0) == "(")
			tmpStr = "(P "  + tmpStr.substring(1,tmpStr.length);
		else if (tmpStr.charAt(0) == "-")
			tmpStr = "-P " + tmpStr.substring(1,tmpStr.length);
			
		return tmpStr;
	}
	else
		return "P " + tmpStr;		// Return formatted string!
}


function FormatNumber(num,decimalNum,bolCommas,bolLeadingZero,bolParens)
/**********************************************************************
	IN:
		NUM - the number to format
		decimalNum - the number of decimal places to format the number to
		bolLeadingZero - true / false - display a leading zero for
										numbers between -1 and 1
		bolParens - true / false - use parenthesis around negative numbers
		bolCommas - put commas as number separators.

	RETVAL:
		The formatted number!
/**********************************************************************/
{ 
        if (isNaN(parseInt(num))) return "NaN";

	var tmpNum = num;
	var iSign = num < 0 ? -1 : 1;		// Get sign of number
	
	// Adjust number so only the specified number of numbers after
	// the decimal point are shown.
	tmpNum *= Math.pow(10,decimalNum);
	tmpNum = Math.round(Math.abs(tmpNum))
	tmpNum /= Math.pow(10,decimalNum);
	tmpNum *= iSign;					// Readjust for sign
	
	
	// Create a string object to do our formatting on
	var tmpNumStr = new String(tmpNum);
	
	if(tmpNumStr.indexOf("\.")==-1)
	   {
			tmpNumStr = tmpNumStr + ".00"	   
	   }

	// See if we need to strip out the leading zero or not.
	if (!bolLeadingZero && num < 1 && num > -1 && num != 0)
		if (num > 0)
			tmpNumStr = tmpNumStr.substring(1,tmpNumStr.length);
		else
			tmpNumStr = "-" + tmpNumStr.substring(2,tmpNumStr.length);
		
	// See if we need to put in the commas
	if (bolCommas && (num >= 1000 || num <= -1000)) {
		var iStart = tmpNumStr.indexOf(".");
		if (iStart < 0)
			iStart = tmpNumStr.length;

		iStart -= 3;
		while (iStart >= 1) {
			tmpNumStr = tmpNumStr.substring(0,iStart) + "," + tmpNumStr.substring(iStart,tmpNumStr.length)
			iStart -= 3;
		}		
	}

	// See if we need to use parenthesis
	if (bolParens && num < 0)
		tmpNumStr = "(" + tmpNumStr.substring(1,tmpNumStr.length) + ")";

	return tmpNumStr;		// Return our formatted string!
}

/****************************************************************
***********		Check whether string s is empty. ****************
****************************************************************/
function IsEmpty(s)
{
	return ((s == null) || (s.length == 0))
}

        function ConcatCPU()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.cpu.options[document.system_order.cpu.selectedIndex].value.length;
				xpos = InStr(document.system_order.cpu.options[document.system_order.cpu.selectedIndex].value, '/');
				amt = Mid(document.system_order.cpu.options[document.system_order.cpu.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.cpu.options[document.system_order.cpu.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nCPU.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nCPU.value = 0;
					}
				document.system_order.sCPU.value = ic;					
				addTotal();
        }

        function ConcatMOB()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.mob.options[document.system_order.mob.selectedIndex].value.length;
				xpos = InStr(document.system_order.mob.options[document.system_order.mob.selectedIndex].value, '/');
				amt = Mid(document.system_order.mob.options[document.system_order.mob.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.mob.options[document.system_order.mob.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nMOB.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMOB.value = 0;
					}				
				document.system_order.sMOB.value = ic;						
				addTotal();
        }        
        
        function ConcatHDD()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.hdd.options[document.system_order.hdd.selectedIndex].value.length;
				xpos = InStr(document.system_order.hdd.options[document.system_order.hdd.selectedIndex].value, '/');
				amt = Mid(document.system_order.hdd.options[document.system_order.hdd.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.hdd.options[document.system_order.hdd.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nHDD.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nHDD.value = 0;
					}				
				document.system_order.sHDD.value = ic;						
				addTotal();
        }  
        
        function ConcatMEM()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.mem.options[document.system_order.mem.selectedIndex].value.length;
				xpos = InStr(document.system_order.mem.options[document.system_order.mem.selectedIndex].value, '/');
				amt = Mid(document.system_order.mem.options[document.system_order.mem.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.mem.options[document.system_order.mem.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nMEM.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMEM.value = 0;
					}				
				document.system_order.sMEM.value = ic;						
				addTotal();
        }                  

        function ConcatVID()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.vid.options[document.system_order.vid.selectedIndex].value.length;
				xpos = InStr(document.system_order.vid.options[document.system_order.vid.selectedIndex].value, '/');
				amt = Mid(document.system_order.vid.options[document.system_order.vid.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.vid.options[document.system_order.vid.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nVID.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nVID.value = 0;
					}				
				document.system_order.sVID.value = ic;						
				addTotal();
        }     
        
        function ConcatCDR()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.cdr.options[document.system_order.cdr.selectedIndex].value.length;
				xpos = InStr(document.system_order.cdr.options[document.system_order.cdr.selectedIndex].value, '/');
				amt = Mid(document.system_order.cdr.options[document.system_order.cdr.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.cdr.options[document.system_order.cdr.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nCDR.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nCDR.value = 0;
					}				
				document.system_order.sCDR.value = ic;						
				addTotal();
        }     
        
        function ConcatSOU()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.sou.options[document.system_order.sou.selectedIndex].value.length;
				xpos = InStr(document.system_order.sou.options[document.system_order.sou.selectedIndex].value, '/');
				amt = Mid(document.system_order.sou.options[document.system_order.sou.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.sou.options[document.system_order.sou.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nSOU.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nSOU.value = 0;
					}				
				document.system_order.sSOU.value = ic;						
				addTotal();
        }     
        
        function ConcatCAS()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.cas.options[document.system_order.cas.selectedIndex].value.length;
				xpos = InStr(document.system_order.cas.options[document.system_order.cas.selectedIndex].value, '/');
				amt = Mid(document.system_order.cas.options[document.system_order.cas.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.cas.options[document.system_order.cas.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nCAS.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nCAS.value = 0;
					}				
				document.system_order.sCAS.value = ic;						
				addTotal();
        }     
        
        function ConcatMON()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.mon.options[document.system_order.mon.selectedIndex].value.length;
				xpos = InStr(document.system_order.mon.options[document.system_order.mon.selectedIndex].value, '/');
				amt = Mid(document.system_order.mon.options[document.system_order.mon.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.mon.options[document.system_order.mon.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nMON.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMON.value = 0;
					}				
				document.system_order.sMON.value = ic;						
				addTotal();
        }     
        
        function ConcatFDD()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.fdd.options[document.system_order.fdd.selectedIndex].value.length;
				xpos = InStr(document.system_order.fdd.options[document.system_order.fdd.selectedIndex].value, '/');
				amt = Mid(document.system_order.fdd.options[document.system_order.fdd.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.fdd.options[document.system_order.fdd.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nFDD.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nFDD.value = 0;
					}				
				document.system_order.sFDD.value = ic;						
				addTotal();
        }     
        
        function ConcatFAX()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.fax.options[document.system_order.fax.selectedIndex].value.length;
				xpos = InStr(document.system_order.fax.options[document.system_order.fax.selectedIndex].value, '/');
				amt = Mid(document.system_order.fax.options[document.system_order.fax.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.fax.options[document.system_order.fax.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nFAX.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nFAX.value = 0;
					}				
				document.system_order.sFAX.value = ic;						
				addTotal();
        }     
        
        function ConcatPRI()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.pri.options[document.system_order.pri.selectedIndex].value.length;
				xpos = InStr(document.system_order.pri.options[document.system_order.pri.selectedIndex].value, '/');
				amt = Mid(document.system_order.pri.options[document.system_order.pri.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.pri.options[document.system_order.pri.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nPRI.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nPRI.value = 0;
					}				
				document.system_order.sPRI.value = ic;						
				addTotal();
        }          
                                               
        function ConcatSCA()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.sca.options[document.system_order.sca.selectedIndex].value.length;
				xpos = InStr(document.system_order.sca.options[document.system_order.sca.selectedIndex].value, '/');
				amt = Mid(document.system_order.sca.options[document.system_order.sca.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.sca.options[document.system_order.sca.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nSCA.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nSCA.value = 0;
					}				
				document.system_order.sSCA.value = ic;						
				addTotal();
        } 
        
        function ConcatPOW()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.pow.options[document.system_order.pow.selectedIndex].value.length;
				xpos = InStr(document.system_order.pow.options[document.system_order.pow.selectedIndex].value, '/');
				amt = Mid(document.system_order.pow.options[document.system_order.pow.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.pow.options[document.system_order.pow.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nPOW.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nPOW.value = 0;
					}				
				document.system_order.sPOW.value = ic;						
				addTotal();
        } 
        
        function ConcatSPK()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.spk.options[document.system_order.spk.selectedIndex].value.length;
				xpos = InStr(document.system_order.spk.options[document.system_order.spk.selectedIndex].value, '/');
				amt = Mid(document.system_order.spk.options[document.system_order.spk.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.spk.options[document.system_order.spk.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nSPK.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nSPK.value = 0;
					}				
				document.system_order.sSPK.value = ic;						
				addTotal();
        } 
        
        function ConcatMOU()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.mou.options[document.system_order.mou.selectedIndex].value.length;
				xpos = InStr(document.system_order.mou.options[document.system_order.mou.selectedIndex].value, '/');
				amt = Mid(document.system_order.mou.options[document.system_order.mou.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.mou.options[document.system_order.mou.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nMOU.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMOU.value = 0;
					}				
				document.system_order.sMOU.value = ic;						
				addTotal();
        } 

        
        function ConcatNET()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.net.options[document.system_order.net.selectedIndex].value.length;
				xpos = InStr(document.system_order.net.options[document.system_order.net.selectedIndex].value, '/');
				amt = Mid(document.system_order.net.options[document.system_order.net.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.net.options[document.system_order.net.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nNET.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nNET.value = 0;
					}				
				document.system_order.sNET.value = ic;						
				addTotal();
        }        
        
        function ConcatCOL()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.col.options[document.system_order.col.selectedIndex].value.length;
				xpos = InStr(document.system_order.col.options[document.system_order.col.selectedIndex].value, '/');
				amt = Mid(document.system_order.col.options[document.system_order.col.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.col.options[document.system_order.col.selectedIndex].value, xpos + 1, xlen);
				//alert('AMT' +amt);
				document.system_order.nCOL.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nCOL.value = 0;
					}				
				document.system_order.sCOL.value = ic;						
				addTotal();
        } 
        
        function ConcatCMD()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.cmd.options[document.system_order.cmd.selectedIndex].value.length;
				xpos = InStr(document.system_order.cmd.options[document.system_order.cmd.selectedIndex].value, '/');
				amt = Mid(document.system_order.cmd.options[document.system_order.cmd.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.cmd.options[document.system_order.cmd.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nCMD.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nCMD.value = 0;
					}				
				document.system_order.sCMD.value = ic;						
				addTotal();
        }         
        
        function ConcatCAM()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.cam.options[document.system_order.cam.selectedIndex].value.length;
				xpos = InStr(document.system_order.cam.options[document.system_order.cam.selectedIndex].value, '/');
				amt = Mid(document.system_order.cam.options[document.system_order.cam.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.cam.options[document.system_order.cam.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nCAM.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nCAM.value = 0;
					}				
				document.system_order.sCAM.value = ic;						
				addTotal();
        }         
        
        function ConcatMST()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.mst.options[document.system_order.mst.selectedIndex].value.length;
				xpos = InStr(document.system_order.mst.options[document.system_order.mst.selectedIndex].value, '/');
				amt = Mid(document.system_order.mst.options[document.system_order.mst.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.mst.options[document.system_order.mst.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nMST.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMST.value = 0;
					}				
				document.system_order.sMST.value = ic;						
				addTotal();
        }          

        function ConcatMMR()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.mmr.options[document.system_order.mmr.selectedIndex].value.length;
				xpos = InStr(document.system_order.mmr.options[document.system_order.mmr.selectedIndex].value, '/');
				amt = Mid(document.system_order.mmr.options[document.system_order.mmr.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.mmr.options[document.system_order.mmr.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nMMR.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMMR.value = 0;
					}				
				document.system_order.sMMR.value = ic;						
				addTotal();
        }          
        
        function ConcatGAM()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.gam.options[document.system_order.gam.selectedIndex].value.length;
				xpos = InStr(document.system_order.gam.options[document.system_order.gam.selectedIndex].value, '/');
				amt = Mid(document.system_order.gam.options[document.system_order.gam.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.gam.options[document.system_order.gam.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nGAM.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nGAM.value = 0;
					}				
				document.system_order.sGAM.value = ic;						
				addTotal();
        }       
        
        function ConcatFUR()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.fur.options[document.system_order.fur.selectedIndex].value.length;
				xpos = InStr(document.system_order.fur.options[document.system_order.fur.selectedIndex].value, '/');
				amt = Mid(document.system_order.fur.options[document.system_order.fur.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.fur.options[document.system_order.fur.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nFUR.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nFUR.value = 0;
					}				
				document.system_order.sFUR.value = ic;						
				addTotal();
        }           
        
        function ConcatBAR()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.bar.options[document.system_order.bar.selectedIndex].value.length;
				xpos = InStr(document.system_order.bar.options[document.system_order.bar.selectedIndex].value, '/');
				amt = Mid(document.system_order.bar.options[document.system_order.bar.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.bar.options[document.system_order.bar.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nBAR.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nBAR.value = 0;
					}				
				document.system_order.sBAR.value = ic;						
				addTotal();
        }             
        
        function ConcatMAP()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.map.options[document.system_order.map.selectedIndex].value.length;
				xpos = InStr(document.system_order.map.options[document.system_order.map.selectedIndex].value, '/');
				amt = Mid(document.system_order.map.options[document.system_order.map.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.map.options[document.system_order.map.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nMAP.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMAP.value = 0;
					}				
				document.system_order.sMAP.value = ic;						
				addTotal();
        }           
        
        function ConcatLAP()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.lap.options[document.system_order.lap.selectedIndex].value.length;
				xpos = InStr(document.system_order.lap.options[document.system_order.lap.selectedIndex].value, '/');
				amt = Mid(document.system_order.lap.options[document.system_order.lap.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.lap.options[document.system_order.lap.selectedIndex].value, xpos + 1, xlen);				
				document.system_order.nLAP.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nLAP.value = 0;
					}				
				document.system_order.sLAP.value = ic;						
				addTotal();
        }         
                
        function ConcatOT1()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.ot1.options[document.system_order.ot1.selectedIndex].value.length;
				xpos = InStr(document.system_order.ot1.options[document.system_order.ot1.selectedIndex].value, '/');
				amt = Mid(document.system_order.ot1.options[document.system_order.ot1.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.ot1.options[document.system_order.ot1.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nOT1.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nOT1.value = 0;
					}				
				document.system_order.sOT1.value = ic;						
				addTotal();
        } 
        
        function ConcatOT2()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.ot2.options[document.system_order.ot2.selectedIndex].value.length;
				xpos = InStr(document.system_order.ot2.options[document.system_order.ot2.selectedIndex].value, '/');
				amt = Mid(document.system_order.ot2.options[document.system_order.ot2.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.ot2.options[document.system_order.ot2.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nOT2.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nOT2.value = 0;
					}				
				document.system_order.sOT2.value = ic;						
				addTotal();
        }

		function ConcatMED()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.med.options[document.system_order.med.selectedIndex].value.length;
				xpos = InStr(document.system_order.med.options[document.system_order.med.selectedIndex].value, '/');
				amt = Mid(document.system_order.med.options[document.system_order.med.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.med.options[document.system_order.med.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nMED.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nMED.value = 0;
					}				
				document.system_order.sMED.value = ic;						
				addTotal();
        }    

		function ConcatVPC()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.vpc.options[document.system_order.vpc.selectedIndex].value.length;
				xpos = InStr(document.system_order.vpc.options[document.system_order.vpc.selectedIndex].value, '/');
				amt = Mid(document.system_order.vpc.options[document.system_order.vpc.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.vpc.options[document.system_order.vpc.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nVPC.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nVPC.value = 0;
					}				
				document.system_order.sVPC.value = ic;						
				addTotal();
        }

		function ConcatHDS()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.hds.options[document.system_order.hds.selectedIndex].value.length;
				xpos = InStr(document.system_order.hds.options[document.system_order.hds.selectedIndex].value, '/');
				amt = Mid(document.system_order.hds.options[document.system_order.hds.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.hds.options[document.system_order.hds.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nHDS.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nHDS.value = 0;
					}				
				document.system_order.sHDS.value = ic;						
				addTotal();
        }				
		
        function ConcatLCD()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.lcd.options[document.system_order.lcd.selectedIndex].value.length;
				xpos = InStr(document.system_order.lcd.options[document.system_order.lcd.selectedIndex].value, '/');
				amt = Mid(document.system_order.lcd.options[document.system_order.lcd.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.lcd.options[document.system_order.lcd.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nLCD.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nLCD.value = 0;
					}				
				document.system_order.sLCD.value = ic;						
				addTotal();
        }     
        
        function ConcatPSU()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.psu.options[document.system_order.psu.selectedIndex].value.length;
				xpos = InStr(document.system_order.psu.options[document.system_order.psu.selectedIndex].value, '/');
				amt = Mid(document.system_order.psu.options[document.system_order.psu.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.psu.options[document.system_order.psu.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nPSU.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nPSU.value = 0;
					}				
				document.system_order.sPSU.value = ic;						
				addTotal();
        }                                            
         
        function ConcatTVT()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.tvt.options[document.system_order.tvt.selectedIndex].value.length;
				xpos = InStr(document.system_order.tvt.options[document.system_order.tvt.selectedIndex].value, '/');
				amt = Mid(document.system_order.tvt.options[document.system_order.tvt.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.tvt.options[document.system_order.tvt.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nTVT.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nTVT.value = 0;
					}				
				document.system_order.sTVT.value = ic;						
				addTotal();
        }
        
		function ConcatLAM()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.lam.options[document.system_order.lam.selectedIndex].value.length;
				xpos = InStr(document.system_order.lam.options[document.system_order.lam.selectedIndex].value, '/');
				amt = Mid(document.system_order.lam.options[document.system_order.lam.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.lam.options[document.system_order.lam.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nLAM.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nLAM.value = 0;
					}				
				document.system_order.sLAM.value = ic;						
				addTotal();
        }
        
        function ConcatHMI()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.hmi.options[document.system_order.hmi.selectedIndex].value.length;
				xpos = InStr(document.system_order.hmi.options[document.system_order.hmi.selectedIndex].value, '/');
				amt = Mid(document.system_order.hmi.options[document.system_order.hmi.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.hmi.options[document.system_order.hmi.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nHMI.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nHMI.value = 0;
					}				
				document.system_order.sHMI.value = ic;						
				addTotal();
        }      
        
        function ConcatHMS()
        {
				var xlen, amt, ic;
				var xpos;
				xlen = document.system_order.hms.options[document.system_order.hms.selectedIndex].value.length;
				xpos = InStr(document.system_order.hms.options[document.system_order.hms.selectedIndex].value, '/');
				amt = Mid(document.system_order.hms.options[document.system_order.hms.selectedIndex].value, 0, xpos);
				ic = Mid(document.system_order.hms.options[document.system_order.hms.selectedIndex].value, xpos + 1, xlen);
				document.system_order.nHMS.value = amt;
				if (IsEmpty(amt))
					{
					document.system_order.nHMS.value = 0;
					}				
				document.system_order.sHMS.value = ic;						
				addTotal();
        }       
        function addTotal()
        {
				var cpuPrice = document.system_order.nCPU.value;
				var mobPrice = document.system_order.nMOB.value;
				var hddPrice = document.system_order.nHDD.value;
				var memPrice = document.system_order.nMEM.value;				
				var vidPrice = document.system_order.nVID.value;				
				var cdrPrice = document.system_order.nCDR.value;
				var souPrice = document.system_order.nSOU.value;
				var casPrice = document.system_order.nCAS.value;
				var monPrice = document.system_order.nMON.value;																				
				var fddPrice = document.system_order.nFDD.value;
				var faxPrice = document.system_order.nFAX.value;
				var priPrice = document.system_order.nPRI.value;
				var scaPrice = document.system_order.nSCA.value;
				var powPrice = document.system_order.nPOW.value;
				var mouPrice = document.system_order.nMOU.value;
				var spkPrice = document.system_order.nSPK.value;
				var netPrice = document.system_order.nNET.value;
				var colPrice = document.system_order.nCOL.value;
				var cmdPrice = document.system_order.nCMD.value;
				var camPrice = document.system_order.nCAM.value;
				var mstPrice = document.system_order.nMST.value;
				var mmrPrice = document.system_order.nMMR.value;
				var gamPrice = document.system_order.nGAM.value;
				var furPrice = document.system_order.nFUR.value;
				var barPrice = document.system_order.nBAR.value;
				var mapPrice = document.system_order.nMAP.value;				
				var lapPrice = document.system_order.nLAP.value;				
				var ot1Price = document.system_order.nOT1.value;
				var ot2Price = document.system_order.nOT2.value;																																			
				var medPrice = document.system_order.nMED.value;																																			
				var vpcPrice = document.system_order.nVPC.value;																																			
				var hdsPrice = document.system_order.nHDS.value;
				var lcdPrice = document.system_order.nLCD.value;
				var psuPrice = document.system_order.nPSU.value;
				var tvtPrice = document.system_order.nTVT.value;
				var lamPrice = document.system_order.nLAM.value;
				var hmiPrice = document.system_order.nHMI.value;
				var hmsPrice = document.system_order.nHMS.value;																																			
			
			var obj = document.getElementById("totalPrice");
			obj.innerText = FormatCurrency((Math.abs(cpuPrice) + Math.abs(mobPrice) + Math.abs(hddPrice) + Math.abs(memPrice) + Math.abs(vidPrice) + Math.abs(cdrPrice) + Math.abs(souPrice) + Math.abs(casPrice) + Math.abs(monPrice) + Math.abs(fddPrice) + Math.abs(faxPrice) + Math.abs(priPrice) + Math.abs(scaPrice) + Math.abs(powPrice) + Math.abs(spkPrice) + Math.abs(mouPrice) + Math.abs(netPrice) + Math.abs(colPrice) + Math.abs(cmdPrice) + Math.abs(camPrice) + Math.abs(mstPrice) + Math.abs(mmrPrice) + Math.abs(gamPrice) + Math.abs(furPrice) + Math.abs(barPrice) + Math.abs(mapPrice) + Math.abs(lapPrice) + Math.abs(ot1Price) + Math.abs(ot2Price) + Math.abs(medPrice) + Math.abs(vpcPrice) + Math.abs(hdsPrice) + Math.abs(lcdPrice) + Math.abs(psuPrice) + Math.abs(tvtPrice) + Math.abs(lamPrice) + Math.abs(hmiPrice) + Math.abs(hmsPrice)),2,true,false,true);
			obj.innerHTML = obj.innerText;
			GlobalTot = Math.abs(cpuPrice) + Math.abs(mobPrice) + Math.abs(hddPrice) + Math.abs(memPrice) + Math.abs(vidPrice) + Math.abs(cdrPrice) + Math.abs(souPrice) + Math.abs(casPrice) + Math.abs(monPrice) + Math.abs(fddPrice) + Math.abs(faxPrice) + Math.abs(priPrice) + Math.abs(scaPrice) + Math.abs(powPrice) + Math.abs(spkPrice) + Math.abs(mouPrice) + Math.abs(netPrice) + Math.abs(ot1Price) + Math.abs(ot2Price) + Math.abs(colPrice) + Math.abs(cmdPrice) + Math.abs(camPrice) + Math.abs(mstPrice) + Math.abs(mmrPrice) + Math.abs(gamPrice) + Math.abs(furPrice) + Math.abs(barPrice) + Math.abs(mapPrice) + Math.abs(lapPrice) + Math.abs(ot1Price) + Math.abs(ot2Price) + Math.abs(medPrice) + Math.abs(vpcPrice) + Math.abs(hdsPrice) + Math.abs(lcdPrice) + Math.abs(psuPrice) + Math.abs(tvtPrice) + Math.abs(lamPrice) + Math.abs(hmiPrice) + Math.abs(hmsPrice);
        }