Beispiel:

Badura, B.; Hungeling, G. (1997): Personenbezogene Dienstleistungen im Sozial- und Gesundheitswesen- Entwicklungsbedarf und Forschungsperspektiven. In: Bullinger, Hans-Jörg (Hrsg.): Dienstleistungen für das 21. Jahrhundert, Stuttgart 1997, S. 461-476.




//Definition für VS, Nachname zuerst
//N. Busch 11.5.2006 bearbeitet durch norbert sendzik

Let(
[$Periodikum =
case(
DGlobals::d_SigleBenutzen_n = 1 and not isempty( DTitel.Periodikum::d_Sigle_t );
DTitel.Periodikum::d_Sigle_t;
DTitel.Periodikum::d_Titel_t
)
]
;

Case(
IsValid( DTitel.Periodikum::_pk_GUID.Periodikum );

// Zitform für Artikel

Trim(
d_AutorNachname_t &
Case( not IsEmpty( d_AutorVorname_t ) ; ", " & d_AutorVorname_t ) & "/" &
xCalc_Pseudonym_t &
Case( not IsEmpty( d_CoAutoren_t ) ; " " & d_CoAutoren_t ) &
Case(not IsEmpty(d_DatumJahr_t) ; " (" & d_DatumJahr_t & ")") &
": " & d_Titel_t & ". In: " &
$Periodikum &
Case( not IsEmpty( d_AusgabeNr_t ); " " & d_AusgabeNr_t ) &
Case( not IsEmpty( d_AusgabeSeite_t) ; ": " & d_AusgabeSeite_t )
) // End trim
;
IsValid( DTitel.Titel.Sammelband::_pk_GUID.Titel );

// Zitform für Aufsätze

Trim(
d_AutorNachname_t &
Case( not IsEmpty( d_AutorVorname_t ) ; ", " & d_AutorVorname_t ) & "/ " &
xCalc_Pseudonym_t &
Case( not IsEmpty( d_CoAutoren_t ) ; "" & d_CoAutoren_t ) &
Case(not IsEmpty(d_DatumJahr_t) ; " (" & d_DatumJahr_t & ")") &
": " & d_Titel_t & ". In: " &
Trim( DTitel.Titel.Sammelband::d_AutorNachname_t & ", " & DTitel.Titel.Sammelband::d_AutorVorname_t ) & "/ " &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_CoAutoren_t ); DTitel.Titel.Sammelband::d_CoAutoren_t ) & "(Hrsg.)" &
": " & DTitel.Titel.Sammelband::d_Titel_t & ". " &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_Ort_t ); DTitel.Titel.Sammelband::d_Ort_t ) &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_Ort_t ) and not IsEmpty( DTitel.Titel.Sammelband::d_Verlag_t ) ; ", ") &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_Verlag_t ) ; DTitel.Titel.Sammelband::d_Verlag_t ) &
Case( not IsEmpty( d_AusgabeSeite_t ) ; ", S. " & d_AusgabeSeite_t )
) // End trim
;

// Zitform für Monographien

Trim(
d_AutorNachname_t &
Case( not IsEmpty( d_AutorVorname_t ) ; ", " & d_AutorVorname_t ) &
xCalc_Pseudonym_t &
Case( not IsEmpty( d_CoAutoren_t ) ; "/ " & d_CoAutoren_t ) &
" (Hrsg.) " &
Case(not IsEmpty(d_DatumJahr_t) ; "(" & d_DatumJahr_t & ")") &
": " & d_Titel_t & ". " &
Case( not IsEmpty( d_Ort_t ); d_Ort_t ) &
Case( not IsEmpty( d_Ort_t ) and not IsEmpty( d_Verlag_t ) ; ", ") &
Case( not IsEmpty( d_Verlag_t ) ; d_Verlag_t ) &
Case( not IsEmpty( d_BibliogrZusätze_t ) ; " (" & d_BibliogrZusätze_t & ")")
) // End trim
) //End Case

& DGlobals::v_ZitformSchlusszeichen
)