- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
Функция НайтиСтатусРемонта(ВыбСтатус) Экспорт
Возврат Ремонт.Найти(ВыбСтатус, "СтатусРемонта");
КонецФункции
Процедура УстановитьДанныеСтрокиРемонта(СтатусРемонта, ДатаСтатуса, ДатаВх) Экспорт
СТЧ = НайтиСтатусРемонта(СтатусРемонта);
Попытка
Если СТЧ.Дата = Дата(1,1,1) Тогда
Попытка СТЧ.Дата = ДатаВх; Исключение КонецПопытки;
ИначеЕсли СТЧ.Дата <> ДатаВх Тогда
обСообщить(""+Ссылка+" "+СтатусРемонта+" Дата уже установлена",СтатусСообщения.Важное);
КонецЕсли;
Исключение
КонецПопытки;
КонецПроцедуры
На фоне всей базы это всего лишь цветочки ...
Есть еще отчет, для формирования которого создается 36 (!!!) запросов )))
Хотел отчет выложить, но ограничение из 100 строк меня остановило :(
бог мертв. Мы убили его
На мой вкус, явное приведение лучше неявного.
"обСообщить(...)" - это процедура в общем модуле (!!) да еще он и глобальный ...
причем эрофантазии этих извращенцев не совпадают с фантазиями остального мужицкого населения ГК (а несколько девушек вообще крайне не страдают сексизмом или же феминизмом)
бросила ты гадина меня
так пусть тебя ебёт собака злая
а не такое солнышко, как я
Карлик не Карл...
Кастанеда не Карл...
Никто не Карл!