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

1с82, самописная, внешняя обработка

Автор asdfr1, 10 авг 2012, 10:35

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

asdfr1

внешняя обработка.Необходимо заменить одно значение на другое.Проводок нет.Выбираю запросом
Что = ЭтаФорма.ЭлементыФормы.Что.Значение;
КонтрольнаяДата = ТекущаяДата();
НаКого =  ЭтаФорма.ЭлементыФормы.НаКого.Значение;


    Запрос = Новый Запрос;
    Запрос.Текст =
"ВЫБРАТЬ
|      Задача.Ссылка КАК Ссылка,
|      Задача.Представление,
|      Задача.ТочкаМаршрута,
|      ПРЕДСТАВЛЕНИЕ(Задача.ТочкаМаршрута),
|      Задача.Наименование,
|      Задача.Пользователь КАК Пользователь1,
|      ПРЕДСТАВЛЕНИЕ(Задача.Пользователь),
|      Задача.Создатель,
|      ПРЕДСТАВЛЕНИЕ(Задача.Создатель),
|      Задача.БизнесПроцесс.Номер
|   ИЗ
|      Задача.Задача КАК Задача
|   ГДЕ

|      Задача.Выполнена = ЛОЖЬ
|      И Задача.КонтрольныйСрок < &КонтрольнаяДата
|       И Задача.Пользователь = &Что
|
|ДЛЯ ИЗМЕНЕНИЯ";

а дальше непонятки :
  Для каждого Строка Из ТЗ Цикл
Объект = Строка.Ссылка.ПолучитьОбъект();
Для каждого Строка Из ТЗ Цикл
         
Заменяемые.Вставить(Что, НаКого);
Объект.Записать();
КонецЦикла;  КонецЦикла;

и не записывает :(





asdfr1

или как-то так :
      Для каждого Строка Из ТЗ Цикл
Объект = Строка.Ссылка.ПолучитьОбъект();
Объект.Пользователь = НаКого;

Сообщить(Объект.Исполнитель);

Объект.Записать();
КонецЦикла;  КонецЦикла;
ткните кто-нибудь носом

cska-fanat-kz

"...Для каждого Строка Из ТЗ Цикл..."

Скорее меня ткните носом где у вас выше что нибудь вроде
"ТЗ = ..."
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

asdfr1

Цитата: cska-fanat-kz от 10 авг 2012, 14:50
"...Для каждого Строка Из ТЗ Цикл..."

Скорее меня ткните носом где у вас выше что нибудь вроде
"ТЗ = ..."
ТЗ = Результат.Выгрузить();
ОткрытьЗначение(ТЗ);

asdfr1

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

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

Для каждого Строка Из ТЗ Цикл
Объект = Строка.Ссылка.ПолучитьОбъект();
Объект.Пользователь = НаКого;
Сообщить(Объект.Исполнитель);
Объект.Записать();
КонецЦикла; КонецЦикла;

тема закрыта

asdfr1

Цитата: asdfr1 от 10 авг 2012, 11:16
обычная невнимательность, подсказали на другом форуме :

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

Для каждого Строка Из ТЗ Цикл
Объект = Строка.Ссылка.ПолучитьОбъект();
Объект.Пользователь = НаКого;
Сообщить(Объект.Исполнитель);
Объект.Записать();
КонецЦикла; КонецЦикла;

тема закрыта

Теги:

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

Рейтинг@Mail.ru

Поиск