//Alexander Mendle 09.07.2007
//Update auf Litlink 3.5, 18.05.2008, N. Busch
//Auf Basis der Suhrkamp-Definition von N. Busch
//Ein eindeutiger Schlüssel wird aus dem Feld Eigene Signatur kreiert.
//Bitte erwarten sie nicht, dass dieses Stück Software stets fehlerfrei funktioniert.
//Überarbeitet von Lars Frers: Habe auf Anregung von mme.tourette at yahoo.fr das Format geändert, da im mitgelieferten Format das Jahr nicht ausgegeben wurde. Das Format von mme.tourette war leider defekt, bzw. nicht mehr mit LitLink 3.5 kompatibel.
Case(
IsValid( DTitel.Periodikum::_pk_GUID );
// Zitform für Artikel -> @article
Trim(
"@ARTICLE{" & d_EigeneSignatur_t & ",author={" &
Case( not IsEmpty( d_AutorNachname_t ) ; d_AutorNachname_t ) &
Case( IsEmpty( d_AutorNachname_t ) ; "o.~V." ) &
Case ( not IsEmpty( d_AutorVorname_t ); ", " & d_AutorVorname_t ) &
xCalc_Pseudonym_ctu &
Case ( not IsEmpty( d_CoAutoren_t ) ; " and " & d_CoAutoren_t ) &
"},title={" & d_Titel_t & "}" &
Case ( not IsEmpty( DTitel.Periodikum::d_Titel_t ) ; ",journal={" & DTitel.Periodikum::d_Titel_t & "}" ) &
Case ( IsEmpty( DTitel.Periodikum::d_Titel_t ) ; ",journal={PERIODIKUM!!}" ) &
Case ( not IsEmpty( d_AusgabeVol_t ) ; ",volume=" & d_AusgabeVol_t ) &
Case ( not IsEmpty( d_Datierung_t ) ; ",year={" & d_Datierung_t & "}" ) &
Case ( IsEmpty( d_Datierung_t ) ; ",year={o.~J.}" ) &
Case ( not IsEmpty( d_AusgabeNr_t ); ",number={" & d_AusgabeNr_t & "}" ) &
Case ( not IsEmpty( d_AusgabeSeite_t) ; ",pages={" & d_AusgabeSeite_t & "}" ) &
"}") // End trim
;
IsValid( DTitel.Titel.Sammelband::_pk_GUID );
// Zitform für Aufsätze -> @incollection
Trim(
"@INCOLLECTION{" & d_EigeneSignatur_t & ",author={" &
Case( not IsEmpty( d_AutorNachname_t ) ; d_AutorNachname_t ) &
Case( IsEmpty( d_AutorNachname_t ) ; "o.~V." ) &
Case( not IsEmpty( d_AutorVorname_t ) ; ", " & d_AutorVorname_t ) &
xCalc_Pseudonym_ctu &
Case( not IsEmpty( d_CoAutoren_t ) ; " and " & d_CoAutoren_t ) &
"},title={" & d_Titel_t & "}" &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_Titel_t ) ; ",booktitle={" & DTitel.Titel.Sammelband::d_Titel_t & "}" ) &
Case( IsEmpty( DTitel.Titel.Sammelband::d_Titel_t ) ; ",booktitle={BUCHTITEL!!}" ) &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_Herausgeber_n ) ; ",editor={" & DGlobals::d_HerausgeberKürzel_t &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_CoAutoren_t ) ; " and " & DTitel.Titel.Sammelband::d_CoAutoren_t ) &
"}" ) &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_Ort_t ) ; ",address={" & DTitel.Titel.Sammelband::d_Ort_t & "}" ) &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_Verlag_t ) ; ",publisher={" & DTitel.Titel.Sammelband::d_Verlag_t & "}" ) &
Case( IsEmpty( DTitel.Titel.Sammelband::d_Verlag_t ) ; ",publisher={VERLAG!!}" ) &
Case( not IsEmpty( d_Datierung_t ) ; ",year={" & d_Datierung_t & "}" ) &
Case ( IsEmpty( d_Datierung_t ) ; ",year={o.~J.}" ) &
Case( not IsEmpty( DTitel.Titel.Sammelband::d_BibliogrZusätze_t ) ; ",edition={" & DTitel.Titel.Sammelband::d_BibliogrZusätze_t & "}" ) &
Case( not IsEmpty( d_AusgabeSeite_t ) ; ",pages={" & d_AusgabeSeite_t & "}" ) &
"}") // End trim
;
// Zitform für Monographien -> @book
Trim(
"@BOOK{" & d_EigeneSignatur_t &
Case ( not IsEmpty( d_Sammelband_b ) ; ",editor={" & d_AutorNachname_t & Case ( not IsEmpty( d_AutorVorname_t ) ; ", " & d_AutorVorname_t ) & Case ( not IsEmpty( d_CoAutoren_t ) ; " and " & d_CoAutoren_t ) & "}" ) &
Case ( IsEmpty( d_Sammelband_b ) ; ",author={" & d_AutorNachname_t & Case( not IsEmpty( d_AutorVorname_t ) ; ", " & d_AutorVorname_t ) & xCalc_Pseudonym_ctu & Case ( not IsEmpty( d_CoAutoren_t ) ; " and " & d_CoAutoren_t ) & "}" ) &
",title={" & d_Titel_t & "}" &
Case( not IsEmpty( d_Ort_t ) ; ",address={" & d_Ort_t & "}" ) &
Case( IsEmpty( d_Ort_t ) ; ",address={o.~O.}" ) &
Case( not IsEmpty( d_Verlag_t ) ; ",publisher={" & d_Verlag_t & "}" ) &
Case( IsEmpty( d_Verlag_t ) ; ",publisher={VERLAG!!}" ) &
Case( not IsEmpty( d_Datierung_t ) ; ",year={" & d_Datierung_t & "}" ) &
Case ( IsEmpty( d_Datierung_t ) ; ",year={o.~J.}" ) &
Case( not IsEmpty( d_BibliogrZusätze_t ) ; ",edition={" & d_BibliogrZusätze_t & "}" ) &
"}" ) // End trim
) //End Case
& DGlobals::v_ZitFormSchlusszeichen