Datenexport mit Überschriften as400

[DKSPROFI]

Moin,

da Du ja weist welche und wieviele Felder exportiert werden sollen, schreibst Du den Ersten Datensatz
mit den Überschrift 1; Überschrift 2; Überschrift 3; usw.
dann die Datenfelder mit Trennzeichen Feld 1; Feld 2; Feld 3; usw.

mfg

DSKPROFI

[Radinator]

Wenn Du die Spaltenüberschriften dynamisch mitausgeben willst, dann mach ein

CREATE VIEW QTEMP/HEADERS  AS (XXX) WITH DATA

machen. Für das Statement schau gerne hier vorbei: https://chartio.com/resources/tutori...le-in-ibm-db2/

Damit bekommst Du die Spaltenüberschriften mittels SQL ausgelesen und brauchst nur noch die HEADERS Datei sequenziell lesen, in deine Export PF schreiben, deine Zeilen in die Export PF ausgeben und das Ganze dann mit CPYTOIMPF in dein IFS ausgeben.

[Fuerchau]

Excel gibt die Spaltenüberschriften über MS-Query automatisch als Überschrift aus.
Leider ist das auf 1 Mio Sätze je Blatt beschränkt.
Dies kann man allerdings per VBA dann noch relativ einfach aufteilen.
Die 64-Bit-Version wäre aber wahrscheinlich erforderlich.
Unter 1 Mio Zeilen, schafft das Excel auch alleine.
Was den CPYTOIMPF angeht, so steht die Option für Kopfzeilen u.U. auf dem Release deiner AS/400 noch nicht zur Verfügung.
Dafür kannst du dir aber ein kleines ILERPG basteln, mittels dem du aus der QSYS/SYCOLUMNS je Tabelle einen CSV-Header generierst und im IFS ablegst.
Mittels anschließendem CPYTOIMPF hängst du die Daten dann an.

[Robi]

das Programm:
http://newsolutions.de/forum-systemi...3%9Cberschrift

anpassen und, wenn nötig, Colhdg statt Feldname verwenden

Robi