Управляемое приложение 8.2 / 1С

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / 1С [игнор отключен] [закрыт для гостей] / Управляемое приложение 8.2

3 сообщений из 3, страница 1 из 1

Управляемое приложение 8.2

#36806776

XSprinter

Гость

Добрый день, хочу освоить концепцию работы 8.2 в тонком клиенте .
Не понимаю как организовать следующий простой алгоритм, описываю схематично

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.

   Запрос = Новый  Запрос();
   Запрос.Текст = "Выбор набора ссылок БД";

   Выборка =  Запрос.Выполнить().Выбрать();
   Пока Выборка.Следующий() Цикл
        
        ОбработкаПрерыванияПользователя(); // данная функция не существует на сервере 1С
        
        Объект = Выборка.Ссылка.ПолучитьОбъект();
        //далее работа с объектом

   КонецЦикла;

Проблема в том что объект Запрос и непосредственная работа с объектами возможна только на сервере, а обработка прерывания пользователя только на клиенте.

...

Рейтинг:

0 / 0

23.08.2010, 18:41

| Ответить | Цитировать | Написать

Управляемое приложение 8.2

#36806790

XSprinter

Гость

Спасибо , пока писал сам понял, что-то такое

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.

 
     Список = ПолучениеНаборасСылокНаСервере();

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

     КонецЦикла;

но жаль что набор ссылок необходимо возвращать на клиента
только для вызова процедуры ОбработкаПрерыванияПользователя.

Может есть более эффективные варианты?

...

Рейтинг:

0 / 0

23.08.2010, 18:50

| Ответить | Цитировать | Написать

Управляемое приложение 8.2

#37037356

lerpapod

Гость

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.

&НаСервере
Функция ИнициализацияОбработкиСервер()

    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |   Спр.Ссылка
    |ИЗ
    |   Справочник.Банки КАК Спр";

    Данные      = Запрос.Выполнить().Выгрузить();
    АдресДанных = ПоместитьВоВременноеХранилище(Данные, УникальныйИдентификатор);

    // Обработка
    // В справочнике ~  4000  элементов
    Возврат Данные.Количество();

КонецФункции

&НаСервереБезКонтекста
Функция ОбработатьЭлемент(ДанныеЭлемента)

    СпрОбъект = ДанныеЭлемента.Ссылка.ПолучитьОбъект();

    // Обработка

    СпрОбъект.ОбменДанными.Загрузка = Истина;
    СпрОбъект.Записать();

КонецФункции

&НаСервереБезКонтекста
Функция ОбработатьПорциюНаСервере(Начало, Конец, АдресДанных)

    Данные = ПолучитьИзВременногоХранилища(АдресДанных);

    Для Счетчик = Начало -  1  По Конец -  1  Цикл

        ОбработатьЭлемент(Данные[Счетчик]);

    КонецЦикла;

КонецФункции

&НаКлиенте
Процедура ВыполнитьОбработку(Команда)

    Количество      = ИнициализацияОбработкиСервер();
    РазмерШага      =  10 ;
    КоличествоШагов = Цел(Количество / РазмерШага);
    КоличествоЦел   = КоличествоШагов * РазмерШага;

    Если КоличествоЦел < Количество Тогда
        Элементы.Индикатор.МаксимальноеЗначение = КоличествоШагов +  1 ;
    Иначе
        Элементы.Индикатор.МаксимальноеЗначение = КоличествоШагов;
    КонецЕсли;

    Для Счетчик =  1  По КоличествоШагов Цикл

        ОбработатьПорциюНаСервере(РазмерШага * (Счетчик -  1 ) +  1 , РазмерШага * Счетчик, АдресДанных);
        Индикатор = Счетчик;
        ОбработкаПрерыванияПользователя();

    КонецЦикла;

    Если КоличествоЦел < Количество Тогда

        ОбработатьПорциюНаСервере(КоличествоШагов * РазмерШага +  1 , Количество, АдресДанных);
        Индикатор = Индикатор +  1 ;

    КонецЕсли;

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

by http://infostart.ru/public/76309/

...

Рейтинг:

0 / 0

27.12.2010, 16:23

| Ответить | Цитировать | Написать

3 сообщений из 3, страница 1 из 1

Форумы / 1С [игнор отключен] [закрыт для гостей] / Управляемое приложение 8.2

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=28&gotonew=1&tid=1521710]:	0ms
get settings:	11ms
get forum list:	13ms
check forum access:	3ms
check topic access:	3ms
track hit:	166ms
get topic data:	7ms
get first new msg:	4ms
get forum data:	3ms
get page messages:	27ms
get tp. blocked users:	1ms
others:	237ms

total:	475ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы