<?php $clsDateTime = new dl_date_time(); $params = array('enumStyle' => 'terse', 'clsRpt'); $clsRpt = new generic_rpt($params); $clsRpt->strWidthLabel = '130pt'; $client = $clsClient->clients[0]; showClientInfo($clsRpt, $lCID, $clsClient, $clsDateTime, true, null, false); openClientServices(); // custom forms if ($lNumCustomForms > 0) { showCustomForms($lCID, $cForms); } // client programs if ($lNumCProgs > 0) { showClientPrograms($lCID, $lNumCProgs, $cProgs); } // pre/post tests if ($lTotTests > 0) { showPrePostTests($lCID, $ppcats); } closeClientServices(); // personalized tables showCustomClientTableInfo($strPT, $lNumPTablesAvail); // sponsorship if (bAllowAccess('showSponsors')) { showClientSponsorInfo($clsRpt, $lCID, $clsClient); } showClientStatusInfo($clsRpt, $lCID, $clsClient, $clientStatus, $lNumClientStatus); showGroupInfo($lCID, $client->strSafeName, $lNumGroups, $groupList, $inGroups, $lCntGroupMembership, CENUM_CONTEXT_CLIENT, 'cRecView'); if ($bShowEMR) {
function reportDupClientInfo($clsDateTime, $clsRpt, $dupClients) { //--------------------------------------------------------------------- // //--------------------------------------------------------------------- foreach ($dupClients as $client) { echoT('<table class="enpView" style="border-bottom: 1px solid black; margin-bottom: 8pt;">'); showClientInfo($clsDateTime, $clsRpt, $client); echoT('</table>'); } }
<?php $bInactive = $sponRec->bInactive; $clsDateTime = new dl_date_time(); $params = array('enumStyle' => 'terse', 'clsRpt'); $clsRpt = new generic_rpt($params); $clsRpt->strWidthLabel = $strWidthLabel; //'120pt'; showSponInfo($clsRpt, $sponRec, $lSponID, $bInactive); showSponHonInfo($clsRpt, $lSponID, $sponRec, $bInactive); if (bAllowAccess('showClients')) { showClientInfo($clsRpt, $lClientID, $clsClient, $clsDateTime, is_null($lClientID), $lSponID, true, 'Sponsored '); } if (bAllowAccess('showSponsorFinancials')) { showSponFinancialInfo($clsRpt, $lSponID, $sponRec, $financialSummary); } showGroupInfo($lSponID, $sponRec->strSponSafeNameFL, $lNumGroups, $groupList, $inGroups, $lCntGroupMembership, CENUM_CONTEXT_SPONSORSHIP, 'spRecView'); showCustomSponsorTableInfo($strPT, $lNumPTablesAvail); showImageInfo(CENUM_CONTEXT_SPONSORSHIP, $lSponID, 'Sponsorship Images', $images, $lNumImages, $lNumImagesTot); showDocumentInfo(CENUM_CONTEXT_SPONSORSHIP, $lSponID, 'Sponsorship Documents', $docs, $lNumDocs, $lNumDocsTot); // showReminderBlock ($clsRem, $lSponID, CENUM_CONTEXT_SPONSORSHIP); showSponsorENPStats($clsRpt, $sponRec); function showSponsorENPStats($clsRpt, $sponRec) { //--------------------------------------------------------------------- // //--------------------------------------------------------------------- $attributes = new stdClass(); $attributes->lTableWidth = 900; $attributes->divID = 'sponENP'; $attributes->divImageID = 'sponENPDivImg';
<?php $clsDateTime = new dl_date_time(); $params = array('enumStyle' => 'terse', 'clsRpt'); $clsRpt = new generic_rpt($params); $clsRpt->strWidthLabel = '130pt'; $clsRpt->openReport(); openBlock('Good Client Record', ''); echoT('<table class="enpView" border="0">'); showClientInfo($clsDateTime, $clsRpt, $goodClient[0]); echoT('</table>'); closeBlock(); openBlock('Duplicate Client Records', ''); foreach ($dupClients as $client) { echoT('<table class="enpView">'); showClientInfo($clsDateTime, $clsRpt, $client); echoT('</table>'); } closeBlock(); openBlock('Action', ''); echoT(anchor('clients/client_dups/consolidate/' . $reportID, 'CONSOLIDATE DUPLICATE RECORDS') . '<br><br>'); echoT(anchor('clients/client_dups/opts', 'CANCEL') . ' - Don\'t consolidate.<br><br>'); closeBlock(); echoT($clsRpt->closeReport()); function showClientInfo($clsDateTime, $clsRpt, $client) { //--------------------------------------------------------------------- // //--------------------------------------------------------------------- global $gbDateFormatUS, $genumDateFormat, $glclsDTDateFormat; // Client ID
<?php $clsDateTime = new dl_date_time(); $params = array('enumStyle' => 'terse', 'clsRpt'); $clsRpt = new generic_rpt($params); $clsRpt->strWidthLabel = '130pt'; $clsRpt->openReport(); openBlock('Consolidated Client Record', ''); echoT('<table class="enpView" border="0">'); showClientInfo($clsDateTime, $clsRpt, $client, $dupCIDs); echoT('</table>'); closeBlock(); function showClientInfo($clsDateTime, $clsRpt, $client, $dupCIDs) { //--------------------------------------------------------------------- // //--------------------------------------------------------------------- global $gbDateFormatUS, $genumDateFormat, $glclsDTDateFormat; // Client ID $lClientID = $client->lKeyID; echoT($clsRpt->openRow() . $clsRpt->writeLabel('Client ID:') . $clsRpt->writeCell(strLinkView_ClientRecord($lClientID, 'View client record', true) . ' ' . str_pad($lClientID, 5, '0', STR_PAD_LEFT)) . $clsRpt->closeRow()); // Name echoT($clsRpt->openRow() . $clsRpt->writeLabel('Name:') . $clsRpt->writeCell($client->strSafeName) . $clsRpt->closeRow()); // Address echoT($clsRpt->openRow() . $clsRpt->writeLabel('Address:') . $clsRpt->writeCell($client->strAddress) . $clsRpt->closeRow()); // birthday $mdteBirth = $client->dteBirth; $clsDateTime->setDateViaMySQL(0, $mdteBirth); $strAgeBDay = $clsDateTime->strPeopleAge(0, $mdteBirth, $lAgeYears, $glclsDTDateFormat); echoT($clsRpt->openRow() . $clsRpt->writeLabel('Birth Date:') . $clsRpt->writeCell($strAgeBDay) . $clsRpt->closeRow()); // Phone