/** * Edition de la liste de contrôle * * @return void */ function editCheckList() { $colonnes = array("Nom" => 20, "Prenom" => 20, "Dossier" => 25, "Type" => 15, "Entree" => 15, "Sortie" => 15, "Statut" => 20, "Montant" => 25); $this->editTableau($colonnes, 5, 25); $debut_lignes = 30; $ligne = 0; $montant_total = 0; foreach ($this->factures as $facture) { $this->pdf->setX(5); $ligne++; $valeurs = array("Nom" => $facture->_ref_patient->nom, "Prenom" => $facture->_ref_patient->prenom, "Dossier" => $facture->_view . " " . $facture->_ref_last_sejour->type, "Type" => $facture->type_facture, "Entree" => CMbDT::transform("", $facture->_ref_last_sejour->entree_prevue, '%d/%m/%Y'), "Sortie" => CMbDT::transform("", $facture->_ref_last_sejour->sortie_prevue, '%d/%m/%Y'), "Statut" => $facture->envoi_xml ? "Facture électronique" : "", "Montant" => sprintf("%.2f", $facture->_montant_avec_remise)); $x = 0; foreach ($colonnes as $key => $value) { $cote = $key == "Montant" ? "R" : "L"; $this->editCell($this->pdf->getX() + $x, $debut_lignes + $ligne * 4, $value, $valeurs[$key], $cote); $x = $value; } if ($debut_lignes + $ligne * 4 >= 200) { $ligne = $this->ajoutPage($colonnes); } $montant_total += $facture->_montant_avec_remise; } $ligne += 2; $pos_ligne = $debut_lignes + $ligne * 4; $this->editCell(180, $pos_ligne, 80, "Montant total:", "R"); $this->editCell(210, $pos_ligne, 80, $montant_total, "R"); }
/** * Edition du haut de la relance * * @return void */ function editRelanceEntete() { $this->loadAllElements(); $this->pdf->AddPage(); $colonne1 = 10; $colonne2 = 120; $tab[$colonne1] = array("40" => "Auteur facture", $this->auteur["nom"], $this->auteur["adresse1"], $this->auteur["adresse2"], $this->auteur["cp"] . " " . $this->auteur["ville"]); $patient_adrr = $this->traitements($this->patient->adresse); //Destinataire de la facture $tab[$colonne2] = array("40" => "Patient", "n° AVS: " . $this->patient->avs, $this->patient->_view, $patient_adrr["group1"], $patient_adrr["group2"], $this->patient->cp . " " . $this->patient->ville); if (CAppUI::conf("ref_pays") != 2) { unset($tab[$colonne2][41]); } // Ecriture de C, D, E, F $this->pdf->setFont($this->font, '', 8); $x = $y = 0; foreach ($tab as $k => $v) { foreach ($v as $key => $value) { if ($value) { if ($key == "40") { $y = $key; $x = 0; } $this->editCell($k, $y + $x, 30, $value); $x = $key == "40" ? $x + 5 : $x + 3; } } } $this->editCell(20, $this->pdf->getY() + 20, 35, CAppUI::tr("CRelance.statut." . $this->relance->statut), "C", 1, 4); $this->pdf->setX(110); if (CAppUI::conf("ref_pays") == 2) { $this->pdf->Write(4, CAppUI::conf("dPfacturation CEditPdf home_ville", CGroups::loadCurrent()) . ", le " . CMbDT::format(CMbDT::date(), "%d %B %Y")); } $frais = 0; $messages = array(0 => "", 1 => ""); $assurance_patient = $this->destinataire[0]; $type = isset($assurance_patient->type_pec) ? "assur" : "patient"; switch ($this->relance->statut) { case "first": $frais = CAppUI::conf("dPfacturation CRelance add_first_relance"); $messages = explode('/*****/', CAppUI::conf("dPfacturation CRelance message_relance1_{$type}")); break; case "second": $frais = CAppUI::conf("dPfacturation CRelance add_second_relance"); $messages = explode('/*****/', CAppUI::conf("dPfacturation CRelance message_relance2_{$type}")); break; case "third": $frais = CAppUI::conf("dPfacturation CRelance add_third_relance"); $messages = explode('/*****/', CAppUI::conf("dPfacturation CRelance message_relance3_{$type}")); break; } if (count($messages) == 1) { $messages[1] = ""; } $this->pdf->setXY(10, $this->pdf->getY() + 18); $this->pdf->Write(3, "Madame, Monsieur,"); $this->pdf->setXY(10, $this->pdf->getY() + 8); $this->pdf->Write(4, $messages[0]); $y = 122; $col1 = 40; $col2 = 80; $col3 = 30; $this->pdf->setFont($this->fontb, '', 8); $this->editCell(20, $y, $col1, "Facture", "C", 1, 4); $this->editCell(20, $y + 4, $col1, "N°: " . $this->facture->_id, null, "LBR", 15); $this->editCell($this->pdf->getX(), $y, 80, "Désignation", "C", 1, 4); $this->editCell(60, $y + 4, $col2, "Du " . CMbDT::format($this->facture->cloture, "%d %B %Y"), null, "R", 5); $this->pdf->setFont($this->font, '', 8); $this->editCell(60, $y + 9, $col2, "Frais", null, "R", 4); $this->pdf->setFont($this->fontb, '', 8); $this->editCell(60, $y + 13, $col2, "Solde à payer", null, "BR", 6); $this->editCell($this->pdf->getX(), $y, 30, "Montant (CHF)", "C", 1, 4); $this->editCell(140, $y + 4, $col3, sprintf('%0.2f', $this->relance->_montant - $frais), "R", "R", 5); $this->pdf->setFont($this->font, '', 8); $this->editCell(140, $y + 9, $col3, sprintf('%0.2f', $frais), "R", "R", 4); $this->pdf->setFont($this->fontb, '', 8); $this->editCell(140, $y + 13, $col3, sprintf('%0.2f', $this->relance->_montant), "R", "BR", 6); $this->pdf->setFont($this->font, '', 8); $this->pdf->setXY(10, $this->pdf->getY() + 14); $this->pdf->Write(4, $messages[1]); $this->pdf->setXY(120, $this->pdf->getY() + 14); if (CAppUI::conf("ref_pays") == 2) { $this->pdf->Write(4, CAppUI::conf("dPfacturation CEditPdf home_nom", CGroups::loadCurrent())); } $this->pdf->setXY(120, $this->pdf->getY() + 4); $this->pdf->Write(3, "Service comptabilité"); }
function printEtiquettes($printer_id = null, $stream = 1) { // Affectation de la police par défault si aucune n'est choisie if ($this->font == "") { $this->font = "dejavusansmono"; } // Calcul des dimensions de l'étiquette $largeur_etiq = ($this->largeur_page - 2 * $this->marge_horiz) / $this->nb_colonnes; $hauteur_etiq = ($this->hauteur_page - 2 * $this->marge_vert) / $this->nb_lignes; // Création du PDF $pdf = new CMbPdf('P', 'cm', array($this->largeur_page, $this->hauteur_page)); $pdf->setFont($this->font, '', $this->hauteur_ligne); $pdf->setPrintHeader(false); $pdf->setPrintFooter(false); $pdf->SetMargins($this->marge_horiz, $this->marge_vert, $this->marge_horiz); $pdf->SetAutoPageBreak(0, $this->marge_vert); $pdf->AddPage(); $distinct_texts = 1; $textes = array(); $pays = CAppUI::conf("ref_pays"); // La fonction nl2br ne fait qu'ajouter la balise <br />, elle ne supprime pas le \n. // Il faut donc le faire manuellement. $textes[1] = preg_replace("/[\t\r\n\f]/", '', utf8_encode(nl2br($this->texte))); if ($this->texte_2) { $distinct_texts++; $textes[] = preg_replace("/[\t\r\n\f]/", '', utf8_encode(nl2br($this->texte_2))); } if ($this->texte_3) { $distinct_texts++; $textes[] = preg_replace("/[\t\r\n\f]/", '', utf8_encode(nl2br($this->texte_3))); } if ($this->texte_4) { $distinct_texts++; $textes[] = preg_replace("/[\t\r\n\f]/", '', utf8_encode(nl2br($this->texte_4))); } $nb_etiqs = $this->nb_lignes * $this->nb_colonnes; $increment = floor($nb_etiqs / $distinct_texts); $current_text = 1; // Création de la grille d'étiquettes et écriture du contenu. for ($i = 0; $i < $nb_etiqs; $i++) { if ($i != 0 && $i % $increment == 0 && isset($textes[$current_text + 1])) { $current_text++; } if (round($pdf->GetX()) >= round($this->largeur_page - 2 * $this->marge_horiz)) { $pdf->SetX(0); $pdf->SetLeftMargin($this->marge_horiz); $pdf->SetY($pdf->GetY() + $hauteur_etiq); } if ($this->show_border) { $pdf->Rect($pdf->GetX(), $pdf->GetY(), $largeur_etiq, $hauteur_etiq, 'D'); } $x = $pdf->GetX(); $y = $pdf->GetY(); $pdf->SetLeftMargin($x); // On affecte la marge droite de manière à ce que la méthode Write fasse un retour chariot // lorsque le contenu écrit va dépasser la largeur de l'étiquette $pdf->SetRightMargin($this->largeur_page - $x - $largeur_etiq); $fragments = explode("@", $textes[$current_text]); $was_barcode = 0; CMbArray::removeValue("", $fragments); // Evaluation de la hauteur du contenu de la cellule // si un alignement spécifique est demandé. if ($this->text_align != "top") { $pdf_ex = new CMbPdf('p', 'cm', array($largeur_etiq, $hauteur_etiq)); $pdf_ex->setFont($this->font, '', $this->hauteur_ligne); $pdf_ex->SetMargins(0, 0, 0); $pdf_ex->setPrintHeader(false); $pdf_ex->setPrintFooter(false); $pdf_ex->SetAutoPageBreak(false); $pdf_ex->AddPage(); foreach ($fragments as $fragment) { if (preg_match("/BARCODE_(.*)/", $fragment, $matches) == 1) { switch ($pays) { case "2": $save_x = $pdf_ex->getX(); $pdf_ex->setY($pdf_ex->getY() + 0.4); $pdf_ex->setX($save_x); $barcode = $matches[1]; $pdf_ex->setFont("C39HrP24DhTt", '', 30); $pdf_ex->WriteHTML($barcode, false); $pdf_ex->setFont($this->font, '', $this->hauteur_ligne); break; default: $barcode_x = $pdf_ex->getX() + 0.15; $barcode_y = $pdf_ex->getY(); $barcode = $matches[1]; $barcode_width = strlen($barcode) * 0.4 + 0.4; $pdf_ex->writeBarcode($barcode_x, $barcode_y, $barcode_width, 0.8, "C128B", 1, null, null, $barcode, 25); $pdf_ex->setX($barcode_x + $barcode_width); } $was_barcode = 1; } else { if ($was_barcode) { $sub_fragments = explode("<br />", $fragment, 2); $pdf_ex->WriteHTML($sub_fragments[0], false); if (isset($sub_fragments[1])) { $actual_y = $pdf_ex->getY(); $pdf_ex->setY($actual_y + 0.8); $pdf_ex->WriteHTML($sub_fragments[1], false); } } else { $pdf_ex->WriteHTML($fragment, false); } $was_barcode = 0; } } $pdf_y = $pdf->getY(); $pdf_ex_y = $pdf_ex->getY(); switch ($this->text_align) { case "middle": $pdf->setY($pdf_y - 0.2 + ($hauteur_etiq - $pdf_ex_y) / 2); break; case "bottom": $pdf->setY($pdf_y - 0.4 + $hauteur_etiq - $pdf_ex_y); } } foreach ($fragments as $fragment) { if (preg_match("/BARCODE_(.*)/", $fragment, $matches) == 1) { switch ($pays) { case "2": // La position x est à remettre car perdue lors de la méthode setY $save_x = $pdf->getX(); $pdf->setY($pdf->getY() + 0.4); $pdf->setX($save_x); $barcode = $matches[1]; $pdf->setFont("C39HrP24DhTt", '', 30); $pdf->WriteHTML("*{$barcode}*", false); $pdf->setFont($this->font, '', $this->hauteur_ligne); break; default: $barcode_x = $pdf->getX() + 0.15; $barcode_y = $pdf->getY(); $barcode = $matches[1]; $barcode_width = strlen($barcode) * 0.4 + 0.4; $pdf->writeBarcode($barcode_x, $barcode_y, $barcode_width, 0.8, "C128B", 1, null, null, $barcode); $pdf->setX($barcode_x + $barcode_width); } $was_barcode = 1; } else { if ($was_barcode) { $sub_fragments = explode("<br />", $fragment, 2); $pdf->WriteHTML($sub_fragments[0], false); if (isset($sub_fragments[1])) { $actual_y = $pdf->getY(); $pdf->setY($actual_y + 0.8); $pdf->WriteHTML($sub_fragments[1], false); } } else { $pdf->WriteHTML($fragment, false); } $was_barcode = 0; } } $x = $x + $largeur_etiq; $pdf->SetY($y); $pdf->SetX($x); } if ($printer_id) { $file = new CFile(); $file->_file_path = tempnam("/tmp", "etiq"); file_put_contents($file->_file_path, $pdf->Output($this->nom . '.pdf', "S")); $printer = new CPrinter(); $printer->load($printer_id); $printer->loadRefSource()->sendDocument($file); unlink($file->_file_path); } else { if ($stream) { $pdf->Output($this->nom . '.pdf', "I"); } else { return $pdf->OutPut($this->nom . '.pdf', "S"); } } }