* Copyright (C) 2005 James Grant * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public * License as published by the Free Software Foundation, version 2. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; see the file COPYING. If not, write to * the Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307, USA. */ ?> SetCreator('SFIAB'); $pdf->SetAuthor('SFIAB'); $pdf->SetTitle($config['fairname']); $pdf->SetSubject('Fundraising Appeal Letters'); $pdf->SetKeywords(''); // set default header data $pdf->SetHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, PDF_HEADER_TITLE, PDF_HEADER_STRING); // set header and footer fonts $pdf->setHeaderFont(Array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN)); $pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA)); // set default monospaced font $pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED); // set margins $pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT); $pdf->SetHeaderMargin(PDF_MARGIN_HEADER); $pdf->SetFooterMargin(PDF_MARGIN_FOOTER); // set auto page breaks $pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM); $pdf->setPrintFooter(false); // set image scale factor $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO); // set some language-dependent strings // $pdf->setLanguageArray($l); /* Load the users */ $users = array(); $q = $pdo->prepare("SELECT * FROM fundraising_campaigns_users_link WHERE fundraising_campaigns_id=?"); $q->execute([$fcid]); while ($l = $q->fetch(PDO::FETCH_ASSOC)) { $uid = $l['users_uid']; $users[$uid] = user_load_by_uid($uid); } /* Grab all the emails */ $q = $pdo->prepare("SELECT * FROM emails WHERE fundraising_campaigns_id=? AND val=?"); $q->execute([$fcid,$key]); while ($e = $q->fetch(PDO::FETCH_ASSOC)) { foreach ($users as $uid => &$u) { $subject = communication_replace_vars($e['subject'], $u); $body = communication_replace_vars($e['bodyhtml'], $u); /* these dont' need substitutions */ $to = $u['name']; $date = date('F j, Y'); $html = "

Attn:	$to
Subject:	$subject
Date:	$date

---

"; $pdf->AddPage(); $pdf->writeHTML($html); $pdf->writeHTML($body); $pdf->lastPage(); } } $pdf->Output('report.pdf', 'I'); ?>