is_active = 1;
$dao->find();
while ($dao->fetch()) {
$messageText[$dao->id] = $dao->msg_text;
$messageSubject[$dao->id] = $dao->msg_subject;
}
$form->assign('message', $messageText);
$form->assign('messageSubject', $messageSubject);
CRM_Utils_System::setTitle('Create Printable Letters (PDF)');
}
/**
* @param CRM_Core_Form $form
* @param int $cid
*/
public static function preProcessSingle(&$form, $cid) {
$form->_contactIds = array($cid);
// put contact display name in title for single contact mode
CRM_Utils_System::setTitle(ts('Create Printable Letter (PDF) for %1', array(1 => CRM_Core_DAO::getFieldValue('CRM_Contact_DAO_Contact', $cid, 'display_name'))));
}
/**
* Build the form object
*
* @var CRM_Core_Form $form
*
* @return void
*/
public static function buildQuickForm(&$form) {
// This form outputs a file so should never be submitted via ajax
$form->preventAjaxSubmit();
//Added for CRM-12682: Add activity subject and campaign fields
CRM_Campaign_BAO_Campaign::addCampaign($form);
$form->add(
'text',
'subject',
ts('Activity Subject'),
array('size' => 45, 'maxlength' => 255),
FALSE
);
$form->add('static', 'pdf_format_header', NULL, ts('Page Format: %1', array(1 => '')));
$form->addSelect('format_id', array(
'label' => ts('Select Format'),
'placeholder' => ts('Default'),
'entity' => 'message_template',
'field' => 'pdf_format_id',
'option_url' => 'civicrm/admin/pdfFormats',
));
$form->add(
'select',
'paper_size',
ts('Paper Size'),
array(0 => ts('- default -')) + CRM_Core_BAO_PaperSize::getList(TRUE),
FALSE,
array('onChange' => "selectPaper( this.value ); showUpdateFormatChkBox();")
);
$form->add('static', 'paper_dimensions', NULL, ts('Width x Height'));
$form->add(
'select',
'orientation',
ts('Orientation'),
CRM_Core_BAO_PdfFormat::getPageOrientations(),
FALSE,
array('onChange' => "updatePaperDimensions(); showUpdateFormatChkBox();")
);
$form->add(
'select',
'metric',
ts('Unit of Measure'),
CRM_Core_BAO_PdfFormat::getUnits(),
FALSE,
array('onChange' => "selectMetric( this.value );")
);
$form->add(
'text',
'margin_left',
ts('Left Margin'),
array('size' => 8, 'maxlength' => 8, 'onkeyup' => "showUpdateFormatChkBox();"),
TRUE
);
$form->add(
'text',
'margin_right',
ts('Right Margin'),
array('size' => 8, 'maxlength' => 8, 'onkeyup' => "showUpdateFormatChkBox();"),
TRUE
);
$form->add(
'text',
'margin_top',
ts('Top Margin'),
array('size' => 8, 'maxlength' => 8, 'onkeyup' => "showUpdateFormatChkBox();"),
TRUE
);
$form->add(
'text',
'margin_bottom',
ts('Bottom Margin'),
array('size' => 8, 'maxlength' => 8, 'onkeyup' => "showUpdateFormatChkBox();"),
TRUE
);
$config = CRM_Core_Config::singleton();
if ($config->wkhtmltopdfPath == false) {
$form->add(
'text',
'stationery',
ts('Stationery (relative path to PDF you wish to use as the background)'),
array('size' => 25, 'maxlength' => 900, 'onkeyup' => "showUpdateFormatChkBox();"),
FALSE
);
}
$form->add('checkbox', 'bind_format', ts('Always use this Page Format with the selected Template'));
$form->add('checkbox', 'update_format', ts('Update Page Format (this will affect all templates that use this format)'));
$form->assign('useThisPageFormat', ts('Always use this Page Format with the new template?'));
$form->assign('useSelectedPageFormat', ts('Should the new template always use the selected Page Format?'));
$form->assign('totalSelectedContacts', count($form->_contactIds));
CRM_Mailing_BAO_Mailing::commonLetterCompose($form);
$buttons = array();
if ($form->get('action') != CRM_Core_Action::VIEW) {
$buttons[] = array(
'type' => 'submit',
'name' => $form->_single ? ts('Make PDF') : ts('Make PDFs'),
'isDefault' => TRUE,
);
}
$buttons[] = array(
'type' => 'cancel',
'name' => $form->get('action') == CRM_Core_Action::VIEW ? ts('Done') : ts('Cancel'),
);
$form->addButtons($buttons);
$form->addFormRule(array('CRM_Contact_Form_Task_PDFLetterCommon', 'formRule'), $form);
}
/**
* Set default values
*/
public static function setDefaultValues() {
$defaultFormat = CRM_Core_BAO_PdfFormat::getDefaultValues();
$defaultFormat['format_id'] = $defaultFormat['id'];
return $defaultFormat;
}
/**
* Form rule
*
* @param array $fields the input form values
* @param array $dontCare
* @param array $self additional values form 'this'
*
* @return true if no errors, else array of errors
*
*/
public static function formRule($fields, $dontCare, $self) {
$errors = array();
$template = CRM_Core_Smarty::singleton();
//Added for CRM-1393
if (!empty($fields['saveTemplate']) && empty($fields['saveTemplateName'])) {
$errors['saveTemplateName'] = ts("Enter name to save message template");
}
if (!is_numeric($fields['margin_left'])) {
$errors['margin_left'] = 'Margin must be numeric';
}
if (!is_numeric($fields['margin_right'])) {
$errors['margin_right'] = 'Margin must be numeric';
}
if (!is_numeric($fields['margin_top'])) {
$errors['margin_top'] = 'Margin must be numeric';
}
if (!is_numeric($fields['margin_bottom'])) {
$errors['margin_bottom'] = 'Margin must be numeric';
}
return empty($errors) ? TRUE : $errors;
}
/**
* Part of the post process which prepare and extract information from the template
*
*
* @param CRM_Core_Form $form
*
* @return array( $categories, $html_message, $messageToken, $returnProperties )
*/
static protected function processMessageTemplate(&$form) {
$formValues = $form->controller->exportValues($form->getName());
// process message template
if (!empty($formValues['saveTemplate']) || !empty($formValues['updateTemplate'])) {
$messageTemplate = array(
'msg_text' => NULL,
'msg_html' => $formValues['html_message'],
'msg_subject' => NULL,
'is_active' => TRUE,
);
$messageTemplate['pdf_format_id'] = 'null';
if (!empty($formValues['bind_format']) && $formValues['format_id']) {
$messageTemplate['pdf_format_id'] = $formValues['format_id'];
}
if (!empty($formValues['saveTemplate']) && $formValues['saveTemplate']) {
$messageTemplate['msg_title'] = $formValues['saveTemplateName'];
CRM_Core_BAO_MessageTemplate::add($messageTemplate);
}
if (!empty($formValues['updateTemplate']) && $formValues['template'] && $formValues['updateTemplate']) {
$messageTemplate['id'] = $formValues['template'];
unset($messageTemplate['msg_title']);
CRM_Core_BAO_MessageTemplate::add($messageTemplate);
}
}
elseif (CRM_Utils_Array::value('template', $formValues) > 0) {
if (!empty($formValues['bind_format']) && $formValues['format_id']) {
$query = "UPDATE civicrm_msg_template SET pdf_format_id = {$formValues['format_id']} WHERE id = {$formValues['template']}";
}
else {
$query = "UPDATE civicrm_msg_template SET pdf_format_id = NULL WHERE id = {$formValues['template']}";
}
CRM_Core_DAO::executeQuery($query, CRM_Core_DAO::$_nullArray);
}
if (!empty($formValues['update_format'])) {
$bao = new CRM_Core_BAO_PdfFormat();
$bao->savePdfFormat($formValues, $formValues['format_id']);
}
$html = array();
$tokens = array();
CRM_Utils_Hook::tokens($tokens);
$categories = array_keys($tokens);
$html_message = $formValues['html_message'];
//time being hack to strip ' '
//from particular letter line, CRM-6798
self::formatMessage($html_message);
$messageToken = CRM_Utils_Token::getTokens($html_message);
$returnProperties = array();
if (isset($messageToken['contact'])) {
foreach ($messageToken['contact'] as $key => $value) {
$returnProperties[$value] = 1;
}
}
return array($formValues, $categories, $html_message, $messageToken, $returnProperties);
}
/**
* Process the form after the input has been submitted and validated
*
*
* @param CRM_Core_Form $form
*
* @return void
*/
public static function postProcess(&$form) {
list($formValues, $categories, $html_message, $messageToken, $returnProperties) = self::processMessageTemplate($form);
$skipOnHold = isset($form->skipOnHold) ? $form->skipOnHold : FALSE;
$skipDeceased = isset($form->skipDeceased) ? $form->skipDeceased : TRUE;
foreach ($form->_contactIds as $item => $contactId) {
$params = array('contact_id' => $contactId);
list($contact) = CRM_Utils_Token::getTokenDetails($params,
$returnProperties,
$skipOnHold,
$skipDeceased,
NULL,
$messageToken,
'CRM_Contact_Form_Task_PDFLetterCommon'
);
if (civicrm_error($contact)) {
$notSent[] = $contactId;
continue;
}
$tokenHtml = CRM_Utils_Token::replaceContactTokens($html_message, $contact[$contactId], TRUE, $messageToken);
$tokenHtml = CRM_Utils_Token::replaceHookTokens($tokenHtml, $contact[$contactId], $categories, TRUE);
if (defined('CIVICRM_MAIL_SMARTY') && CIVICRM_MAIL_SMARTY) {
$smarty = CRM_Core_Smarty::singleton();
// also add the contact tokens to the template
$smarty->assign_by_ref('contact', $contact);
$tokenHtml = $smarty->fetch("string:$tokenHtml");
}
$html[] = $tokenHtml;
}
self::createActivities($form, $html_message, $form->_contactIds);
CRM_Utils_PDF_Utils::html2pdf($html, "CiviLetter.pdf", FALSE, $formValues);
$form->postProcessHook();
CRM_Utils_System::civiExit(1);
}
/**
* @param CRM_Core_Form $form
* @param $html_message
* @param $contactIds
*
* @throws CRM_Core_Exception
*/
public static function createActivities($form, $html_message, $contactIds) {
//Added for CRM-12682: Add activity subject and campaign fields
$formValues = $form->controller->exportValues($form->getName());
$session = CRM_Core_Session::singleton();
$userID = $session->get('userID');
$activityTypeID = CRM_Core_OptionGroup::getValue(
'activity_type',
'Print PDF Letter',
'name'
);
$activityParams = array(
'subject' => $formValues['subject'],
'campaign_id' => CRM_Utils_Array::value('campaign_id', $formValues),
'source_contact_id' => $userID,
'activity_type_id' => $activityTypeID,
'activity_date_time' => date('YmdHis'),
'details' => $html_message,
);
if (!empty($form->_activityId)) {
$activityParams += array('id' => $form->_activityId);
}
if ($form->_cid) {
$activity = CRM_Activity_BAO_Activity::create($activityParams);
}
else {
// create Print PDF activity for each selected contact. CRM-6886
$activityIds = array();
foreach ($contactIds as $contactId) {
$activityID = CRM_Activity_BAO_Activity::create($activityParams);
$activityIds[$contactId] = $activityID->id;
}
}
$activityContacts = CRM_Core_OptionGroup::values('activity_contacts', FALSE, FALSE, FALSE, NULL, 'name');
$targetID = CRM_Utils_Array::key('Activity Targets', $activityContacts);
//@todo why are we using $form->_contactIds here & contactIds above - need comment
foreach ($form->_contactIds as $contactId) {
$activityTargetParams = array(
'activity_id' => empty($activity->id) ? $activityIds[$contactId] : $activity->id,
'contact_id' => $contactId,
'record_type_id' => $targetID
);
CRM_Activity_BAO_ActivityContact::create($activityTargetParams);
}
}
/**
* @param $message
*/
public static function formatMessage(&$message) {
$newLineOperators = array(
'p' => array(
'oper' => '',
'pattern' => '/<(\s+)?p(\s+)?>/m',
),
'br' => array(
'oper' => '
',
'pattern' => '/<(\s+)?br(\s+)?\/>/m',
),
);
$htmlMsg = preg_split($newLineOperators['p']['pattern'], $message);
foreach ($htmlMsg as $k => & $m) {
$messages = preg_split($newLineOperators['br']['pattern'], $m);
foreach ($messages as $key => & $msg) {
$msg = trim($msg);
$matches = array();
if (preg_match('/^( )+/', $msg, $matches)) {
$spaceLen = strlen($matches[0]) / 6;
$trimMsg = ltrim($msg, ' ');
$charLen = strlen($trimMsg);
$totalLen = $charLen + $spaceLen;
if ($totalLen > 100) {
$spacesCount = 10;
if ($spaceLen > 50) {
$spacesCount = 20;
}
if ($charLen > 100) {
$spacesCount = 1;
}
$msg = str_repeat(' ', $spacesCount) . $trimMsg;
}
}
}
$m = implode($newLineOperators['br']['oper'], $messages);
}
$message = implode($newLineOperators['p']['oper'], $htmlMsg);
}
}