Технология клиент-сервер в 1С 8.0 #7210

Стоит задача оптимизировать расчеты в базе 1С 8.0 с помощью клиент-серверной технологии. Установили сервер 8.0. При конструкции Если Клиент Тогда КонецЕсли все работает, программа выполяет заключенные внутри конструкции процедуры. Все что внутри Если Сервер Тогда КонецЕсли не выполняется. Как можно вынести скажем процедуру которая что-то считает на сервер и ее результат увидеть на клиенте?

Приведи код процедуры.

Пока я только упражняюсь :) К примере в модуле приложения объявляю переменную Н экспортной. В общем модуле пишу #Если Сервер Тогда КонецПроцедуры Потом в модуле документа вставляю кнопку к которой привязана процедура В итоге при нажатии на кнопку в этом документе вижу Н= и все. А не Н=4 Хотелось бы принцип понять, как можно пользоваться конструкцией Если Сервер Тогда КонецЕсли

Оформите объявление переменной в такие же директивы "#Если Сервер Тогда".

Сделала. В модуле приложения пишу #Если Сервер Тогда #КонецЕсли Теперь при попытке открыть документ с кнопкой или создать новый выдается ошибка {Документ.ОприходованиеТоваров.Форма.ФормаДокумента(659,18)}: Переменная не определена (Н)            Сообщить("Н="+<<?>>Н);

Ты хочешь на клиенте использовать переменную, которая физически существует на сервере?

А что надо делать если я хочу что-то рассчитать на сервере а результат увидеть на клиенте? К сожелению не нашла на диске ИТС ни одного примера использования конструкции Если Сервер Тогда КонецЕсли. Только Если Клиент Тогда КонецЕсли видела.

Обращаю внимание: "Если блок #Если Сервер тогда ... #КонецЕсли включает только часть процедуры, то процедура будет присутствовать как на стороне клиента, так и на стороне сервера. Только на клиенстской стороне она будет без той части, которая заключена в блок, поэтому результат выполнения процедуры может зависеть от того, где обрабатывается вызов этой процедуры". (Описание встроенного языка, т.1, с.1-40). Поэтому для гарантии хорошо бы заключить в блок условной компиляции ВСЮ процедуру.

Нужно оформить всю процедуру/функцию в директивы #Если Сервер Тогда и вызывать ее на клиенте. Вызов будет переадресован на сервер. У общих модулей есть еще флаг-свойство "Сервер". При его установке модуль будет присутствовать на сервере 1С:Предприятия 8.0.

(Описание встроенного языка, т.1, с.1-40). Читала. Включала всю процедуру т е писала в общем модуле #Если Сервер Тогда #КонецЕсли При этом при попытке открыть документ с кнопкой или создать новый получаю сразу 2 ошибки {Документ.ОприходованиеТоваров.Форма.ФормаДокумента(659,18)}: Переменная не определена (Н)            Сообщить("Н="+<<?>>Н); {Документ.ОприходованиеТоваров.Форма.ФормаДокумента(658,3)}: Процедура или функция с указанным именем не определена (Сообщение)        <<?>>Сообщение; Я понимаю что это из-за того что нахожусь на клиентской стороне. Вопрос в том как можно что-то сделать на серверной стороне и воспользоваться результатами?

Вначале не заметил. "...в модуле приложения объявляю переменную Н экспортной". Но общий модуль не видит экспорта из модуля приложения. В выражении Н = 2*2 процедуры общего модуля переменная Н создается неявно как локальная переменная процедуры. Тут как ни крути - в таком варианте работать не будет. Передай переменную через параметр.

Большое спасибо! Про галочку общего модуля я и забыла! Все получилось!

Расположи процедуру или функцию в общем модуле и поставь у него флаг "Сервер". Флаг "Клиент" можно снять.

Про модуль приложения я уже поняла :) Передала через параметр.

Так и сделала. Расположила в общем модуле и поставила флаг сервер. Еще раз спасибо.

А вторая ошибка, сдается мне, из-за того, что обращение к процедуре, компилируемой на сервере, происходит из модуля формы. Попробуй из модуля документа (впрочем, не уверен).

Нет, теперь и из модуля формы получилось. Н=4 пишет.