|
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 ) |