*: $Id: u-rswk.cpt 23782 2011-03-30 21:23:04Z ThB $
  *: # u-rswk - Registerbestimmung fuer SWD-artige Codes
  *:! u-rswk.apt generiert aus u-rswk.cpt (30.06.2011 22:35)
  *: #(_ : Registerbestimmung nach #urh anhand von Typkuerzel in #uqt
  *:! Optionen:
  *: --------------------------------------------------------------------
  *: Analyse der Spruenge, Unterprogramme und Includes:
  *: Unterprogramme: #(_
  *:   Anwendervar.: #uqh, #uqt, #urh
  *: --------------------------------------------------------------------
  $Id: u-rswk.cpt 23782 2011-03-30 21:23:04Z ThB $
  # u-rswk - Registerbestimmung fuer SWD-artige Codes
  #(_ : Registerbestimmung nach #urh anhand von Typkuerzel in #uqt
        (vgl. analoges UP in x-rswk mit numerischen Registern bei Indexierung)

  : $HeadURL: https://svn.extra.gymel.com/repos/allegro/acxt/enhancements/trunk/u-rswk.cpt $
  : s/repos/viewvc/ for browseable view in the URL above

  % Vorangestellte "?" oder "!" werden von #uqt nach #urh uebertragen

#(_   % Registerbestimmung: #uqt enth. Kuerzel, #urh wird Register enthalten
      % p - Person
      % c - Koerperschaft nach Ort
      % k - Koerperschaft ortsungebunden
      % s - Sachschlagwort
      % t - Werktitel (anonym)
      % g - Geo-Schlagwort
      % o - Topo-Schlagwort (kleinraeumiges Geographikum)
      % Default ist SSW falls nicht angegeben

#nr dqh drh p"|s%" e"%" =qh    % Default-Schlagworttyp ist "s"
#uqt y0 f"?!" e1 p"|" dqh Aqh

  % Hier sind die konkreten Register(abschnitte) hinterlegt
  % Nur vom Default abweichende Kuerzel sind aufgefuehrt:
  % Platzhalter $(...) muessen aufgeloest werden!
  *:%<*!capriccio>
#nr p"SSW|pPER|kKET|tTAF|" B"#uqh" e"|" Arh
  *:%</!capriccio>
 [-:%<*capriccio>
 [-:#nr p"SSW|pPER|kKET|tTIT|" B"#uqh" e"|" Arh
 [-:%</capriccio>
#uqt y0 e1 c"[?!]" arh

#uqh dqh Z
#)_

  ## Ende von u-rswk.cpt ##
  *:
  *: --- Ende von u-rswk.apt ---
  *:
  *:           INDEX
  *:           =====
  *:
  *: Unterprogramme
  *: #(_          21(!)
  *:
  *: Anwendervariable
  *: #uqh         31(d), 31(=), 32(d), 32(A), 38(B), 45, 45(d)
  *: #uqt         32, 43
  *: #urh         31(d), 38(A), 43(a)