CreateTemplate (TdbfMailtemplate)
<source lang='delphi'>procedure TdbfMailtemplate.CreateTemplate(const iTitle:string; const iClassName:string; const iSubject:string; const iBody:String; iLang:string; iReadOnly:boolean)</source>
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
<source lang='delphi'> //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)]'
'
A lattention de [interlocuteurTiersPayeur]
' 'En date du [date]
Sauf erreur ou omission de notre part, les éléments présentés ci-après restent impayés à ce jour,
'[echeanceList]''
'
' Montant total à régler : [solde]
'
'
'
'Pour le compte de la société :
'
'[raisonSocialeTiersFacture]
'
'[adresseTiersFacture]
'
'
Veuillez agréer, Madame, Monsieur, nos salutations les meilleures.
' ''
'[mailTemplate(MailFooter)]'
,'fr',True{readOnly});
end; </source>
Voir aussi:
{{#if:Modèle de mail (bp)|
{{#if:Modèle de mail (bp)|— Modèle de mail (bp) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}