-
Hallo.
Im CL ein RUNSQLSTM. Vorher die Datei defenieren
DCLF FILE(lib/file) RCDFMT(*ALL) OPNID(yyy)
Datei lesen und wenn ende (0864) dann raus
READ: RCVF RCDFMT(xxx) OPNID(yyy)
MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(ENDE99))
Jetzt kann auf die Felder zugegriffen werden. Hier Beispiel mit chgvar
CHGVAR VAR(&whatever) VALUE(%SUBSTRING(&yyy_fieldname +
2 8))
etc etc etc...
Hier kann dann ja auch ein If stehen und bei entsprechenden True dann ein
sndbrkmsg...
Um wieder den nächsten Satz zu lesen ein
GOTO READ
Gruß,
Ralf
-
Zitat von Eldermann
Vielen Dank für die schnelle Hilfe. Das sieht schon mal ganz prima aus und per SQL funktioniert die Anzeige schon mal. Ich werde da mal mit arbeiten, wenngleich ich auch noch nicht genau weiß wie (und wo) ich den Code als CLP einzugeben habe.
Könntet Ihr mir da auch noch einen Tipp geben?
Und wenn Ihr mir noch schreiben könntet wie ich ein SNDBRKMSG an User GB statt der Ausgabe in einer Datei erhalte dann wäre ich Euch auf ewig dankbar.
Freundliche Grüße aus de Lüneburger Heide
CLP XY erstellen und späterer Aufruf über Scheduler (z B. MO-FR. Startzeit XX Uhr)
1. clearen Ausgabedatei
2. Call SQL-RPG .
Nach Ablauf des Pgm prüfen ob ein Satz sich in der Datei befindet.
Wenn ja, SNDBRKMSG an USER
Anschliessend Warten z.B. 1 Minute, dann zum Anfang des Cl-Pgm. Oder wenn > 17 Uhr zum CLP-Ende.
Wenn Problem bei der Realisierung einfach externe Hilfe anfordern.
-
RUNSQLSTM kann keine Select's, da keine Ausgabedatei erstellt werden kann!
Aber per RUNSQL kann man einen "insert into select * from ..." übergeben.
D.h., dass die Datei einmal erstellt werden muss.
Im CLP könnte man auch
DLTF xxx
RUNSQL ... "CREATE TABLE xxx as (select ..... )"
durchführen.
Similar Threads
-
By chrisssiie in forum NEWSboard Programmierung
Antworten: 6
Letzter Beitrag: 08-11-21, 07:17
-
By woodstock99 in forum IBM i Hauptforum
Antworten: 5
Letzter Beitrag: 08-11-17, 17:56
-
By AK1 in forum NEWSboard Programmierung
Antworten: 18
Letzter Beitrag: 16-02-17, 10:04
-
By martschp in forum NEWSboard Programmierung
Antworten: 3
Letzter Beitrag: 13-11-13, 08:21
-
By iceman in forum IBM i Hauptforum
Antworten: 2
Letzter Beitrag: 04-04-03, 10:26
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