Имя: Пароль:
1C
 
1C WEB-сервисы запись ответа с сервера в документ.
,
0 Олеся999
 
08.06.15
08:56
Подскажите пожалуйста, (может кто работал с веб-сервисами),
Как записать ответы с сервера в документ.
Я нашла пример : https://www.youtube.com/watch?v=CztIhVHyW_U
Теперь хочу записать ответ в документ, где и как это лучше сделать ? :)

Скрин:http://lvkr.ru/f/RAm9x0/1280.jpg
1 icrocodile
 
08.06.15
09:07
как-то так :
ДокОбъект = Документы.ДанныеП.СоздатьДокумент();
ДокОбъект.Принятые = "Nu, privet";
ДокОбъект.Записать;
2 icrocodile
 
08.06.15
09:11
(1) только скобки еще:  ДокОбъект.Записать();
3 Олеся999
 
08.06.15
09:58
(2) (1) Спасибо :)
4 Олеся999
 
08.06.15
10:04
(1)
Написала так :

Функция HelloBaza(zapros)
    
    Если zapros = "Privet" Тогда
ДокОбъект = Документы.ДанныеП.СоздатьДокумент();
ДокОбъект.Принятые = "Nu, privet";
ДокОбъект.Записать();
        Ответ= "Nu, Privet";
    ИначеЕсли  zapros ="Poka" тогда
        Ответ= "Davay, Poka";
    ИначеЕсли  zapros <> "Privet" и zapros <> "Poka" Тогда
            Ответ= "Ne Ponyal";
        КонецЕсли;
        Возврат ответ;

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

И ОШИБКА:
{Обработка.test1.Форма.Форма.Форма(4)}: Ошибка при вызове метода контекста (HelloBaza)
    Ответ =Сервис.HelloBaza(Приветствие);
по причине:
Ошибка вызова операции сервиса:  {http://127.0.0.1}:Hello:HelloBaza()
по причине:
Ошибка SOAP сервера:  Неизвестная ошибка. {WebСервис.Hello.Модуль(7)}: Ошибка при вызове метода контекста (Записать)
по причине:
{WebСервис.Hello.Модуль(7)}: Ошибка при вызове метода контекста (Записать)
по причине:

по причине:
Значение поля "Дата" не может быть пустой датой
5 Chikko
 
08.06.15
10:29
Ну заполни дату в докобъекте...
6 icrocodile
 
08.06.15
10:29
(4) дату в документе надо заполнять, перед записать() добавить:
ДокОбъект.Дата = ТекущаяДата();
ДокОбъект.УстановитьНовыйНомер();
7 Олеся999
 
08.06.15
10:33
(6) Круто :) получилось :)
8 Олеся999
 
08.06.15
13:49
А как сделать что бы  текст в кавычках выгружала в кодировке UTF-8 ?



Функция HelloBaza(zapros)
    
    Если zapros = "Privet" Тогда
ДокОбъект = Документы.ДанныеП.СоздатьДокумент();
ДокОбъект.Принятые = "Nu, privet";
ДокОбъект.Записать();
        Ответ= "Nu, Privet";
    ИначеЕсли  zapros ="Poka" тогда
        Ответ= "Davay, Poka";
    ИначеЕсли  zapros <> "Privet" и zapros <> "Poka" Тогда
            Ответ= "Ne Ponyal";
        КонецЕсли;
        Возврат ответ;

КонецФункции
9 Олеся999
 
08.06.15
13:50
Точнее чтобы все выгружала в UTF-8
10 Fragster
 
гуру
08.06.15
13:50
там все и так в utf-8
11 Олеся999
 
08.06.15
14:05
(10) ну нужно, без BOM
12 Fragster
 
гуру
08.06.15
14:12
(11) поставь fiddler или wireshark, посмотри. сама строка в ответе идет в кавычках безо всяких BOM. вот перед ответом не помню, есть BOM, или нет, но даже если есть - то меня во всех внешних системах у меня все работало искаропки
13 ЧеловекДуши
 
08.06.15
14:19
(0) А кто будет настраивать XDTO-пакеты? Система то откуда пойме, что ты там вернуть решила? :)
14 Олеся999
 
08.06.15
14:26
(13) Да пример вроде и без них работает
15 Олеся999
 
08.06.15
14:26
(12) куда поставить?