// ************************************************************************ //
// The types declared in this file were generated from data read from the
// WSDL File described below:
// WSDL : C:\Users\acer\OneDrive\Escritorio\SIGC\Nuevos\Schemas\recibe.wsdl
// >Import : C:\Users\acer\OneDrive\Escritorio\SIGC\Nuevos\Schemas\recibe.wsdl>0
// Encoding : UTF-8
// Version : 1.0
// (08/09/2022 20:28:40 - - $Rev: 106319 $)
// ************************************************************************ //
unit recibe;
interface
uses Soap.InvokeRegistry, Soap.SOAPHTTPClient, System.Types, Soap.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 Embarcadero types; however, they could also
// indicate incorrect WSDL documents that failed to declare or import a schema type.
// ************************************************************************ //
// !:rEnviDe - "http://ekuatia.set.gov.py/sifen/xsd"[Lit][]
// !:rRetEnviDe - "http://ekuatia.set.gov.py/sifen/xsd"[Lit][]
// ************************************************************************ //
// Name : de-ws-sync-recibe
// Namespace : http://ekuatia.set.gov.py/sifen/xsd
// transport : http://schemas.xmlsoap.org/soap/http
// style : document
// use : literal
// binding : de-ws-sync-recibeSoap12
// service : de-ws-sync-recibeService
// port : de-ws-sync-recibeSoap12
// URL : https://sifen-test.set.gov.py/de/ws/sync/recibe.wsdl
// ************************************************************************ //
de_ws_sync_recibe = interface(IInvokable)
['{EF792EA7-E3B8-0E3A-8618-5DFCAD90BA67}']
// Cannot unwrap:
// - Input part does not refer to an element
// - Output part does not refer to an element
function rEnviDe(const rEnviDe: rEnviDe): rRetEnviDe; stdcall;
end;
function Getde_ws_sync_recibe(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): de_ws_sync_recibe;
implementation
uses System.SysUtils;
function Getde_ws_sync_recibe(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): de_ws_sync_recibe;
const
defWSDL = 'C:\Users\acer\OneDrive\Escritorio\SIGC\Nuevos\Schemas\recibe.wsdl';
defURL = 'https://sifen-test.set.gov.py/de/ws/sync/recibe.wsdl';
defSvc = 'de-ws-sync-recibeService';
defPrt = 'de-ws-sync-recibeSoap12';
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 de_ws_sync_recibe);
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
{ de-ws-sync-recibe }
InvRegistry.RegisterInterface(TypeInfo(de_ws_sync_recibe), 'http://ekuatia.set.gov.py/sifen/xsd', 'UTF-8', '', 'de-ws-sync-recibe');
InvRegistry.RegisterDefaultSOAPAction(TypeInfo(de_ws_sync_recibe), '');
InvRegistry.RegisterInvokeOptions(TypeInfo(de_ws_sync_recibe), ioDocument);
InvRegistry.RegisterInvokeOptions(TypeInfo(de_ws_sync_recibe), ioLiteral);
InvRegistry.RegisterInvokeOptions(TypeInfo(de_ws_sync_recibe), ioSOAP12);
end.
