Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
23 ноя 2024, 03:16

Форма

Автор Дринкинс, 15 авг 2013, 00:01

0 Пользователей и 2 гостей просматривают эту тему.

Дринкинс

Все это конечно хорошо что объяснили огромное спасибо. Но я догнать немогу как потом по оформлениюстрок пройти и вставить туда данные из выборки запроса.

mixqn

Цитата: Дринкинс от 18 авг 2013, 15:21Но я догнать немогу как потом по оформлениюстрок пройти и вставить туда данные из выборки запроса.
в цикле.
я же выложил обработку для примера, посмотрите там.
Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
Сообщить(Строка(мПриПолученииДанных) + " ;" + ОформлениеСтроки.ДанныеСтроки.Наименование);
КонецЦикла;

Дринкинс

ЭТО ПОНЯТНО НО как туда передать выборку из запроса.
Выборка = Запрос.Выполнить.Выбрать();
Пока Выборка.Следующий() Цикл

КонецЦикла;

Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
    //как сюда цену передать или я чтто не так делаю   
КонецЦикла;

mixqn

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

Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
Если Выборка.НайтиСледующий(Новый Структура("Номенклатура", ОформлениеСтроки.ДанныеСтроки.Ссылка)) Тогда
ОформлениеСтроки.Ячейки.Цена.УстановитьТекст(Формат(Выборка.Цена, "ЧДЦ=2"));
Выборка.Сбросить();
КонецЕсли;
КонецЦикла;

примечание: запрос должен выбирать номенклатуру и цены, т.е. должно быть минимум 2 колонки: Номенклатура и Цена
Добавлено: 18 авг 2013, 23:24


для наглядности доработал ту же самую обработку, которую выкладывал ранее: добавил в форму колонку "Курс", запросом получаю курсы и вывожу.
у вас будет ровно 1 в 1, только с ценами.

Дринкинс

А вт оно как.  я хотел вызывать запрос из цикла на возврат но потом понял что это не правильно

mixqn

ну и, пожалуй, выложу код, чтоб можно было даже обработку не смотреть :)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| КурсыВалютСрезПоследних.Валюта,
| КурсыВалютСрезПоследних.Курс
|ИЗ
| РегистрСведений.КурсыВалют.СрезПоследних КАК КурсыВалютСрезПоследних";

Результат = Запрос.Выполнить();

Выборка = Результат.Выбрать();

Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
Если Выборка.НайтиСледующий(Новый Структура("Валюта", ОформлениеСтроки.ДанныеСтроки.Ссылка)) Тогда
ОформлениеСтроки.Ячейки.Курс.УстановитьТекст(Формат(Выборка.Курс, "ЧДЦ=2"));
Выборка.Сбросить();
КонецЕсли;
КонецЦикла;

Дринкинс

Спасибо
Добавлено: 18 авг 2013, 23:30


Что то я сразу через структуру то и не сообразил. Будем учиться:D

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск