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

проведение из управляемой формы

Автор agusikdeon, 06 дек 2012, 17:45

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

agusikdeon

конфа Автосервис(на основе УНФ 8.2)


вот код обработки





&НаКлиенте
Процедура установитьскидку(Команда)
а=Элементы.Поле3.ТекстРедактирования;
б=Элементы.Поле2.ТекстРедактирования;
в=Элементы.Поле4.ТекстРедактирования;
г=Элементы.Поле1.ТекстРедактирования;
ВыполнитьВыборкуНаСервере(а,б,в,г);

Сообщение=Новый СообщениеПользователю();
Сообщение.Текст="Скидки установленны";
Сообщение.Сообщить();
                       
КонецПроцедуры

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


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

Для каждого товар из орт.работы Цикл
товар.ПроцентСкидкиНаценки=Число(Скидка);
Товар.Сумма=Товар.сумма-товар.сумма*Число(Скидка)/100;




КонецЦикла;
Орт.Записать(РежимЗаписиДокумента.Проведение);
КонецЦикла;
КонецПроцедуры
   


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

Теги:

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

Рейтинг@Mail.ru

Поиск