Ascio Web Service v2

Perl CreateNameServer

Creating a name server object. The nameserverHandle will be returned in the nameServer object passed by reference.

Response CreateNameServer(string sessionId,NameServer nameServer)

Response codes

ResultCodeMessageValue
200OK
401Authorization failed
501Syntax error in parameters or arguments

CreateNameServer Request

PropertyDescription
sessionIdExample: o58t9fjgw9bjarp6q7byv13e
nameServer

CreateNameServerResponse

Property
CreateNameServerResult
nameServer

Perl example

use SOAP::Lite;
use Date::Format;
$proxy = "https://aws.demo.ascio.com/2012/01/01/AscioService.svc";
$namespace = "http://www.ascio.com/2007/01";
$soap = SOAP::Lite->on_action( sub { "http://www.ascio.com/2007/01/INameServerService/CreateNameServer" } )->proxy($proxy);
$soap->autotype(0);
$method = SOAP::Data->name("CreateNameServer")->attr({xmlns => $namespace});

#NameServer
$nameServer =  \SOAP::Data->value(
	SOAP::Data->name('HostName','HostNameTest'),
	SOAP::Data->name('IpAddress','IpAddressTest'),
	SOAP::Data->name('Status','StatusTest'),
	SOAP::Data->name('IpV6Address','IpV6AddressTest'),
	SOAP::Data->name('Details','DetailsTest')
);
@query = (
	SOAP::Data->name("sessionId" => $sessionId),
	SOAP::Data->name("nameServer" => $nameServer)
);

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