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