PHP screamForHelp函数代码示例

 function loadTimeZones()
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     $sqlStr = 'SELECT tz_lKeyID, tz_strTimeZone, tz_lTZ_Const, tz_bTopList
      FROM lists_tz
      WHERE 1
      ORDER BY tz_bTopList DESC, tz_lKeyID;';
     $query = $this->db->query($sqlStr);
     $this->lNumTZ = $numRows = $query->num_rows();
     if ($numRows == 0) {
         echo '<font face="monospace" style="font-size: 8pt;">' . __FILE__ . ' Line: <b>' . __LINE__ . ":</b><br><b>\$sqlStr=</b><br>" . nl2br(htmlspecialchars($sqlStr)) . "<br><br></font>\n";
         screamForHelp('UNEXPECTED EOF - Time Zone Table: <br>error on line  <b> -- ' . __LINE__ . ' --</b>,<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
     } else {
         $idx = 0;
         foreach ($query->result() as $row) {
             $this->tz[$idx] = new stdClass();
             $tzl =& $this->tz[$idx];
             $tzl->lKeyID = (int) $row->tz_lKeyID;
             $tzl->strTimeZone = $row->tz_strTimeZone;
             $tzl->lTZ_Const = (int) $row->tz_lTZ_Const;
             $tzl->bTopList = (bool) $row->tz_bTopList;
             ++$idx;
         }
     }
 }

 function load_cprogGeneric($lCProgID, $strCProgName, $bViaID)
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     $this->ccprog = new mcprograms();
     if ($bViaID) {
         $this->ccprog->loadClientProgramsViaCPID($lCProgID);
     } else {
         $this->ccprog->loadClientProgramsViaProgramName($strCProgName);
     }
     if ($this->ccprog->lNumCProgs == 0) {
         screamForHelp($lCProgID . '/' . $strCProgName . ': unable to load client program<br>error on line  <b> -- ' . __LINE__ . ' --</b>,<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
     }
     $this->cprog =& $this->ccprog->cprogs[0];
     $this->lCProgID = $lCProgID = $this->cprog->lKeyID;
     $this->strProgramName = $strCProgName = $this->cprog->strProgramName;
     $this->lEnrollmentTableID = $this->cprog->lEnrollmentTableID;
     $this->lAttendanceTableID = $this->cprog->lAttendanceTableID;
     $this->strATableFNPrefix = $this->cprog->strATableFNPrefix;
     $this->strETableFNPrefix = $this->cprog->strETableFNPrefix;
     $this->strEnrollmentTable = $this->cprog->strEnrollmentTable;
     $this->strAttendanceTable = $this->cprog->strAttendanceTable;
     $this->lActivityFieldID = $this->cprog->lActivityFieldID;
     $this->strActivityFN = $this->cprog->strActivityFN;
     $this->cschema = new muser_schema();
     // Enrollment table schema
     $this->cschema->loadUFSchemaSingleTable($this->lEnrollmentTableID);
     $this->etable =& $this->cschema->schema[$this->lEnrollmentTableID];
     // Attendance table schema
     $this->cschema->loadUFSchemaSingleTable($this->lAttendanceTableID);
     $this->atable =& $this->cschema->schema[$this->lAttendanceTableID];
 }

 public function clientsAvailableForSponsorship()
 {
     //-----------------------------------------------------------------------
     // two client groups to consider:
     //   clients with no sponsors
     //   clients with sponsors (discarding inactive sponsorships)
     //-----------------------------------------------------------------------
     if (is_null($this->lSponProgID)) {
         screamForHelp('CLASS NOT INITIALIZED $this->lSponProgID<br>error on <b>line:</b> ' . __LINE__ . '<br><b>file: </b>' . __FILE__ . '<br><b>function: </b>' . __FUNCTION__);
     }
     $this->lNumAvail = 0;
     $this->lAvailList = array();
     //----------------------------------------------------------
     // find all clients with status that allows sponsorship
     // (optionally qualified by program); must have
     // max sponsorship > 0
     //----------------------------------------------------------
     $this->clientsEligibleViaStatus($this->lSponProgID, $lClientList, $lMaxSpon, $lNumEligibleClients);
     for ($idx = 0; $idx < $lNumEligibleClients; ++$idx) {
         $lClientID = $lClientList[$idx];
         if ($this->lNumSponsorsViaClientID($lClientID) < $lMaxSpon[$idx]) {
             $this->lAvailList[$this->lNumAvail] = $lClientID;
             ++$this->lNumAvail;
         }
     }
 }

function ddl2sqlSpecial($field, &$strSelect, &$strJoin)
{
    //---------------------------------------------------------------------
    //
    //---------------------------------------------------------------------
    $strSelect = $strJoin = '';
    if ($field->enumType != CS_FT_DDL_SPECIAL) {
        return;
    }
    switch ($field->strUserFN) {
        case 'Location':
            $strJoin = 'INNER JOIN client_location on cl_lKeyID=cr_lLocationID';
            $strSelect = 'cl_strLocation AS `Client:Location`';
            break;
        case 'Status Category':
            $strJoin = 'INNER JOIN client_status_cats on csc_lKeyID=cr_lStatusCatID';
            $strSelect = 'csc_strCatName AS `Client:Status Category`';
            break;
        case 'Vocabulary':
            $strJoin = 'LEFT JOIN lists_client_vocab ON cr_lVocID = cv_lKeyID';
            $strSelect = 'cv_strVocTitle AS `Client:Vocabulary`';
            break;
        default:
            screamForHelp($field->strUserFN . ': client special ddl type not available<br>error on line  <b> -- ' . __LINE__ . ' --</b>,<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
            break;
    }
}

 function payerList($lSponID)
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     if (!bTestForURLHack('showSponsorFinancials')) {
         return;
     }
     $this->load->helper('dl_util/verify_id');
     verifyID($this, $lSponID, 'sponsor ID');
     $displayData = array();
     $displayData['lSponID'] = $lSponID = (int) $lSponID;
     //------------------------------------------------
     // libraries and utilities
     //------------------------------------------------
     $this->load->library('util/dl_date_time', '', 'clsDateTime');
     $this->load->model('sponsorship/msponsorship', 'clsSpon');
     $this->clsSpon->sponsorInfoViaID($lSponID);
     $enumPayType = $_REQUEST['rdoSP'];
     switch ($enumPayType) {
         case 'sponsor':
             redirect('sponsors/payments/addEditPayment/' . $lSponID . '/' . $this->clsSpon->sponInfo[0]->lForeignID . '/0');
             break;
         case 'person':
             $this->searchSponPay($lSponID, $_REQUEST['txtSPP'], true, $this->clsSpon);
             break;
         case 'biz':
             $this->searchSponPay($lSponID, $_REQUEST['txtSPB'], false, $this->clsSpon);
             break;
         default:
             screamForHelp($enumPayType . ': UNRECOGNIZED PROCESSING OPTION</b><br>error on <b>line:</b> ' . __LINE__ . '<br><b>file:</b> ' . __FILE__ . '<br><b>function:</b> ' . __FUNCTION__);
             break;
     }
 }

 public function lNumVols($enumType)
 {
     //---------------------------------------------------------------------
     // $enumType: active / inactive / all
     //---------------------------------------------------------------------
     switch ($enumType) {
         case 'active':
             $strWhere = 'AND NOT vol_bInactive ';
             break;
         case 'inactive':
             $strWhere = 'AND vol_bInactive ';
             break;
         case 'all':
             $strWhere = '';
             break;
         default:
             screamForHelp($enumType . ': invalid type<br>error on line ' . __LINE__ . ',<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
             break;
     }
     $sqlStr = "SELECT COUNT(*) AS lNumVols\n         FROM `volunteers`\n            INNER JOIN people_names ON `vol_lPeopleID`=pe_lKeyID\n         WHERE\n            NOT `vol_bRetired`\n            AND NOT pe_bRetired\n            {$strWhere};";
     $query = $this->db->query($sqlStr);
     if ($query->num_rows() == 0) {
         return 0;
     } else {
         $row = $query->row();
         return (int) $row->lNumVols;
     }
 }

 function consolidateDup($enumContext, $lGoodID, $dupIDs)
 {
     //---------------------------------------------------------------------
     // note: currently group membership is not transferred
     //---------------------------------------------------------------------
     $strInDupIDs = ' IN (' . implode(', ', $dupIDs) . ') ';
     $this->imgDoc = new mimage_doc();
     switch ($enumContext) {
         case CENUM_CONTEXT_CLIENT:
             $enumAttachTypes = array(CENUM_CONTEXT_CLIENT, CENUM_CONTEXT_CPROGENROLL, CENUM_CONTEXT_CPROGATTEND);
             $this->uschema->loadUFSchemaViaAttachType($enumAttachTypes);
             $this->consolidateDupClients($lGoodID, $strInDupIDs, $dupIDs);
             break;
         case CENUM_CONTEXT_PEOPLE:
             $enumAttachTypes = array(CENUM_CONTEXT_PEOPLE);
             $this->uschema->loadUFSchemaViaAttachType($enumAttachTypes);
             $this->consolidateDupPeople($lGoodID, $strInDupIDs, $dupIDs);
             break;
         case CENUM_CONTEXT_BIZ:
             $enumAttachTypes = array(CENUM_CONTEXT_BIZ);
             $this->uschema->loadUFSchemaViaAttachType($enumAttachTypes);
             $this->consolidateDupBiz($lGoodID, $strInDupIDs, $dupIDs);
             break;
         default:
             screamForHelp($enumContext . ': invalid context for duplicate record consolidation<br>error on line  <b> -- ' . __LINE__ . ' --</b>,<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
             break;
     }
 }

function configRemRecViewViaType($enumRemType, $lFID, &$displayData)
{
    $lFIDs = array($lFID);
    $CI =& get_instance();
    $CI->load->model('img_docs/mimage_doc', 'clsImgDoc');
    $CI->load->helper('img_docs/image_doc');
    $CI->load->helper('img_docs/link_img_docs');
    $CI->load->model('admin/mpermissions', 'perms');
    switch ($enumRemType) {
        case CENUM_CONTEXT_USER:
            $clsUser = new muser_accts();
            $clsUser->loadSingleUserRecord($lFID);
            $displayData['contextSummary'] = $clsUser->userHTMLSummary(0);
            $displayData['pageTitle'] = strPageTitle('reminderRecordUser', $lFIDs);
            break;
        case CENUM_CONTEXT_PEOPLE:
            $clsPeople = new mpeople();
            $clsPeople->loadPeopleViaPIDs($lFID, false, false);
            $displayData['contextSummary'] = $clsPeople->peopleHTMLSummary(0);
            $displayData['pageTitle'] = strPageTitle('reminderRecordPeople', $lFIDs);
            break;
        case CENUM_CONTEXT_GIFT:
            $clsGifts = new mdonations();
            $clsGifts->loadGiftViaGID($lFID);
            $displayData['contextSummary'] = $clsGifts->giftHTMLSummary();
            $lPeopleBizID = $clsGifts->gifts[0]->gi_lForeignID;
            $lFIDs[1] = $lPeopleBizID;
            if ($clsGifts->gifts[0]->pe_bBiz) {
                $displayData['pageTitle'] = strPageTitle('reminderRecordBizGift', $lFIDs);
            } else {
                $displayData['pageTitle'] = strPageTitle('reminderRecordPeopleGift', $lFIDs);
            }
            break;
        case CENUM_CONTEXT_SPONSORSHIP:
            $clsSpon = new msponsorship();
            $clsSpon->sponsorInfoViaID($lFID);
            $displayData['contextSummary'] = $clsSpon->sponsorshipHTMLSummary();
            $displayData['pageTitle'] = strPageTitle('reminderSponsor', $lFIDs);
            break;
        case CENUM_CONTEXT_CLIENT:
            $clsClients = new mclients();
            $clsClients->loadClientsViaClientID($lFID);
            $displayData['contextSummary'] = $clsClients->strClientHTMLSummary(0);
            $displayData['pageTitle'] = strPageTitle('reminderClient', $lFIDs);
            break;
        case CENUM_CONTEXT_BIZ:
            $clsBiz = new mbiz();
            $clsBiz->loadBizRecsViaBID($lFID);
            $displayData['contextSummary'] = $clsBiz->strBizHTMLSummary();
            $displayData['pageTitle'] = strPageTitle('reminderBiz', $lFIDs);
            break;
        case CENUM_CONTEXT_LOCATION:
        case CENUM_CONTEXT_VOLUNTEER:
        case CENUM_CONTEXT_GENERIC:
        default:
            screamForHelp($enumRemType . ': Switch type not implemented</b><br>error on <b>line:</b> ' . __LINE__ . '<br><b>file:</b> ' . __FILE__ . '<br><b>function:</b> ' . __FUNCTION__);
            break;
    }
}

 function loadACOViaFieldID($lFieldID)
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     $sqlStr = "SELECT pff_lCurrencyACO\n            FROM uf_fields\n            WHERE pff_lKeyID={$lFieldID}";
     $query = $this->db->query($sqlStr);
     $numRows = $query->num_rows();
     if ($numRows == 0) {
         screamForHelp($lFieldID . ': invalid field ID<br>error on line  <b> -- ' . __LINE__ . ' --</b>,<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
     }
     $row = $query->row();
     $this->loadCountries(false, true, true, (int) $row->pff_lCurrencyACO);
 }

 function parseAjaxCampaign($strType, $lAcctID)
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     switch ($strType) {
         case 'loadViaAcctID':
             $this->buildCampaignXMLViaAcctID((int) $lAcctID);
             break;
         default:
             screamForHelp($strType . ': INVALID PROCESSING OPTIONS</b><br>error on <b>line:</b> ' . __LINE__ . '<br><b>file:</b> ' . __FILE__ . '<br><b>function:</b> ' . __FUNCTION__);
             break;
     }
 }

 function strCustomFormsPageTitle($enumType)
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     switch ($enumType) {
         case CENUM_CONTEXT_CLIENT:
             $strPageTitle = anchor('main/menu/admin', 'Admin', 'class="breadcrumb"') . ' | Custom Forms/Clients';
             break;
         default:
             screamForHelp($enumType . ': Custom forms not available nyet.<br>error on line  <b> -- ' . __LINE__ . ' --</b>,<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
             break;
     }
     return $strPageTitle;
 }

function showExtraOpts($clsGF, $enumFieldType, $opts)
{
    //---------------------------------------------------------------------
    //
    //---------------------------------------------------------------------
    switch ($enumFieldType) {
        case CS_FT_CHECKBOX:
            showCheckboxOpts($opts->bCheckDef);
            break;
        case CS_FT_DATE:
        case CS_FT_DATETIME:
            showDateTimeOpts($opts);
            break;
        case CS_FT_TEXT255:
            showTextOpts($clsGF, $opts->strTxtDef, 255);
            break;
        case CS_FT_TEXT80:
            showTextOpts($clsGF, $opts->strTxtDef, 80);
            break;
        case CS_FT_TEXT20:
            showTextOpts($clsGF, $opts->strTxtDef, 20);
            break;
        case CS_FT_TEXTLONG:
            break;
        case CS_FT_CLIENTID:
            break;
        case CS_FT_HEADING:
            break;
        case CS_FT_INTEGER:
            showIntegerOpts($opts->lDef);
            break;
        case CS_FT_CURRENCY:
            showCurrencyOpts($opts->curDef, $opts->lCurrencyACO);
            break;
        case CS_FT_DDL:
        case CS_FT_DDLMULTI:
            showDDLOpts($opts);
            break;
        case CS_FT_LOG:
            showLogOpts($opts);
            break;
        default:
            screamForHelp($enumFieldType . ': Invalid field type<br>error on line ' . __LINE__ . ',<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
            break;
    }
}

function lNumPeopleRecsViaLetter($strDirLetter, $enumRecType, $bIncludeInactive = false, $strWhereExtra = '')
{
    //---------------------------------------------------------------------
    // $bIncludeInactive applies to volunteers
    //
    // $enumRecType: 'biz' 'bizContact' 'people' 'volunteer'
    //---------------------------------------------------------------------
    $strWhereName = strNameWhereClauseViaLetter('pe_strLName', $strDirLetter);
    $CI =& get_instance();
    switch ($enumRecType) {
        case CENUM_CONTEXT_BIZ:
            $sqlStr = "SELECT\n                 COUNT(*) AS lNumRecs\n              FROM people_names\n              WHERE 1\n                   {$strWhereName} {$strWhereExtra}\n                   AND (NOT pe_bRetired)\n                   AND pe_bBiz;";
            break;
        case CENUM_CONTEXT_BIZCONTACT:
            $sqlStr = "SELECT COUNT(*) AS lNumRecs\n               FROM people_names\n                  INNER JOIN biz_contacts ON pe_lKeyID=bc_lContactID\n               WHERE NOT pe_bBiz\n                  AND NOT pe_bRetired\n                  AND NOT bc_bRetired\n                  {$strWhereName} {$strWhereExtra}\n               GROUP BY pe_lKeyID;";
            break;
        case CENUM_CONTEXT_HOUSEHOLD:
            $sqlStr = "SELECT\n                 COUNT(*) AS lNumRecs\n              FROM people_names\n              WHERE 1\n                   {$strWhereName} {$strWhereExtra}\n                   AND pe_lHouseholdID=pe_lKeyID\n                   AND (NOT pe_bRetired)\n                   AND NOT pe_bBiz;";
            break;
        case CENUM_CONTEXT_PEOPLE:
            $sqlStr = "SELECT\n                 COUNT(*) AS lNumRecs\n              FROM people_names\n              WHERE 1\n                   {$strWhereName} {$strWhereExtra}\n                   AND (NOT pe_bRetired)\n                   AND NOT pe_bBiz;";
            break;
        case CENUM_CONTEXT_VOLUNTEER:
            if (!$bIncludeInactive) {
                $strWhereName .= ' AND NOT vol_bInactive ';
            }
            $sqlStr = "SELECT\n                 COUNT(*) AS lNumRecs\n              FROM people_names\n                 INNER JOIN volunteers on pe_lKeyID=vol_lPeopleID\n              WHERE 1\n                   {$strWhereName} {$strWhereExtra}\n                   AND (NOT pe_bRetired)\n                   AND NOT pe_bBiz;";
            break;
        default:
            screamForHelp($enumRecType . ': invalid rec type<br>error on line ' . __LINE__ . ',<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
            break;
    }
    $query = $CI->db->query($sqlStr);
    $numRows = $query->num_rows();
    if ($enumRecType == CENUM_CONTEXT_BIZCONTACT) {
        return $numRows;
    } else {
        if ($numRows == 0) {
            return 0;
        } else {
            $row = $query->row();
            return $row->lNumRecs;
        }
    }
}

 function addStatRptViaField($utableSchema, $lTableID, $fieldInfo, $strFNSIClientID, &$fieldRptInfo, &$idx)
 {
     //---------------------------------------------------------------------
     //
     //---------------------------------------------------------------------
     $fieldRptInfo[$idx] = new stdClass();
     $strSITable = $utableSchema->schema[$lTableID]->strDataTableName;
     $fieldRptInfo[$idx]->strLabel = $fieldInfo->strFieldNameUser;
     switch ($fieldInfo->enumFieldType) {
         case CS_FT_CHECKBOX:
             $fieldRptInfo[$idx]->rptType = 'yesNo';
             $fieldRptInfo[$idx]->bLeftAlign = false;
             $this->checkboxEnumerator($strSITable, $strFNSIClientID, $fieldInfo->strFieldNameInternal, $fieldRptInfo[$idx]->lNumYes);
             break;
         case CS_FT_DDL:
             $fieldRptInfo[$idx]->rptType = 'ddl';
             $fieldRptInfo[$idx]->bLeftAlign = true;
             $this->ddlEnumerator($strSITable, $strFNSIClientID, $fieldInfo->strFieldNameInternal, $fieldRptInfo[$idx]->lNumGroups, $fieldRptInfo[$idx]->lTot, $fieldRptInfo[$idx]->enumGroups);
             break;
         case CS_FT_DDLMULTI:
             $fieldRptInfo[$idx]->rptType = 'multiDDL';
             $fieldRptInfo[$idx]->bLeftAlign = true;
             $this->multiDDLEnumerator($utableSchema, $lTableID, $strSITable, $strFNSIClientID, $fieldInfo->lFieldID, $fieldRptInfo[$idx]->multiDDL);
             break;
         case CS_FT_INTEGER:
             $fieldRptInfo[$idx]->rptType = 'intCnt';
             $fieldRptInfo[$idx]->bLeftAlign = true;
             $this->intCountEnumerator($strSITable, $strFNSIClientID, $fieldInfo->strFieldNameInternal, $fieldRptInfo[$idx]->lMin, $fieldRptInfo[$idx]->lMax, $fieldRptInfo[$idx]->sngAvg, $fieldRptInfo[$idx]->sngStdDev);
             break;
         case CS_FT_TEXT255:
         case CS_FT_TEXT80:
         case CS_FT_TEXT20:
         case CS_FT_TEXTLONG:
         case CS_FT_TEXT:
         case CS_FT_DATE:
         case CS_FT_HEADING:
             --$idx;
             break;
         default:
             screamForHelp($fieldInfo->enumFieldType . ': invalid field type<br>error on line  <b> -- ' . __LINE__ . ' --</b>,<br>file ' . __FILE__ . ',<br>function ' . __FUNCTION__);
             break;
     }
     ++$idx;
 }

 public function loadClientVocabulary($bLoadViaVocID, $bSortByProtected)
 {
     //---------------------------------------------------------------------
     // return all personalized vocabulary
     //---------------------------------------------------------------------
     if ($bLoadViaVocID) {
         if (is_null($this->lVocID)) {
             screamForHelp('UNINITIALIZED CLASS<br></b>error on <b>line: </b>' . __LINE__ . '<br><b>file:</b> ' . __FILE__ . '<br><b>function:</b> ' . __FUNCTION__);
         }
     }
     $sqlStr = 'SELECT
          cv_lKeyID, cv_strVocTitle,
          cv_strVocClientS,  cv_strVocClientP, cv_strVocSponsorS,
          cv_strVocSponsorP, cv_strVocLocS,    cv_strVocLocP,
          cv_strVocSubLocS,  cv_strVocSubLocP, cv_bProtected, cv_bRetired
       FROM lists_client_vocab
       WHERE 1 ' . ($bLoadViaVocID ? " AND cv_lKeyID={$this->lVocID} " : '') . '
       ORDER BY ' . ($bSortByProtected ? ' cv_bProtected DESC, ' : '') . ' cv_strVocTitle, cv_lKeyID;';
     $query = $this->db->query($sqlStr);
     $this->lNumVocs = $numRows = $query->num_rows();
     if ($numRows == 0) {
         $this->initVoc();
     } else {
         $idx = 0;
         $this->vocs = array();
         foreach ($query->result() as $row) {
             $this->vocs[$idx] = new stdClass();
             $this->vocs[$idx]->lKeyID = (int) $row->cv_lKeyID;
             $this->vocs[$idx]->strVocTitle = $row->cv_strVocTitle;
             $this->vocs[$idx]->strLocS = $row->cv_strVocLocS;
             $this->vocs[$idx]->strLocP = $row->cv_strVocLocP;
             $this->vocs[$idx]->strClientS = $row->cv_strVocClientS;
             $this->vocs[$idx]->strClientP = $row->cv_strVocClientP;
             $this->vocs[$idx]->strSponsorS = $row->cv_strVocSponsorS;
             $this->vocs[$idx]->strSponsorP = $row->cv_strVocSponsorP;
             $this->vocs[$idx]->strSubLocS = $row->cv_strVocSubLocS;
             $this->vocs[$idx]->strSubLocP = $row->cv_strVocSubLocP;
             $this->vocs[$idx]->bProtected = (bool) $row->cv_bProtected;
             $this->vocs[$idx]->bRetired = (bool) $row->cv_bRetired;
             ++$idx;
         }
     }
 }