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

    −101

    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
    ЗапросУсл= Новый Запрос;
ЗапросУсл.Текст=" ВЫБРАТЬ бит_УслугиЖКХ.Ссылка,
|                       бит_УслугиЖКХ.Код,
|                       бит_УслугиЖКХ.Наименование,
|                       бит_УслугиЖКХ.Приоритет,
|                       бит_УслугиЖКХ.ГруппаУслуги
| ИЗ Справочник.бит_УслугиЖКХ КАК бит_УслугиЖКХ
| ГДЕ бит_УслугиЖКХ.ПометкаУдаления=Ложь";
	  
tzУслуги=ЗапросУсл.Выполнить().Выгрузить(); 
	 	 
kolFind="";
kolFind=мТаблицаПечати.Колонки.Найти("ГруппаУслуги");
Если СокрЛП(Строка(kolFind))="" тогда
	  мТаблицаПечати.Колонки.Добавить("ГруппаУслуги");
КонецЕсли;
	
 Для Каждого str_TP  Из мТаблицаПечати  Цикл 
 	//Сообщить(Строка(str_TP.Приоритет)+"    "+Строка(str_TP.Услуга));
	 ncv="";
	ncv= tzУслуги.Найти(str_TP.Услуга, "Ссылка" );
	если СокрЛП(Строка(ncv))<>"" тогда
		  str_TP.ГруппаУслуги=СокрЛП(Строка(ncv.ГруппаУслуги));
	 конецесли;
КонецЦикла;

    Так и хочется расстрелять этих козлов, но у них на сайте написано, что их более 5000 и они, как зараза, проникли в 43 города, в том числе и к буржуям.
    Ребя, скиньтесь на патроны, Greenpeace нас не забудет!

    Запостил: ivan_0110, 05 Февраля 2016

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

    • ava ivan_0110 05.02.2016 14:28 # −1

      Походу кого-то задело за живое - заминусовали. Наверное, авторы подвалили.
      Ответить

    • ava guest 05.02.2016 22:10 # 0

      На 5000 чел нужна большая куча...э...патронов.
      Ответить

      • ava bormand 05.02.2016 22:16 # 0

        Можно их пригласить на конференцию с чаем и печеньками.
        Ответить

        • ava Vasiliy 07.02.2016 14:34 # 0

          немного пургена в чай сделает эту конференцию динамичней.
          Ответить

          • ava ivan_0110 07.02.2016 17:10 # +5

            тогда они засрут и все остальные конфигурации
            Ответить

    • ava alexinzaz 10.02.2016 22:46 # 0

      мерзкая конторка
      Ответить

    • ava ilya2184 18.03.2016 10:45 # 0

      Я представляю как любит этот программист переключение раскладки - прям хлебом не корми дай попереключать.
      Ответить

    • ava braun3812 06.04.2016 22:22 # 0

      >ЗапросУсл.Текст=" ВЫБРАТЬ бит_УслугиЖКХ.Ссылка,
      | бит_УслугиЖКХ.Код,
      | бит_УслугиЖКХ.Наименование,
      | бит_УслугиЖКХ.Приоритет,
      | бит_УслугиЖКХ.ГруппаУслуги
      | ИЗ Справочник.бит_УслугиЖКХ КАК бит_УслугиЖКХ
      | ГДЕ бит_УслугиЖКХ.ПометкаУдаления=Ложь";

      А это как называется? AssQL ?
      Ответить

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