Last active
January 9, 2018 11:31
-
-
Save yhackup/4cc69b41194853dd100f1d63b22090d3 to your computer and use it in GitHub Desktop.
WSDL.pas
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// ************************************************************************ // | |
// The types declared in this file were generated from data read from the | |
// WSDL File described below: | |
// WSDL : D:\OPS_Projects\Unico\Yeni klasör\PolicyService.wsdl | |
// >Import : D:\OPS_Projects\Unico\Yeni klasör\PolicyService.wsdl>0 | |
// Encoding : utf-8 | |
// Codegen : [wfMapStringsToWideStrings+, wfUseScopedEnumeration-] | |
// Version : 1.0 | |
// (09.01.2018 13:58:43 - - $Rev: 45757 $) | |
// ************************************************************************ // | |
unit D__OPS_Projects_Unico_wsServis; | |
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 Embarcadero types; however, they could also | |
// indicate incorrect WSDL documents that failed to declare or import a schema type. | |
// ************************************************************************ // | |
// !:MakePolicyPaymentWithPaymentCode3DResponse - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPaymentWithPaymentCode3D - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPayment3DResponse - "http://tempuri.org/"[Lit][] | |
// !:GetRenewPolicy - "http://tempuri.org/"[Lit][] | |
// !:ConvertOrderToPolicyResponse - "http://tempuri.org/"[Lit][] | |
// !:ConvertOrderToPolicy - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPaymentWithPaymentCodeResponse - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPaymentWithPaymentCode - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPaymentResponse - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPayment3D - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPaymentRSAResponse - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPaymentRSA - "http://tempuri.org/"[Lit][] | |
// !:GetRenewPolicyResponse - "http://tempuri.org/"[Lit][] | |
// !:GetPoliciesFromSegmentationOptimized_017 - "http://tempuri.org/"[Lit][] | |
// !:GetPoliciesFromSegmentation_017Response - "http://tempuri.org/"[Lit][] | |
// !:GetPoliciesFromSegmentation_017 - "http://tempuri.org/"[Lit][] | |
// !:GetPlateDetailResponse - "http://tempuri.org/"[Lit][] | |
// !:GetPlateDetail - "http://tempuri.org/"[Lit][] | |
// !:GetPoliciesFromSegmentationOptimized_017Response - "http://tempuri.org/"[Lit][] | |
// !:CheckPertVehicle - "http://tempuri.org/"[Lit][] | |
// !:GetVehicleInfoByPlateResponse - "http://tempuri.org/"[Lit][] | |
// !:GetVehicleInfoByPlate - "http://tempuri.org/"[Lit][] | |
// !:GetBirlikMarkaKodResponse - "http://tempuri.org/"[Lit][] | |
// !:GetBirlikMarkaKod - "http://tempuri.org/"[Lit][] | |
// !:CheckPertVehicleResponse - "http://tempuri.org/"[Lit][] | |
// !:GetCreditCardForm - "http://tempuri.org/"[Lit][] | |
// !:GetPolicyReportResponse - "http://tempuri.org/"[Lit][] | |
// !:GetPolicyReport - "http://tempuri.org/"[Lit][] | |
// !:CheckActiveProductByInsuredResponse - "http://tempuri.org/"[Lit][] | |
// !:CheckActiveProductByInsured - "http://tempuri.org/"[Lit][] | |
// !:GetCreditCardFormResponse - "http://tempuri.org/"[Lit][] | |
// !:GetPolicyWithOldPolicyNumber - "http://tempuri.org/"[Lit][] | |
// !:GetPolicyResponse - "http://tempuri.org/"[Lit][] | |
// !:GetPolicy - "http://tempuri.org/"[Lit][] | |
// !:GetPolicyListWithDateResponse - "http://tempuri.org/"[Lit][] | |
// !:GetPolicyListWithDate - "http://tempuri.org/"[Lit][] | |
// !:GetPolicyWithOldPolicyNumberResponse - "http://tempuri.org/"[Lit][] | |
// !:GetCustomerNo - "http://tempuri.org/"[Lit][] | |
// !:GetPremiumListResponse - "http://tempuri.org/"[Lit][] | |
// !:GetPremiumList - "http://tempuri.org/"[Lit][] | |
// !:GetCostListResponse - "http://tempuri.org/"[Lit][] | |
// !:MakePolicyPayment - "http://tempuri.org/"[Lit][] | |
// !:GetCollectingTypesResponse - "http://tempuri.org/"[Lit][] | |
// !:GetCollectingTypes - "http://tempuri.org/"[Lit][] | |
// !:CreatePolicyResponse - "http://tempuri.org/"[Lit][] | |
// !:CreatePolicy - "http://tempuri.org/"[Lit][] | |
// !:GetCustomerNoResponse - "http://tempuri.org/"[Lit][] | |
// !:GetCostList - "http://tempuri.org/"[Lit][] | |
// !:CreateSupplementResponse - "http://tempuri.org/"[Lit][] | |
// !:CreateSupplement - "http://tempuri.org/"[Lit][] | |
// ************************************************************************ // | |
// Namespace : http://tempuri.org/ | |
// soapAction: http://tempuri.org/IPolicyService/%operationName% | |
// transport : http://schemas.xmlsoap.org/soap/http | |
// style : document | |
// use : literal | |
// binding : BasicHttpBinding_IPolicyService | |
// service : PolicyService | |
// port : BasicHttpBinding_IPolicyService | |
// URL : http://xxxxxxxxxxx.com.tr/public/PolicyService.svc | |
// ************************************************************************ // | |
IPolicyService = interface(IInvokable) | |
['{B0235F47-24A1-4BD1-8B5D-5DEFE63FB136}'] | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPolicy(const parameters: GetPolicy): GetPolicyResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPolicyWithOldPolicyNumber(const parameters: GetPolicyWithOldPolicyNumber): GetPolicyWithOldPolicyNumberResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPolicyListWithDate(const parameters: GetPolicyListWithDate): GetPolicyListWithDateResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPolicyReport(const parameters: GetPolicyReport): GetPolicyReportResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetCreditCardForm(const parameters: GetCreditCardForm): GetCreditCardFormResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function CheckActiveProductByInsured(const parameters: CheckActiveProductByInsured): CheckActiveProductByInsuredResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an elementa | |
function GetCustomerNo(const parameters: GetCustomerNo): GetCustomerNoResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function CreatePolicy(const parameters: CreatePolicy): CreatePolicyResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function CreateSupplement(const parameters: CreateSupplement): CreateSupplementResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetCostList(const parameters: GetCostList): GetCostListResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPremiumList(const parameters: GetPremiumList): GetPremiumListResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetCollectingTypes(const parameters: GetCollectingTypes): GetCollectingTypesResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function MakePolicyPayment(const parameters: MakePolicyPayment): MakePolicyPaymentResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function MakePolicyPaymentWithPaymentCode(const parameters: MakePolicyPaymentWithPaymentCode): MakePolicyPaymentWithPaymentCodeResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function MakePolicyPaymentRSA(const parameters: MakePolicyPaymentRSA): MakePolicyPaymentRSAResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function MakePolicyPayment3D(const parameters: MakePolicyPayment3D): MakePolicyPayment3DResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function MakePolicyPaymentWithPaymentCode3D(const parameters: MakePolicyPaymentWithPaymentCode3D): MakePolicyPaymentWithPaymentCode3DResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function ConvertOrderToPolicy(const parameters: ConvertOrderToPolicy): ConvertOrderToPolicyResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetRenewPolicy(const parameters: GetRenewPolicy): GetRenewPolicyResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetVehicleInfoByPlate(const parameters: GetVehicleInfoByPlate): GetVehicleInfoByPlateResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function CheckPertVehicle(const parameters: CheckPertVehicle): CheckPertVehicleResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetBirlikMarkaKod(const parameters: GetBirlikMarkaKod): GetBirlikMarkaKodResponse; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPoliciesFromSegmentation_017(const parameters: GetPoliciesFromSegmentation_017): GetPoliciesFromSegmentation_017Response; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPoliciesFromSegmentationOptimized_017(const parameters: GetPoliciesFromSegmentationOptimized_017): GetPoliciesFromSegmentationOptimized_017Response; stdcall; | |
// Cannot unwrap: | |
// - Input part does not refer to an element | |
// - Output part does not refer to an element | |
function GetPlateDetail(const parameters: GetPlateDetail): GetPlateDetailResponse; stdcall; | |
end; | |
function GetIPolicyService(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): IPolicyService; | |
implementation | |
uses SysUtils; | |
function GetIPolicyService(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): IPolicyService; | |
const | |
defWSDL = 'D:\OPS_Projects\Unico\Yeni klasör\PolicyService.wsdl'; | |
defURL = 'http://xxxxxxxxxxxxxx.com.tr/public/PolicyService.svc'; | |
defSvc = 'PolicyService'; | |
defPrt = 'BasicHttpBinding_IPolicyService'; | |
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 IPolicyService); | |
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 | |
{ IPolicyService } | |
InvRegistry.RegisterInterface(TypeInfo(IPolicyService), 'http://tempuri.org/', 'utf-8'); | |
InvRegistry.RegisterDefaultSOAPAction(TypeInfo(IPolicyService), 'http://tempuri.org/IPolicyService/%operationName%'); | |
InvRegistry.RegisterInvokeOptions(TypeInfo(IPolicyService), ioDocument); | |
InvRegistry.RegisterInvokeOptions(TypeInfo(IPolicyService), ioLiteral); | |
end. |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment