Имя: Пароль:
1C
1С v8
Подскажите плиз как посчитать кол-во одинаковых артикулов
0 Гена_1c
 
31.07.14
19:17
сделал вот так:
ВЫБРАТЬ
    Номенклатура.Ссылка,
    Номенклатура.Артикул КАК Арт,
    ВложенныйЗапрос.Артикул КАК КолАрт
ИЗ
    Справочник.Номенклатура КАК Номенклатура
        ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
            СУММА(Номенклатура.Артикул) КАК Артикул
        ИЗ
            Справочник.Номенклатура КАК Номенклатура) КАК ВложенныйЗапрос
        ПО Номенклатура.Артикул = ВложенныйЗапрос.Артикул

не считает.
1 jsmith
 
31.07.14
19:18
пффф
2 Гена_1c
 
31.07.14
19:18
ой описался
вот так
ВЫБРАТЬ
    Номенклатура.Ссылка,
    Номенклатура.Артикул КАК Арт,
    ВложенныйЗапрос.Артикул КАК КолАрт
ИЗ
    Справочник.Номенклатура КАК Номенклатура
        ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
            КОЛИЧЕСТВО(Номенклатура.Артикул) КАК Артикул
        ИЗ
            Справочник.Номенклатура КАК Номенклатура) КАК ВложенныйЗапрос
        ПО Номенклатура.Артикул = ВложенныйЗапрос.Артикул
3 jsmith
 
31.07.14
19:19
юзай ИМЕЮЩИЕ
4 jsmith
 
31.07.14
19:23
чёт типа того
    Запрос = Новый Запрос;
    Запрос.Текст = "
    |Выбрать
    |    Т." + ИмяПоля + " Как ЗначениеПовтора,
    |    Сумма(Т.Повтор) Как КоличествоПовторов
    |Из
    |    (
    |    Выбрать
    |        " + ИмяПоля + ",
    |        1 Как Повтор
    |    Из
    |        Справочник."+ИмяСправочника+"
    |    )
    |    Как Т
    |Сгруппировать По Т." + ИмяПоля + " Имеющие Сумма(Повтор) > 1
    |Упорядочить По Т." + ИмяПоля + " Возр";
5 jsmith
 
31.07.14
19:24
Процедура ВыгрузитьЗаписи(ИмяПоля, ИмяСправочника, ТаблицаЗаписи) Экспорт
    
    Запрос = Новый Запрос;
    Запрос.Текст = "
    |Выбрать
    |    Т." + ИмяПоля + " Как ЗначениеПовтора,
    |    Сумма(Т.Повтор) Как КоличествоПовторов
    |Из
    |    (
    |    Выбрать
    |        " + ИмяПоля + ",
    |        1 Как Повтор
    |    Из
    |        Справочник."+ИмяСправочника+"
    |    )
    |    Как Т
    |Сгруппировать По Т." + ИмяПоля + " Имеющие Сумма(Повтор) > 1
    |Упорядочить По Т." + ИмяПоля + " Возр";
    ТаблицаЗаписи = Запрос.Выполнить().Выгрузить();
    
КонецПроцедуры
6 jsmith
 
31.07.14
19:24
так точнее
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.