Имя: Пароль:
1C
1С v8
Управляемое приложение &НаКлиенте &НаСервере
0 Snik_666
 
05.03.13
13:55
Добрый день! подскажите как правильно записать чтобы сработало.
Задача:  Обработка по кнопке рассчитать должна поработать с последовательностью.
в обработке
&НаКлиенте
Процедура Рассчитать(Команда)
   РаботаСПоследовательностью.ВостановлениеПоследовательности();    
КонецПроцедуры

общий модуль РаботаСПоследовательностью стоит галка клиент и сервер
Процедура ВостановлениеПоследовательности() Экспорт    
Сообщить("ВостановлениеПоследовательности...");
//определим границу
   Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1
   |    УчетПоПартиямГраницы.МоментВремени КАК МоментВремени
   |ИЗ
   |    Последовательность.УчетПоПартиям.Границы КАК УчетПоПартиямГраницы
   |
   |УПОРЯДОЧИТЬ ПО
   |    МоментВремени";
   
   Выборка = Запрос.Выполнить().Выбрать();
   Если Выборка.Следующий() Тогда
       ГПт = Выборка.МоментВремени;
   Иначе
       ГПт = Новый МоментВремени('00010101');
   КонецЕсли;
   
КонецПроцедуры



при компиляции

{ОбщийМодуль.РаботаСПоследовательностью.Модуль(26,17)}: Тип не определен (Запрос)
   Запрос = Новый <<?>>Запрос; (Проверка: Тонкий клиент)
{ОбщийМодуль.РаботаСПоследовательностью.Модуль(39,15)}: Тип не определен (МоментВремени)
       ГПт = Новый <<?>>МоментВремени('00010101'); (Проверка: Тонкий клиент)
1 Maxus43
 
05.03.13
13:58
запросы надо выполнять на сервере
2 bizon2008
 
05.03.13
13:58
Тип определи. Русским же языком сказано.
Тип не определен (МоментВремени)
3 ll13
 
05.03.13
13:59
убрать галку сервер
добавить галку вызов сервера
4 Darth Anyan
 
05.03.13
13:59
Процедура модуля должна выполняться только на сервере - в твоем случае директива &НаСервере, и у модуля должен быть флажок "Вызов Сервера".
Хотя лучше, конечно, разнести модуль на несколько, как сделано в типовых.
5 ll13
 
05.03.13
14:00
(3) + конечно же следует читать "убрать галку клиент"
6 RomaH
 
naïve
05.03.13
14:01
вызов процедуры передай из &НаСервере
&НаКлиенте
Процедура Рассчитать(Команда)
   РассчитатьНаСервере();    
КонецПроцедуры

&НаСервере
Процедура РассчитатьНаСервере()
   РаботаСПоследовательностью.ВостановлениеПоследовательности();    
КонецПроцедуры
Независимо от того, куда вы едете — это в гору и против ветра!