$currentData = trim($aRow[$aPropRow['prop_Field']]);
$OutStr .= $aPropRow['prop_Name'] . ": " . displayCustomField($aPropRow['type_ID'], $currentData, $aPropRow['prop_Special']) . "\n";
}
}
mysql_data_seek($rsProps, 0);
}
// Count the number of lines in the output string
$numlines = 1;
$offset = 0;
while ($result = strpos($OutStr, "\n", $offset)) {
$offset = $result + 1;
$numlines++;
}
//if ($numlines > 1)
//{
/* if (strtoupper($sLastLetter) != strtoupper(substr($pdf->sFamily,0,1)))
{
$pdf->Check_Lines($numlines+2);
$sLastLetter = strtoupper(substr($pdf->sFamily,0,1));
$pdf->Add_Header($sLastLetter);
} */
$pdf->Add_Record($pdf->sFamily, $OutStr, $numlines);
// }
}
header('Pragma: public');
// Needed for IE when using a shared SSL certificate
if ($iPDFOutputType == 1) {
$pdf->Output("GroupDirectory-" . date("Ymd-Gis") . ".pdf", "D");
} else {
$pdf->Output();
}
$TempStr = ExpandPhoneNumber($sCellPhone, $sDefaultCountry, $bWierd);
$OutStr .= " " . gettext("Cell") . ": " . $TempStr . "\n";
}
if ($bDirPersonalEmail && strlen($sEmail)) {
$OutStr .= " " . gettext("Email") . ": " . $sEmail . "\n";
}
if ($bDirPersonalWorkEmail && strlen($per_WorkEmail)) {
$OutStr .= " " . gettext("Work/Other Email") . ": " . ($per_WorkEmail .= "\n");
}
}
// Count the number of lines in the output string
if (strlen($OutStr)) {
$numlines = substr_count($OutStr, "\n");
} else {
$numlines = 0;
}
if ($numlines > 0) {
if (strtoupper($sLastLetter) != strtoupper(substr($pdf->sRecordName, 0, 1))) {
$pdf->Check_Lines($numlines + 2);
$sLastLetter = strtoupper(substr($pdf->sRecordName, 0, 1));
$pdf->Add_Header($sLastLetter);
}
$pdf->Add_Record($pdf->sRecordName, $OutStr, $numlines);
// another hack: added +1
}
}
if ($iPDFOutputType == 1) {
$pdf->Output("Directory-" . date("Ymd-Gis") . ".pdf", true);
} else {
$pdf->Output();
}
if ($numlines > 0) {
if (strtoupper($sLastLetter) != strtoupper(substr($pdf->sRecordName, 0, 1))) {
$pdf->Check_Lines($numlines + 2, 0, 0);
$sLastLetter = strtoupper(substr($pdf->sRecordName, 0, 1));
$pdf->Add_Header($sLastLetter);
}
// if photo include pass the id, otherwise 0 equates to no family/pers
$fid = 0;
$pid = 0;
if ($bDirPhoto) {
if ($isFamily) {
$fid = $fam_ID;
} else {
$pid = $per_ID;
}
}
$pdf->Add_Record($pdf->sRecordName, $OutStr, $numlines, $fid, $pid);
// another hack: added +1
}
}
if ($mysqlversion == 3 && $mysqlsubversion >= 22) {
$sSQL = "DROP TABLE IF EXISTS tmp;";
mysql_query($sSQL, $cnInfoCentral);
}
header('Pragma: public');
// Needed for IE when using a shared SSL certificate
if ($iPDFOutputType == 1) {
$pdf->Output("Directory-" . date("Ymd-Gis") . ".pdf", true);
} else {
$pdf->Output();
}
$sName = $per_LastName . ", " . $per_FirstName . " " . $per_MiddleName;
$aName .= $sName . "\n";
$numlines++;
// add an extra blank line after record
$pdf->Check_Lines(30);
$pdf->Print_Name($sName);
$PosX = $pdf->_Margin_Left + 163;
$PosY = $pdf->_Margin_Top + ($pdf->_CurLine - 1) * 5;
$sDirImagePer = "..\\Images\\Person\\thumbnails\\" . $per_ID . ".jpg";
if (is_readable($sDirImagePer)) {
$pdf->Image($sDirImagePer, $PosX, $PosY, 25);
}
$sTitle = "No. Induk";
$sValue = $fam_NoIndFam . "-" . $per_NoIndJem . "." . $fam_NamaSek;
$aNoInd .= $sValue . "\n";
$pdf->Add_Record($sTitle, $sValue, 1);
$sTitle = "Tempat/Tanggal Lahir";
if ($per_BirthPlace == "") {
$per_BirthPlace = "____________";
}
if ($per_BirthDay == 0) {
$per_BirthDay = "___";
}
if (!is_null($per_BirthMonth)) {
$per_BirthMonth = date("F", mktime(0, 0, 0, $per_BirthMonth + 1, 0, 0));
}
if ($per_BirthMonth == "0") {
$per_BirthMonth = "___";
}
if ($per_BirthYear == "") {
$per_BirthYear = "___";
