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