- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
Функция ОпределитьБазовуюДату(стр,ТипДаты,Условие)
	рез=NULL ;
	Если ТипДаты=Перечисления._ВидБазовойДаты.ЗавершениеРаботы тогда
		рез= Стр.ДатаОкончанияРаботы;
	ИначеЕсли ТипДаты=Перечисления._ВидБазовойДаты.НачалоРабот тогда
		рез= Стр.ДатаНачалаРаботы;
	ИначеЕсли ТипДаты=Перечисления._ВидБазовойДаты.ФиксированнаяДата тогда
		рез=Условие.ДатаАкта;
	ИначеЕсли ТипДаты=Перечисления._ВидБазовойДаты.НачалоРабот тогда
		
	ИначеЕсли ТипДаты=Перечисления._ВидБазовойДаты.НачалоРабот тогда
		
	ИначеЕсли ТипДаты=Перечисления._ВидБазовойДаты.НачалоРабот тогда
		рез= Стр.ДатаЗавершенияРаботы;
	КонецЕсли;
	Попытка 
		рез =Дата(рез);
	исключение
		рез=ТекущаяДата();
		Сообщить("неопределена дата "+ТипДаты+" для локальной сметы  " + стр.ЛокальнаяСмета + ", ключ строки " + Стр.Ключ);
	КонецПопытки;	
	возврат рез;
КонецФункции
-------------------------------------------------------------------------------------------------------------------------
Вот отдельные выжимки:
/////////////////////
Если  ст.Options="Percent" тогда //Нужно выяснить что за  Percent ибо не помню =( Лучше потом подумаю
			Сообщить("Данная смета возможно не корректно рассчитывает концевики! Обратитесь к Администратору!");
КонецЕсли;
//////////////////////
//ЧЧЧ Серега 09,12,12 слав, а почему ты это удалил? (без этих строк сумма сметы не была везде правильной)
	Строки=Дерево.Строки.НайтиСтроки(новый Структура("ВидГруппы",Перечисления.ВидыГруппЛокальныхСмет.ДанныеСметы),истина);
	
//ЧЧЧ
                                     
        
            С помощью таких вот функций производится расчет бюджета проекта по капитальному строительству в очень крупной российской компании. Главное что функциональный заказчик этого добра, с глубокой уверенностью считает что у него замечательная конфигурация. Код специаьн