[martyn]

Пока Выборка.Следующий() Цикл
       ЧекККМ = Выборка.Ссылка.ПолучитьОбъект();

       Для каждого Товар из ЧекККМ.Товары Цикл 
           
          ЗапросСклад = Новый Запрос;
          
          ЗапросСклад.Текст = 
              "ВЫБРАТЬ
              |    РаспределениеПродаж.Склад как Склад
              |ИЗ
              |    РегистрСведений.РаспределениеПродаж КАК РаспределениеПродаж
              |ГДЕ
              |    РаспределениеПродаж.НоменклатурнаяГруппа = &НоменклатурнаяГруппа";
    
              ЗапросСклад.УстановитьПараметр("НоменклатурнаяГруппа", Товар.Номенклатура.НоменклатурнаяГруппа);
              
              ВыборкаСклад = ЗапросСклад.Выполнить().Выбрать();          
              
              Если ВыборкаСклад.Количество() > 0 Тогда 
                 //Товар.Склад = вот здесь надо присвоить данные из запроса...
              КонецЕсли;      
          
      КонецЦикла;      
      
      ЧекККМ.Записать();
                      
    КонецЦикла;

не знаю как это сделать - подскажите??? сам не программист 1С - но приходится влазить.

!

Правила: 3, 12

Сообщение отредактировал Vofka - 12.11.14, 14:02

[sava1]

Если в выборке одна запись, тогда

Товар.Склад = ВыборкаСклад[0].Склад

а если несколько ?

[ignsv]

Если ВыборкаСклад.Количество() > 0 Тогда
Товар.Склад = вот здесь надо присвоить данные из запроса...
КонецЕсли;

Если ВыборкаСклад.Следующий() Тогда
        Товар.Склад =СкладВыборкаДетальныеЗаписи.Склад;
Конецесли;

[TipsyKID]

Запрос в цикле ?
Это очень плохо.
Надо переработать сам алгоритм получения Склада, а для этого нужен код который формирует Выборку.

Пока Выборка.Следующий() Цикл

Необходимо знать что написано до этой строки.

[martyn]

Если в выборке одна запись, тогда

Товар.Склад = ВыборкаСклад[0].Склад

а если несколько ?

{Форма.Форма.Форма(39)}: Значение не является значением объектного типа (Склад)
Товар.Склад = ВыборкаСклад[0].Склад;

[sava1]

И чем №3 отличается от №2 ?

[martyn]

Запрос в цикле ?
Это очень плохо.
Надо переработать сам алгоритм получения Склада, а для этого нужен код который формирует Выборку.

Пока Выборка.Следующий() Цикл

Необходимо знать что написано до этой строки.

ЗапросЧековККМ = Новый Запрос;

ЗапросЧековККМ.Текст =
"ВЫБРАТЬ
| ЧекККМ.Ссылка как Ссылка
|ИЗ
| Документ.ЧекККМ КАК ЧекККМ
|ГДЕ НЕ ЧекККМ.Проведен";

Выборка=ЗапросЧековККМ.Выполнить().Выбрать();

[sava1]

Да, запрос надо-бы переписать в один

Что нужно получить в результате?

А что это за хрень - Товар.Склад ?

В документ так просто не впишешься

[martyn]

Да, запрос надо-бы переписать в один

Да Бог с ним запросом - как мне из РегистраСведений.РаспределениеПродаж складу товара присвоить значение - выбранное запросом?

РаспределениеПродаж

Измерения

- Магазин
- НоменклатурнаяГруппа
- УдалитьКассаККМ
- РабочееМесто

Ресурсы
- Склад

в конфигураторе смотрю, Тип ресурса Склад - СправочникиСссылка.Склады

[sava1]

РаспределениеПродаж - независимый? непериодический?

[alex040269]

РегистраСведений.РаспределениеПродаж складу товара присвоить значение

нельзя присвоить значение. можно только записать набор записей с заменой или без.

Набор = РегистрыСведений.Имя.СоздатьНаборЗаписей();
Набор.Отбор.ИмяРеквОтбора.Установить(Значение);
НовСтрока = Набор.Добавть();
НовСтрока.ИмяРевизита = Значние;
Набор.Записать();

[martyn]

нельзя присвоить значение. можно только записать набор записей с заменой или без.

Набор = РегистрыСведений.Имя.СоздатьНаборЗаписей();
Набор.Отбор.ИмяРеквОтбора.Установить(Значение);
НовСтрока = Набор.Добавть();
НовСтрока.ИмяРевизита = Значние;
Набор.Записать();

это я буду записывать в РегистрСведений? правильно я понимаю?

мне надо наоборот, значение из регистра сведений получить и присвоить полю склад

РаспределениеПродаж - независимый? непериодический?

независимый, непереодический

[sava1]

Полю Склад чего - документа?

[TipsyKID]

Перед тестированием , сделайте архивную копию !!!!!

Запрос = Новый Запрос;
Запрос.Текст = 
"ВЫБРАТЬ
|    ЧекККМТовары.*,
|    РаспределениеПродаж.Склад КАК Склад
|ИЗ
|    Документ.ЧекККМ.Товары КАК ЧекККМТовары
|        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.РаспределениеПродаж  КАК РаспределениеПродаж 
|        ПО ЧекККМТовары.Номенклатура.НоменклатурнаяГруппа = РаспределениеПродаж .НоменклатурнаяГруппа
|ГДЕ
|    НЕ ЧекККМТовары.Ссылка.Проведен";

Выборка = Запрос.Выполнить().выбрать();
МакКвоВТранзакции = 500;
ТекКол = 0;
НачатьТранзакцию();
ТекДок = Неопределено;
пока Выборка.Следующий() цикл 
    ТекКол = ТекКол + 1;
    Если ТекКол = МакКвоВТранзакции тогда 
        ЗафиксироватьТранзакцию();
        НачатьТранзакцию();
        ТекКол = 0;
    КонецЕсли;
    
    Если НЕ ЗначениеЗаполнено(ТекДок) тогда
        ТекДок = Выборка.Ссылка.ПолучитьОбъект();
                ТекДок.Товары.Очистить(); 
    ИначеЕсли ТекДок <> Выборка.Ссылка тогда
        ТекДок.Записать();
        ТекДок = Выборка.Ссылка.ПолучитьОбъект();
                ТекДок.Товары.Очистить(); 

    КонецЕсли;
        НоваяСтрока = ТекДок.Товары.Добавить();
        ЗаполнитьЗначенияСвойств(НоваяСтрока, Выборка,,"Ссылка,НомерСтроки");

Конеццикла;
ЗафиксироватьТранзакцию();

Сообщение отредактировал TipsyKID - 12.11.14, 13:47

[martyn]

Полю Склад чего - документа?

Товаров в документе - сам принцип объясните, как обрашаться к значению Реквизита в РегистреСведений

[sava1]

(14) Вполне прилично.
Выборку сгруппировать по Документ,строка и перебирать по группировкам - тогда не надо отслеживать ТекДок

Сообщение отредактировал sava1 - 12.11.14, 13:50

[TipsyKID]

Насколько я понял, Вам необходимо перебрать все не проведенные чекиККМ и для табличной части Товары проставить Склад , такой какой указан для номенклатурной группы из регистра "РаспределениеПродаж".
Если это так, то используйте мой код ( сделав архивную копию )

[sava1]

как обрашаться к значению Реквизита в РегистреСведений

К регистру - прочитать - запросом, записать - набор записей/менеджер ....
К документу - для изменения нужно иметь обЪект, а не выборку

[TipsyKID]

(14) Вполне прилично.
Выборку сгруппировать по Документ,строка и перебирать по группировкам - тогда не надо отслеживать ТекДок

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

[sava1]

|    ЧекККМТовары.*,
|    РаспределениеПродаж.Склад КАК Склад

Там не получиться два поля Склад ?