forked from hogsim/PMB
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathlettre-relance-adhesion.inc.php
executable file
·126 lines (98 loc) · 4.84 KB
/
lettre-relance-adhesion.inc.php
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
<?php
// +-------------------------------------------------+
// © 2002-2004 PMB Services / www.sigb.net [email protected] et contributeurs (voir www.sigb.net)
// +-------------------------------------------------+
// $Id: lettre-relance-adhesion.inc.php,v 1.19 2015-04-03 11:16:22 jpermanne Exp $
if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");
require_once("$class_path/marc_table.class.php");
require_once("$class_path/mono_display.class.php");
require_once("$class_path/emprunteur.class.php");
// popup d'impression PDF pour lettre de relance d'abonnement
// la formule de politesse du bas (le signataire)
$var = "pdflettreadhesion_fdp";
eval ("\$fdp=\"".$$var."\";");
// le "Madame, Monsieur," ou tout autre truc du genre "Cher adhérent,"
$var = "pdflettreadhesion_madame_monsieur";
eval ("\$madame_monsieur=\"".$$var."\";");
// le texte
$var = "pdflettreadhesion_texte";
eval ("\$texte=\"".$$var."\";");
// la marge gauche des pages
$var = "pdflettreadhesion_marge_page_gauche";
$marge_page_gauche = $$var;
// la marge droite des pages
$var = "pdflettreadhesion_marge_page_droite";
$marge_page_droite = $$var;
// la largeur des pages
$var = "pdflettreadhesion_largeur_page";
$largeur_page = $$var;
// la hauteur des pages
$var = "pdflettreadhesion_hauteur_page";
$hauteur_page = $$var;
// le format des pages
$var = "pdflettreadhesion_format_page";
$format_page = $$var;
$taille_doc=array($largeur_page,$hauteur_page);
$ourPDF = new $fpdf($format_page, 'mm', $taille_doc);
$ourPDF->Open();
if ($action=="print_all") {
// restriction localisation le cas échéant
if ($pmb_lecteurs_localises) {
if ($empr_location_id=="") $empr_location_id = $deflt2docs_location ;
if ($empr_location_id!=0) $restrict_localisation = " AND empr_location='$empr_location_id' ";
else $restrict_localisation = "";
}
// filtré par un statut sélectionné
if ($empr_statut_edit) {
if ($empr_statut_edit!=0) $restrict_statut = " AND empr_statut='$empr_statut_edit' ";
else $restrict_statut="";
}
$requete = "SELECT empr.id_empr, empr.empr_nom, empr.empr_prenom FROM empr ";
$restrict_empr = " WHERE 1 ";
$restrict_requete = $restrict_empr.$restrict_localisation.$restrict_statut." and ".$restricts;
$requete .= $restrict_requete;
if ($empr_relance_adhesion==1) $requete.=" and empr_mail=''";
$requete .= " ORDER BY empr_nom, empr_prenom ";
$res = @pmb_mysql_query($requete, $dbh);
while(($empr=pmb_mysql_fetch_object($res))) {
$ourPDF->addPage();
$ourPDF->SetMargins($marge_page_gauche,$marge_page_gauche);
if(!$pmb_hide_biblioinfo_letter) biblio_info( $marge_page_gauche, 10) ;
lecteur_adresse($empr->id_empr, ($marge_page_gauche+90), 45, $dbh, !$pmb_afficher_numero_lecteur_lettres);
$ourPDF->SetXY ($marge_page_gauche,125);
$ourPDF->setFont($pmb_pdf_font, '', 12);
$texte_madame_monsieur=str_replace("!!empr_name!!", $empr->empr_nom,$madame_monsieur);
$texte_madame_monsieur=str_replace("!!empr_first_name!!", $empr->empr_prenom,$texte_madame_monsieur);
$ourPDF->multiCell(($largeur_page - $marge_page_droite - $marge_page_gauche), 8, $texte_madame_monsieur, 0, 'L', 0);
// mettre ici le texte
$empr_temp = new emprunteur($empr->id_empr, '', FALSE, 0);
$texte_relance = $texte;
$texte_relance = str_replace("!!date_fin_adhesion!!", $empr_temp->aff_date_expiration, $texte_relance);
$ourPDF->SetXY ($marge_page_gauche,135);
$ourPDF->multiCell(($largeur_page - $marge_page_droite - $marge_page_gauche), 8, $texte_relance, 0, 'J', 0);
//
$ourPDF->multiCell(($largeur_page - $marge_page_droite - $marge_page_gauche), 8, $fdp, 0, 'R', 0);
}
pmb_mysql_free_result($res);
} else {
$ourPDF->addPage();
$ourPDF->SetMargins($marge_page_gauche,$marge_page_gauche);
if(!$pmb_hide_biblioinfo_letter) biblio_info( $marge_page_gauche, 10) ;
lecteur_adresse($id_empr, ($marge_page_gauche+90), 45, $dbh, !$pmb_afficher_numero_lecteur_lettres);
$rqt="select empr_nom, empr_prenom from empr where id_empr='".$id_empr."'";
$req=pmb_mysql_query($rqt) or die('Erreur SQL !<br />'.$rqt.'<br />'.pmb_mysql_error()); ;
$r = pmb_mysql_fetch_object($req);
$texte_madame_monsieur=str_replace("!!empr_name!!", $r->empr_nom,$madame_monsieur);
$texte_madame_monsieur=str_replace("!!empr_first_name!!", $r->empr_prenom,$texte_madame_monsieur);
$ourPDF->SetXY ($marge_page_gauche,125);
$ourPDF->setFont($pmb_pdf_font, '', 12);
$ourPDF->multiCell(($largeur_page - $marge_page_droite - $marge_page_gauche), 8, $texte_madame_monsieur, 0, 'L', 0);
// mettre ici le texte
$empr_temp = new emprunteur($id_empr, '', FALSE, 0);
$texte = str_replace("!!date_fin_adhesion!!", $empr_temp->aff_date_expiration, $texte);
$ourPDF->SetXY ($marge_page_gauche,135);
$ourPDF->multiCell(($largeur_page - $marge_page_droite - $marge_page_gauche), 8, $texte, 0, 'J', 0);
//
$ourPDF->multiCell(($largeur_page - $marge_page_droite - $marge_page_gauche), 8, $fdp, 0, 'R', 0);
}
$ourPDF->OutPut();