function strCViaStatCatIDReport(&$sRpt, $lStatCatID, $lStartRec, $lRecsPerPage)
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     $bActive = $sRpt->bActive;
     $cClient = new mclients();
     $cStatus = new mclient_status();
     $statCat = $cStatus->strStatCatViaCatID($lStatCatID);
     $strOut = '';
     $cClient->strClientLimit = " LIMIT {$lStartRec}, {$lRecsPerPage} ";
     $cClient->strExtraClientWhere = "  AND (cst_lClientStatusCatID = {$lStatCatID}) " . '  AND ' . ($bActive ? '' : 'NOT ') . ' cst_bShowInDir ';
     $cClient->loadClientsGeneric();
     if ($cClient->lNumClients == 0) {
         return '<i><br>There are no clients who meet your search criteria.</i>';
     } else {
         return $this->strBasicClientRpt($cClient, ($bActive ? 'Active ' : 'Inactive ') . 'Clients in status category "' . htmlspecialchars($statCat) . '"');
     }
 }