function CalcProgramCost(){


	//alert('CalcProgramCost')
	
	//============================================================
	//              Цены по прайс листу в рублях
	//------------------------------------------------------------
	var price_Alterra = 90000             
	var price_GeoWall = 40000             
		var price_GeoWallStab   = 10000
		var price_GeoWallAnchor = 10000
		var price_GeoWallKranz  =  7000
		var price_GeoWallBeam   =  3000
	var price_GeoAnchor = 10000             
	var price_GeoStab   = 40000
	var price_GeoPlate  = 10000             
    var price_GeoPile   =  3000             	
	var IsNetLicSelect = false  // сетвая версия	

	// Учет сетевой версии    
	IsNetLicSelect = document.getElementById('check7').checked;
	
	//------------------------------------------------------------	
	// Переменные для работы программы
	var Stoimost = 0   // общая стоимость поставки
	var FullCost = 0   // полная стоимость поставки
	
	//------------------------------------------------------------	
	// Alterra
	if  ( document.getElementById('check1').checked )	{	
		ListBox = document.getElementById('lbCountAlterra')
		count = ListBox.options[ListBox.selectedIndex].value                    // число рабочих мест
		Stoimost = Stoimost + price_Alterra*GetMultiply(count,IsNetLicSelect)
		FullCost = FullCost + price_Alterra*GetFullCoef(count,IsNetLicSelect)
	}
	
	// GeoWall
	if  ( document.getElementById('check2').checked )	{	
		ListBox = document.getElementById('lbCountWall')
		count = ListBox.options[ListBox.selectedIndex].value                    // число рабочих мест
		Stoimost = Stoimost + price_GeoWall*GetMultiply(count,IsNetLicSelect)
		FullCost = FullCost + price_GeoWall*GetFullCoef(count,IsNetLicSelect)
	}
	// GeoWall модули
	
	if  ( document.getElementById('check2').checked )	{	
		
		// GW Stab
		if  ( document.getElementById('check21').checked )	{	
			Stoimost = Stoimost + price_GeoWallStab*GetMultiply(count,IsNetLicSelect)
			FullCost = FullCost + price_GeoWallStab*GetFullCoef(count,IsNetLicSelect)
		}
		
		// GW Anchor
		if  ( document.getElementById('check22').checked )	{	
			Stoimost = Stoimost + price_GeoWallAnchor*GetMultiply(count,IsNetLicSelect)
			FullCost = FullCost + price_GeoWallAnchor*GetFullCoef(count,IsNetLicSelect)
		}
		
		// GW Kranz
		if  ( document.getElementById('check23').checked )	{	
			Stoimost = Stoimost + price_GeoWallKranz*GetMultiply(count,IsNetLicSelect)
			FullCost = FullCost + price_GeoWallKranz*GetFullCoef(count,IsNetLicSelect)
		}
		// GW Beam
		if  ( document.getElementById('check24').checked )	{	
			Stoimost = Stoimost + price_GeoWallBeam*GetMultiply(count,IsNetLicSelect)
			FullCost = FullCost + price_GeoWallBeam*GetFullCoef(count,IsNetLicSelect)
		}
		
	}
	
	// GeoAnchor
	if  ( document.getElementById('check3').checked )	{	
		ListBox = document.getElementById('lbCountAnchor')
		count = ListBox.options[ListBox.selectedIndex].value                    // число рабочих мест
		Stoimost = Stoimost + price_GeoAnchor*GetMultiply(count,IsNetLicSelect)
		FullCost = FullCost + price_GeoAnchor*GetFullCoef(count,IsNetLicSelect)
	}
	// GeoStab
	if  ( document.getElementById('check4').checked )	{	
		ListBox = document.getElementById('lbCountStab')
		count = ListBox.options[ListBox.selectedIndex].value                    // число рабочих мест
		Stoimost = Stoimost + price_GeoStab*GetMultiply(count,IsNetLicSelect)
		FullCost = FullCost + price_GeoStab*GetFullCoef(count,IsNetLicSelect)
	}	
	// GeoPlate
	if  ( document.getElementById('check5').checked )	{	
		ListBox = document.getElementById('lbCountPlate')
		count = ListBox.options[ListBox.selectedIndex].value                    // число рабочих мест
		Stoimost = Stoimost + price_GeoPlate*GetMultiply(count,IsNetLicSelect)
		FullCost = FullCost + price_GeoPlate*GetFullCoef(count,IsNetLicSelect)
	}		
	// GeoPile
	if  ( document.getElementById('check6').checked )	{	
		ListBox = document.getElementById('lbCountPile')
		count = ListBox.options[ListBox.selectedIndex].value                    // число рабочих мест
		Stoimost = Stoimost + price_GeoPile*GetMultiply(count,IsNetLicSelect)
		FullCost = FullCost + price_GeoPile*GetFullCoef(count,IsNetLicSelect)
	}		
	
	
	// Вывод результата
	a = document.getElementById('tableResult')
	a.innerHTML = 'Итого: ' + Stoimost.toFixed(0) + ' руб.<br />' +   // окргляем до целых рублей
					'Экономия: ' + (FullCost - Stoimost).toFixed(0) + ' руб.';
}

// Стоимость без скидок
function GetFullCoef(NCopies,UseNetLic)
{
var
	NetLic;
	
	if (UseNetLic) 
	{
	NetLic = 0.1  // 10% надбавка за сетевую версию
	}
	else
	{
	NetLic = 0.0  // Локальная версия
	}
	
	if (Number(NCopies) == 0)
		return 0;
	else
		return (NetLic + Number(NCopies));
}

// Учет скидок при покупке нескольких версий
function GetMultiply(NCopies,UseNetLic){ 
NCopies    // число копий
UseNetLic  // признак сетевой версии

if (UseNetLic) {
	NetLic = 0.1  // 10% надбавка за сетевую версию
	}
else{
	NetLic = 0.0  // Локальная версия
}

switch (Number(NCopies)) {   // Number - приведение строки к числу
	case 0:
		return 0
		break
	case 1:
		return NetLic + 1
		break
	case 2:
		return NetLic + 1+0.8
		break
	case 3:
		return NetLic + 1+0.8+0.6
		break
	case 4:
		return NetLic + 1+0.8+0.6+0.6
		break
	case 5:
		return NetLic + 1+0.8+0.6+0.6+0.6
		break
	case 6:
		return NetLic + 1+0.8+0.6+0.6+0.6+0.6
		break
	case 7:
		return NetLic + 1+0.8+0.6+0.6+0.6+0.6+0.6
		break
	case 8:
		return NetLic + 1+0.8+0.6+0.6+0.6+0.6+0.6+0.6
		break
	case 9:
		return NetLic + 1+0.8+0.6+0.6+0.6+0.6+0.6+0.6+0.6
		break
	case 10:
		return NetLic + 1+0.8+0.6+0.6+0.6+0.6+0.6+0.6+0.6+0.6
		break
	
	//default:
	//	return 0
} 

}

// Выключить все модули, если выключаем GeoWall
function UnCheck_GeoWallModul(){
	//alert('UnCheck_GeoWallModul')

	if  ( document.getElementById('check2').checked == false) {
		document.getElementById('check21').checked = false
		document.getElementById('check22').checked = false
		document.getElementById('check23').checked = false
		document.getElementById('check24').checked = false
	}
	
	CalcProgramCost()
}

// Включить базовый GW, если выбран хоть какой-нибудь из модулей
function Check_GeoWallModul(){
	//alert('Check_GeoWallModul')
	//a = document.getElementById('tableResult')
	//a.innerHTML = 'Check_GeoWallModul'
	
	document.getElementById('check2').checked = true
	CalcProgramCost()
}

// включить чекбокс продукта, если меняется количество.
 function Check_TekProduct(ProductName){
	document.getElementById(ProductName).checked = true
	CalcProgramCost()
	//alert('CalcProgramCost')
}