Hilfe benötigt bei O-Bestimmungen

[woodstock99]

Hallo.
ich kenne mich mit den O-Bestimmungen nicht so besonders gut aus. Hier meine Frage.

Ich kann bei den O-Bestimmungen (Art) folgende Werte ausgeben.

H oder D
H für Kopfsätze oder D für Postensätze eingeben.

T
T für Gruppenzeitsätze eingeben.

E
E für EXCPT-Sätze eingeben.
.

Was bedeuten die??
also wenn ich ne Druckausgebe mache dann nehme ich E, vergib einen Namen, aufruf mit EXCEPT und gut ist.

Wenn ich aber jetzt Sätze in eine Datei schreiben will geht das auch so? Benötige ich den Zusatz ADD bei EXCPT-SÄTZE oder nicht?

Was ist der Unterschied der einzelnen Arten?

Vielen Dank

[Fuerchau]

O-Bestimmungen sind im Prinzip veraltet.
Besser ist es, mit WRITE Daten auszugeben.

Ansonsten können O-Bestimmungen noch für die Zyklusprogrgammierung (Hiezu ist eine InputPrimary-Datei nötig) verwendet werden.

Alle anderen O-Funktionen können mittlerweile durch Anweisungen (WRITE/UPDAT/%EDITC/usw.) ersetzt werden.

Zum Drucken sind PRTF's besser geeignet als O-Bestimmungen.

[woodstock99]

die Dateien sind aber alle intern beschrieben . und lauter gepackte Dezimal Felder.

Aufgabenstellung. Ich muß von einer Extern-Beschriebenen Datei Werte in Intern-Beschriebene-Dateien bringen. Also auch ganz normale numerische Felder in gepackte bringen usw

[BenderD]

das macht nix, man kann in den D Bestimmungen eine Datenstruktur deklarieren (entspricht Beschreibung des Formats in den I Bestimmungen) und dann bei den Dateioperationen (read, write, etc) die Datenstruktur angeben, die geschrieben werden soll. Ist sogar besser lesbar als der ganze Format Quarkes mit seinen automatischen Inhaltsübergängen...

D*B

die Dateien sind aber alle intern beschrieben . und lauter gepackte Dezimal felder.

[woodstock99]

Danke. Hätt ich eigentlich auch selber drauf kommen können.

[woodstock99]

Sorry aber funzt nicht. Was mache ich falsch


FUPDATEKOTOIP E K DISK PREFIX(UPD)
FKOSTTOPF UF F 60 30AIDISK KEYLOC(1)
DKOSTTOPFDS DS
Dbekkost
IKOSTTOPF KF 01
i 1 19 feld1
I 20 23 bekkost
I 24 27 stammkost
I 28 60 feld2
c UPDK00001 chain KOSTTOPFds
c IF %FOUND
c movel UPDKOST bekkost
C update kosttopfds
c end
c end

bringt immer die Meldung:

Der Operand KOSTTOPFDS in Faktor 2 ist für die angegebene
Operation ungültig.
was mache ich falsch ???? der CHAIN und UPDATE KLAPPT NICHT

[Fuerchau]

Da würde ich mal sagen: Programmierfehler !

Bei den Dateioperationen musst du natürlich erst mal die Datei/das Format benennen.
Als 2. Operanden gibst du dann die Struktur an.

c KEY CHAIN MYFILE MYDS
c UPDATE MYFORMAT MYDS
c WRITE MYFORMAT MYDS

Da die DS nicht ursächlich mit der Datei verknüpft ist, musst du dem Compiler schon sagen, welche Datei du meinst.

[woodstock99]

DANKE.

Lösung falls jemand mal dasselbe Problem hat

FUPDATEKOTOIP E K DISK PREFIX(UPD)
F RENAME(UPDATEKOTO:UKOTO)
FKOSTTOPF UF F 60 30AIDISK KEYLOC(1)
DKOSTTOPFDS DS
DKOST 1 60
Dbekkost 20 23
IKOSTTOPF KF 01
I 20 23 bekkost
c UPDK00001 chain KOSTTOPF KOSTTOPFDS
c IF %FOUND
c movel 'asdf' bekkost
C update KOSTTOPF KOSTTOPFDS
c end