Ich möchte die Zeilen aus STDIN (alias SYSIN) in COBOL lesen. Für den Moment möchte ich sie nur ausdrucken, damit ich weiß, dass ich sie habe. Von allem, was ich lese, sieht es so aus, als müsste das funktionieren:
%Vor%Das kompiliert (mit open-cobol und cobc -x), aber es läuft, bekomme ich:
%Vor%Was mache ich falsch?
Folgendes wurde mir vorgeschlagen auf der OpenCOBOL Foren .
%Vor%Es ist das Schlüsselwort KEYBOARD, das es funktioniert.
Anscheinend ist DISPLAY ein ähnliches Wort für STDOUT, aber ich habe das nicht getestet.
Mein COBOL geht zurück auf den DPS-6 Minicomputer runnong GCOS-6 und ich habe das 1992 berührt berührt. Aber damals haben wir ACCEPT verwendet, um Input von stdin zu bekommen.
Sie können einfach das Schlüsselwort ACCEPT verwenden, um die Tastaturausgabe zu erfassen. Gehen Sie durch, bis Sie ein Schlüsselwort wie "Ende" drücken, oder Sie können den Hexadezimalwert von EOF (1A, glaube ich) verwenden.
Wie in:
%Vor%Damit wird alles auf einen EOL-Marker gesetzt (z. B. return).