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

    −123

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    СпрСклады = СоздатьОбъект("Справочник.Склады");
    НСкл = 0;
    СпрСклады.ВыбратьЭлементы();
    Пока СпрСклады.ПолучитьЭлемент() = 1 Цикл
    	Склад = СпрСклады.ТекущийЭлемент();
    	НСкл = НСкл + 1;
    	Если НСкл = 1 Тогда
    		Прервать
    	КонецЕсли;
    КонецЦикла;

    Вот такую "красоту" оставили предыдущие программисты.

    Запостил: droff, 31 Октября 2011

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

    • 1С?
      Красавчик
      Ответить
    • и чё?
      Ответить
    • Скорее всего мы видим часть чего-то , что было раньше.
      Ответить
    • Говно, но не редкостное. Сам так делаю периодически: Сначала нужен был перебор по складам, потом вдруг понадобился лишь первый из выборки... переписывать? А вдруг снова все понадобиться.
      Ответить
      • http://thecodelesscode.com/case/41

        “Your head monk’s services are no longer necessary,” said Suku. “Yet let his corpse moulder above you from this day forward. After all, his methods may someday become desirable again, and it would be wasteful to train another monk from scratch.”
        Ответить
    • показать все, что скрытоvanished
      Ответить
    • Объятье почему-то затянулось, наконец, Он, найдя в себе силы, слегка отстранился от парня:
      Ответить

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