$name = trim((string) $p->xpath('//contact/Group_Tag[@name=\'Contact Information\']/field[@name=\'First Name\']')[0] . ' ' . (string) $p->xpath('//contact/Group_Tag[@name=\'Contact Information\']/field[@name=\'Last Name\']')[0]);
    if (empty($name)) {
        $error = "Current logged in user does not appear to have any CreditBlock account data in Ontraport!";
    } else {
        $id = (string) $p->xpath('//contact')[0]->attributes()->id;
        $primary = array('id' => $id, 'name' => $name, 'type' => 'manager', 'tag' => 'Main', 'address' => (string) $p->xpath('//contact/Group_Tag[@name=\'Contact Information\']/field[@name=\'Address\']')[0], 'equifaxPin' => (string) $p->xpath('//contact/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Equifax PIN\']')[0], 'equifaxStatus' => (string) $p->xpath('//contact/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Equifax Status\']')[0], 'experianPin' => (string) $p->xpath('//contact/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Experian PIN\']')[0], 'experianStatus' => (string) $p->xpath('//contact/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Experian Status\']')[0], 'transunionPin' => (string) $p->xpath('//contact/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'TransUnion PIN\']')[0], 'transunionStatus' => (string) $p->xpath('//contact/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'TransUnion Status\']')[0]);
        $persons = array();
        if (empty($manager)) {
            /**
             * If the manager field has NOT been populated, then this account might be a manager
             */
            $dd = RFPluginOPConnector::FindData(<<<STRING
<search>
\t<equation>
\t\t<field>Credit Block Acct Manager</field>
\t\t<op>c</op>
\t\t<value>{$name}</value>
\t</equation>
</search>
STRING
);
            $pn = new SimpleXMLElement($dd);
            $a = 0;
            while (++$a) {
                $name = trim((string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Contact Information\']/field[@name=\'First Name\']')[0] . ' ' . (string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Contact Information\']/field[@name=\'Last Name\']')[0]);
                if (empty($name)) {
                    break;
                }
                $id = (string) $pn->xpath('//contact[position()=' . $a . ']')[0]->attributes()->id;
                $persons[] = array('id' => $id, 'name' => $name, 'type' => 'managed', 'tag' => 'Main', 'address' => (string) $pn->xpath('//contact/Group_Tag[@name=\'Contact Information\']/field[@name=\'Address\']')[0], 'equifaxPin' => (string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Equifax PIN\']')[0], 'equifaxStatus' => (string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Equifax Status\']')[0], 'experianPin' => (string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Experian PIN\']')[0], 'experianStatus' => (string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'Experian Status\']')[0], 'transunionPin' => (string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'TransUnion PIN\']')[0], 'transunionStatus' => (string) $pn->xpath('//contact[position()=' . $a . ']/Group_Tag[@name=\'Credit Block - Main\']/field[@name=\'TransUnion Status\']')[0]);
            }
        }