Restituisce il valore TRUE se il database corrente è stato attivato per le operazioni multisite. Questo metodo restituisce un valore TRUE anche se il database è l'unica replica esistente.
Perl
use CQPerlExt; my $sess; my $entity; $sess = CQSession::Build(); $sess->UserLogon("admin", "", "MULTI", "CQMS.MS_ACCESS.SITEA"); if ($sess->IsMultisiteActivated()) { # print out list of available replicas my $qryDef; my $resultSet; my $status; $qryDef = $sess->BuildQuery("ratl_replicas"); $qryDef->BuildField("name"); $qryDef->BuildField("clan"); $qryDef->BuildField("family"); $resultSet = $sess->BuildResultSet($qryDef); $resultSet->Execute(); $status = $resultSet->MoveNext(); printf ("\nname\tclan\tfamily\n"); while($status == $CQPerlExt::CQ_SUCCESS) { printf("%s\t%s\t%s\n", $resultSet->GetColumnValue(1), $resultSet->GetColumnValue(2), $resultSet->GetColumnValue(3)); $status = $resultSet->MoveNext(); } } CQSession::Unbuild($sess);