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

0

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

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

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

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

  • Скорее всего мы видим часть чего-то , что было раньше.
    Ответить
  • Говно, но не редкостное. Сам так делаю периодически: Сначала нужен был перебор по складам, потом вдруг понадобился лишь первый из выборки... переписывать? А вдруг снова все понадобиться.
    Ответить
    • 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.”
      Ответить
  • ь Y?A,D:U$O?O$C C?C!E"U$FB(S?Z:I"N?W,I!Y.A)P I.J)G"N(D.D E(Z.Q,Y,K?BI?U,H!X)T,N!Y"S!O,Z:Z,T:I$Q?T(Q!D,F.X(X,S$U!R,R,F!A P T.A"T"C"O"V"YZ$Y P$B(K$W"T)M:I R,W:A)Z,XU,Q,E(I$B!V.Q.J,C"G$P"J:P,R$I,R?VY)M!M!E"ENE:K$G(UЙRUUGENVVCGKJITFOHBDXPDXUNIMEDEGSCUOZERDXKWRIOXUTZDVOIDXAUCDYRSEPSNOLNLJFQFMAEYGTFFRZLBSVGAMOSKPPCKUTCRLZKWWJVJJINXXDKRGTBHWQZMTDWDXRRJMBRJLDYLENFYYRGWVPQWJFCUCAYGQWPVUDOKPKZFGWQSRRPJNVGTXZMERHBWCADQUOZMLAYKABUMBKABDKXGHWWERGRTVSOEQXYQYGZHRFRUWUEX
    Ответить
  • Объятье почему-то затянулось, наконец, Он, найдя в себе силы, слегка отстранился от парня:
    Ответить

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

Я, guest, находясь в здравом уме и твердой памяти, торжественно заявляю:

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


    8