-
DDS in ILE RPG
Hallo,
gibt es eine Möglichkeit eine DDS Datei in ILE RPG ohne Usereingaben zu erstellen?
Dh. das Programm liest aus einer Datei die entsprechenenden Daten(so das es einen vollständigen Satz hat) bzw bekommt diese Daten übergeben und schreibt dann Sätze in dieses PF oder LF. Ist das möglich? Habe schon per google gesucht aber bisher nichts konkretes gefunden.
Ich weiß das man Seu aufrufen kann, sowie die Datei mit den entsprechenden Befehlen erstellen können müsste. Nur kann ich in Seu Sätze vom Programm aus schreiben?
Gruß Martin
-
Hallo Martin,
über Umwege kannst du das machen
zB. so
CL-Aufrufen
CPYFSRC MUSTER --> MUSTER1
ILE PGM aufrufen
F QDDSSRC
C WRITE MUSTER1 (ACHTUNG: Auf Satzaufbau einer DDS Quelle achten SRCSEQ 6,2 SRCDAT 6,0 SRCDTA 80)
CL-Zurück
CPYSRCF --> NAME
So sollte der Grobaufbau deines Programmes sein.
-
Zitat von ExAzubi
Hallo Martin,
über Umwege kannst du das machen
zB. so
CL-Aufrufen
CPYFSRC MUSTER --> MUSTER1
ILE PGM aufrufen
F QDDSSRC
C WRITE MUSTER1 (ACHTUNG: Auf Satzaufbau einer DDS Quelle achten SRCSEQ 6,2 SRCDAT 6,0 SRCDTA 80)
CL-Zurück
CPYSRCF --> NAME
So sollte der Grobaufbau deines Programmes sein.
Danke für die schnell Antwort. Ich hätte noch 2 Fragen dazu.
Rein über ILE RPG lässt sich das Problem nicht lösen?
Und müsste ich bei F nicht das kopierte Muster definieren?(QDDSRC ist doch die Standart-Lib oder?)
-
Hallo Sqall,
eine QDDSSRC ist keine "LIB", sondern eine PF-SRC in einer LIB. Eine QDDSSRC ist also für ein RPG-Programm nichts anderes als eine PF mit X verschiedenen Membern. Insofern kannst Du im CL auch einfach mit OVRDBF Datei Member arbeiten.
Gruß
martikx
-
Zitat von martikx
Hallo Sqall,
eine QDDSSRC ist keine "LIB", sondern eine PF-SRC in einer LIB. Eine QDDSSRC ist also für ein RPG-Programm nichts anderes als eine PF mit X verschiedenen Membern. Insofern kannst Du im CL auch einfach mit OVRDBF Datei Member arbeiten.
Gruß
martikx
Ah ok danke. Aber müsste ich nicht trotzdem auch das Muster1 in der F definition definieren?
Gruss Martin
-
Hallo Martin,
nein in einer F-Bestimmung kann das Member nicht angegeben werden. Wenn auf ein Member zugegriffen werden muss, dann sind in diesem Fall die Befehle
OVRDBF FILE(QDDSSRC) TOFILE(LIB/QDDSSRC) MBR(MUSTER1) OVRSCOPE(*JOB)
CALL Programm
DLTOVR FILE(QDDSSRC) LVL(*JOB)
im aufrufenden CL abzusetzen.
Gruß
Martin
-
Zitat von martikx
Hallo Martin,
nein in einer F-Bestimmung kann das Member nicht angegeben werden. Wenn auf ein Member zugegriffen werden muss, dann sind in diesem Fall die Befehle
OVRDBF FILE(QDDSSRC) TOFILE(LIB/QDDSSRC) MBR(MUSTER1) OVRSCOPE(*JOB)
CALL Programm
DLTOVR FILE(QDDSSRC) LVL(*JOB)
im aufrufenden CL abzusetzen.
Gruß
Martin
Ah ok vielen Dank.
Gruß Martin
-
Wenn neue Member erstellt werden müssen, so ist dies VOR dem Aufruf des Programmes per ADDPFM das Member hinzuzufügen.
-
oder die Datei User controlled öffnen, dann kann das ganze auch innerhalb des Programmes per system oder QCMDEXEC erfolgen und das CL Gehampel ist überflüssig. Beispiele dazu gibt es auf meiner Freeware Seite in der Generatorkiste (GENFREE, GENFRAME)
mfg
Dieter Bender
Zitat von Fuerchau
Wenn neue Member erstellt werden müssen, so ist dies VOR dem Aufruf des Programmes per ADDPFM das Member hinzuzufügen.
-
Zitat von ExAzubi
Hallo Martin,
über Umwege kannst du das machen
zB. so
CL-Aufrufen
CPYFSRC MUSTER --> MUSTER1
ILE PGM aufrufen
F QDDSSRC
C WRITE MUSTER1 (ACHTUNG: Auf Satzaufbau einer DDS Quelle achten SRCSEQ 6,2 SRCDAT 6,0 SRCDTA 80)
CL-Zurück
CPYSRCF --> NAME
So sollte der Grobaufbau deines Programmes sein.
Ich hätte noch eine Frage zu dem Write. SRCSEQ, SRCDAT und SRCDTA setze ich vor dem write, richtig?
Kann ich damit auch eine neue Zeile anlegen?
ZB.: SRCSEQ auf 140 setzen und schreiben obwohl das Muster nur 139 Zeilen hat.
-
Ja, kannst Du.
P.S. Wenn die Datei (CRTSRCPF) mit ACCPTH(*KEYED) erstellt wurde, kannst Du auch CHAINen ...
-
Da SRC-PF's sequentielle Dateien sind, kannst du mittels Write jederzeit Daten anhängen. SRCSEQ ist dabei unerheblich, da der SEU nicht sortiert sondern nur numeriert.
SRCDTA ist im Format JJMMTT zu füllen.
Und das man Daten vor der Ausgabe aufbereitet ist korrekt.
Similar Threads
-
By homue in forum NEWSboard Programmierung
Antworten: 5
Letzter Beitrag: 18-07-07, 16:47
-
By Stoeberl in forum NEWSboard Programmierung
Antworten: 8
Letzter Beitrag: 10-01-07, 10:58
-
By Squall in forum NEWSboard Programmierung
Antworten: 9
Letzter Beitrag: 10-10-06, 08:53
-
By Squall in forum IBM i Hauptforum
Antworten: 31
Letzter Beitrag: 28-09-06, 17:53
-
By Angela in forum IBM i Hauptforum
Antworten: 4
Letzter Beitrag: 22-08-06, 10:11
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks