Ejemplo n.º 1
0
$pdf->SetAuthor('http://www.ianseo.net');
$pdf->SetCreator('Software Design by Ianseo');
$pdf->SetTitle('IANSEO - Integrated Result System');
$pdf->SetSubject('Final Athlete Name');
$pdf->SetTextColor(0x0, 0x0, 0x0);
$pdf->SetDrawColor(0x33, 0x33, 0x33);
$pdf->SetFillColor(0xe8, 0xe8, 0xe8);
$pdf->setCellMargins(0, 0, 0, 0);
$pdf->SetCellPadding(0);
$Height = array(0, 0, 0);
$Height[1] = $pdf->getPageHeight() / 3;
$Height[2] = $Height[1] * 2;
$Width = $pdf->getPageWidth() - 65;
$CellHeight = $Height[1] - 10;
// 5 top and bottom
$fontname = $pdf->addTTFfont($CFG->DOCUMENT_PATH . 'Common/tcpdf/fonts/ariblk.ttf');
$pdf->SetFont($fontname);
$Filter = '';
if (!empty($_REQUEST['x_Session'])) {
    $Filter .= " and QuSession={$_REQUEST['x_Session']}";
}
if (!empty($_REQUEST['x_From'])) {
    $Filter .= " and substr(QuTargetNo,2)>='" . str_pad($_REQUEST['x_From'], 3, '0', STR_PAD_LEFT) . "'";
}
if (!empty($_REQUEST['x_To'])) {
    $Filter .= " and substr(QuTargetNo,2)<='" . str_pad($_REQUEST['x_To'], 3, '0', STR_PAD_LEFT) . "'";
}
$Rs = safe_r_SQL("select EnName, EnFirstName, QuTargetNo\n\tfrom Entries\n\tinner join Qualifications on EnId=QuId {$Filter} where EnTournament={$_SESSION['TourId']}\n\torder by QuTargetNo");
error_reporting(E_ALL);
$n = 0;
while ($MyRow = safe_fetch($Rs)) {