-
CL: Linie in Loop einlesen
Hallo,
habe folgende Frage:
habe eine Datei QTEMP/DATEI1.
In dieser ist nur eine Spalte. Diese heisst NNAME.
Aufbau:
Müller
Meier
Schulze
....
Jetzt möchte ich in einem CL diese Datei Durchgehen und den Wert (Müller,Meier)jeder Zeile in einem Loop als variable verwenden. Und diese z.b. mit SNDPGMMSG ausgeben..
Hat jemand mal ein Beispiel CL was sowas in der Art macht ?
MERCI !!!
-
Mahlzeit,
so in der Art
PHP-Code:
PGM
/* Dateideklaration */
DCLF FILE(QTEMP/DATEI1)
MONMSG CPF0000
LESEN:
RCVF
MONMSG CPF0864 EXEC(GOTO WEITER)
SNDMSG MSG(&NNAME) TOUSR(*SYSOPR)
GOTO LESEN
WEITER:
ENDPGM
Gruß Ronald
-
vielen dank !!
kann ich auch nur sagen das ich nur z.b. zeile 1-5 lesen will ? und nicht die gesamte datei ?
Danke !!
Gruß
-
Einfach einen Zähler mitlaufen lassen und wenn dieser erreicht ist GOTO Weiter
-
... shudder, give me a bucket ...
Zitat von andreaspr@aon.at
GOTO
-
Zitat von BenderD
... shudder, give me a bucket ...
Sei still, sonst quäl ich Dich mit ganz anderen Beispielen aus meinem Repertoire von Fundstücken...
-h
-
GOTO LESEN
Was soll's, einfach und funktioniert.
-
... es soll außerdem noch Firmen geben die noch nicht Release V5R3 haben oder alles auf Release V5R2 runterwandeln müssen und somit noch keine Lese-Schleifen in CL einsetzen können.
... und wie das dann ohne GOTO gehen soll, das würde ich doch mal gerne sehen, Dieter
Birgitta
-
... muss es denn unbedingt CL sein?
D*B
dessen Magen momentan wegen intensiver Beschäftigung mit binary huddle, shudder und modder etwas nervös ist, was einem da von der Datenbank so alles in ein SQL Client Integration Exit Program reingeworfen wird und welchen Datenkompost die da zurück haben wollen...
Zitat von B.Hauser
... es soll außerdem noch Firmen geben die noch nicht Release V5R3 haben oder alles auf Release V5R2 runterwandeln müssen und somit noch keine Lese-Schleifen in CL einsetzen können.
... und wie das dann ohne GOTO gehen soll, das würde ich doch mal gerne sehen, Dieter
Birgitta
-
Zitat von BenderD
... muss es denn unbedingt CL sein?
CL ist manchmal ganz praktisch, und da gibts einige Fälle in denen man dann doch sowas wie einen GOTO braucht.
-
Zitat von B.Hauser
...wie das dann ohne GOTO gehen soll, das würde ich doch mal gerne sehen
na klar kann man ohne GOTO die ersten 5 Zeilen lesen:
Code:
RCVF
RCVF
RCVF
RCVF
RCVF
-
Ich entschuldige mich hiermit ganz öffentlich für das böse Wort
GOTO
Gruß
Ronald
Similar Threads
-
By Sony in forum IBM i Hauptforum
Antworten: 27
Letzter Beitrag: 20-07-09, 21:48
-
By schatte in forum NEWSboard Programmierung
Antworten: 19
Letzter Beitrag: 10-01-07, 11:32
-
By kuempi von stein in forum NEWSboard Programmierung
Antworten: 2
Letzter Beitrag: 19-07-06, 14:34
-
By bo1 in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 23-06-06, 15:00
-
By becama in forum IBM i Hauptforum
Antworten: 6
Letzter Beitrag: 23-06-06, 14:46
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