Beispiel

[Miles]

Hallo zusammen,

ich finde leider meine unterlagen nicht mehr zum programmieren auf der AS400.

Kann mir jemand eventuell ein Beispiel geben für Datei lesen und in eine andere Datei schreiben?

Danke

[Robi]

Sql?
RPG, RPGLE?
Cobol?
PHP
Assembler?
Ruby?
...
Was hätt mer denn gerne?

[Fuerchau]

Guckst du hier (leider nicht auf Deutsch):
https://www.ibm.com/support/knowledg...e/pdftable.htm
Zu vielen Dingen gibt es das "Programmers"-Handbuch mit Beispielen.

[Miles]

Hi Robi,

wenn ich mir was wünschen kann würde ich gerne
RPGLE
RPG FREE
gerne ein Beispiel haben mit Daten lesen und die andere Datei schreiben.

DANKE
Und auch Danke für Fuerchau!

[Robi]

Hier ein typisches Beispiel in RPGLE

H DECEDIT('0,')  DATEDIT(*DMY.)  ACTGRP('BSPPGM') 
Finput    IP   E           K DISK                
FOutput   O    E             DISK                
C                   WRITE     SATZFORMAT

[Fuerchau]

In diesem Fall kannst du die H-Zeile auch noch weglassen.
Wie mein Chef früher sagte: In RPG ist das doch ein 3-Zeiler.

[Miles]

Danke Robi. Damit kann ich jetzt was anfangen. Muss jetzt noch lesen mit dem Chain usw...

[Pikachu]

In der ILE RPG Referenz gibt es auch Beispiele zu Zugriffen auf die Datenbank.

[Miles]

Vielen Dank Pikachu.

[Robi]

In diesem Fall kannst du die H-Zeile auch noch weglassen.
Wie mein Chef früher sagte: In RPG ist das doch ein 3-Zeiler.

Stimmt,
präzise Anforderung (Siehe Thema: Beispiel) präzise Antwort.
mein Beispiel liest die Datei Input und schreibt die Datei Output
Anforderung zu 100% erfüllt

@Miles
ggf. etwas genauer defineren was gewünscht ist oder IBM Handbücher ergoogeln.