Не получается протестировать веб-сервис для Галактики

Программирование на Atlantis: приемы и подходы, обмен опытом

Модераторы: larin, Screw

Max_Ural
партнер
Сообщения: 82
Зарегистрирован: Ср, 19/09/2007 08:35
Имя Фамилия: Максим Шагубаков
Откуда: Галактика-Урал
Контактная информация:

Не получается протестировать веб-сервис для Галактики

Сообщение Max_Ural » Ср, 27/07/2011 08:48

Добрый день.
Пытаюсь протестировать настроенный веб-сервис CGoods.

1. Установил сервер приложения Галактики для веб-сервисов по документации.
2. Настроил на IIS веб-сервисы с помощью утилиты IisApi
Когда захожу на страницу http://localhost/vipservices/CGOODS.asmx, выводится список доступных методов.
Первый вопрос вот какой:
При вызове метода InitId можно указать Id и получить МЦ
У меня при этом открывается новое окно со следующим запросом:

Код: Выделить всё

<?xml version="1.0" encoding="utf-8" ?>
- <ifcHandle xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://galaktika.ru/VipServices/">
  <vipIfcComponent>CGOODS</vipIfcComponent>
  <vipIfcName>vGoods</vipIfcName>
  <constructorName>InitId</constructorName>
- <parameters>
  <anyType xsi:type="xsd:long">1</anyType>
  </parameters>
  <properties />
  </ifcHandle>

Правильно ли это работает?
3. Написал тестовый клиент на Delphi.
Сначала пробовал следующим образом обращаться к веб-сервису

Код: Выделить всё

  id := StrToInt(edt1.Text);
  ser := GetCGOODSServiceSoap(true,'',htpr1);
  h := ser.vGoods_InitId(id);
  Ar := ser.IGoods_getData(h);


На последней строке возникает ошибка:
Серверу не удалось обработать запрос. ---> В экземпляре объекта не задана ссылка на объект

Добавил еще строку с вывозом метода Init - результать тот же.

Код: Выделить всё

  h := ser.vGoods_Init();
  h := ser.vGoods_InitId(id);
  Ar := ser.IGoods_getData(h);


Подскажите пожалуйста, что я не так делаю?

Вернуться в «Программирование»

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и 3 гостя