29require_once DOL_DOCUMENT_ROOT.
'/core/lib/pdf.lib.php';
30require_once DOL_DOCUMENT_ROOT.
'/core/lib/date.lib.php';
31require_once DOL_DOCUMENT_ROOT.
'/core/lib/company.lib.php';
32require_once DOL_DOCUMENT_ROOT.
'/comm/action/class/actioncomm.class.php';
33require_once DOL_DOCUMENT_ROOT.
'/projet/class/project.class.php';
97 $langs->loadLangs(array(
"commercial",
"projects"));
101 $this->date_edition = time();
102 $this->month = $month;
108 $this->page_largeur = $formatarray[
'width'];
109 $this->page_hauteur = $formatarray[
'height'];
110 $this->format = array($this->page_largeur, $this->page_hauteur);
116 $this->title = $langs->transnoentitiesnoconv(
"ActionsReport").
' '.$this->year.
"-".$this->month;
117 $this->subject = $langs->transnoentitiesnoconv(
"ActionsReport").
' '.$this->year.
"-".$this->month;
131 global $user, $conf, $langs, $hookmanager;
133 if (!is_object($outputlangs)) {
134 $outputlangs = $langs;
138 $outputlangs->charset_output =
'ISO-8859-1';
142 $outputlangs->loadLangs(array(
"main",
"dict",
"companies",
"bills",
"products"));
144 $dir = $conf->agenda->dir_temp.
"/";
145 $file = $dir.
"actions-".sprintf(
"%02d", $this->month).
"-".sprintf(
"%04d", $this->year).
".pdf";
147 if (!file_exists($dir)) {
149 $this->error = $langs->trans(
"ErrorCanNotCreateDir", $dir);
154 if (file_exists($dir)) {
156 if (!is_object($hookmanager)) {
157 include_once DOL_DOCUMENT_ROOT.
'/core/class/hookmanager.class.php';
160 $hookmanager->initHooks(array(
'pdfgeneration'));
165 $parameters = array(
'file' => $file,
'outputlangs' => $outputlangs);
166 $reshook = $hookmanager->executeHooks(
'beforePDFCreation', $parameters,
$object, $action);
169 $heightforinfotot = 50;
171 $heightforfooter = $this->marge_basse + 8;
172 $pdf->SetAutoPageBreak(1, 0);
174 if (class_exists(
'TCPDF')) {
175 $pdf->setPrintHeader(
false);
176 $pdf->setPrintFooter(
false);
182 $pdf->SetDrawColor(128, 128, 128);
183 $pdf->SetFillColor(220, 220, 220);
185 $pdf->SetTitle($outputlangs->convToOutputCharset($this->title));
186 $pdf->SetSubject($outputlangs->convToOutputCharset($this->subject));
187 $pdf->SetCreator(
"Dolibarr ".DOL_VERSION);
188 $pdf->SetAuthor($outputlangs->convToOutputCharset($user->getFullName($outputlangs)));
189 $pdf->SetKeywords($outputlangs->convToOutputCharset($this->title.
" ".$this->subject));
192 $pdf->SetMargins($this->marge_gauche, $this->marge_haute, $this->marge_droite);
194 $nbpage = $this->
_pages($pdf, $outputlangs);
196 if (method_exists($pdf,
'AliasNbPages')) {
197 $pdf->AliasNbPages();
201 $pdf->Output($file,
'F');
204 if (!is_object($hookmanager)) {
205 include_once DOL_DOCUMENT_ROOT.
'/core/class/hookmanager.class.php';
208 $hookmanager->initHooks(array(
'pdfgeneration'));
209 $parameters = array(
'file' => $file,
'object' =>
$object,
'outputlangs' => $outputlangs);
211 $reshook = $hookmanager->executeHooks(
'afterPDFCreation', $parameters, $this, $action);
213 $this->error = $hookmanager->error;
214 $this->errors = $hookmanager->errors;
219 $this->result = array(
'fullpath' => $file);
233 private function _pages(&$pdf, $outputlangs)
240 $y = $this->
_pagehead($pdf, $outputlangs, $pagenb);
242 $pdf->SetFont(
'',
'', 8);
244 $sql =
"SELECT s.nom as thirdparty, s.rowid as socid, s.client,";
245 $sql .=
" a.id, a.datep as dp, a.datep2 as dp2,";
246 $sql .=
" a.fk_contact, a.note, a.percent as percent, a.fulldayevent, a.label, a.fk_project,";
247 $sql .=
" c.code, c.libelle as label_type,";
249 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_actioncomm as c, ".MAIN_DB_PREFIX.
"user as u, ".MAIN_DB_PREFIX.
"actioncomm as a";
250 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"societe as s ON a.fk_soc = s.rowid";
251 $sql .=
" WHERE c.id=a.fk_action AND a.fk_user_author = u.rowid";
252 $sql .=
" AND a.datep BETWEEN '".$this->db->idate(
dol_get_first_day($this->year, $this->month,
false)).
"'";
253 $sql .=
" AND '".$this->db->idate(
dol_get_last_day($this->year, $this->month,
false)).
"'";
254 $sql .=
" AND a.entity = ".$conf->entity;
255 $sql .=
" ORDER BY a.datep DESC";
258 $projectstatic =
new Project($this->db);
260 dol_syslog(get_class($this).
"::_page", LOG_DEBUG);
261 $resql = $this->db->query($sql);
263 $num = $this->db->num_rows($resql);
265 $y0 = $y1 = $y2 = $y3 = 0;
268 $obj = $this->db->fetch_object($resql);
270 $eventstatic->id = $obj->id;
271 $eventstatic->percentage = $obj->percent;
272 $eventstatic->fulldayevent = $obj->fulldayevent;
274 $y = max($y, $pdf->GetY(), $y0, $y1, $y2, $y3);
278 if (!preg_match(
'/^'.preg_quote($obj->label,
'/').
'/', $obj->note)) {
279 $text = $obj->label.
"\n";
286 if ($obj->fk_project > 0) {
287 $projectstatic->fetch($obj->fk_project);
288 if ($projectstatic->ref) {
289 $text .= ($status ?
' - ' :
'').$outputlangs->transnoentitiesnoconv(
"Project").
": ".
dol_htmlentitiesbr_decode($projectstatic->ref);
296 $heightlinemax = max(2 * $height, $nboflines * $height);
298 if ((1 + $y + $heightlinemax) >= ($this->page_hauteur - $this->marge_haute)) {
301 $y = $this->
_pagehead($pdf, $outputlangs, $pagenb);
303 $pdf->SetFont(
'',
'', 8);
308 $pdf->SetXY($this->marge_gauche, $y);
312 $textdate .=
" -> ".dol_print_date($this->db->jdate($obj->dp2),
"day").
" - ".
dol_print_date($this->db->jdate($obj->dp2),
"hour");
314 $textdate .=
" -> ".dol_print_date($this->db->jdate($obj->dp2),
"hour");
317 $textdate = $outputlangs->trans(
"ID").
' '.$obj->id.
' - '.$textdate;
318 $pdf->MultiCell(45 - $this->marge_gauche, $height, $textdate, 0,
'L', 0);
323 $pdf->MultiCell(28, $height,
dol_trunc($outputlangs->convToOutputCharset($obj->thirdparty), 28), 0,
'L', 0);
329 if ($code ==
'AC_OTH') {
332 if ($code ==
'AC_OTH_AUTO') {
337 $labelactiontype = $outputlangs->transnoentitiesnoconv(
"Action".$code);
338 $labelactiontypeshort = $outputlangs->transnoentitiesnoconv(
"Action".$code.
'Short');
339 $pdf->MultiCell(32, $height,
dol_trunc($outputlangs->convToOutputCharset($labelactiontypeshort ==
"Action".$code.
'Short' ? $labelactiontype : $labelactiontypeshort), 32), 0,
'L', 0);
343 $pdf->SetXY(106, $y);
344 $pdf->MultiCell(94, $height, $outputlangs->convToOutputCharset(
dol_trunc(
dol_string_nohtmltag($text, 0), 250,
'right',
'UTF-8', 0)), 0,
'L', 0);
362 private function _pagehead(&$pdf, $outputlangs, $pagenb)
371 $pdf->SetFont(
'',
'B', 10);
372 $pdf->SetXY($this->marge_gauche, $this->marge_haute);
373 $pdf->MultiCell(120, 1, $outputlangs->convToOutputCharset($this->title), 0,
'L', 0);
376 $pdf->SetXY($this->page_largeur - $this->marge_droite - 40, $this->marge_haute);
377 $pdf->MultiCell(40, 1, $pagenb.
'/'.$pdf->getAliasNbPages(), 0,
'R', 0);
380 $y = $pdf->GetY() + 2;
382 $pdf->Rect($this->marge_gauche, $y, ($this->page_largeur - $this->marge_gauche - $this->marge_droite), ($this->page_hauteur - $this->marge_haute - $this->marge_basse));
383 $y = $pdf->GetY() + 1;
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Class to manage agenda events (actions)
Class to manage projects.
Class to generate event report.
_pagehead(&$pdf, $outputlangs, $pagenb)
Show top header of page.
__construct($db, $month, $year)
Constructor.
write_file($object, $outputlangs)
Write the object to document file to disk.
_pages(&$pdf, $outputlangs)
Write content of pages.
dol_get_first_day($year, $month=1, $gm=false)
Return GMT time for first day of a month or year.
dol_get_last_day($year, $month=12, $gm=false)
Return GMT time for last day of a month or year.
print $script_file $mode $langs defaultlang(is_numeric($duration_value) ? " delay=". $duration_value :"").(is_numeric($duration_value2) ? " after cd cd cd description as description
Only used if Module[ID]Desc translation string is not found.
dol_htmlentitiesbr_decode($stringtodecode, $pagecodeto='UTF-8')
This function is called to decode a HTML string (it decodes entities and br tags)
dolGetFirstLineOfText($text, $nboflines=1, $charset='UTF-8')
Return first line of text.
dol_string_nohtmltag($stringtoclean, $removelinefeed=1, $pagecodeto='UTF-8', $strip_tags=0, $removedoublespaces=1)
Clean a string from all HTML tags and entities.
dolChmod($filepath, $newmask='')
Change mod of a file.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
dol_trunc($string, $size=40, $trunc='right', $stringencoding='UTF-8', $nodot=0, $display=0)
Truncate a string to a particular length adding '…' if string larger than length.
dol_nboflines($s, $maxchar=0)
Return nb of lines of a clear text.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
dol_mkdir($dir, $dataroot='', $newmask='')
Creation of a directory (this can create recursive subdir)
pdf_getFormat(Translate $outputlangs=null, $mode='setup')
Return array with format properties of default PDF format.
pdf_getPDFFont($outputlangs)
Return font name to use for PDF generation.
pdf_getInstance($format='', $metric='mm', $pagetype='P')
Return a PDF instance object.
if(preg_match('/crypted:/i', $dolibarr_main_db_pass)||!empty($dolibarr_main_db_encrypted_pass)) $conf db type