|
//Definition Historische Zitierweise Titel, Nachname zuerst
//Christoph A. Steinbach 17.07.2006 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_Körperschaft_t ) ; Case( not IsEmpty( d_AutorNachname_t ); ", ") & d_Körperschaft_t ) & Case( not IsEmpty( d_herausgeber_t ) ; " (" & d_herausgeber_t & ")" ) & Case( not ( IsEmpty( d_AutorNachname_t ) and IsEmpty( d_AutorVorname_t ) and IsEmpty( d_Körperschaft_t )) ; ": ") & Case( not IsEmpty( xCalc_in_t ); "" & d_Titel_t & ""; d_Titel_t ) & ", " & Case( IsValid ( DTitel.Titel.Sammelband::_pk_GUID.Titel ) ; "in: " & xCalc_in_t ; IsValid (DTitel.Periodikum::_pk_GUID.Periodikum ); "in: " & DTitel.Periodikum::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_DatumJahr_t ) ; " " & d_DatumJahr_t ) ) & Case( not IsEmpty( d_AusgabeVol_t ) ; " " & Trim( d_AusgabeVol_t )) & Case(not IsEmpty( d_AusgabeNr_t ) ; ", " & Trim( d_AusgabeNr_t)) & Case( IsValid ( DTitel.Periodikum::_pk_GUID.Periodikum ) and not IsEmpty( d_DatumJahr_t) ; " (" & d_DatumJahr_t & ")" ) & Case( not IsEmpty( d_AusgabeSeite_t ) ; ", S. " & Trim( d_AusgabeSeite_t )) & Case( not IsEmpty( d_BibliogrZusätze_t ) ; " (" & d_BibliogrZusätze_t & ")")) & DGlobals::v_ZitformSchlusszeichen |