View Full Version : QRPGSRC in RPG verarbeiten
peter.kinne
10-08-04, 13:12
Hallo zusammen,
ich habe etwas aus der "Steinzeit".
Ich muß die Quellendatei QRPGSRC für ein bestimmtes Member lesen und dann was machen (nix dolles).
Ich habe die Datei inter im RPG-Programm mit einer sartzlänge von 112 Byte beschrieben. Nun lese ich, bekomme aber nich in den Buffer.
Für die datei habe ich auch noch "I"-karten mit dne Feldern.
Aber ich kriege nix zu sehen.
Oder gibt es eine bessere Möglichkeit vatriabel Teildateien in RPG zu verarzten.
Hat jemand einen Tipp,
Peter
Hi,
vorher :
OVRDBF QRPGSRC MYLIB/QRPGSRC MBR(MYMEMBER)
Gruß Holger
Definiere die Datei als extern beschriebene Datei mit USROPN (oder UC).
Mach den OVRDBF (wie oben beschrieben, bzw. den hast du ja wohl sowieso) und öffne die Datei.
Natürlich bist du auf die fixe Satzlänge beschränkt.
RobertMack
10-08-04, 15:46
Hallo Peter,
Falls Du bei interner Beschreibung bleiben willst:
FSRC IF F 92 DISK UC
ISRC KF
I 1 6 2 SRCSEQ
I 7 12 0 SRCDAT
I 13 92 SRCDTA
C OPEN SRC
C READ SRC
C CLOSE SRC
Falls Du die Quelle verändern willst (z.B. Codezeilen einfügen), sollte die Datei (CRTSRCPF) mit ACCPTH(*KEYED) erstellt sein,
Gruß
Robert
peter.kinne
10-08-04, 16:48
Vielen Dank erst einmal für die schnellen Tipps.
Peter
SRCPF's haben keinen Schlüssel ! Was soll also *KEYED ?
Einfügen von Sätzen geht nur (wie beim SEU) über eine Kopie der Teildatei mit Löschen der Alten und umbenennen der Neuen in die Alte.
RobertMack
10-08-04, 18:01
DSPFD-Befehlseingabe
Datei . . . . . . . . . . . . . . . . . . . : FILE QKEYSRC
Bibliothek . . . . . . . . . . . . . . . : RMA
Art der Information . . . . . . . . . . . . : TYPE *ALL
Dateiattribute . . . . . . . . . . . . . . : FILEATR *ALL
System . . . . . . . . . . . . . . . . . . : SYSTEM *LCL
Kopfzeile der Dateibeschreibung
Datei . . . . . . . . . . . . . . . . . . . : FILE QKEYSRC
Bibliothek . . . . . . . . . . . . . . . . : RMA
Dateiart . . . . . . . . . . . . . . . . . : Physisch
Dateiart . . . . . . . . . . . . . . . . . : FILETYPE *SRC
u.s.w.
Anzahl der Schlüsselfelder . . . . . . . . : 1
Satzformat . . . . . . . . . . . . . . . . : QKEYSRC
Schlüsselfelder . . . . . . . . . . . . . : SRCSEQ
Reihenfolge . . . . . . . . . . . . . . : Aufsteigend
Vorzeichen angegeben . . . . . . . . . : UNSIGNED
Zone/Ziffer angegeben . . . . . . . . . : *NONE
Alternative Sortierfolge . . . . . . . : Nein
u.s.w.
Hallo Peter,
wenn Dir ein Beispiel hilft, da gibt es ein paar kleine Generatoren auf meiner Freeware und Open Source Page www.bender-dv.de ...
mfg
Dieter Bender
PS: in Frankreich war es schöner als hier und der vin rouge war auch besser...
Hallo zusammen,
ich habe etwas aus der "Steinzeit".
Ich muß die Quellendatei QRPGSRC für ein bestimmtes Member lesen und dann was machen (nix dolles).
Ich habe die Datei inter im RPG-Programm mit einer sartzlänge von 112 Byte beschrieben. Nun lese ich, bekomme aber nich in den Buffer.
Für die datei habe ich auch noch "I"-karten mit dne Feldern.
Aber ich kriege nix zu sehen.
Oder gibt es eine bessere Möglichkeit vatriabel Teildateien in RPG zu verarzten.
Hat jemand einen Tipp,
Peter
Peter Kosel
11-08-04, 08:10
@Dieter Bender,
Hallo Dieter weil hier nun so ein bescheidenes Wetter ist, werde ich genau dort hin fahren - morgen...
;-))
Ich konnte mir diesen Kommentar einfach nicht verkneifen...