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

    −91

    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
    30. 30
    31. 31
    32. 32
    33. 33
    Функция СравнитьЭлементыСправочника(Элемент1, Элемент2, фЗаписатьРазличия=0) Экспорт
	Перем Рез;
	Рез = 0;
	Если (Элемент1 <> Элемент2) и (фЗаписатьРазличия=0) Тогда
		Рез = 1;
		Перейти ~М1;
	КонецЕсли;
	
	// сначала проверим код и наименование 
	Если (Элемент1.Код <> Элемент2.Код) Тогда
		если фЗаписатьРазличия=1 Тогда
			ЗаписьЖурналаРегистрации("изменен код с '"+СокрЛП(Элемент1.Код)+"' на '"+СокрЛП(Элемент2.Код)+"'","Справочники","Изменен реквизит справочника",Элемент1,2);
		Иначе
			Рез = 1;
			Перейти ~М1;
		КонецЕсли;	
	КонецЕсли;
	
	Если Элемент1.Наименование <> Элемент2.Наименование Тогда
		если фЗаписатьРазличия=1 Тогда
			ЗаписьЖурналаРегистрации("изменено наименование с '"+СокрЛП(Элемент1.наименование)+"' на '"+СокрЛП(Элемент2.наименование)+"'","Справочники","Изменен реквизит справочника",Элемент1,2);
		Иначе
			Рез = 1;
			Перейти ~М1;
		КонецЕсли;	
	КонецЕсли;	

	// == тут было код который удалил автор поста	==

~М1:	
	Возврат Рез;
		
КонецФункции

    Внезапно нашел такую функцию неизвестного автора :)

    Запостил: CYFiVE, 30 Марта 2011

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

    • ava tr00_gr1m_doomster 30.03.2011 10:50 # −4

      всё что написано на этой говёной поделке можно плюсовать не раздумывая
      Ответить

      • ava TarasB 30.03.2011 11:12 # +2

        Почему? Код как код, только на русском.
        Ответить

        • ava tr00_gr1m_doomster 30.03.2011 11:17 # −1

          даже не знаю, может потому что на нём кодят те кто не смог стать даже пхпшниками в силу "выдающихся" умственных способностей
          Ответить

          • ava TarasB 30.03.2011 13:16 # +1

            Док-ва говняности ПХП я видел.
            Предъяви док-ва говняности 1С (я имею в виду не код на нём, а статью с разбором).
            А то все обсирают, а мне за державу обидно.
            Ответить

          • ava Govnocoder#0xFF 05.04.2011 18:03 # −1

            Вы обратили внимание как названа переменная, возвращающая значение функции? Это же явный закос под Result! Улавливаете?
            Ответить

    • ava tr00_gr1m_doomster 30.03.2011 10:50 # −1

      >было код
      ебал её рука?
      Ответить

    • ava guest 11.04.2011 22:39 # −1

      убивать надо в зародыше, блин
      Ответить

    • ava guest 16.08.2011 16:54 # −1

      Как одноэснег заявляю: претензий к коду нет. Соответственно , ТСМ.
      Ответить

      • ava guest 04.10.2011 11:58 # 0

        К работоспособности нет. Но к написанию да.
        Метки - зло.
        Перем Рез; Рез = 0; - переменную опрелелил - занял лишнюю строку. + эта переменная вобще не нужна тут.
        фЗаписатьРазличия=0 - использование числового типа вместо булева.

        Ощущение, что автор переучивался с С++.
        Ответить

    • ava guest 20.04.2012 11:25 # 0

      Кодер тупо не знал, что Возврат можно было в любом месте писать. Точнее - НУЖНО вместо метки!
      Ответить

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