Бухгалтерия / Говнокод #16605 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
Функция НайтиСтатусРемонта(ВыбСтатус) Экспорт
	Возврат Ремонт.Найти(ВыбСтатус, "СтатусРемонта");
КонецФункции

Процедура УстановитьДанныеСтрокиРемонта(СтатусРемонта, ДатаСтатуса, ДатаВх) Экспорт
	СТЧ = НайтиСтатусРемонта(СтатусРемонта);
	Попытка
		Если СТЧ.Дата = Дата(1,1,1) Тогда
			Попытка СТЧ.Дата = ДатаВх; Исключение КонецПопытки;
		ИначеЕсли СТЧ.Дата <> ДатаВх Тогда
			обСообщить(""+Ссылка+" "+СтатусРемонта+" Дата уже установлена",СтатусСообщения.Важное);
		КонецЕсли;
	Исключение
	КонецПопытки;
КонецПроцедуры

На фоне всей базы это всего лишь цветочки ...
Есть еще отчет, для формирования которого создается 36 (!!!) запросов )))
Хотел отчет выложить, но ограничение из 100 строк меня остановило :(

Запостил: anton903 anton903, (Updated )

Комментарии (38) RSS

    • ava eth0 # Ссылка на оригинал 0 ⇈

      А это образец магии вудуизма - приведение к строке. Нечто типа сложения строки с числом в PHP. Что более удивительно, это так портит ленивых одноэсников, что они начинают писать даже с переменной, в которой лежит заведомо текстовая строка.
      На мой вкус, явное приведение лучше неявного.
      Ответить

  • ava guest # Ссылка на оригинал 0

    Упс, есть подозрение что это из ТОиР ((( Ну, учитывая что над ним работают 4 человека, все моложе 25-27 (точно не скажу) и один стажер...
    Ответить

  • ava anton903 # Ссылка на оригинал 0

    Подозрения не оправдались.
    "обСообщить(...)" - это процедура в общем модуле (!!) да еще он и глобальный ...
    Ответить

    • ava 1024-- # Ссылка на оригинал 0 ⇈

      Заодно пусть кинет туда сочинение о том, как провёл лето, осень и зиму. Ну то есть о том, как всё переписали. Или о том, как всё оставили как хороший код, который работает.
      Ответить

Добавить комментарий

Помни, guest, за тобой могут следить!

    А не использовать ли нам bbcode?

    ↑
    8
    ↓