Имя: Пароль:
1C
1С v8
Ошибки тонкого клиента (((
0 Маленький Вопросик
 
30.08.12
13:42
Простейшай процедура:

&НаКлиенте
Процедура ОбновитьПоступления(Команда)
   
НайдемВсеПоступления = Новый Запрос("ВЫБРАТЬ
                                   |    ПоступлениеТоваровУслуг.Номер КАК Номер,
                                   |    ПоступлениеТоваровУслуг.Дата КАК Дата,
                                   |    ПоступлениеТоваровУслуг.Ссылка КАК Ссылка,
                                   |    ПоступлениеТоваровУслуг.СуммаДокумента КАК СуммаДокументы
                                   |ИЗ
                                   |    Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг");    
   
   
КонецПроцедуры

Ругается...

{Форма.Форма.Форма(6,30)}: Тип не определен (Запрос)
НайдемВсеПоступления = Новый <<?>>Запрос("ВЫБРАТЬ (Проверка: Тонкий клиент)

Как победить???? Спасибо!
1 vmv
 
30.08.12
13:42
вот отсуда
2 neckto
 
30.08.12
13:43
На клиенте не доступен Запрос
3 mikecool
 
30.08.12
13:43
(0) почитать доступность в СП
4 Маленький Вопросик
 
30.08.12
13:45
а как сделать?
5 rphosts
 
30.08.12
13:47
смотьрим контекст объекта запрос
6 Rusland
 
30.08.12
13:47
Конструкция такая:

&НаКлиенте
Процедура ОбновитьПоступления(Команда)
Процедура ОбновитьПоступленияНаСервере();
КонецПроцедуры

&НаСервере
Процедура ОбновитьПоступленияНаСервере()
НайдемВсеПоступления = Новый Запрос("ВЫБРАТЬ
                                   |    ПоступлениеТоваровУслуг.Номер КАК Номер,
                                   |    ПоступлениеТоваровУслуг.Дата КАК Дата,
                                   |    ПоступлениеТоваровУслуг.Ссылка КАК Ссылка,
                                   |    ПоступлениеТоваровУслуг.СуммаДокумента КАК СуммаДокументы
                                   |ИЗ
                                   |    Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг");
КонецПроцедуры
7 rool
 
30.08.12
13:47
(4) а что мешает &насервере выборку результата запроса получить? )
8 nicxxx
 
30.08.12
13:48
слово Процедура здесь явно лишнее :)

&НаКлиенте
Процедура ОбновитьПоступления(Команда)
     ОбновитьПоступленияНаСервере();
КонецПроцедуры
9 Rusland
 
30.08.12
13:48
Сори
&НаКлиенте
Процедура ОбновитьПоступления(Команда)
ОбновитьПоступленияНаСервере();
КонецПроцедуры
10 Азат
 
30.08.12
13:48
(0) давай 3 косаря, научу
11 Rusland
 
30.08.12
13:49
(8) :) Копипаст блин. :)
12 Маленький Вопросик
 
30.08.12
13:55
а как обновить табличную часть на форме, если табличная часть - это реквизит обработки?

МояТабЧасть.Обновить(); - ругается на тонкий клиент (((
13 Rusland
 
30.08.12
13:57
&НаСервере
......
Пока РезультатЗапроса.Следующий() Цикл
НоваяСтрока=МояТабЧасть.Добавить();
НоваяСтрока.ИмяКолонки=РезультатЗапроса.КакойтоРезультат;
.....
КонецЦикла;
........
Как то так.
14 nicxxx
 
30.08.12
13:58
сначала ДанныеФормыВЗначение() - передаешь таб часть на сервер
потом обновляешь на сервере
потом обратно на клиента передаешь с помощью    
ЗначениеВДанныеФормы()
15 nicxxx
 
30.08.12
13:59
это если у тебя ТЗ на форме, а если табличная часть - то вроде при изменении на сервер само на клиенте изменится, передавать ничего не надо
16 Маленький Вопросик
 
30.08.12
14:03
&НаСервере
Функция ОбновитьПоступленияНаСервере(ДатаНачала, ДатаКонца, Организация)
   
   НайдемВсеПоступления = Новый Запрос("ВЫБРАТЬ
                                       |    ПоступлениеТоваровУслуг.Номер КАК Номер,
                                       |    ПоступлениеТоваровУслуг.Дата КАК Дата,
                                       |    ПоступлениеТоваровУслуг.Ссылка КАК Ссылка,
                                       |    ПоступлениеТоваровУслуг.СуммаДокумента КАК СуммаДокументы
                                       |ИЗ
                                       |    Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг
                                       |ГДЕ
                                       |    ПоступлениеТоваровУслуг.Дата МЕЖДУ &Дата1 И &Дата2
                                       |    И ПоступлениеТоваровУслуг.Организация = &Организация");    
                                       
   НайдемВсеПоступления.УстановитьПараметр("Дата1",ДатаНачала);
   НайдемВсеПоступления.УстановитьПараметр("Дата2",ДатаКонца);
   НайдемВсеПоступления.УстановитьПараметр("Организация",Организация);

   ПоступленияВыбранные = НайдемВсеПоступления.Выполнить().Выгрузить();
   
   Для Каждого Стр ИЗ ПоступленияВыбранные Цикл
       
       НоваяСтрока =  ДокументыПоступления.Добавить();
       
   КонецЦикла;
   
   
   
   
   //Возврат ПоступленияВыбранные.Количество();
                                   
КонецФункции

Вроде не сработало:

{Форма.Форма.Форма(51,18)}: Переменная не определена (ДокументыПоступления)
       НоваяСтрока =  <<?>>ДокументыПоступления.Добавить(); (Проверка: Сервер)
17 Маленький Вопросик
 
30.08.12
14:04
ДокументыПоступления - это как раз реквизит-обработки таблица с колонками
18 Rusland
 
30.08.12
14:06
ДокументыПоступления - ПКМ, свойства - в ПутьКДанным что указано?
19 Dimasik2007
 
30.08.12
14:07
Как еще никто не отправил читать СП и маны по УФ...
20 Маленький Вопросик
 
30.08.12
14:13
(18) да, указано
21 Rusland
 
30.08.12
14:16
(20) Что указано?
В общем, вместо
НоваяСтрока =  ДокументыПоступления.Добавить();
Напиши
НоваяСтрока =  ТоЧтоУказановПутьКДанным.Добавить();
22 Маленький Вопросик
 
30.08.12
14:27
&НаСервере
Процедура ОбновитьПоступленияНаСервере(ДатаНачала, ДатаКонца, Организация)
   
   НайдемВсеПоступления = Новый Запрос("ВЫБРАТЬ
                                       |    ПоступлениеТоваровУслуг.Номер КАК Номер,
                                       |    ПоступлениеТоваровУслуг.Дата КАК Дата,
                                       |    ПоступлениеТоваровУслуг.Ссылка КАК Ссылка,
                                       |    ПоступлениеТоваровУслуг.СуммаДокумента КАК СуммаДокументы
                                       |ИЗ
                                       |    Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг
                                       |ГДЕ
                                       |    ПоступлениеТоваровУслуг.Дата МЕЖДУ &Дата1 И &Дата2
                                       |    И ПоступлениеТоваровУслуг.Организация = &Организация");    
                                       
   НайдемВсеПоступления.УстановитьПараметр("Дата1",ДатаНачала);
   НайдемВсеПоступления.УстановитьПараметр("Дата2",ДатаКонца);
   НайдемВсеПоступления.УстановитьПараметр("Организация",Организация);

   ПоступленияВыбранные = НайдемВсеПоступления.Выполнить().Выгрузить();
   
   Для Каждого Стр ИЗ ПоступленияВыбранные Цикл
       
       НоваяСтрока =  Объект.ДокументыПоступления.Добавить();
       НоваяСтрока.ДатаДок = Стр.Дата;
       НоваяСтрока.НомерДок = Стр.Номер;

       
       
   КонецЦикла;
   
   
   
   
   //Возврат ПоступленияВыбранные.Количество();
                                   
КонецПроцедуры


сработало