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

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
БланкПостроителяОтчетаНоменклатура = Новый ПостроительОтчета;
	Если Конфигурация = "ТорговляУкраина" 
		ИЛИ Конфигурация = "УТПУкраина" Тогда
		Если Истина Тогда
			БланкПостроителяОтчетаНоменклатура.Текст=
			ЗапросПодготовкаДанных + 
			"ВЫБРАТЬ РАЗРЕШЕННЫЕ
			|	НоменклатураДетализация.Номенклатура.Код КАК Код,
			|	НоменклатураДетализация.Номенклатура.Артикул КАК Артикул,
			|	НоменклатураДетализация.Номенклатура КАК Номенклатура,
			|	НоменклатураДетализация.Детализация КАК Детализация,
			|	ЕСТЬNULL(ОстаткиРезервы.Остаток, 0) КАК Остаток,
			|	НоменклатураДетализация.ТипДетализации КАК ТипДетализации,
//................................................................................................................................................................. //

Если Истина Тогда ...
Действительно, а вдруг Истина = Ложь!

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

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

  • Я такое использовал для сворачивания кусов кода, чтобы глаза не мозолили (штатных средств для этого в редакторе нет). Так что не всё так однозначно.
    Ответить
    • в 8.3 есть области, можно по ним сворачивать. А вообще, текст запроса можно вынести в отдельный метод
      Ответить
      • Ну теперь-то да, а этот кусок кода с каких мохнатых лет там лежит - неизвестно. Судя по использованию построителя отчета, ему и 10 лет может быть.
        Ответить
  • Было условие, но скончалось вполне себе скоропостижно. Разраб сомневался, что отсутствие условия - это окончательный вариант, и вот - "Если Истина Тогда".
    Ответить
    • конечно есть
      &НаКлиенте
      Процедура ВыполнитьКод(Команда)
       
          /// Как составить оператор Если в 1с 8.3, 8.2
       
          Если 1 > 0 Тогда // Истина
              // блок операторов
              Сообщить("Компьютер выполнит все команды из этого блока.");
              Сообщить("Один больше нуля.");
          КонецЕсли;
       
          Если 1 < 0 Тогда // Ложь
              Сообщить("Один меньше нуля.");
          Иначе
              Сообщить("Сработает именно эта ветка условного оператора (#А).");
              Сообщить("Один больше нуля.");
          КонецЕсли;
       
          Если 1 < 0 Тогда // Ложь
              Сообщить("Один меньше нуля.");
          ИначеЕсли 1 = 0 Тогда // Ложь
              Сообщить("Один равен нулю.");
          Иначе
              Сообщить("Сработает именно эта ветка условного оператора (#Б).");
              Сообщить("Один больше нуля.");
          КонецЕсли;
       
          /// Как составить тернарный оператор ? в 1с 8.3, 8.2
       
          Текст = ?(1 > 2, "Один больше двух.",  "Один не больше двух.");
          Сообщить(Текст); // выведет "Один не больше двух."    
       
      КонецПроцедуры
      Ответить
      • я не про 1С спрашиваю, я про тот говнокод. типа:
        Если Истина Тогда
        ...
        Иначе!!!
        ...
        КонецЕсли;
        Ответить

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

Из-за тебя ушел bormand, guest!

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


    8