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

    −99

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

    БП 3.0.43.174 (но не только), типовое заполнение формы номенклатурной группы номенклатурой.

    Запостил: OdinAss, 26 Мая 2016

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

    • > ВЫБРАТЬ
      > ИЗ
      > ГДЕ
      > УПОРЯДОЧИТЬ ПО
      Боже, как же омерзительно выглядит эта калька...
      Ответить
      • Действительно, уж лучше полностью свой язык придумать, чем слепо калькировать.
        Ответить
        • зачем вообще калькировать? Есть ISO на SQL же. Бери да юзай
          Ответить
          • А зачем вообще ЯП изобретают?
            Ответить
            • потому что у всех существующих языков есть фатальный недостаток
              Ответить
              • И вообще с помощью компьютера пытаются решить проблемы, которых до его изобретения не возникало.
                Ответить
          • можно по английски писать
            Ответить
      • А представляете, как омерзительно выглядит язык SQL для англоговорящих...
        Ответить
        • Да им любой ЯП так выглядит.
          Ответить
          • 1C не плох.

            Смешнее всего им асм.

            ДВГ АБ 0x42
            ПРЕРВ 21
            ПРГННЛЬ
            ПРГ НАЧПРОГ
            Ответить
            • А на советских машинах разве не подобный асм-на-русском был?
              Ответить
              • Был, вероятнее всего.
                Но я в ту пору был спермотозоидом, и читать еще не умел.

                ps: вообще клонов PC в восточном блоке было дофига. Помню, у меня даже была книжка про программирование под его какой-то болгарский клон. Очень теплая и ламповая: там чуваки с помощью программирования таймера и писи спикера делали музыку, например)
                Ответить
    • А что не так?
      Ну кроме мелочей вроде НоменклатурнаяГруппа.Ссылка ?
      Ответить
      • Не так тут 1с
        Ответить
      • В древней БП 1.6.8.3, например, используется СправочникСписок с установленным отбором по номенклатурной группе. Там кода в 2 раза меньше и работать это ,по идее, должно быстрее.

        Если Ссылка.Пустая() Тогда
        СписокГруппы.Отбор.Код.Установить("");
        Иначе
        СписокГруппы.Отбор.Сбросить();
        СписокГруппы.Отбор.НоменклатурнаяГруппа. Установить(Ссылка);
        КонецЕсли;
        КонецЕсли;
        Ответить

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