1. 1C / Говнокод #12220

    −122

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    Пока Выборка1...
...Выборка2...
...
Выборка7 = ПрименяемостьНаПрибор_ПоискВхождений(Выборка6.НомерЗаписиРСДСЕГл, НаДату).Выбрать();
Пока Выборка7.Следующий() Цикл
	ПрименяемостьПоВхождению = ПрименяемостьПоВхождению * Выборка7.Применяемость;
	
	
	Если Выборка7.НомерЗаписиРСДСЕГл = 0 Тогда
		// Достигнут прибор
		Применяемость = Применяемость + ПрименяемостьПоВхождению;
	Иначе
		Выборка8 = ПрименяемостьНаПрибор_ПоискВхождений(Выборка7.НомерЗаписиРСДСЕГл, НаДату).Выбрать();
		Пока Выборка8.Следующий() Цикл
			ПрименяемостьПоВхождению = ПрименяемостьПоВхождению * Выборка8.Применяемость;
			
			Если Выборка8.НомерЗаписиРСДСЕГл = 0 Тогда
				// Достигнут прибор
				Применяемость = Применяемость + ПрименяемостьПоВхождению;
				
			Иначе
				Сообщить("Превышение значения выборки... Странная ситуация, вообще не должна возникать!!!");																			
				Сообщить("Срочно обратитесь в Отдел ВТ. Постарайтесь записать ситуацию в которой возникла эта ошибка... !!!");																			
			КонецЕсли;
		КонецЦикла;
	КонецЕсли;
КонецЦикла;
...
...

    По мотивам предыдущих постов. Все из одной конфигурации.

    Запостил: Ykov89, 29 Ноября 2012

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

    • ava Fai 29.11.2012 09:33 # +2

      > Срочно обратитесь в Отдел ВТ. ...

      Сообщить("Были нарушены условия использования сети. Ваше рабочее место самоуничтожится, а Вы будете уволены через 30 минут, если немедленно не доложите обо всем в Отдел ВТ.");

      Так по-моему действеннее будет.
      Ответить

      • ava True 29.11.2012 09:38 # −2

        > Так по-моему действеннее будет.

        Действеннее будет, если на весь экран порнобаннер развернуть и предложить отправить смс с текстом "В твоей проге жуткий баг выявился, срочно приходи" автору на мобильник.
        Ответить

    • ava Ykov89 29.11.2012 09:46 # +1

      Да они здесь повсюду!

      Если ЗаписьУдалена = 0 Тогда
      Сообщить("Внимание!!! Запись для удаления не найдена в РС - такого быть не должно!!!");
      Сообщить("Срочно обратитесь в отдел ВТ для выяснения ситуации!!!");
      Предупреждение("Внимание!!! Запись для удаления не найдена в РС - такого быть не должно!!! Срочно обратитесь в отдел 6 для выяснения ситуации!!!", 60, "Ошибка проведения документа");
      КонецЕсли;

      Это беда.
      Ответить

    • ava serpinski 29.11.2012 10:03 # +1

      // Достигнут прибор

      Что?
      Ответить

    • ava guest 01.12.2012 02:07 # +1

      Нормальные люди используют
      ВызватьИсключение "Превышение значения выборки... Странная ситуация, вообще не должна возникать!!!";

      или еще лучше так:
      ВызватьИсключение "Ошибка #431765";
      а в документации написано что это за ошибка и в каком модуле смотреть. В простейшем случае документации не надо, глобальным поиском по коду по номеру ошибки все ищется.
      Ответить

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