'deposit' macht 'get'/'write'-Ablauf kaputt
Heinrich Allers
allers at t-online.de
So Feb 22 22:30:54 CET 2004
Erstens:
In meiner vorangegangenen Präsentation des Problems gab es noch einen
Fehler! In der Flexdatei hätte es statt
write '#ux1 y0 ,"_XXNSZXX_XYZ"' n
heißen müssen:
write '#ux1 y0 ,"_XXNSZXX_XYZ_"' n
Aber (das relativiert den Fehler etwas): das eigentliche
Fehlergeschehen wird dadurch nicht ausgelöst!
###
Zweitens:
Ergebnis des Bergerschen Beitrages ist, daß es mit der Flexdatei
var P "\\d-xyz2.apr"\delete
var P "\\ein.xyz"\delete
var P "\\aus.xyz"\delete
var P "d-xyz2.apr"\xport f
write "zl=0" n\write "#-a" n
write '#ux1 dx2 y0 ,"_XXNSZXX_XYZ2_" =x2 e0' n
write "#+#" n\write "td" n\write "td-rtf" n
write "to" n\close x
var P "ein.xyz"\xport f
write "Erste Zeile XXNSZXX" n
write "Zweite Zeile" n
close x\var P "aus.xyz"\xport f\var P "ein.xyz"
//Hier die kritische Zeile:
new
disp p d-xyz2
open\if no mes ein.xyz gibt's nicht!
:lies
var "xxx"\get +\if cancel jump ende
ins #ux1
depos "a"
var #ux2\ins #ux1
write #ux1(b"xxx") n\jump lies
:ende\mes Fertig!\close\close x\end
bestens funktioniert. So weit, so gut!
Sobald aber die hier noch auskommentierte Zeile
new
durch Rücken von 'new' an den linken Rand "entkommentiert" und damit
operativ gemacht wird, bricht der Aufbau der Ausgabedatei aus.xyz
wieder zusammen: es werden nur zwei "Wagenrücklauf+Zeilenvorschub"
ausgegeben! :-((
Das Problem fährt also auf anderer Ebene fort zu besten!
Bitte HILFE!!!!!
Mit besten Grüßen von
Heinrich Allers
-- allers at t-online.de * http://home.t-online.de/home/allers
-- "Es ist gut, auf der richtigen Seite der Geschichte zu
-- stehen, doch es ist schlecht, wenn die Geschichte sich auf
-- die falsche Seite schlägt. (aus J. Fischers philosophisch
-- unterlegter Begründung der neuen grünen europäischen
-- Realpolitik; Rom, 20.2.2004)
Mehr Informationen über die Mailingliste Allegro