Books in Print +

[TEWS at biblio.ub.uni-leipzig.de]

      BIP-Importe ab 05.05.95  Tews


re=13 10 13 10 35 13 10     #  2 Leerzeilen = Satzende
fh=64

_ 13 10 "                     "          Zeilenumbruch beseitigen
_ " "

#0dt
w" "
kop
e":"
kdts
b"19"
l 12

 #0i1
 w" ?"           17.12.93

#050
w" |9#0i1 II?"

#320

s"Title:"
w" "        ein Leerzeichen setzen
i 32        ignoriere fuehrende Leerzeichen
e 13
C "Subtitle:"
(
W" : "
s"Subtitle: "
i 32
e 13
)

#450                  
s"Series title:"
w" "
e 13

#200
s"Contributor:"              
w" "
i 32               damit werden die Blanks am Anfang gestrichen
e 13               Ende bei Zeilenende
< " "              als Arbeitstext wird der ab letztes Leerzeichen genommen
W", "              (Fam.Name), dahinter ein Komma 
s"Contributor:"    damit geht das bisherige in den Transferbereich
i 32
e 32              Ende nach dem ersten Leerzeichen
C "Contrib. Code:"
(
W " [Hrsg.]"
)

#403
s"Edition:"
w" "
i 32
e 13

#425
s"Pub Date:"
w" "
i 32
e 13

#412
s"Publisher:"
w" "
i 32
e 13

#540
s"ISBN:"
w" "
i 32
e 13

#780
s"Price:"
w" "
i 32
e 13
s"Currency Code:      "
e 13


       Konstante aus Aufruf:

#782      Ex.-zahl
w" "
kop
b";"

#065      Standort
w" "
kust

#790      Statistikgruppe
w" "
kop
b":"
e";"

#799     eingef. 20.05.94
w" "
kube

#784
kui1 
c"FM"
qfremd
#784
w" Bde: 1 "
w" LBS: 0 "
w" Ausl: n "
w" Luecke: n "
w" Quelle: h "
w" Typ: m "
w" Forts: n "
w" Erw: k "
+weiter
-fremd
#784
w" Bde: 1 "
w" LBS: 0 "
w" Ausl: n "
w" Luecke: n "
w" Quelle: f "
w" Typ: m "
w" Forts: n "
w" Erw: k "