-
Neu anlegen ... Montag
cpyf ...?
anschließend kommt noch ein delete von bestimmtem Sätzen.
da brauch ich SQL sowieso, (daher auch das Pgm)
Gruß
Robi
-
Hallo Robi,
interessante Art, die QMQRY zu verwenden.
Ich habe es mal ausprobiert, bei mir geht es auch im Batch.
Code:
SBMJOB CMD(STRQMQRY QMQRY(CB2/S01) OUTPUT(*PRINT) SETVAR((S01 'insert into
cb2/cb_kat select * from cb2/cb_kat'))) JOBQ(QINTER)
Ich bekomme zwar interaktiv wie auch im Batch folgende Warnung:
Code:
QWM2204 Information 30 28.06.10 09:52:59,745532 QQXSRV01 QSYS *STMT QQXSRV01 QS
Ausgangsmodul . . . . . . . : QQXCPIMESS
Ausgangsprozedur . . . . . : QQxCPIMessage__SendMessage
Anweisung . . . . . . . . . : 16
Zielmodul . . . . . . . . . : QQXINTQUER
Zielprozedur . . . . . . . : QQxIntQuery__RunSQLStatement
Anweisung . . . . . . . . . : 162
Nachricht . . . : Keine Abfragedaten zu PRINT.
Ursache . . . . : Der Befehl PRINT REPORT wurde mit einer Anweisung SQL
SELECT vor der erfolgreichen Beendigung eines Befehls RUN QUERY eingegeben.
Fehlerbeseitigung: Einen Befehl RUN QUERY in einer Abfrage eingeben, die
eine Anweisung SQL SELECT enthält und bei erfolgreicher Beendigung die
Befehlsanforderung PRINT REPORT wiederholen.
aber ausgeführt wird der INSERT in beiden Fällen.
@pikachu: "Aktuell ist doch QWM2010." ROTFL, der war gut!
Gruß, Christian
-
interessante Art, die QMQRY zu verwenden.
Hab ich öfter im Einsatz
(mein längstes QMQRY heist S10 und hat 10 Variable
&S01 &S02 &S03 ... &S10
da passt ein 550 Zeichen langes sql rein
nicht immer besonders schön, aber häufig hilfreich.
Im Batch hatte ich auch noch nie Probleme.
k.a. warum Das nicht geht.
habe ein anderes pgm, das diese Technik verwendet mal als submit übergeben, kein Problem
echt verrückt
Gruß
Robi
-
Für solche dynamischen SQL's ist ggf. REXX wesentlich hilfreicher.
-
Kann ich leider nicht.
Hast du ein 'schreib ab und lerne" Beispiel?
-
Gib folgendes in eine SEU-Quelle (QREXXSRC) mit Namen RUNSQLSTM ein:
parse arg Stmt
address execsql
execsql "set option commit=*none"
execsql Stmt
exit
Das ganze startest du per:
STRREXPRC SRCMBR(RUNSQLSTM)
SRCFILE(MYSRCLIB/QREXXSRC)
PARM('insert into myfile select ...')
-
Super, danke
REXX kennt also keine Feldlängen !?
und benötigt die Source für die Ausführung.
Danke, das klingt tatsächlich besser als die blöde Stückelung des SQL in 55 er Variablen
Ich werde es zukünfig so machen
Danke
Robi
(der sich freut das dieses Thema nur doch etwas gebracht und er etwas gelernt hat)
-
REXX arbeite grundsätzlich mit Strings, das aber sehr komfortabel.
Achtung:
In der Routine ist keine Fehlerbehandlung implementiert!
Probier die Reaktionen bei falschen SQL's mal aus. Im Dialog gibt's dann ggf. eine Bildschirmausgabe die der Bediener bestätigen muss.
-
Ok, Danke
Werde mal ein wenig damit spielen.
Und hoffe das ich dadurch ein wenig REXX lerne
Gruß
Robi
Similar Threads
-
By Hubert in forum IBM i Hauptforum
Antworten: 12
Letzter Beitrag: 11-05-05, 13:25
-
By Matthias.Hayn in forum NEWSboard Programmierung
Antworten: 3
Letzter Beitrag: 06-12-04, 13:33
-
By Matthias.Hayn in forum IBM i Hauptforum
Antworten: 9
Letzter Beitrag: 06-12-04, 08:51
-
By Matthias.Hayn in forum IBM i Hauptforum
Antworten: 2
Letzter Beitrag: 28-07-04, 09:26
-
By Atomik in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 21-11-01, 10:45
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