Anmelden

View Full Version : SQL: Result als Datei speichern



Seiten : 1 [2]

Fuerchau
07-04-11, 10:09
Ich weiß ja nicht, welche Lösung du gewählt hast.
Ansonsten ist das wirklich einfach.
Kleines CLP dass den STRQMQRY mit Ausgabedatei un den anschliessenden CPYTOIMPF aufruft.

Das CLP dann per ADDJOBSCDE eintragen. Per WRKJOBSCDE kann der Eintrag auch geändert werden.

Wichtig ist nur die korrekte JOBD für die Bibliotheksliste zu wählen oder diese im CLP mittels CHGLIBL vorher setzen.

Beachte bitte noch folgendes:
Die IFS-Datei gehört immer dem Ersteller, *PUBLIC ist excluded.
Per CHGAUT musst du anschließend die Berechtigung für den Abholer noch erteilen.
Witzigerweise muss man für sich selber auch die OBJAUT auf *ALL setzen, sonst darf man die eigene Datei nicht löschen (z.B. beim ersetzen).

marty
07-04-11, 12:14
Ich weiß ja nicht, welche Lösung du gewählt hast.
Ansonsten ist das wirklich einfach.
Kleines CLP dass den STRQMQRY mit Ausgabedatei und den anschliessenden CPYTOIMPF aufruft.
Genau so wollte ich das machen.



Das CLP dann per ADDJOBSCDE eintragen. Per WRKJOBSCDE kann der Eintrag auch geändert werden.Gerade im Handbuch gelesen :-)



Wichtig ist nur die korrekte JOBD für die Bibliotheksliste zu wählen oder diese im CLP mittels CHGLIBL vorher setzen.
Oh, das hätte ich jetzt vergessen - Danke!



Beachte bitte noch folgendes:
Die IFS-Datei gehört immer dem Ersteller, *PUBLIC ist excluded.
Per CHGAUT musst du anschließend die Berechtigung für den Abholer noch erteilen.
Witzigerweise muss man für sich selber auch die OBJAUT auf *ALL setzen, sonst darf man die eigene Datei nicht löschen (z.B. beim ersetzen).
Ach _deswegen_ ging das gestern nicht ;-)

Tolles Forum hier, vielen lieben Dank!
Marty

marty
07-04-11, 14:14
Die AS400-Welt ist doch unterschiedlicher von allem was ich kenne...
Gibt es irgendwo ein Tutorial für "Hello World" in CL?
Im Moment gehe ich so vor:
- CRTSRCPF - file erzeugen um meine quelle 'rein zu schreiben
- WRKOBJPDM aufrufen, mit 12 und F6 einen neuen Member anlegen
Jetzt geht ein Editor auf, fein.
Aber ich durchkämme das Internet und finde keine Beispiele...
Wie schreibe ich denn ein CL-Programm? wie gesagt, Programmierung an sich ist für mich kein Thema, ich brauch auf keine IDE oder so, vi reicht völlig ;-)
Nur wo hat's hier auf der AS/400 sowas?

KingofKning
07-04-11, 14:41
Na dann mal viel Erfolg.

http://publib.boulder.ibm.com/infocenter/iseries/v5r3/topic/books/sc415721.pdf

bringt dich vorwärts.

Hier mal was kleines:

PGM
DCL VAR(&C_TAG) TYPE(*CHAR) LEN(6) VALUE(' ')
DCL VAR(&C_TEST) TYPE(*CHAR) LEN(10) VALUE(' ')
DCL VAR(&I_WOCHE) TYPE(*DEC) LEN(1 0) VALUE(0)
RTVSYSVAL SYSVAL(QDAYOFWEEK) RTNVAR(&C_TEST)
SNDBRKMSG MSG(&C_TEST) TOMSGQ(xxx)
ENDPGM

Wobei XX durch deinen Terminalnamen ersetztz werden muß
GG

ExAzubi
07-04-11, 18:33
Also per FTP kanns auch gehen.

Wenn ich per FTP Daten von der 400-->PC hole, dann mach ich vorher immer noch ein type c 1252, dann werden auch die Sonderzeichen sauber übertragen.

marty
12-04-11, 08:04
:cool: Vielen Dank allen, ich hab's geschafft :cool:
Werde mir jetzt nach und nach weiteres Wissen aneignen und die verfügbaren Bücher durchlesen...