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

Как записать данные в форму при выполнении на сервере без контекста?

Автор PapooAss, 05 дек 2014, 12:17

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

PapooAss

Есть вот такой код:

&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи) экспорт
        ТекОбъект = Объект.Наименование;
        ПередЗаписьюНаСервере(ТекОбъект);
   
КонецПроцедуры

&НаСервереБезКонтекста
Процедура ПередЗаписьюНаСервере(ТекОбъект) экспорт
    ТекСотруд = Справочники.Сотрудник.НайтиПоНаименованию(ТекОбъект);
    ЗванОтбор = ТекСотруд.Владелец;
    ОтборЗваний = Новый Структура;
    ОтборЗваний.Вставить("Сотрудник", ТекСотруд);

    ВЗвание = РегистрыСведений.ВоинскоеЗвание;
    ТекЗвание = ВЗвание.ПолучитьПоследнее(ТекущаяДата(), ЗванОтбор);
    финал = ТекЗвание.ВоинскоеЗвание;
   

КонецПроцедуры

Задача: записать значение "Финал" в Объект.ВоинскоеЗвание на форме

Или может кто посоветует проще сделать как достать последнюю запись из РегистраСведений и записать ее в Объект.ВоинскоеЗвание

дфтын

Ну вы добавьте, что возвращать будете
ПередЗаписьюНаСервере(ТекОбъект, финал)
и после вызова работайте с финалом

PapooAss

Цитата: дфтын от 05 дек 2014, 12:30
Ну вы добавьте, что возвращать будете
ПередЗаписьюНаСервере(ТекОбъект, финал)
и после вызова работайте с финалом

СПАСИБО!!!! Я чувствовал, что истина где-то рядом!!! считал, что параметры передаются в одностороннем порядке, ан нет!  :) буду знать!!!

дфтын


cska-fanat-kz

а еще можно процедуру
Процедура ПередЗаписьюНаСервере(ТекОбъект) экспорт
превратить в функцию...

1. смысл в ключевом слове "экспорт"?
2. "ТекЗвание = ВЗвание.ПолучитьПоследнее(ТекущаяДата(), ЗванОтбор);" званотбор по идее должен быть структурой, а он у вас какой то
"ЗванОтбор = ТекСотруд.Владелец;". У вас точно этот код - рабочий?
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

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

Рейтинг@Mail.ru

Поиск