Patient </td> <td class="enpRptLabel"> Location </td> <td class="enpRptLabel"> Activity </td> <td class="enpRptLabel"> Duration </td> </tr>'); $sngDuration = 0.0; foreach ($pvInfo as $pvRec) { $lVisitID = $pvRec->pvRecID; $strDuration = pvisit\strMinutesToHoursMin($pvRec->lDuration, true); $sngDuration += $pvRec->lDuration; echoT(' <tr class="makeStripe"> <td class="enpRpt">' . str_pad($lVisitID, 5, '0', STR_PAD_LEFT) . ' ' . strLinkView_PVisit($lVisitID, 'View patient visit record', true) . ' </td> <td class="enpRpt">' . date('m/d/Y', $pvRec->dteDOV) . ' </td> <td class="enpRpt">' . htmlspecialchars($pvRec->strVolLName . ', ' . $pvRec->strVolFName) . '<br>' . $pvRec->strVolAddress . ' </td> <td class="enpRpt">' . htmlspecialchars($pvRec->strPatientLName . ', ' . $pvRec->strPatientFName) . '<br>' . $pvRec->strPatientAddress . ' </td> <td class="enpRpt">' . htmlspecialchars($pvRec->strLocation) . ' </td> <td class="enpRpt">' . htmlspecialchars($pvRec->strActivity) . ' </td>
function patientVisitsViaVolDetails($sqlWhereExtra, $strSort, &$lNumVolRecs, &$volRecs) { //--------------------------------------------------------------------- // //--------------------------------------------------------------------- $volRecs = array(); $lNumVolRecs = 0; $strFNDOV = 'pv_dteVisit'; $strSort = " vol_strLName, vol_strFName, vol_lKeyID, {$strFNDOV} "; $sqlStr = $this->strSQLCommonPatientVisitDetails($sqlWhereExtra, $strSort); $query = $this->db->query($sqlStr); $numRecs = $query->num_rows(); if ($numRecs > 0) { foreach ($query->result() as $row) { $lVID = (int) $row->vol_lKeyID; if (!isset($volRecs[$lVID])) { $volRecs[$lVID] = new stdClass(); $this->loadPeopleInfo($volRecs[$lVID], $row); $volRecs[$lVID]->pVisits = array(); ++$lNumVolRecs; $idx = 0; } $volRecs[$lVID]->pVisits[$idx] = new stdClass(); $vRec =& $volRecs[$lVID]->pVisits[$idx]; $vRec->dteDOV = $row->dteDOV; $vRec->pvRecID = (int) $row->pvRecID; $vRec->lDuration = (int) $row->pv_lDuration; $vRec->strDuration = pvisit\strMinutesToHoursMin($vRec->lDuration); $vRec->strLocation = $row->strLocation; $vRec->strActivity = $row->strActivity; $this->loadPatientInfo($vRec, $row); ++$idx; } } }
function showGeneralPVisitInfo($attributes, $clsRpt, $pVisit) { //--------------------------------------------------------------------- // //--------------------------------------------------------------------- global $gbVolMgr; $attributes->bCloseDiv = false; $attributes->divID = 'pVGen'; $attributes->divImageID = 'pVGenDivImg'; openBlock('Visit', '', $attributes); echoT($clsRpt->openReport()); echoT($clsRpt->openRow() . $clsRpt->writeLabel('Visit ID:') . $clsRpt->writeCell(str_pad($pVisit->lKeyID, 5, '0', STR_PAD_LEFT)) . $clsRpt->closeRow()); echoT($clsRpt->openRow() . $clsRpt->writeLabel('Organization:') . $clsRpt->writeCell(htmlspecialchars($pVisit->strChapterName)) . $clsRpt->closeRow()); if ($gbVolMgr) { $strViewPRec = strLinkView_PatientRecord($pVisit->lPatientID, 'View patient record', true); $strViewVRec = strLinkView_VolRecord($pVisit->lVolID, 'View volunteer record', true); } else { $strViewVRec = $strViewPRec = ''; } echoT($clsRpt->openRow() . $clsRpt->writeLabel('Patient:') . $clsRpt->writeCell(htmlspecialchars($pVisit->strPatientLName . ', ' . $pVisit->strPatientFName) . ' ' . $strViewPRec) . $clsRpt->closeRow()); echoT($clsRpt->openRow() . $clsRpt->writeLabel('Volunteer:') . $clsRpt->writeCell(htmlspecialchars($pVisit->strVolLName . ', ' . $pVisit->strVolFName) . ' ' . $strViewVRec) . $clsRpt->closeRow()); echoT($clsRpt->openRow() . $clsRpt->writeLabel('Date of Visit:') . $clsRpt->writeCell(date('l, F jS, Y', $pVisit->dteVisit)) . $clsRpt->closeRow()); echoT($clsRpt->openRow() . $clsRpt->writeLabel('Time/Duration:') . $clsRpt->writeCell(date('g:i A', $pVisit->lStartTime) . ' / ' . pvisit\strMinutesToHoursMin($pVisit->lDuration)) . $clsRpt->closeRow()); echoT($clsRpt->openRow() . $clsRpt->writeLabel('Medical Record #:') . $clsRpt->writeCell(htmlspecialchars($pVisit->strMedRec)) . $clsRpt->closeRow()); echoT($clsRpt->closeReport()); $attributes->bCloseDiv = true; closeBlock($attributes); }
function displayPatientVisits(&$pVisits, &$displayFields, $strVolSafeName) { //--------------------------------------------------------------------- // //--------------------------------------------------------------------- echoT('<br> <table class="enpRptC"> <tr> <td class="enpRptTitle" colspan="10"> Patient Visits by volunteer ' . $strVolSafeName . ' </td> </tr> <tr> <td class="enpRptLabel"> </td> <td class="enpRptLabel">Patient</td> <td class="enpRptLabel">Date / Time of Visit</td> <td class="enpRptLabel">Person Served</td> <td class="enpRptLabel">Activity</td> <td class="enpRptLabel">Interventions</td> <td class="enpRptLabel">Visit Info</td> </tr>'); foreach ($pVisits as $pV) { // visit info $strVI = 'For this visit, the patient was' . strMultiDDL2UL($pV->status) . 'During my visit, I' . strMultiDDL2UL($pV->tasks); $lVisitID = $pV->lKeyID; $strDateOfVisit = date('l, F jS, Y', $pV->dteVisit) . '<br>' . date('g:i A', $pV->lStartTime) . ' / ' . pvisit\strMinutesToHoursMin($pV->lDuration); $strPS = '<ul style="margin-top: 0px; margin-left: -25px; margin-bottom: 0px;">' . "\n"; $strPS .= strAddListElement($pV->ps_bPatient, 'Patient'); $strPS .= strAddListElement($pV->ps_bCaregiver, 'Caregiver'); $strPS .= strAddListElement($pV->ps_bBereaved, 'Bereaved'); $strPS .= strAddListElement($pV->ps_bOther, 'Other'); $strPS .= '</ul>' . "\n"; if ($pV->ps_strNotes != '') { $strPS .= nl2br(htmlspecialchars($pV->ps_strNotes)); } // activity $strAct = htmlspecialchars($pV->strActivity); if ($pV->act_strNotes != '') { $strAct .= '<br>' . nl2br(htmlspecialchars($pV->act_strNotes)); } // intervention $strInt = '<ul style="margin-top: 0px; margin-left: -25px; margin-bottom: 0px;">' . "\n"; $strInt .= strAddListElement($pV->in_bCompanionship, 'Companionship'); $strInt .= strAddListElement($pV->in_bCaregiverRelief, 'Caregiver Relief'); $strInt .= strAddListElement($pV->in_bEmotionalSupport, 'Emotional Support'); $strInt .= strAddListElement($pV->in_bSocialization, 'Socialization'); $strInt .= strAddListElement($pV->in_bBereavement, 'Bereavement'); $strInt .= strAddListElement($pV->in_bTelephoneCall, 'Telephone Call'); $strInt .= strAddListElement($pV->in_bExcursionErrands, 'Excursions / Errands'); $strInt .= strAddListElement($pV->in_bMusicPetArt, 'Music / Pet / Art'); $strInt .= strAddListElement($pV->in_bFoodPrep, 'Food Preparation'); $strInt .= strAddListElement($pV->in_bHouseholdChores, 'Household Chores'); $strInt .= strAddListElement($pV->in_bOther, 'Other'); $strInt .= '</ul>' . "\n"; if ($pV->in_strNotes != '') { $strInt .= nl2br(htmlspecialchars($pV->in_strNotes)); } echoT(' <tr class="makeStripe"> <td class="enpRpt" style="text-align: center;">' . str_pad($lVisitID, 5, '0', STR_PAD_LEFT) . ' ' . strLinkView_PVisit($lVisitID, 'View patient visit record', true, 'id="pv' . $lVisitID . '"') . ' </td> <td class="enpRpt" style="width: 100pt;">' . htmlspecialchars($pV->strPatientLName . ', ' . $pV->strPatientFName) . ' </td> <td class="enpRpt">' . $strDateOfVisit . '</td> <td class="enpRpt">' . $strPS . '</td> <td class="enpRpt">' . $strAct . '</td> <td class="enpRpt">' . $strInt . '</td> <td class="enpRpt" style="width: 210pt;">' . $strVI . '</td> '); } echoT('</table><br><br>'); }