Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | ПоступлениеТоваровУслугТовары.Ссылка КАК Регистратор, | ДатыПоследнихДокументовКонтрагентов.Товар КАК Товар |ИЗ | Документ.ПоступлениеТоваровУслуг.Товары КАК ПоступлениеТоваровУслугТовары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ (ВЫБРАТЬ | МАКСИМУМ(ПоступлениеТоваровУслугТовары.Ссылка.Дата) КАК Дата, | ПоступлениеТоваровУслугТовары.Номенклатура КАК Товар | ИЗ | Документ.ПоступлениеТоваровУслуг.Товары КАК ПоступлениеТоваровУслугТовары | | СГРУППИРОВАТЬ ПО | ПоступлениеТоваровУслугТовары.Номенклатура) КАК ДатыПоследнихДокументовКонтрагентов | ПО ПоступлениеТоваровУслугТовары.Номенклатура = ДатыПоследнихДокументовКонтрагентов.Товар | И ПоступлениеТоваровУслугТовары.Ссылка.Дата = ДатыПоследнихДокументовКонтрагентов.Дата |ГДЕ | ПоступлениеТоваровУслугТовары.Ссылка.Проведен = ИСТИНА" + Условие + " |ИТОГИ ПО | Товар ТОЛЬКО ИЕРАРХИЯ";
Задача из регистра накопления выбрать документы с последней датой прихода, вот запрос, выбирает дату не правильно, подскажите быть может что не так делаю
Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | ПартииТоваровНаСкладах.Номенклатура КАК Товар, | ПартииТоваровНаСкладах.Номенклатура.Наименование КАК НоменклатураНаименование, | МАКСИМУМ(ПартииТоваровНаСкладах.ДокументОприходования) КАК Регистратор |ИЗ | РегистрНакопления.ПартииТоваровНаСкладах КАК ПартииТоваровНаСкладах |ГДЕ | ПартииТоваровНаСкладах.Регистратор ССЫЛКА Документ.ПоступлениеТоваровУслуг | |СГРУППИРОВАТЬ ПО | ПартииТоваровНаСкладах.Номенклатура, | ПартииТоваровНаСкладах.Номенклатура.Наименование | |УПОРЯДОЧИТЬ ПО | НоменклатураНаименование |ИТОГИ ПО | Товар ТОЛЬКО ИЕРАРХИЯ |АВТОУПОРЯДОЧИВАНИЕ";
Хочу сделать отчет по номенклатуре,которые будет отображать все группировки, все получается но последнюю группу показывает отдельно, вот код и после него скрин что в итоге получается
Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | Номенклатура.Ссылка КАК Товар |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ | НЕ Номенклатура.ПометкаУдаления | |УПОРЯДОЧИТЬ ПО | Товар ИЕРАРХИЯ";
Кто то там про тон что то говорил? Начните уважать сначала людей, а потом учите что б понятно или не понятно было, был бы модератором,я уже давно клизму бы поставил, на большинстве форумов где начинается флуд или диалог не касающийся темы модератор наказывает, но для этого форума .... все в порядке вещей, любая тема это место поболтать о чем либо.
На этом форуме приветствуется давать конкретные ответы на конкретные вопросы. Вы часто не можете сформулировать нормально вопрос, после чего отвечающим делаете замечания про бесполезность ответа, причем таким тоном, как будто вам кто-то что-то должен. Я после пары таких ваших вопросов теперь просто прохожу мимо ваших тем.
По-моему это форум а не допрос у следователя, где конкретные вопросы и ответы(время, место, ...), в данной теме вопрос сформулирован достаточно понятно и доступно думаю даже не для 1с-ка, от Вас лично ответа никогда не жду после нескольких диалогов, когда как раз создавалось впечатления что я Вам что то должен и тон тоже был недружелюбный, поэтому не пойму зачем Вы нажали кнопочку "Ответить", бесполезность вашего ответа оценить кнопочкой "спасибо" не могу, убедительная просьба, тем кому кажется что он/она "Бог 1с" - отвечайте только тогда когда Ваш ответ как то связан с заголовком темы
Вся соль скрыта в . То, что вы указали до этого - тривиально реализуется путем подсчета соответствующих совпадений.
Ответ не понятен, не содержателен = нет ответа! Вообщем из серии - "Знаю, но не скажу!", вижу на этом форуме это приветствуется ((( Быть может Вы не поняли суть вопроса, но тогда зачем отвечать, а если поняли и знаете ответ и нет желания подсказать - зачем жать на кнопку "ответить"
Делаю обработку загрузки приходных накладных из экселя, столкнулся с проблемой поиска номенклатуры, хочу организовать умный поиск номенклатуры, слева взять три знака искать по первым трем буквам,так же по последним,по средним, без кавычек и т.д. и там где больше совпадений выбирать эту номенклатуру, если нет, то создавать новую, кто то делал аналогично или быть даст совет правильный
Спасибо никто получить не хотел = не подсказал, вообщем то вот так сделал, теперь все ок, теперь осталось допилить (цену,артикул нанести), но это уже мелочи ))), вот код, может кому пригодиться
У меня есть в цикле при выгрузке картинок из номенклатуры путь к картинкам, название и т.д., как мне просто наложить названия на картинки в цикле, WScript = Новый COMОбъект("WScript.Shell"); Затем как я понимаю convert.exe уже обрабатывает изображение, вообщем нужна помощь
Так если знаете, что есть, в чем тогда проблема? Я лично не знаю ни одного стандартного метода 1с который позволял бы наносить водяные знаки на изображения, поделитесь информацией.
Извиняюсь, это вопросительно, уже переискал везде, наносить при выгрузке можно только через внешние компоненты, причем надо именно при выгрузке реализовать, как у меня все получить или если получить, то обязательно сюда выложу
Спасибо огромное, но мне надо нанести водяной знак = цене, конечно можно в одной обработке выгружать, потом наносить все что надо,потом загружать обратно к номенклатуре,но мне кажется это секс в гамаке, есть возможность выгрузить уже с водяным знаком
Есть ли возможность в 1с на картинках в номенклатуре нанести массово название фирмы ну и цену например, может кто то делал, или при сохранении на локальный диск как то обрабатывать
Все сделал, конечно знаю что некорректно, долго выполняется, медленно, но делает то что мне надо, пока так выкрутился, если у кого то появятся оптимизирующие советы, подскажите
Если СокрЛП(КаталогИзображений)="" Тогда Предупреждение("Выберите каталог для сохранения файлов."); Возврат; КонецЕсли; //СоздатьКаталог(КаталогИзображений); Запрос=Новый Запрос("ВЫБРАТЬ | ХранилищеДополнительнойИнформации.Объект КАК Номенклатура, | ХранилищеДополнительнойИнформации.Объект.Артикул КАК Код, | ХранилищеДополнительнойИнформации.Хранилище, | ВЫБОР | КОГДА ХранилищеДополнительнойИнформации.Объект.ОсновноеИзображение = ХранилищеДополнительнойИнформации.Ссылка | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК ЭтоОсновное, | ХранилищеДополнительнойИнформации.Объект.Ссылка КАК Тов |ИЗ | Справочник.ХранилищеДополнительнойИнформации КАК ХранилищеДополнительнойИнформации |ГДЕ | ХранилищеДополнительнойИнформации.Объект ССЫЛКА Справочник.Номенклатура | |УПОРЯДОЧИТЬ ПО | ХранилищеДополнительнойИнформации.Объект"); Карт=Запрос.Выполнить(); ///////////////////////////////////////////////////////////////////////////////////////////// З = Новый Запрос; З.Текст = "ВЫБРАТЬ | Номенклатура.Ссылка КАК Папка |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ | Номенклатура.ЭтоГруппа = ИСТИНА";
Каталоги = З.Выполнить(); Папки = Каталоги.Выбрать(); Пока Папки.Следующий() Цикл Если ЗначениеЗаполнено(Папки.Папка.Родитель)=0 Тогда //Корень КаталогНаДиске0 = Новый Файл(КаталогИзображений+"\"+СокрЛП(Папки.Папка.Наименование)); Если НЕ КаталогНаДиске0.Существует() Тогда СоздатьКаталог(КаталогИзображений+"\"+СокрЛП(Папки.Папка.Наименование)); //Загружаем картинки СчДопИзображений=0; ПоследняяНоменклатура=Неопределено;
Изображение = Карт.Выбрать(); Пока Изображение.Следующий() Цикл Если Изображение.Тов.Родитель = Папки.Папка Тогда
Если ТолькоОсновныеИзображения И НЕ Изображение.ЭтоОсновное Тогда Продолжить; КонецЕсли; Если НЕ Изображение.ЭтоОсновное Тогда Если ПоследняяНоменклатура<>Изображение.Номенклатура Тогда СчДопИзображений=1; Иначе СчДопИзображений=СчДопИзображений+1; КонецЕсли; ПоследняяНоменклатура=Изображение.Номенклатура; КонецЕсли; ИмяФайла=СокрЛП(Изображение.Код)+?(Изображение.ЭтоОсновное,"","("+СчДопИзображений+")")+РасширениеФайлов; Файл=Изображение.Хранилище.Получить(); Если Файл<>Неопределено Тогда Файл.Записать(КаталогИзображений+"\"+СокрЛП(Папки.Папка.Наименование)+"\"+ИмяФайла); Иначе Сообщить("Изображение отсутствует в хранилище! "+Изображение.Номенклатура,СтатусСообщения.Внимание); КонецЕсли;
Папки1 = Каталоги.Выбрать(); Пока Папки1.Следующий() Цикл Если ЗначениеЗаполнено(Папки1.Папка.Родитель)=1 И ЗначениеЗаполнено(Папки1.Папка.Родитель.Родитель)=0 Тогда //Первый уровень КаталогНаДиске1 = Новый Файл(КаталогИзображений+"\"+СокрЛП(Папки1.Папка.Родитель)+"\"+СокрЛП(Папки1.Папка.Наименование)); Если НЕ КаталогНаДиске1.Существует() Тогда СоздатьКаталог(КаталогИзображений+"\"+СокрЛП(Папки1.Папка.Родитель)+"\"+СокрЛП(Папки1.Папка.Наименование)); //Загружаем картинки СчДопИзображений=0; ПоследняяНоменклатура=Неопределено;
Изображение1 = Карт.Выбрать(); Пока Изображение1.Следующий() Цикл Если Изображение1.Тов.Родитель = Папки1.Папка Тогда
Если ТолькоОсновныеИзображения И НЕ Изображение1.ЭтоОсновное Тогда Продолжить; КонецЕсли; Если НЕ Изображение1.ЭтоОсновное Тогда Если ПоследняяНоменклатура<>Изображение1.Номенклатура Тогда СчДопИзображений=1; Иначе СчДопИзображений=СчДопИзображений+1; КонецЕсли; ПоследняяНоменклатура=Изображение1.Номенклатура; КонецЕсли; ИмяФайла=СокрЛП(Изображение1.Код)+?(Изображение1.ЭтоОсновное,"","("+СчДопИзображений+")")+РасширениеФайлов; Файл=Изображение1.Хранилище.Получить(); Если Файл<>Неопределено Тогда Файл.Записать(КаталогИзображений+"\"+СокрЛП(Папки1.Папка.Родитель)+"\"+СокрЛП(Папки1.Папка.Наименование)+"\"+ИмяФайла); Иначе Сообщить("Изображение отсутствует в хранилище! "+Изображение1.Номенклатура,СтатусСообщения.Внимание); КонецЕсли;
КонецЕсли; КонецЦикла;
КонецЕсли; КонецЕсли; КонецЦикла;
Папки2 = Каталоги.Выбрать(); Пока Папки2.Следующий() Цикл Если ЗначениеЗаполнено(Папки2.Папка.Родитель.Родитель)=1 Тогда //Второй уровень КаталогНаДиске2 = Новый Файл(КаталогИзображений+"\"+СокрЛП(Папки2.Папка.Родитель.Родитель.Наименование)+"\"+СокрЛП(Папки2.Папка.Родитель.Наименование)+"\"+СокрЛП(Папки2.Папка.Наименование)); Если НЕ КаталогНаДиске2.Существует() Тогда СоздатьКаталог(КаталогИзображений+"\"+СокрЛП(Папки2.Папка.Родитель.Родитель.Наименование)+"\"+СокрЛП(Папки2.Папка.Родитель.Наименование)+"\"+СокрЛП(Папки2.Папка.Наименование)); //Загружаем картинки СчДопИзображений=0; ПоследняяНоменклатура=Неопределено;
Изображение2 = Карт.Выбрать(); Пока Изображение2.Следующий() Цикл Если Изображение2.Тов.Родитель = Папки2.Папка Тогда
Если ТолькоОсновныеИзображения И НЕ Изображение2.ЭтоОсновное Тогда Продолжить; КонецЕсли; Если НЕ Изображение2.ЭтоОсновное Тогда Если ПоследняяНоменклатура<>Изображение2.Номенклатура Тогда СчДопИзображений=1; Иначе СчДопИзображений=СчДопИзображений+1; КонецЕсли; ПоследняяНоменклатура=Изображение2.Номенклатура; КонецЕсли; ИмяФайла=СокрЛП(Изображение2.Код)+?(Изображение2.ЭтоОсновное,"","("+СчДопИзображений+")")+РасширениеФайлов; Файл=Изображение2.Хранилище.Получить(); Если Файл<>Неопределено Тогда Файл.Записать(КаталогИзображений+"\"+СокрЛП(Папки2.Папка.Родитель.Родитель.Наименование)+"\"+СокрЛП(Папки2.Папка.Родитель.Наименование)+"\"+СокрЛП(Папки2.Папка.Наименование)+"\"+ИмяФайла); Иначе Сообщить("Изображение отсутствует в хранилище! "+Изображение2.Номенклатура,СтатусСообщения.Внимание); КонецЕсли;
Есть выгрузка изображений из номенклатуры, выгружается общим списком, подскажите как можно сделать что б выгрузка была с папками, т.е. иерархию сохранить Вот выгрузка сплошняком
Спасибо за ап, форумчане, те кто умеет читать, подскажите плиз, может кто уже так делал или идея есть
Вот так выгружает все папки общим списком, как сделать что б выгружалось как в иерархии (в папке подпака и т.д.)
З = Новый Запрос; З.Текст = "ВЫБРАТЬ | Номенклатура.Наименование КАК Наименование |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ | Номенклатура.ЭтоГруппа = ИСТИНА";
Каталоги = З.Выполнить(); Папки = Каталоги.Выбрать(); Пока Папки.Следующий() Цикл Если Папки.Группа = Истина Тогда
КаталогНаДиске = Новый Файл(Папки.Наименование); Если НЕ КаталогНаДиске.Существует() Тогда СоздатьКаталог(Папки.Наименование); КонецЕсли;
bereznoy, я сейчас отвечу на новый вопрос, вы напишете "ну ладно, это сделаю, а дальше вот мне ещё надо..."?
Какой новый, ключевой вопрос выгрузка каталогов на локальный диск таких же как в номенклатуре, получить группы из запроса думаю это не составит труда и сделать обход результата даже для начинающего как я, вопрос прежний и он озвучен в заголовке темы
Возможности проверить нет, так что инфа не 100%. В запрос вставьте строку
|ИТОГИ ПО | Номенклатура ИЕРАРХИЯ
В запросе ладно получу я группу, а дальше как создать именно по иерархии каталоги на локальном диске, подозреваю что "СоздатьКаталог()", но как что именно что б было папка в нудной папке и потом по ним раскидать фотографии, ну тут тоже думаю вот так надо "КопироватьФайл(<Имя файла источника>, <Имя файла приемника>) ", но прошу помощи
Есть выгрузка изображений из номенклатуры, выгружается общим списком, подскажите как можно сделать что б выгрузка была с папками, т.е. иерархию сохранить Вот выгрузка сплошняком
Если СокрЛП(КаталогИзображений)="" Тогда Предупреждение("Выберите каталог для сохранения файлов."); Возврат; КонецЕсли; СоздатьКаталог(КаталогИзображений); Запрос=Новый Запрос(" |ВЫБРАТЬ | Объект КАК Номенклатура, | Объект.Код КАК Код, | Хранилище, | ВЫБОР КОГДА Объект.ОсновноеИзображение=Ссылка ТОГДА ИСТИНА ИНАЧЕ ЛОЖЬ КОНЕЦ КАК ЭтоОсновное |ИЗ | Справочник.ХранилищеДополнительнойИнформации |ГДЕ | Объект ССЫЛКА Справочник.Номенклатура |УПОРЯДОЧИТЬ ПО Объект"); Выборка=Запрос.Выполнить().Выбрать(); ФормаПроцесса=ПолучитьФорму("ФормаПроцесса"); ФормаПроцесса.Заголовок="Выполняется выгрузка..."; Всего=Выборка.Количество(); ФормаПроцесса.ЭлементыФормы.ИндикаторПроцесса.МаксимальноеЗначение=Всего; н=0; СчДопИзображений=0; ПоследняяНоменклатура=Неопределено; ФормаПроцесса.Открыть(); Пока Выборка.Следующий() Цикл
ОбработкаПрерыванияПользователя(); н=н+1; Если н=1 ИЛИ Цел(н/10)=н/10 ИЛИ н=Всего Тогда ФормаПроцесса.ЭлементыФормы.ИндикаторПроцесса.Значение=н; ФормаПроцесса.ЭлементыФормы.ТекущийЭлемент.Заголовок=Выборка.Номенклатура; КонецЕсли;
Если ТолькоОсновныеИзображения И НЕ Выборка.ЭтоОсновное Тогда Продолжить; КонецЕсли; Если НЕ Выборка.ЭтоОсновное Тогда Если ПоследняяНоменклатура<>Выборка.Номенклатура Тогда СчДопИзображений=1; Иначе СчДопИзображений=СчДопИзображений+1; КонецЕсли; ПоследняяНоменклатура=Выборка.Номенклатура; КонецЕсли; ИмяФайла=СокрЛП(Выборка.Код)+?(Выборка.ЭтоОсновное,"","("+СчДопИзображений+")")+РасширениеФайлов; Файл=Выборка.Хранилище.Получить(); Если Файл<>Неопределено Тогда Файл.Записать(КаталогИзображений+"\"+ИмяФайла); Сообщить("Записан файл: "+ИмяФайла,СтатусСообщения.Информация); Иначе Сообщить("Изображение отсутствует в хранилище! "+Выборка.Номенклатура,СтатусСообщения.Внимание); КонецЕсли;
У меня аналогичная проблемка, сканер тоже ls2208 usb, конфиг УТ, для начала мне надо переключить в эмуляцию ком порта, считываю штрихкод rs-232 и в оборудовании ничего не появляется нового, уже сбрасывал настройки и заново сканировал штрих код, вообщем мож я как то не так перевожу сканер в эмуляуию com ? Кстати, винда сервер 2003
так зачем вы к ценам соединяете остатки, а не наоборот?
Например такой запрос:
ВЫБРАТЬ ТоварыНаСкладахОстатки.Склад, ТоварыНаСкладахОстатки.Номенклатура КАК Номенклатура, ТоварыНаСкладахОстатки.ХарактеристикаНоменклатуры, ТоварыНаСкладахОстатки.КоличествоОстаток, ЦеныНоменклатурыСрезПоследних.ЕдиницаИзмерения, ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Цена, 0) КАК цена, ТоварыНаСкладахОстатки.Номенклатура.ОсновноеИзображение.Хранилище ИЗ РегистрНакопления.ТоварыНаСкладах.Остатки(&НаДату, Склад <> &Склад) КАК ТоварыНаСкладахОстатки ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&НаДату, ТипЦен = &ТЦ) КАК ЦеныНоменклатурыСрезПоследних ПО ТоварыНаСкладахОстатки.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура И ТоварыНаСкладахОстатки.ХарактеристикаНоменклатуры = ЦеныНоменклатурыСрезПоследних.ХарактеристикаНоменклатуры ИТОГИ ПО Номенклатура ИЕРАРХИЯ
в моем случае дал группировку по иерархии, все остатки и цены к ним (если они попадали по отборам)
Что то никак у меня не получается получить цену в выборке (обход по группировкам сделал что б в моем каталоге все шло по порядку согласно иерархии номенклатуры), помогите плз, как мне сохранить и порядок размещения картинок в каталоге согласно иерархии и получить цену в выборке,вот вест код
Процедура ПрайсИнициализация() ПостроительОтчетаПрайс.Текст = "ВЫБРАТЬ | ЦеныНоменклатурыСрезПоследних.Цена КАК Цена, | ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура, | ЦеныНоменклатурыСрезПоследних.Номенклатура.Наименование КАК Наименование, | ПРЕДСТАВЛЕНИЕ(ЦеныНоменклатурыСрезПоследних.ЕдиницаИзмерения) КАК ЕдиницаИзмерения, | ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0) КАК КоличествоОстаток, | ЦеныНоменклатурыСрезПоследних.Номенклатура.Ссылка КАК НомСсылка, | ЦеныНоменклатурыСрезПоследних.Номенклатура.ОсновноеИзображение.Хранилище КАК Кар |ИЗ | РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&НаДату, ТипЦен = &ТипЦен {(Номенклатура).* КАК Номенклатура}) КАК ЦеныНоменклатурыСрезПоследних | ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыНаСкладах.Остатки(&НаДату, Склад В (&Склады) {(Номенклатура).* КАК Номенклатура}) КАК ТоварыНаСкладахОстатки | ПО ЦеныНоменклатурыСрезПоследних.Номенклатура = ТоварыНаСкладахОстатки.Номенклатура |ИТОГИ ПО | Номенклатура ИЕРАРХИЯ |АВТОУПОРЯДОЧИВАНИЕ";
ИмяПоляОстаток = "КоличествоОстаток"; ПолеОтбораОстаток = ПостроительОтчетаПрайс.Отбор.Найти(ИмяПоляОстаток); Если ВключатьТолькоОстатки Тогда Если ПолеОтбораОстаток = Неопределено Тогда ПолеОтбораОстаток = ПостроительОтчетаПрайс.Отбор.Добавить(ИмяПоляОстаток); Конецесли; ПолеОтбораОстаток.ВидСравнения = ВидСравнения.Больше; ПолеОтбораОстаток.Использование = Истина; Иначе Если ПолеОтбораОстаток <> Неопределено Тогда ОтборКоличество = ПостроительОтчетаПрайс.Отбор.Количество(); Для Н = 1 По ОтборКоличество Цикл Если ПостроительОтчетаПрайс.Отбор[ОтборКоличество - Н].Имя = ИмяПоляОстаток Тогда ПостроительОтчетаПрайс.Отбор.Удалить(ОтборКоличество - Н); КонецЕсли КонецЦикла; КонецЕсли; КонецЕсли;
ПостроительОтчетаПрайс.Выполнить();
Макет = ПолучитьМакет("Прайс");
ЭлементыФормы.ПолеТабличногоДокумента.Очистить();
ТабДок = ЭлементыФормы.ПолеТабличногоДокумента; ТабДок1 = Новый ТабличныйДокумент; ТабДок2 = Новый ТабличныйДокумент;
Во-первых, Вы уверены, что в запросе должно быть именно левое соединение? Во-вторых, раз уж не видит цену, в регистре цен есть незаполненная (нулевая) цена?
1.Нет 2.Нет Если не делать обход в выборке то все хорошо работает.
Подскажите как на Ваш взгляд должен выглядеть запрос
Сделал вот так, но теперь цену не видит в выборке (((, помогите плз
ПостроительОтчетаПрайс.Текст = "ВЫБРАТЬ | ЦеныНоменклатурыСрезПоследних.Цена КАК Цена, | ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура, | ЦеныНоменклатурыСрезПоследних.Номенклатура.Наименование КАК Наименование, | ПРЕДСТАВЛЕНИЕ(ЦеныНоменклатурыСрезПоследних.ЕдиницаИзмерения) КАК ЕдиницаИзмерения, | ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0) КАК КоличествоОстаток, | ЦеныНоменклатурыСрезПоследних.Номенклатура.Ссылка КАК НомСсылка, | ЦеныНоменклатурыСрезПоследних.Номенклатура.ОсновноеИзображение.Хранилище КАК Кар |ИЗ | РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&НаДату, ТипЦен = &ТипЦен {(Номенклатура).* КАК Номенклатура}) КАК ЦеныНоменклатурыСрезПоследних | ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыНаСкладах.Остатки(&НаДату, Склад В (&Склады) {(Номенклатура).* КАК Номенклатура}) КАК ТоварыНаСкладахОстатки | ПО ЦеныНоменклатурыСрезПоследних.Номенклатура = ТоварыНаСкладахОстатки.Номенклатура |ИТОГИ ПО | Номенклатура ИЕРАРХИЯ |АВТОУПОРЯДОЧИВАНИЕ";
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!