Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
найти группу Номенклатуру и поместить в запрос 7.7 (ОЛЕ)
|
|||
|---|---|---|---|
|
#18+
нужна ваша помощь,в 8.2 подключаюсь к 7.7 и хочу получить остатки: ВыбранКод = ""; КодГруппа = "00000002"; Если НомГруппа.НайтиПоКоду(КодГруппа) = 1 Тогда Если НомГруппа.ЭтоГруппа()= 1 Тогда; ВыбранКод = НомГруппа.ТекущийЭлемент(); // ВыбранКод = НомГруппа.ИспользоватьРодителя(НомГруппа.ТекущийЭлемент()); Иначе Сообщить(ОписаниеОшибки()); КонецЕсли; КонецЕсли; КодДоватораСклад = "00001"; Если НомСклад.НайтиПоКоду(КодДоватораСклад) = 1 Тогда НужныйСклад = НомСклад.ТекущийЭлемент(); Иначе Сообщить(ОписаниеОшибки()); КонецЕсли; Запрос = V7.CreateObject("Запрос"); ТекстЗапроса = "//{{ЗАПРОС(Сформировать) |Период с '"+ДатаКонец+"' по '"+ДатаКонец+"'; |Номенклатура = Регистр.ОстаткиТМЦ.Номенклатура; |Код = Регистр.ОстаткиТМЦ.Номенклатура.Код; |Количество = Регистр.ОстаткиТМЦ.Количество; |Склад = Регистр.ОстаткиТМЦ.Склад; |Функция КоличествоКонОст = КонОст(Количество); |Группировка Номенклатура; |Условие(Номенклатура в '"+НомГруппа.ТекущийЭлемент()+"'); |Условие(Склад = '"+НужныйСклад+"'); |"//}}ЗАПРОС ; в данном случаи находит саму группу,а нужно группу со всеми элементами справочника входящ.в эту группу. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.04.2012, 09:07 |
|
||
|
найти группу Номенклатуру и поместить в запрос 7.7 (ОЛЕ)
|
|||
|---|---|---|---|
|
#18+
запрос же возвращает все номенклатуры с остатками? что не так? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.04.2012, 11:32 |
|
||
|
найти группу Номенклатуру и поместить в запрос 7.7 (ОЛЕ)
|
|||
|---|---|---|---|
|
#18+
мне нужно выбрать определенную группу номенклатуру,и по определенному складу,номенклатуры слишком много ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.04.2012, 11:36 |
|
||
|
найти группу Номенклатуру и поместить в запрос 7.7 (ОЛЕ)
|
|||
|---|---|---|---|
|
#18+
замени в на = тут |Условие(Номенклатура в '"+НомГруппа.ТекущийЭлемент()+"'); ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.04.2012, 11:38 |
|
||
|
найти группу Номенклатуру и поместить в запрос 7.7 (ОЛЕ)
|
|||
|---|---|---|---|
|
#18+
раньше так было : ВыбранКод = ""; КодГруппа = "00000002"; Если НомГруппа.НайтиПоКоду(КодГруппа) = 1 Тогда Если НомГруппа.ЭтоГруппа()= 1 Тогда; ВыбранКод = НомГруппа.ТекущийЭлемент(); // ВыбранКод = НомГруппа.ИспользоватьРодителя(НомГруппа.ТекущийЭлемент()); Иначе Сообщить(ОписаниеОшибки()); КонецЕсли; КонецЕсли; КодДоватораСклад = "00001"; Если НомСклад.НайтиПоКоду(КодДоватораСклад) = 1 Тогда НужныйСклад = НомСклад.ТекущийЭлемент(); Иначе Сообщить(ОписаниеОшибки()); КонецЕсли; Запрос = V7.CreateObject("Запрос"); ТекстЗапроса = "//{{ЗАПРОС(Сформировать) |Период с '"+ДатаКонец+"' по '"+ДатаКонец+"'; |Номенклатура = Регистр.ОстаткиТМЦ.Номенклатура; |Код = Регистр.ОстаткиТМЦ.Номенклатура.Код; |Количество = Регистр.ОстаткиТМЦ.Количество; |Склад = Регистр.ОстаткиТМЦ.Склад; |Функция КоличествоКонОст = КонОст(Количество); |Условие(Номенклатура в '"+ВыбранКод+"'); |Условие(Склад = '"+НужныйСклад+"'); |"//}}ЗАПРОС ; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.04.2012, 12:11 |
|
||
|
найти группу Номенклатуру и поместить в запрос 7.7 (ОЛЕ)
|
|||
|---|---|---|---|
|
#18+
в чем разница? Опишите подробнее что вы хотите и что выдает сейчас. Непонятно малость ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.04.2012, 15:53 |
|
||
|
найти группу Номенклатуру и поместить в запрос 7.7 (ОЛЕ)
|
|||
|---|---|---|---|
|
#18+
Разницы не какой,в запрос не попадает группа ВыбранКод(со всеми входящие элементами справочниками).Вообщем так сделал: Запрос = V7.CreateObject("Запрос"); ТекстЗапроса = "//{{ЗАПРОС(Сформировать) |Период с '"+ДатаКонец+"' по '"+ДатаКонец+"'; |Номенклатура = Регистр.ОстаткиТМЦ.Номенклатура; |Код = Регистр.ОстаткиТМЦ.Номенклатура.Код; |Количество = Регистр.ОстаткиТМЦ.Количество; |Склад = Регистр.ОстаткиТМЦ.Склад; |Функция КоличествоКонОст = КонОст(Количество); |Группировка Код Без Групп; |Группировка Номенклатура Без Групп; |"//}}ЗАПРОС ; Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда Возврат; КонецЕсли; ТабЗагрузка=Новый ТаблицаЗначений; ТабЗагрузка=Новый ТаблицаЗначений; ТабЗагрузка.Колонки.Добавить("Номенклатура"); ТабЗагрузка.Колонки.Добавить("Код"); ТабЗагрузка.Колонки.Добавить("КонОстаток",Новый ОписаниеТипов("Число")); Запрос.вНачалоВыборки(); Пока Запрос.Группировка("Код") = 1 Цикл Пока Запрос.Группировка("Номенклатура") = 1 Цикл Если ЗначениеЗаполнено(Запрос.Код) Тогда Если Запрос.Номенклатура.Родитель.Код = ВыбранКод.Код Тогда Если Запрос.Склад.Код = НужныйСклад.Код Тогда Если Запрос.Номенклатура.ЭтоГруппа()= 1 Тогда Продолжить; КонецЕсли; КонОстатокБаза = Запрос.КоличествоКонОст; КонОстатка = Число(Прав(КонОстатокБаза,8)); Если КонОстатка > 0 Тогда Новстр =ТабЗагрузка.Добавить(); ОфигенныйКод = Запрос.Код; Новстр.Код = "TD_"+ОфигенныйКод; Новстр.Номенклатура = Запрос.Номенклатура.Наименование; Новстр.КонОстаток = КонОстатка; КонецЕсли; КонецЕсли; КонецЕсли; КонецЕсли; КонецЦикла; КонецЦикла; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.04.2012, 09:39 |
|
||
|
|

start [/forum/topic.php?fid=28&msg=37756527&tid=1520477]: |
0ms |
get settings: |
6ms |
get forum list: |
11ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
40ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 218ms |
| total: | 323ms |

| 0 / 0 |
