Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.12.2016, 19:49   #1
Svyatoslav359
Пользователь
 
Регистрация: 05.06.2015
Сообщений: 24
По умолчанию Выборка выбранного пользователем документа - 1С

Здравствуйте, делаю мобильное приложение на 1С: Предприятие 8.3.
Тут ситуация такая:
С мобильной базы(1С: моб.) отправляю документ в другую информационную базу(1с: комп).
В другой инф. базы его получаю. Всё ок.

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

Короче говоря, мне нужно сделать выборку только ОДНОГО выбранного мной документа, а не все сразу. Мол, выбрал в нужный мне документ в моб. приложении, и обновил его, а не всё сразу(Лишние документы появляются, и выбранный мой документ не обновляется). Как быть?
Вот код с веб сервера:

Тут я делаю выборку документов( а мне нужно только одного)

Код:
Функция ОтветЗаявления(Код_Устройства, ДанныеОтвета)

ДанныеДляВыгрузки=Новый Структура("Ответ", Новый Массив) ;
Выборка=Вычислить(ДанныеОтвета+".Выбрать()"); //подумать над выборкой, либо условия в цикле, либо пересмотреть саму выборку.  Можно и так записать: Выборка=Документы.Участие.Выбрать();
	
Пока Выборка.Следующий() Цикл   
	
		
ОбъектДляВыгрузки=Выборка.Ссылка.ПолучитьОбъект();//  объект для преобразования xml

Описание=Новый ЗаписьXML;   //создаваемая запись в xml
Описание.УстановитьСтроку(); // вывод в строку
СериализаторXDTO.ЗаписатьXML(Описание,ОбъектДляВыгрузки);  //Перевод в XML
ОписаниеОтвета=Описание.Закрыть();     //искомая строка с xml описание
 
	ДанныеДляВыгрузки.Ответ.Добавить(ОписаниеОтвета);	// добавляю в структуру
	Возврат Новый ХранилищеЗначения(ДанныеДляВыгрузки, Новый СжатиеДанных(9))	
	КонецЦикла;

				
		КонецФункции
Тут я получаю данные из базы данных 1С: комп в мобильную БД

Код:
Процедура ПолучитьОтвет (Знач ЭкспортОтветаИзБазы) Экспорт
	Если ЭкспортОтветаИзБазы="Ответ" Тогда
		ПолучитьНашОтвет()
		КонецЕсли    ;
	КонецПроцедуры
	
	
	
		Процедура ПолучитьНашОтвет()
	Перем ВебСервис	;
		Сервис.Подключить(ВебСервис, "ОбменДанными");
		
Ответ=ВебСервис.ОтветЗаявления(Константы.КодМобильногоУстройства.Получить(),"Документы.Участие");
		  ЗагрузитьОтвет(Ответ);
		
	  КонецПроцедуры
	  
	  	  
Процедура ЗагрузитьОтвет(ПакетСДанными)
		 ДанныеДляВыгрузки=ПакетСДанными.Получить(); 
		 
 Для каждого ОписаниеОтвета из ДанныеДляВыгрузки.Ответ Цикл
			 
		Описание=Новый ЧтениеXML;
		Описание.УстановитьСтроку(ОписаниеОтвета);
		НовыйОбъект=СериализаторXDTO.ПрочитатьXML(Описание);
		НовыйОбъект.Записать()
		 
	КонецЦикла;
	
КонецПроцедуры

Последний раз редактировалось Svyatoslav359; 02.12.2016 в 19:49. Причина: Выделить код.
Svyatoslav359 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Фокус выбранного элемента Defunate C# (си шарп) 2 06.02.2012 10:14
Дано: таблица в Exel (3 столбца, 4000 строк) и шаблон документа. Задача: Распечатать один и тот-же шаблон документа, под Evgenya040305 Помощь студентам 2 24.11.2011 22:21
Значение выбранного диапазона. Vasek007 Microsoft Office Excel 2 29.09.2010 21:53
Выборка выборка с таблицы с отношением многие-ко-многим 8alig8 БД в Delphi 2 24.06.2010 12:21
Имя выбранного изображения SergGhost JavaScript, Ajax 0 25.04.2010 17:39