Ка изменить значение поля выборки?

@~~Gokusa~~ · 28.04.2012, 19:56. **Показов** 20550. **Ответов** 11

Author24 — интернет-сервис помощи студентам

Ну собственно вчерашний вариант продолжение, руки до компа тока к вечеру дошли

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

1C

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

@Fenomen · 28.04.2012, 20:08

Сообщение от Gokusa

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

Выборка - это объект типа "ВыборкаИзРезультатаЗапроса".
Синтаксис помощник:

ВыборкаИзРезультатаЗапроса (QueryResultSelection)
<Имя поля> (<Field name>)
Использование:

Только чтение.

Трудно посмотреть? Может быть вы не знаете комбинацию Ctrl + F1?

И вообще зачем Вам менять свойство выборки?

@~~Gokusa~~ · 28.04.2012, 20:13 **[ТС]**

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

Добавлено через 3 минуты
а можно выборку перекинуть в структуру?
такой ход используется, или это нелогично?

@duk337 · 28.04.2012, 20:25

Выборка из рез. запроса - это дерево, да ещё "хитрое" дерево. Ну его. Выгружайте в таблицу значений (это имелось в виду под "структурой"?)

@~~Gokusa~~ · 28.04.2012, 20:32 **[ТС]**

если не менять выборка.количество, то не исключена ситуация когда пользователь введет несколько раз одну и ту же номенклатуру в одну табличную часть и проводка, написанная без корректировки выборки, отработает неправильно.
или я ошибаюсь?

Добавлено через 2 минуты

Сообщение от duk337

Выборка из рез. запроса - это дерево, да ещё "хитрое" дерево. Ну его. Выгружайте в таблицу значений (это имелось в виду под "структурой"?)

наверное да, хоть груздем пусть называется

главное чтобы я делал с ним всё что хочу.
з.ы. а как ещё можно сделать проводку?
вариант записать, потом проверить остатки не подходит.
а как Выгрузить выборку в таблицуЗначений?

@duk337 · 28.04.2012, 20:35

Дык группировка есть. А если по-игроцки - при записи дока юзера предупреждать, может, цены разные?

Добавлено через 1 минуту

1C

1	тз=Запрос.Выполнить.Выгрузить()

@~~Gokusa~~ · 28.04.2012, 20:38 **[ТС]**

Что за "Дык Группировка"?

@duk337 · 28.04.2012, 20:43

Я ж не знаю, что Вы не знаете, что в запросе можно сгруппировать данные по одним полям, применив при этом агрегатные функции к другим. Опция ИТОГИ даёт дерево, по веткам которого прыгать выборкой. А ещё "дык свернуть" тз

@~~Gokusa~~ · 28.04.2012, 20:51 **[ТС]**

ууу, спасиб за ИТОГИ и группировку

@Dethmontt · 28.04.2012, 22:15

Может хватит бредятиной заниматься...

1C

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

Добавлено через 2 минуты
По старой методике

@~~Gokusa~~ · 28.04.2012, 23:20 **[ТС]**

ну типа логично
тоже спасиб

@duk337 · 29.04.2012, 08:42

Может хватит бредятиной заниматься...

гениальное рождается из бреда (вроде, Лао Цзы)

@Fenomen 900 / 877 / 8 Регистрация: 15.03.2012 Сообщений: 2,680
	28.04.2012, 20:08	2
	Сообщение от Gokusa Вопрос: выборка - это же массив, структура, не знаю чё, но всё таки переменная, как изменить значение некоторого поля этой переменной? Выборка - это объект типа "ВыборкаИзРезультатаЗапроса". Синтаксис помощник: ВыборкаИзРезультатаЗапроса (QueryResultSelection) <Имя поля> (<Field name>) Использование: Только чтение. Трудно посмотреть? Может быть вы не знаете комбинацию Ctrl + F1? И вообще зачем Вам менять свойство выборки? 0

@~~Gokusa~~ Заблокирован
	28.04.2012, 20:13 [ТС]	3
	чтобы она соответствовала актуальным данным и не городить запросы по сто раз и в цикле не делать запросы, как Вы посоветовали Добавлено через 3 минуты а можно выборку перекинуть в структуру? такой ход используется, или это нелогично? 0

@duk337 2955 / 1767 / 82 Регистрация: 03.11.2011 Сообщений: 8,280
	28.04.2012, 20:25	4
	Выборка из рез. запроса - это дерево, да ещё "хитрое" дерево. Ну его. Выгружайте в таблицу значений (это имелось в виду под "структурой"?) 0

@~~Gokusa~~ Заблокирован
	28.04.2012, 20:32 [ТС]	5
	если не менять выборка.количество, то не исключена ситуация когда пользователь введет несколько раз одну и ту же номенклатуру в одну табличную часть и проводка, написанная без корректировки выборки, отработает неправильно. или я ошибаюсь? Добавлено через 2 минуты Сообщение от duk337 Выборка из рез. запроса - это дерево, да ещё "хитрое" дерево. Ну его. Выгружайте в таблицу значений (это имелось в виду под "структурой"?) наверное да, хоть груздем пусть называется главное чтобы я делал с ним всё что хочу. з.ы. а как ещё можно сделать проводку? вариант записать, потом проверить остатки не подходит. а как Выгрузить выборку в таблицуЗначений? 0

@~~Gokusa~~ Заблокирован
	28.04.2012, 20:38 [ТС]	7
	Что за "Дык Группировка"? 0

@duk337 2955 / 1767 / 82 Регистрация: 03.11.2011 Сообщений: 8,280
	28.04.2012, 20:43	8
	Я ж не знаю, что Вы не знаете, что в запросе можно сгруппировать данные по одним полям, применив при этом агрегатные функции к другим. Опция ИТОГИ даёт дерево, по веткам которого прыгать выборкой. А ещё "дык свернуть" тз 0

@~~Gokusa~~ Заблокирован
	28.04.2012, 20:51 [ТС]	9
	ууу, спасиб за ИТОГИ и группировку 0

@~~Gokusa~~ Заблокирован
	28.04.2012, 23:20 [ТС]	11
	ну типа логично тоже спасиб 0

@duk337 2955 / 1767 / 82 Регистрация: 03.11.2011 Сообщений: 8,280
	29.04.2012, 08:42	12
	Может хватит бредятиной заниматься... гениальное рождается из бреда (вроде, Лао Цзы) 0