powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / [игнор отключен] [закрыт для гостей] / Помогите с решением задачи
8 сообщений из 8, страница 1 из 1
Помогите с решением задачи
    #38483615
dantepavel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть справочник Номенклатура в котором находятся услуги и регистр сведений в котором хранятся цены на услугу, а так же срок исполнения услуги. Нужно создать чек в котором при добавлении услуги автоматически добавлялись данные из регистра сведений в поля стоимость и срок исполнения.
В задании сказано сделать это следующим образом:

1. В модуле формы написать клиентскую процедуру вида:
&НаКлиенте
Процедура ТабличнаяЧасть1УслугаПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.ТабличнаяЧасть1.ТекущиеДанные;
//вызов серверной процедуры, но вначале подготовим данные
Стоимость = 0
Срок = 0
ПолучитьДанныеУслуги(СтрокаТабличнойЧасти.Услуга, Стоимость, Срок)
СтрокаТабличнойЧасти.Стоимость = Стоимость;
СтрокаТабличнойЧасти.Срок = Срок;
КонецПроцедуры

Если данные в регистре сведений, а не справочнике, то в процедуру надо еще передать дату Объект.Дата.

2. Создать процедуру в модуле на сервере.

Процедура ПолучитьДанныеУслуги(Элемент, Стоимость, Срок) Экспорт
создать новый объект для поиска по справочнику, используя Элемент
найти запись, вызвав метод НайтиПоНаименованию()
извлечь из записи значения полей стоимость и срок и присвоить их переменным Стоимость и Срок
КонецПроцедуры

Если данные в регистре сведений, то использовать метод ПолучитьПоследнее().

До этого сделал это задание использованием общих модулей с дальнейшим вызовом их в модуле формы документа и все работало.
Сейчас другим способом сделать и вообще никак не могу сообразить что к чему.
Помоги плиз. Если можно скиньте текст модуля формы.
...
Рейтинг: 0 / 0
Помогите с решением задачи
    #38483675
Программист 1с
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А на мисте сколько попросили за решение?
...
Рейтинг: 0 / 0
Помогите с решением задачи
    #38483683
dantepavel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
я туда и не обращался даже Программист 1с,
...
Рейтинг: 0 / 0
Помогите с решением задачи
    #38483709
Последний выдох ГПЖ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>создать новый объект для поиска по справочнику, используя Элемент
>найти запись, вызвав метод НайтиПоНаименованию()

там так и было? странное задание... лезть на сервер с ссылкой на услугу и искать первую попавшуюся по имени...
...
Рейтинг: 0 / 0
Помогите с решением задачи
    #38483801
dantepavel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
в каком виде задание выложили в таком и выложил, просто через общий модуль оно просто сделать, а вот в таком виде проблематично,Последний выдох ГПЖ,
...
Рейтинг: 0 / 0
Помогите с решением задачи
    #38483924
Последний выдох ГПЖ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dantepavelв каком виде задание выложили в таком и выложил, просто через общий модуль оно просто сделать, а вот в таком виде проблематично,Последний выдох ГПЖ,

другим - это каким?

общие модули могут быть серверными - п.э. там доступны запросы и прочие шняги для лазинья в базу за реквизитами... искать событие возникающее на сервере и доступное на сервере? Типа как ПриСозданииНаСервере?
...
Рейтинг: 0 / 0
Помогите с решением задачи
    #38483926
Последний выдох ГПЖ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
уход от управляемых форм в сторону толстого клиента?
...
Рейтинг: 0 / 0
Помогите с решением задачи
    #38483994
dantepavel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ну до того как сказали сделать решение задачи данным способом у меня было сделано все вроде как банально
&НаКлиенте
Процедура ПрейскурантУслугНаименованиеУслугиПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.ПрейскурантУслуг.ТекущиеДанные;
СтрокаТабличнойЧасти.Стоимость = АктуальнаяСтоимость.Стоимость(
Объект.Дата, СтрокаТабличнойЧасти.НаименованиеУслуги);
СтрокаТабличнойЧасти.СрокИсполнения = АктуальныйСрокИсполнения.
СрокиИсполнения(Объект.Дата, СтрокаТабличнойЧасти.НаименованиеУслуги);
КонецПроцедуры
был такой модуль в форме документа, а в обих модулях были две функции: АктуальнаяСтоимость.Стоимость и АктуальныйСрокИсполнения.СрокиИсполнения, и работало все, то есть когда я выбирал услугу в документе, то автоматически добавлялась и стоимость услуги и ее срок исполнения в соответствующий поля табличной части документа, Последний выдох ГПЖ,
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / [игнор отключен] [закрыт для гостей] / Помогите с решением задачи
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]