1. Список говнокодов пользователя Jivchic

    Всего: 2

  2. 1C / Говнокод #9649

    −139

    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
    Если  ЗначениеЗаполнено(ВыслугаЛет) Тогда 
			Запрос.УстановитьПараметр("ВыслугаЛет",     ВыслугаЛет);
		КонецЕсли;
		
		Если не ЗначениеЗаполнено(ВыслугаЛет) Тогда 
			Запрос.Текст = СтрЗаменить(Запрос.Текст,"И ПНУ.ВидРасчета <> &ВыслугаЛет","");
			Запрос.Текст = СтрЗаменить(Запрос.Текст,"И ТабельныйЛист.ВидРасчета <> &ВыслугаЛет","");
			Запрос.Текст = СтрЗаменить(Запрос.Текст,"И Прекращения.ВидРасчета <> &ВыслугаЛет","");
		КонецЕсли;
		
		Запрос.УстановитьПараметр("Организация",    Организация);
		Запрос.УстановитьПараметр("ПодразделениеОрганизации",  ПодразделениеОрганизации);
		
		Если ПодразделениеОрганизации.Пустая() Тогда
			Запрос.Текст = СтрЗаменить(Запрос.Текст,"И Подразделение В ИЕРАРХИИ(&ПодразделениеОрганизации)","");
			Запрос.Текст = СтрЗаменить(Запрос.Текст,"И Прекращения.ПодразделениеОрганизации = &ПодразделениеОрганизации","");
			Запрос.Текст = СтрЗаменить(Запрос.Текст,"И ТабельныйЛист.Подразделение В ИЕРАРХИИ(&ПодразделениеОрганизации)","");
		КонецЕсли;
		
		Если НЕ ЗначениеЗаполнено(ВыслугаЛет) Тогда 
			Запрос.Текст = СтрЗаменить(Запрос.Текст,"ГДЕ
			|	ТабельныйЛист.ВидРасчета <> &ВыслугаЛет
			|	И","Где ");
		КонецЕсли;

    Jivchic, 12 Марта 2012

    Комментарии (6)

  3. 1C / Говнокод #9648

    −142

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    Если РучнойВводОтработанногоВремени И СТЧ.ОтработаноДней = 0 И СТЧ.ОтработаноЧасов = 0 Тогда 
	Если СТЧ.ОтработаноДней = 0 И СТЧ.ОтработаноЧасов = 0 Тогда 
			СТЧ.ОтработаноДней  = НачислениеИзРегистрыРасчета.ОтработаноДней;
			СТЧ.ОтработаноЧасов = НачислениеИзРегистрыРасчета.ОтработаноЧасов;
	КонецЕсли;	
КонецЕсли;

    Бонд, Джеймс Бонд.

    Если СТЧ.ОтработаноДней = 0 И СТЧ.ОтработаноЧасов = 0 Тогда
    Если СТЧ.ОтработаноДней = 0 И СТЧ.ОтработаноЧасов = 0 Тогда

    Jivchic, 12 Марта 2012

    Комментарии (2)