Ascio Web Service v3

Perl DeleteContact

Delete a contact object.

DeleteContactResponse DeleteContact(SecurityHeaderDetails securityHeader,DeleteContactRequest request)

Response codes

ResultCodeMessageValue
200OK
401Authorization failed
404Object not found
405Access denied
406Unexpected objectClass
501Syntax error in parameters or arguments

DeleteContact Request

Property
request

Perl example

use SOAP::Lite;
use Date::Format;
$proxy = "https://aws.demo.ascio.com/v3/AscioService.svc";
$namespace = "http://www.ascio.com/2007/01";
$soap = SOAP::Lite
    ->on_action( sub { "DeleteContact" } )
    ->proxy($proxy)
    ->ns("http://www.ascio.com/2013/02", "v3")
    ->ns("http://www.ascio.com/2013/02/AscioService", "service");
    
# Please enter your ascio-credentials here

my $header = SOAP::Header->new(
            name =>"v3:SecurityHeaderDetails",
            value => {"v3:Account" => "username", "v3:Password" =>"password"} 
        );
$soap->autotype(0);
$method = SOAP::Data->name("service:DeleteContact")->attr({xmlns => $namespace});

#DeleteHandleRequest
$request =  \SOAP::Data->value(
	SOAP::Data->name('v3:Handle','JD123')
);
@query = (
	SOAP::Data->name("service:request" => $request)->attr({"xsi:type" => "v3:DeleteHandleRequest"})
);

$result = $soap->call($method => @query, $header);
unless ($result->fault) {
	$response = $result->valueof("//DeleteContactResponse/DeleteContactResult");
	print "ResultCode : $response->{'ResultCode'}\r\n";
	print "Message : $response->{'ResultMessage'}\r\n";
	if ($response->{"ResultCode"} == 200) {
		print "OK";
	}
}
else {
	print join ", ",
	$result->faultcode,
	$result->faultstring,
	$result->faultdetail;
}
WSDL for AWS v3
https://aws.demo.ascio.com/v3/aws.wsdl (OTE)
https://aws.ascio.com/v3/aws.wsdl (Live)
Please configure the IP-Whitelisting in the portal/demo-portal.