[Allegro] Re: ALF - Leser sperren

[Tine Hobein]

Liebe Liste

hier ist der Ausschnitt aus a-mahnex.flx in der ich versucht habe die Leser nach der 2. Mahnung zu sperren:

............................

  Jetzt haben wir die Gebuehrensaetze als Erg.Menge
  Der erste wird geladen, dann kommt die Schleife zur Verarbeitung
first
:loop
  Datum $m (wirkliches Mahndatum) in #9GF einsetzen
  Es entstehen dann die Eintraege:
  MBlesernr/datum  und  MMdatum/lesernr   im Reg. 11
var #dts(0,8)
ins $m-#9GF

  und Geb.Satz wieder speichern
if not #00 #00 -
put

 **********************************************
  Mahnstufe erhoehen & Leser sperren
 ************************************************

var #9GF$n
z=
z+1
var z
ins $n-#9GF
put
var z  
if >1; var "|: " #9GF$B "?"; f1nd; set e0; var "1" #9B(1,0); ins #9B; set e1; put
	
  ***************


  Daten als eine einzelne Zeile ausgeben
  Lesernummer/GEbuehrenart  Lesername/Titel--#9GF//#9GG
write #9GF$B "/"
write #9GF$G "  "
var #9GF "///" #9GG
ins #uGE
var "|: " #uGE$B "?"
f1nd
wri #9B$n "/"
var "|9 " #uGE$T
f1nd
wri #20(e":" 0,32) "---"

.....................................................................

Die Mahnbriefe werden bei allen Lesern die nach der 2. Mahnung gesperrt werden sollen falsch generiert.
Bei den anderen, die nicht geperrt werden sollen funktioniert alles bestens wie bisher.
Die Zeile für die Hilfsdatei, die angezeigt wird bevor die Mahnbriefe generiert werden enthält keine Werte.
Dort steht nur so etwas: /  /---///


Vielen Dank


Tine Hobein