K041 und DKS

[CaddyMajor]

Vielen Dank für die Antwort.

Ich habe im Anhang als TXT-Datei die Source des Programms angehängt.

Leider schreibt er bei diesen Programm nichts in die Datei weg. Da ich leider derartiges noch nicht entwickelt habe, hoffe ich auf Tipps der Community.

Die Datei K041INT wurde per CRTPF mit Satzlänge 1330 definiert, ohne Beschreibung.

Vielen Dank

[PAXI]

Rufe mich doch kurz mal an.
Mobil 0162/8229868
Gruss PAXI

[jajonowak]

hi,

fehlt nur noch


o feld bispos
o total 1330

dann funkts.

lg
Hans-Joachim

[PAXI]

hi,

fehlt nur noch


o feld bispos
o total 1330

dann funkts.

lg
Hans-Joachim

Total ist doch beschrieben von 18 - 1330 ? oder was ist gemeint ?

Gruss
Petra

[PAXI]

Spalten . . . : 6 100 Editieren
SEU==>
FMT H HSchlüsselwörter++++++++++++++++++++++++++++++++ +++++++++++++++++++++++++++Bemerkungen+++++++++
***************** Datenanfang ************************************************** *****************
001.00 H
001.01 FMYDATEI UF E DISK A
002.00 IDSNAM DS
002.01 I 1 6 F0001
003.00 I 7 13 C0001
004.00 I 14 17 F0002
007.00 C eval total = *all'a'
008.00 C write mydateifm
******************Datenende ************************************************** *******************

[jajonowak]

hey petra,

ja total ist beschrieben (intern)
bei extern beschriebenen dateien wird write (satzformat) ,
bei intern beschriebenen dateinen wird excpt(e-name)+
O-bestimmung angegeben.
dazu gehöhrt
1. datei E add e-name
2. feld letzte ausgabeposition

also O total 1330

wenn Du die 2. O-zeile noch so dazufügst ist es o.k.
hoppla die felder die die stellen 1-18 belegen müssen ebenfalls noch mit angegeben werden.


lg
Hans-joachim

[PAXI]

hey petra,

ja total ist beschrieben (intern)
bei extern beschriebenen dateien wird write (satzformat) ,
bei intern beschriebenen dateinen wird excpt(e-name)+
O-bestimmung angegeben.
dazu gehöhrt
1. datei E add e-name
2. feld letzte ausgabeposition

also O total 1330

wenn Du die 2. O-zeile noch so dazufügst ist es o.k.
hoppla die felder die die stellen 1-18 belegen müssen ebenfalls noch mit angegeben werden.


lg
Hans-joachim

Hallo Hans-Joachim,

nun weiss ich was Du meinst :-) war nur etwas irritiert durch die Source, etwas gemischt nicht rein ILE RPG.

Gruss
Petra

[Fuerchau]

In der O-Bestimmung steht auch kein Feld !
also:
O K0SAAR
O K0LOKZ
O K0BHN1
O K0KTA2
O K0KTN2
O TOTAL

Die Endepositionen kannst du weglassen, der Compiler berechnet sie korrekt.

[BenderD]

Hallo,

ich lese immer nur O Bestimmungen, I Bestimmungen etc. Das braucht es alles nicht:
man braucht:
F Bestimmung mit Länge ohne Extern beschrieben, nehmen wir mal an die heisst datei
D Bestimmung mit Datenstruktur, die den Feldaufbau intern beschreibt, nehmen wir mal an die heisst satz
C Besimmungen: (auch free)
write datei satz
// schreibt satz nach Datei raus
read datei satz
// liest Datei in satz ein

Das ist doch alles viel klarer als dieser ganze Format Schmonz (als ob man davon mehrere haben sollte)

Dieter Bender

In der O-Bestimmung steht auch kein Feld !
also:
O K0SAAR
O K0LOKZ
O K0BHN1
O K0KTA2
O K0KTN2
O TOTAL

Die Endepositionen kannst du weglassen, der Compiler berechnet sie korrekt.

[jajonowak]

hallo Dieter,

natürlich hast Du recht, aber wenn hier ein fast fertiges Programm als
Anhang gepostet wird, ist es einfacher 3 oder 4 Statements der
(Loch)-karten-Art "O" zuzufüggen als das ganze Programm nochmal neu zu schreiben oder sehe ich das falsch ?

Hans-Joachim

[BenderD]

Hallo Hans-Joachim,

jetzt wo das Programm noch nicht fertig ist, ist es noch Zeit es anders zu machen; wenn du Recht hast, dann ist QS Quatsch.

Dieter Bender

hallo Dieter,

natürlich hast Du recht, aber wenn hier ein fast fertiges Programm als
Anhang gepostet wird, ist es einfacher 3 oder 4 Statements der
(Loch)-karten-Art "O" zuzufüggen als das ganze Programm nochmal neu zu schreiben oder sehe ich das falsch ?

Hans-Joachim