Weitere Scripts für Office-Dokumente

Script für Platzhalter ///Datum////

Datum soll das aktuelle Tagesdatum sein.
SRGanzzahl02:=year of(Current date)
SRGanzzahl01:=month of(Current date)
SRGanzzahl03:=day of(Current date)
Tag:=string(SRGanzzahl03)
Jahr:=string(SRGanzzahl02)
If (SRGanzzahl01=01)
Titel13:=“Januar”
End if
If (SRGanzzahl01=02)
Titel13:=“Februar”
End if
If (SRGanzzahl01=03)
Titel13:=“März”
End if
If (SRGanzzahl01=04)
Titel13:=“April”
End if
If (SRGanzzahl01=05)
Titel13:=“Mai”
End if
If (SRGanzzahl01=06)
Titel13:=“Juni”
End if
If (SRGanzzahl01=07)
Titel13:=“Juli”
End if
If (SRGanzzahl01=08)
Titel13:=“August”
End if
If (SRGanzzahl01=09)
Titel13:=“September”
End if
If (SRGanzzahl01=10)
Titel13:=“Oktober”
End if
If (SRGanzzahl01=11)
Titel13:=“November”
End if
If (SRGanzzahl01=12)
Titel13:=“Dezember”
End if
<>Result_Text:=Tag+“. “+Titel13+” “+Jahr

Script für Etikette ///Etikette///

<>Result_Text:=AdressEtiketteBuild(0)

Script für Benutzer ///Benutzer_Full_Name///

<>Result_Text:=<>c30_User_FullName

Script für Platzhalter ///Briefanrede///

Briefanrede aus der Tabelle Person resp. Firma
RELATE ONE([s0_Adresse]r_Person)
RELATE ONE([s0_Adresse]r_Firma)
Case of
: ([s0_Adresse]r_Person#0)
<>Result_Text:=[s0_Person]s_Briefanrede
: ([s0_Adresse]r_Firma#0)
<>Result_Text:=[s0_Firma]s_Briefanrede
End case

Brief mit Spendenbetrag = Einzahlungsbetrag

Beachte: im Modul Sponsoring ist die Verdankung im Standard enthalten.
<>Result_Text:=string([s1_Einzahlung]s_Gesamteinzahlung__FW;“###‘###’##0.00;-###‘###’##0.00;0.00”)

Inhalt eines freien Adressfeldes für das Mailing

Im nachstehenden Beispiel wird das Freie Adressfeld 1 mit einem Inhalt gefüllt, der verwendet werden soll.
RELATE ONE([s1_Einzahlung]r_Einzahlung__von)
If ([s0_Adresse]f_Feld__1=“”)
<>Result_Text:=“”
Else
<>Result_Text:=[s0_Adresse]f_Feld__1
End If