Returns True if the current database has at lease two replicated sites, False otherwise.
VBScript
adminSession.IsReplicated
Perl
$adminSession->IsReplicated();
Perl
use CQPerlExt;
my $adminSess;
$adminSess = CQAdminSession::Build();
$adminSess->Logon("admin", "", "CQMS.MS_ACCESS.SITEA");
if ($adminSess->IsReplicated()) {
printf "\nLocal replica is %s.\n", $adminSess->GetLocalReplicaName();
}
CQAdminSession::Unbuild($adminSess);