CreateTemplate (TdbfMailtemplate)

procedure TdbfMailtemplate.CreateTemplate(const iTitle:string; const iClassName:string; const iSubject:string; const iBody:String; iLang:string; iReadOnly:boolean)

Enregistrement d'un modèle de mail.

Paramètre	Usage
iTitle	La libellé du modèle de mail
iClassName	La classe associée au mail
iSubject	Sujet du mail
iBody	Le corps du mail
iLang	Language du mail
iReadOnly	Ce modèle est en lecture seule

A l'intérieur du corps du mail il est possible d'introduire des variables [xx] qui seront substituées lors de la génération du mail, ces variables peuvent être :

• Des références à d'autre modèle de mail qui seront alors inclus lors de la génération.
• Des références à des attributs de la classe associée au modèle.

Pour une classe associée à un mail il est possible de définir des variables en utilisant la méthode de classe GetMailProperties

Exemple

//procedure RegisterMailTemplates;
begin
  {$SETLINEBREAK}
  // 
  TdbfMailtemplate.CreateTemplate('Mail de relance au tiers payeur','TRelance',
 
  // subject 
  '(No reply) (Sage FRP 1000) Relance de facture(s) en attente de réglement',
 
  // body 
  '[mailTemplate(MailHeader)]'
  '<div role="content">' 
   '<h3>A l''attention de [interlocuteurTiersPayeur]</h3>'
 
   '<p>En date du [date]<br></p>'
   '<p>Sauf erreur ou omission de notre part, les éléments présentés ci-après restent impayés à ce jour,<br></p>'
 
   '[echeanceList]' 
 
   '<p>'
     ' Montant total à régler : [solde]<br>' 
     '<br>'
     'Pour le compte de la société :<br>'
     '[raisonSocialeTiersFacture]<br>' 
     '[adresseTiersFacture]<br>' 
   '</p>'
 
   '<p>Veuillez agréer, Madame, Monsieur, nos salutations les meilleures.</p>' 
  '</div>' 
  '[mailTemplate(MailFooter)]'
 
  ,'fr',True{readOnly}); 
 
end;

Voir aussi:

• GetMailProperties

— Modèle de mail (bp) — Développement DSM —