Последнее обновление: 23 мая 2015 в 14:58
Подпишись на RSS
rss Подпишитесь на RSS, чтобы всегда быть в курсе событий.
29 октября 2010 · Всячина

«Чудесные» роботы от Irobot Компания Irobot известна всем как ведущий производитель роботов пылесосов, роботов поломоев и чистильщиков бассейнов. Один их только Roomba, завоевавший весь мир, чего стоит. Эта чудо-малютка с мощностью всасывания всего 80 ватт успешно справляется с очисткой самых загрязненных поверхностей. Причем самостоятельно. Благодаря этой компании мы можем робот пылесос scooba купить в любом […]


8 ноября 2010 · Программы

Иногда хочется прочесть скаченную из Интернета книгу, но распечатывать ее нет необходимости. Современные программы позволяют вполне комфортно читать с экрана ноутбука или компьютера, а если компьютер подключен к ЖК-телевизору, то вообще можно читать развалившись на диване издалека смотря на большой ЖК-телевизор.


Метки

Метки записей
редактирование DBF Бухгалтерия скачать конвертер office 2003-2007 перенумарация открыть xlsx docx Asus Eee новости XPE office 2003 homachi локальная сеть через интернет Мужчина и женщина Автомобили программы для слепых Документы на почту Экономика антивирус перенос документов Юмор Вопросы Ошибки 1С Drivers Добавить новую метку Оптимизация Интернет Новая форма счет-Фактуры ZverCD Отчет Методика свертки 1С контент-провайдер взломать пароль портативный аккумулятор Командная строка Обработки Пошаговая свертка вирус SMS Кино Подключить 1С к MySQL Жизнь дравер MySQL скачать сертфикаты Видео Армия просроченная дебиторская задолженность автозапуск Программы Загрузка с компакт - диска Скачать 1С Вирусы Спорт свертка торговли Взлом 1С Игры Отношения 1с и MySQL Финансы Делаем LiveCD Спутниковое ТВ Отзывы сверка базы 1С Печатные формы Файлы 1С удаляем пароли День жестянщика расчет ПЗД сбились номера документов Альпинизм Свертка базы 1С Свертка по партиям связь Анализ ПДЗ Лирика реестр Сайты Система Программы для 1С Оборудование автоматизация Обзоры СМС восстановить нумерацию office 2007 гаджеты свертка Работа мошенничество переустановка windows Свертка 1С удаление документов код защита Взлом вирус антивирусы свертка в картинках Экстремальные игры HP Pavilion dv6000 заблокирован Драйвера пакетный запуск 1С 1с реестр jaws Windows XP узнать пароль Структура 1С бесплатно уменьшить размер базы Деньги Вся вирус эмулирует нажатие Win Интерент Интренет печать от поставщика Установка Windows Удаление партий Интересные места Взлом 1 СМС оплата Oracle сайт Zver DVD Драйвер ODBC скачать Проблемы Фото LiveCD Dr.Web партии
28 мая 2013

Добавляем колонки в список номенклатуры УТ 11

Автор статьи: , 28 мая 2013 в рубрике . Метки: , . Просмотров: 3 797

Иногда хочется видеть дополнительные колонки с списке номенклатуры, как это, например, я реализовал в Управлении торговлей 10.3

В конфигурации Управление торговлей, редакция 11 это сделать несколько сложнее, так как список номенклатуры строится динамически и является результатом выполнения запроса.

Рассмотрим пример как можно добавить дополнительные колонки в список номенклатуры.

kolonki Добавляем колонки в список номенклатуры УТ 11

Дополнительные колонки с списке номенклатуры

Авторские права на предоставленный материал принадлежат автору сайта http://extremallife.ru

 

Допустим, изначальные запрос имеет вид:

ВЫБРАТЬ
СпрНоменклатура.Ссылка КАК Ссылка,
СпрНоменклатура.Код КАК Код,
СпрНоменклатура.Наименование КАК Наименование,
СпрНоменклатура.Артикул КАК Артикул,
СпрНоменклатура.ВидНоменклатуры КАК ВидНоменклатуры,
СпрНоменклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
СпрНоменклатура.СтавкаНДС КАК СтавкаНДС,
СпрНоменклатура.Родитель,
ИЗ
Справочник.Номенклатура КАК СпрНоменклатура
ГДЕ
НЕ СпрНоменклатура.ЭтоГруппа
{ГДЕ
(СпрНоменклатура.Ссылка В
(ВЫБРАТЬ
Сегменты.Номенклатура
ИЗ
РегистрСведений.НоменклатураСегмента КАК Сегменты
ГДЕ
Сегменты.Сегмент = &СегментНоменклатуры))}

 

Нам необходимо добавить дополнительные графы — «Цена1», «Цена2» — это цены, которые соответствуют выбранным видам цен, а также остаток на указанном складе.

Для этого нам необходимо доработать запрос. Вернее, сделать несколько вложенных запросов.

 

ВЫБРАТЬ
СпрНоменклатура.Ссылка КАК ссылка,
СпрНоменклатура.Код КАК Код,
СпрНоменклатура.Наименование КАК Наименование,
СпрНоменклатура.ВидНоменклатуры КАК ВидНоменклатуры,
СпрНоменклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
СпрНоменклатура.Артикул КАК Артикул,
СпрНоменклатура.СтавкаНДС КАК СтавкаНДС,
ВложенныйЗапрос.Цена КАК Цена1,
ВложенныйЗапрос1.Цена КАК Цена2,
ВложенныйЗапрос2.КоличествоОстаток КАК Ост
ИЗ
Справочник.Номенклатура КАК СпрНоменклатура
ПОЛНОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
ЦеныНоменклатурыСрезПоследних.Цена КАК Цена,
ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура
ИЗ
РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
ГДЕ
ЦеныНоменклатурыСрезПоследних.ВидЦены = &Цена1) КАК ВложенныйЗапрос
ПО СпрНоменклатура.Ссылка = ВложенныйЗапрос.Номенклатура
ПОЛНОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
ЦеныНоменклатурыСрезПоследних.Цена КАК Цена,
ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура
ИЗ
РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
ГДЕ
ЦеныНоменклатурыСрезПоследних.ВидЦены = &Цена2) КАК ВложенныйЗапрос1
ПО СпрНоменклатура.Ссылка = ВложенныйЗапрос1.Номенклатура
ПОЛНОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
ТоварыОрганизацийОстатки.Номенклатура КАК Номенклатура,
ТоварыОрганизацийОстатки.КоличествоОстаток КАК КоличествоОстаток
ИЗ
РегистрНакопления.ТоварыОрганизаций.Остатки КАК ТоварыОрганизацийОстатки
ГДЕ
ТоварыОрганизацийОстатки.Склад = &Склад) КАК ВложенныйЗапрос2
ПО СпрНоменклатура.Ссылка = ВложенныйЗапрос2.Номенклатура

ГДЕ
СпрНоменклатура.ЭтоГруппа = ЛОЖЬ
{ГДЕ
(СпрНоменклатура.Ссылка В
(ВЫБРАТЬ
Сегменты.Номенклатура
ИЗ
РегистрСведений.НоменклатураСегмента КАК Сегменты
ГДЕ
Сегменты.Сегмент = &СегментНоменклатуры)) КАК Поле2}

 

Как видно, мы приделали несколько вложенных запросов, которые вычисляют цены и остатки.

Далее, необходимо передать параметры в запрос.

Для этого можно создать на форме дополнительные элементы, Цена1, Цена2, Склад, заполнить их параметрами и передать эти параметры в запрос.

&НаСервере
Процедура ЗаполнитьЦенаНаСервере()
ЗначениеОтбора = ?(ЗначениеЗаполнено(Цена1), Цена1, Неопределено);
ОбщегоНазначенияКлиентСервер.УстановитьПараметрДинамическогоСписка(Список, «Цена1», ЗначениеОтбора, ЗначениеЗаполнено(Цена1));
ЗначениеОтбора = ?(ЗначениеЗаполнено(Цена2), Цена2, Неопределено);
ОбщегоНазначенияКлиентСервер.УстановитьПараметрДинамическогоСписка(Список, «Цена2», ЗначениеОтбора, ЗначениеЗаполнено(Цена2));

ЗначениеОтбора = ?(ЗначениеЗаполнено(Склад), Склад, Неопределено);
ОбщегоНазначенияКлиентСервер.УстановитьПараметрДинамическогоСписка(Список, «Склад», ЗначениеОтбора, ЗначениеЗаполнено(Склад));
КонецПроцедуры




К записи "Добавляем колонки в список номенклатуры УТ 11" 2 комментария

Не работает, выдаёт ошибку (может я запрос в модуль не туда вставил?)

Ответить

admin Reply:

Может, нужно конкретно смотреть в чем может быть проблема

Ответить


Оставить комментарий

*

Блог программиста 1С. Программирование 1С
Если Вас что-то заинтересовало или возникли вопросы, пишите.
petr@evseev.ru
Skype - evseev_petr
ICQ - 262808698

Сохраните меня в социальных сервисах

Комментарии

Присоединяйтесь к обсуждению
  • Леха: Мало того, что это говно-антивирус требует .Net Framework не ниже 4.0, так он еще пожирает ресурсы компьютера,...
  • tommy: AVG равно еще хуже Касперского . Иди в жопу с ним
  • просто_чайник: Не люблю этот антивирус. Заметил такую особенность. Если обновить базы в начале работы, довольно часто...
  • Елена: Самое главное. Файл для совместной работы открыть нельзя! Если надо что-то отредактировать — только...
  • Виктор: Поставили мне на работе эту замечательную программку. Работать невозможно, ужасные тормоза. Стали...

Избранное видео

Ссылки