Говнокод

Родит=ДокР.Контрагент.Родитель; 
Если ПустоеЗначение(Родит.Телефон)=1 Тогда
    Родит1=Родит.Родитель;
	Если ПустоеЗначение(Родит1.Телефон)=1 Тогда
	    Родит2=Родит1.Родитель;
			Если ПустоеЗначение(Родит2.Телефон)=1 Тогда
			     Родит3=Родит2.Родитель;
				 ТЗДок.Тел=Родит3.Телефон;
			Иначе
		    	ТЗДок.Тел=Родит2.Телефон;
			КонецЕсли;        
	Иначе
	     ТЗДок.Тел=Родит1.Телефон;
	КонецЕсли;            
Иначе
	ТЗДок.Тел=Родит.Телефон;
КонецЕсли;

Запостил:

ingenuus, 24.08.2010 (Updated 24.03.2018)

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

K900 16 лет ago # 0

Если Кто.Родит.Такое.Говно Тогда Паяльник.В.Жопу
Ответить
- guest 15 лет ago # 0 ⇈
  
  +100500
  Ответить
- guest 14 лет ago # 0 ⇈
  
  Может, лучше так?
  
  Если Кто.Родит(ТакоеГовно) Тогда Паяльник.ВЖопу()
  Ответить
walk_ 16 лет ago # 0

Никогда не понимал этот "язык"
Ответить
- Анонимус 16 лет ago # 0 ⇈
  
  Кстати на 1С можно писать на английском.
  Тогда он очень похож на visual basic.
  Ответить
  - koodeer 16 лет ago # 0 ⇈
    
    Сейчас во многих ЯП можно юзать юникодные имена, и тогда они становятся удивительно похожи на 1С...
    Ответить
    - Анонимус 16 лет ago # 0 ⇈
      
      Это дурная практика.
      Ответить
    - HaskellGovno 14 лет ago # 0 ⇈
      
      Вот в С++ стандарт это не двусмысленно запрещает, но всем на юг все-равно.
      Ответить
- guest 15 лет ago # 0 ⇈
  
  Все должны подумать, что это проблемы 1С и впасть в уныние. На форуме по квантовой механике впали?
  Ответить
Sanitar0 16 лет ago # 0

Странный код, нету проверок на наличие родителей, вызывает еще сомнение что у родителей есть реквизит телефон
Ответить
- Трактор 16 лет ago # 0 ⇈
  
  Если ПустоеЗначение(Родит1.Телефон)=1 Тогда
  Это и есть проверка на наличие родителя, а заодно и теле фона 🙂 Автырь таким образом находит первого встречного родителя у которого есть теле фон.
  Причём количество уровней вложенности не больше двух. За такой код надо увольнять в день обнаружения кода.
  Ответить