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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 25.01.2011, 12:38   #1
Anatai
 
Регистрация: 23.01.2011
Сообщений: 5
Хорошо Проблема с сгенерируемым кодом из wsdl

// *********************************** *********************************** ** //
// The types declared in this file were generated from data read from the
// WSDL File described below:
// WSDL : http://89.250.5.121:8080/ProcessService/?wsdl
// Encoding : UTF-8
// Codegen : [wfDebug,wfUseSerializerClassForAttr s,wfGenTrueGUIDs]
// Version : 1.0
// (25.01.2011 12:12:28 - 1.33.2.5)
// *********************************** *********************************** ** //

unit IInterface;

interface

uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns;

type

// *********************************** *********************************** ** //
// The following types, referred to in the WSDL document are not being represented
// in this file. They are either aliases[@] of other types represented or were referred
// to but never[!] declared in the document. The types from the latter category
// typically map to predefined/known XML or Borland types; however, they could also
// indicate incorrect WSDL documents that failed to declare or import a schema type.
// *********************************** *********************************** ** //
// !:Fake - "http://ws.appserver.corinf/"
// !:FakeResponse - "http://ws.appserver.corinf/"
// !:getCity - "http://ws.appserver.corinf/"
// !:getCityResponse - "http://ws.appserver.corinf/"
// !utCity - "http://ws.appserver.corinf/"
// !utCityResponse - "http://ws.appserver.corinf/"
// !:remCity - "http://ws.appserver.corinf/"
// !:remCityResponse - "http://ws.appserver.corinf/"
// !:editCity - "http://ws.appserver.corinf/"
// !:editCityResponse - "http://ws.appserver.corinf/"


// *********************************** *********************************** ** //
// Namespace : http://ws.appserver.corinf/
// transport : http://schemas.xmlsoap.org/soap/http
// style : document
// binding : ProcessServiceBinding
// service : ProcessService
// port : ProcessService
// URL : http://89.250.5.121:8080/ProcessService/
// *********************************** *********************************** ** //
ProcessService = interface(IInvokable)
['{B5E7CBFA-8DEC-4EE4-B332-78E1242F4339}']
function Fake(const parameters: Fake): FakeResponse; stdcall;
function getCity(const parameters: getCity): getCityResponse; stdcall;
function putCity(const parameters: putCity): putCityResponse; stdcall;
function remCity(const parameters: remCity): remCityResponse; stdcall;
function editCity(const parameters: editCity): editCityResponse; stdcall;
end;

function GetProcessService(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): ProcessService;


implementation

function GetProcessService(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): ProcessService;
const
defWSDL = 'http://89.250.5.121:8080/ProcessService/?wsdl';
defURL = 'http://89.250.5.121:8080/ProcessService/';
defSvc = 'ProcessService';
defPrt = 'ProcessService';
var
RIO: THTTPRIO;
begin
Result := nil;
if (Addr = '') then
begin
if UseWSDL then
Addr := defWSDL
else
Addr := defURL;
end;
if HTTPRIO = nil then
RIO := THTTPRIO.Create(nil)
else
RIO := HTTPRIO;
try
Result := (RIO as ProcessService);
if UseWSDL then
begin
RIO.WSDLLocation := Addr;
RIO.Service := defSvc;
RIO.Port := defPrt;
end else
RIO.URL := Addr;
finally
if (Result = nil) and (HTTPRIO = nil) then
RIO.Free;
end;
end;


initialization
InvRegistry.RegisterInterface(TypeI nfo(ProcessService), 'http://ws.appserver.corinf/', 'UTF-8');
InvRegistry.RegisterDefaultSOAPActi on(TypeInfo(ProcessService), '');
InvRegistry.RegisterInvokeOptions(T ypeInfo(ProcessService), ioDocument);
InvRegistry.RegisterInvokeOptions(T ypeInfo(ProcessService), ioLiteral);
end.

Проблема в том что он пишет:
IInterface.pas: Undeclared identifier: 'Fake'
IInterface.pas: Undeclared identifier: 'getCity'
IInterface.pas: Undeclared identifier: 'putCity'
IInterface.pas: Undeclared identifier: 'remCity'
IInterface.pas: Undeclared identifier: 'editCity'
IInterface.pas: Undeclared identifier: 'editCityResponse'

Не понимаю из-за чего, статьи читал везде пишут сгенерировать интерфейс и подключить его в главному модулю. Как решить эту проблему?
Anatai вне форума Ответить с цитированием
Старый 27.02.2011, 00:05   #2
kikos
Новичок
Джуниор
 
Регистрация: 27.02.2011
Сообщений: 1
По умолчанию таже проблема

отпиши если cможешь в чем дело
откуда брать эти типы, в примерах там просто string
kikos вне форума Ответить с цитированием
Старый 27.02.2011, 02:27   #3
GunSmoker
Старожил
 
Регистрация: 13.08.2009
Сообщений: 2,581
По умолчанию

Ты читать не пробовал?

Написано же:

Цитата:
// *********************************** *********************************** ** //
// The following types, referred to in the WSDL document are not being represented
// in this file. They are either aliases[@] of other types represented or were referred
// to but never[!] declared in the document. The types from the latter category
// typically map to predefined/known XML or Borland types; however, they could also
// indicate incorrect WSDL documents that failed to declare or import a schema type.
// *********************************** *********************************** ** //
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
GunSmoker вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
проблема с кодом сss kox HTML и CSS 2 07.10.2010 18:04
Проблема с кодом ( ItemListener ) LazyC0de Общие вопросы по Java, Java SE, Kotlin 1 03.09.2010 10:13
Проблема с кодом.adp. Agapov_stas SQL, базы данных 1 28.07.2010 18:05
Проблема с кодом. scottie Паскаль, Turbo Pascal, PascalABC.NET 3 11.04.2010 15:44
Проблема с кодом( DM_bite Помощь студентам 3 02.08.2008 20:02