8.х Запрос "ОБЪЕДИНИТЬ"

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем Inkeeper, 18 авг 2010.

  1. TopicStarter Overlay
    Inkeeper
    Offline

    Inkeeper Опытный в 1С

    Регистрация:
    22 мар 2009
    Сообщения:
    327
    Симпатии:
    0
    Баллы:
    26
    Подскажите пожалуйста, вот мой код запроса, при выполнении пишет "Поле объекта не обнаружено (Наименование)"

    Код:
    Запрос = Новый Запрос;
    Запрос.Текст = 
    "ВЫБРАТЬ Штрихкод КАК ШК, Владелец 
    |ИЗ РегистрСведений.Штрихкоды
    |    ОБЪЕДИНИТЬ
    |ВЫБРАТЬ Наименование КАК Наим, Код
    |ИЗ Справочник.Номенклатура
    |УПОРЯДОЧИТЬ ПО Наименование";
    Результат = Запрос.Выполнить().Выбрать();
    СписокОтобранныхДанных.Очистить();
    Пока Результат.Следующий() > 0 Цикл
    СписокОтобранныхДанных.Добавить(Строка(Результат.Наименование)
    +";"+Строка(Результат.Код)+";"+Строка(Результат.ШК));
    КонецЦикла;
    
    
    И ещё вопрос: как результат запроса (Наименование;Код;ШК) вывести в текстовый документ (txt)?
  2. shurikvz
    Offline

    shurikvz Модераторы Команда форума Модератор

    Регистрация:
    1 окт 2009
    Сообщения:
    8.409
    Симпатии:
    316
    Баллы:
    104
    Всегда используйте конструктор запроса, вопроса бы одного точно не было.
    Вот вам текст запроса (если я правильно понял что вам надо):
    Код:
    "ВЫБРАТЬ
    Штрихкоды.Владелец,
    Штрихкоды.Владелец.Код,
    Штрихкоды.Штрихкод
    ИЗ
    РегистрСведений.Штрихкоды КАК Штрихкоды
    ГДЕ
    Штрихкоды.Владелец ССЫЛКА Справочник.Номенклатура
    </span>
    УПОРЯДОЧИТЬ ПО
    Штрихкоды.Владелец.Наименование"
    
    </FONT></FONT></pre>
    Допишите думаю сами с учетом своих требований (думаю возможно нужна проверка на тип штрихкода, а также единицу измерения).

    Записать приблизительно так:
    Код:
    ТекстовыйДокумент = Новый ТекстовыйДокумент;
    
    Пока Выборка.Следующий() Цикл
    Стр = Строка(Выборка.Владелец) + ";" + Строка(Выборка.Код) + ";" + Строка(Выборка.Штрихкод);
    ТекстовыйДокумент.ДобавитьСтроку(Стр);
    КонецЦикла;	
    
    ТекстовыйДокумент.Записать("МоеИмяФайла.txt", КодировкаТекста.UTF8);
    
    

Поделиться этой страницей