Public Function GetAllDomains() As String

The properties of the GetAllDomains XML return string:

• DOMAIN_ID    -    The domain ID.
• DOMAIN_NAME    -    The domain name.
• PASSWORD    -    Not in use.
• ADMIN_PASSWORD    -    Not in use.
• PHYSICAL_DIRECTORY    -    The physical directory of the domain.
• COMPANY_NAME    -    The company name.
• CONTACT_NAME    -    The contact name.
• CONTACT_EMAIL    -    The contact email.
• USERS_QUOTA    -    The maximum number of concurrent connections to all Projects in domain. -1 indicates an unlimited number of connections.
• DEFECTS_QUOTA    -    Not in use.
• PROJECTS_QUOTA    -    Not in use.
• FILESYSTEM_QUOTA    -    Not in use.
• USERS_VERSION    -    For internal use.
• PROJECTS_LIST    XML Root    The domain projects are in this list.

If a domain includes projects, the following project properties are displayed:

• PROJECT_NAME    -    The project name.
• PR_IS_ACTIVE    -    Indicates if the project is active (Y/N).
• SAQ_IS_ACTIVE    -    Indicates if SEND ALL QUALIFIED is active (Y/N).

<?xml version="1.0"?>
<GetAllDomains>
<TDXItem>
        <DOMAIN_ID>1</DOMAIN_ID>
        <DOMAIN_NAME>DEFAULT</DOMAIN_NAME>
        <PASSWORD></PASSWORD>
        <PHYSICAL_DIRECTORY>
            C:\ProgramData\Micro Focus\ALM\Repository\qc\Default\
         </PHYSICAL_DIRECTORY>
        <COMPANY_NAME></COMPANY_NAME>
        <CONTACT_NAME></CONTACT_NAME>
        <CONTACT_EMAIL></CONTACT_EMAIL>
        <DEFAULT_DBSERVER_NAME>dbServer06</DEFAULT_DBSERVER_NAME>
        <DEFAULT_DBSERVER_TYPE>2</DEFAULT_DBSERVER_TYPE>
        <USERS_QUOTA>-1</USERS_QUOTA>
        <DEFECTS_QUOTA>0</DEFECTS_QUOTA>
        <PROJECTS_QUOTA>0</PROJECTS_QUOTA>
        <FILESYSTEM_QUOTA>0</FILESYSTEM_QUOTA>
        <PROJECTS_LIST>
            <TDXItem>
                    <PROJECT_NAME>project</PROJECT_NAME>
                    <PR_IS_ACTIVE>Y</PR_IS_ACTIVE>
                    <SAQ_IS_ACTIVE>N</SAQ_IS_ACTIVE>
            </TDXItem>
            <TDXItem>
                    <PROJECT_NAME>test</PROJECT_NAME>
                    <PR_IS_ACTIVE>Y</PR_IS_ACTIVE>
                    <SAQ_IS_ACTIVE>N</SAQ_IS_ACTIVE>
            </TDXItem>
        </PROJECTS_LIST>
</TDXItem>
</GetAllDomains>

Private Sub GetAllDomains()

'The following Visual Basic example gets all the domains
' and their properties.
    Dim sReply As String

    On Error GoTo err
    sReply = m_SAClient.GetAllDomains
    MsgBox sReply
    Exit Sub

err:
    MsgBox "Program failed:" + err.Description
End Sub