Anwendervariable

[Okaftan]

Liebe AllegrologInnen,

Anwendervariablen koennen  nicht beliebig  lang sein, so hatte ich
Bedenken, es  koennte einmal  diese Grenze  ueberschritten werden.
Hier  nun   ein   kleiner   Test   fuer   Laenge   einer   solchen
Anwendervariablen, die  alle Titelkategorien  gemaeá dem NW-Schema
enthalten soll  (zum  Eintrag  der  Titelstichwoerter  im  Index).
Vielleicht kann es ja noch jemand gebrauchen.
Auf  dem  Bildschirm  erscheint  links  oben  die  augenblichliche
maximale Laenge,  der Endwert  befindet sich  dann  in  der  Datei
MAXLANG.

   Gruesse,
            P. Oliver

Der Programmaufruf:
SRCH -f4 -eLAENGE1/CON -eLAENGE2/MAXLANG -s0 -m0

Datei: LAEGE1.cPR

zl=0        Zeilenlaenge unbegrenzt
ke=""       kein Kategorie-Ende
as=""       kein Aufnahme-Start
ae=""       kein Aufnahme-Ende
#dts dll "0" e1 =LL
#uLM +#304 e0
#dts "0" e1 =LM
#304 >L
#310 >L
#315 >L
#320 >L
#341 >L
#361 >L
#495 e" <" >L
#uLL x">LM" =LM
#uLM e"." {"" "Maximum: "} P{13 13}
#+#

#(L
!cc u y2 " " lll e0
#uLL x"+ll" =LL
#)L

 Zeichenumwandlung
tI

 -----------------------------------------------------------------

Datei: LAENGE2.cPR
zl=0        Zeilenlaenge unbegrenzt
ke=""       Kategorie-Ende
as=""       Aufnahme-Start
ae=""       Aufnahme-Ende

#+#
#- ENDE
#uLM e"." "Maximale Laenge: " P" Zeichen"
#+#