RSWK-Ketten, Indexierung etc.

Fr Mai 12 13:30:45 CEST 1995

Liebe allegrologInnen,

P. Oliver Kaftan aus Aachen hat einige interessante Vorschlaege 
geschickt, die ich Zur Kenntnisnahme und evtl. Kommentierung mal
herumreichen moechte, wobei ich mal von seinem Einverstaendnis 
ausgehe.

------- Forwarded Message Follows -------

Date sent:      Fri, 12 May 1995 07:01:43 +0100
From:           okaftan at ma-sun02.rz.rwth-aachen.de (Okaftan)
To:             B.Eversberg at tu-bs.de

   Lieber Herr Eversberg!
   Hier einige Vorschlaege zur Verarbeitung von Schlagwortketten
   und deren Aufbau aus der SWD. Es werden nur die Ketten als
   Ganze und deren Permutationen indiziert, die einzelnen Elemente
   verbunden mit den Id.Nr. sollten auch noch einmal sinnvoll im
   Index abgelegt werden. Ausserdem ist noch eine Prozedur fuer
   ein Update des Volltextes anhand der Id.nr. zu bedenken und
   vielleicht noch einiges mehr.
   Vor einiger Zeit habe ich einmal angeregt, die Verarbeitung der
   zu ersetzenden Schluessel durch Index zu ergaenzen: Wenn ein
   Schluessel mit dem Steuerzeichen beginnt, wird er VOLLSTAENDIG
   gelesen und alle Teile, die mit dem Steuerzeichen beginnen
   ersetzt. So waeren Schluessel moeglich, die aus mehreren zu ersetzenden
   Id.Nr. bestehen. So wuerde es erst sinnvoll, die neuen Verknuepfungen
   der Version 14 auch fuer SW-Ketten zu verwenden. PRESTO u.ae., sowie
   UPDATE lassen ja bereits zusammengesetzte Schluessel mit mehreren
   zu ersetzenden Teilen zu. Sehen Sie eine Moeglichkeit, dies zu
   verwirklichen?
       Mit freundlichen Gruessen,
                                  P. Oliver J.

******************************************
Kommentar der Entw.Abt. zum letzten Punkt:
Fuer moeglich halte ich das schon, aber man muesste eine ERHEBLICH
laengere Zeit fuer das Indexieren veranschlagen. Denn jeder einzelne 
Eintrag, also der GESAMTE INDEX, muesste dann im sog. 2. Durchlauf 
nochmals betrachtet werden!!! Wie es jetzt ist, muss das Programm 
sich nur die Stellen anschauen, die mit dem Steuerzeichen 
anfangen, was SEHR viel weniger ist. 
Sollte sich dafuer eine Mehrheit finden, oder sagen wir eine 
qualifizierte Minderheit von wenigstens vier oder fuenf Leuten, die 
fest entschlossen sind, sowas dann zu nutzen, dann koennte man eine 
Loesung in Angriff nehmen. Vielleicht dann mit einem optionalen 
Schalter, den man nur im begruendeten Ausnahmefall und im Wissen um 
die Konsequenzen mit Bedacht umlegen wuerde...
 B.E.
*******************************************

Und hier gehts weiter mit Pater Olivers Vorschlaegen:

    Verarbeitung von SW-Kettten in der Form:
    xSW1_NR1xSW2_NR2xSW3_NR3Pnnn nnn

    Ergaenzung fuer D-1.APR: Datei SW.APT 
    Es ist "tsw" einzufuegen hinter "#-UE"

#330 C { &0 t78 "SW: " #250 t76 } e0
#33. ++ m4 m>P >P

#nr +#3n e0
#(P   PerMutationen in Schlagwortketten bis zu 6 SW in einer Kette
  Grundkette aufbauen
#cc dsw y0 b1 e"P" =sv
#-C
#usv y0 b1 e"[_]" " / " Asw  "b1" blendet Kennbuchstaben fuer SW-Typ aus
#usv +C y0 b"" =sv
#usw b" / "            Grundkette ausgeben
#cc +D {13} P f32 =pm  Permutationsmuster aus Teilfeld "p" in #upm
#)P
#-D
#upm +#391 i4,1 e0
#upm +#392 i4,2 e0
#upm +#393 i4,3 e0
#upm +#394 i4,4 e0
#upm +#395 i4,5 e0
#upm +#396 i4,6 e0
#dts +#39w {13} e0    Zeilenvorschub zwischen zwei Ketten
#391 e0
#cc +#39x y0 b"" b1 e"[_]" f32 F32                         1. SW
#dts +#39w e0
#392 e0
#cc +#39x y0 b"" b"" b1 e"[_]" f32 F32                 2. SW 
#dts +#39w e0
#393 e0
#cc +#39x y0 b"" b"" b"" b1 e"[_]" f32 F32             3. SW
#dts +#39w e0
#394 e0
#cc +#39x y0 b"" b"" b"" b"" b1 e"[_]" f32 F32        4. SW
#dts +#39w e0
#395 e0
#cc +#39x y0 b"" b"" b"" b"" b"" b1 e"[_]" f32 F32    5. SW
#dts +#39w e0
#396 e0
#cc +#39x y0 b"" b"" b"" b"" b"" b"" b1 e"[_]" f32 F32  6. SW
#dts +#39w e0
#39x e0
#upm I5,  b1 " / " e3   " / " zwischen zwei SW
#39w e0
#upm +D b1 =pm
#)M
#3n e0

  ****************************************************************
    Ergaenzungen fuer CAT.API

ak=usv"[$&]"+S

#-@
 Aufbereitung der Schlagwortketten
#nr dsw dsv e0
#33. ++ y0 ,",P,$$," m"&" Asw
#-a
#usw y0 e"$$" "&" Asv
#usw y0 b"$$" e"&" "$" ,", ,$," Asv
#usw +a y0 b"&" =sw 
#usv y0 b1 =sv
 ...

                             ergaenze

#ch +#393 i2,3 I3,0 I3,1 I3,2 I3,3 I3,4 I3,5 e0         #33.
 ...

#-S    Schlagwort-Ketten  #33.
#nr "|3" e2
#u1 +#390 y0 i4, e0     Grundkette in #usw aufbauen
#u1 =PM                 Permutationsmuster
#-d
#uPM +#391 i4,1 e0
#uPM +#392 i4,2 e0
#uPM +#393 i4,3 e0
#uPM +#394 i4,4 e0
#uPM +#395 i4,5 e0
#uPM +#396 i4,6 e0
#+#
#391 e0
!usw +#39x e"/" f32 F32                           1. SW
#+#
#392 e0
!usw +#39x b"/" e"/" f32 F32                      2. SW 
#+#
#393 e0
!usw +#39x b"/" b"/" e"/" f32 F32                 3. SW
#+#
#394 e0
!usw +#39x b"/" b"/" b"/" e"/" f32 F32            4. SW
#+#
#395 e0
!usw +#39x b"/" b"/" b"/" b"/" e"/" f32 F32       5. SW
#+#
#396 e0
!usw +#39x b"/" b"/" b"/" b"/" b"/" b"/" e"/" f32 F32  6. SW
#+#
#39x e0
#uPM b1 " / " e3   " / " zwischen zwei SW einer Kette
#uPM +d b1 =PM     naechste Ziffer des Permutationsmusters
#+#

#390 e0                     Grundkette in #usw aufbauen
#u1 y0 b1 =sw
#-e
#usw y0 b1 e"_" " / " Asw   "b1" blendet SW-Typ aus
#usw +e y0 b"" =sw
#usw b" / " =sw
!usw                         Grundkette ausgeben
#+#

  ****************************************************************
   Datei SWD2CAT.APR fuer die UEbernahme von SW-Ketten
   mittels globaler Manipulaiton

 -----------------------------------------------------------------
zl=0        Zeilenlaenge unbegrenzt
ks=4        Beginn beim vierten Zeichen hinter #
ke=""       kein Kategorie-Ende = 0
as=""       kein Aufnahme-Start
ae=13 10    kein Aufnahme-Ende
 -----------------------------------------------------------------
#-#
#20 +#20 e0
#3n +#3n e0
#+#
  Aufbau der SW-Kette in der SWD
#3n i3,  b1 e1 "" ASW
#3n i3,  y0 b" " ASW
#00 "_" ASW
#+#

  UEbernahme der SW-Kette in den Katalog
#20 e0
#330 +#39x e0
#uSW dSW "330" M
#+#
#39x
#uSW dSW "33u" M
#+#

Bernhard Eversberg
Universitaetsbibliothek, Postf. 3329, 
D-38023 Braunschweig, Germany
Tel.  +49 531 391-5026 , -5011 , FAX  -5836
e-mail  B.Eversberg at tu-bs.de