CPYTOIMPF Überschriften

[mk]

wie kann ich mit der SQL-Anweisung ALTER TABEL erreichen, dass in der CSV-Datei
2 Überschriftsreihen ausgegeben werden:
a) 1.Reihe textl.Beschreibung (aus DDS -> COLHDG)
b) 2. Reihe Feldname (das geht ja schon über ADDCOLNAM)


Euer Tool CVTOSDB ist vermutlich kostenpflichtig ?

Ja so ist es. Dafür kann das Tool auch mehr.
Z.B Formatierung von Excelzeilen/Spalten
Konvertierung nach xls,xlsx,xlsm,XML,JSON etc.
und automatische Verarbeitung von Queries, SQL etc.

Du kannst das Tool kostenfrei testen.

Gruß
Michael

[Fuerchau]

In SQL geht viel.
Du kannst (das mache ich auch gerne per QMQRY) einen

select "Name1;Name2;Überschrift1;..." from qsysibm/sysdummy1
Union all
select trim(F1) concat ';' concat trim(F2) concat ';' concat char(N1) concat ';'
from myfile
where ...

in eine PF (CRTPF ohne DDS mit Satzlänge) ausgeben und diese dann per CPYTOSTMF exportieren.

[camouflage]

Ich hab mit einem CL und RPG-Programm diese Problematik gelöst. Erstens mache ich einen DSPFFD, damit bekomme ich die Ueberschriften (COLHDG). Das RPG Programm macht mir einen oder drei entsprechende Strings mit den Separators, schreib sie in eine Workdatei, kopier diese in die Exportdatei mit CPYTOIMPF und die Orginaldatei mit einem CPYTOIMPF mit einem add danach. Fertig, funktioniert 100 pro. Als Goodie schreib ich gleich noch einen Titel mit.

Vermutlich kannst du den gleichen Ablauf auch mit SQL verwenden.

[loeweadolf]

Ich bin überrascht, wieviele gute Möglichkeiten sich auftun. Vielen Dank dafür.
Wahrscheinlich werde ich die die Idee von CAMOUFLAGE als Basis verwenden.

[AG1965_2]

Es gibt noch viel mehr Möglichkeiten; die arten aber (zumindest einmalig) in Arbeit aus und verschenken kann die fertige Lösung auch (fast) keiner.
Z.B. bei uns erzeugen wir csv-files gleich direkt im IFS, und haben dazu Funktionen wie csvColChar(), csvColNum(), csvColDate() usw. gebastelt - so sind auch "perverse" csv-files möglich (mit "Vorlaufsätzen", einem letzten Satz, der sagt, wie viele Sätze es waren, usw.).
Grundprinzip: ein csvCreate erstellt die Datei und setzt Defaultwerte (Trennzeichen, usw.), die csvColxxx-Funktionen schreiben die Daten durch Trennzeichen getrennt nebeneinander in einen Ausgabepuffer und ein csvLine() schreibt den Puffer in die IFS-Datei.
Einmal Arbeit gewesen, aber nun ist es die Erstellung jedweden csv-files ein Kinderspiel.

[Fuerchau]

Ich muss halt nur ein Programm schreiben dass das alles dann aufruft.
Per SQL und CPYTOSTMF schreibe ich keine Programme und bin dann schneller fertig.
Solange es um Standard-CSV geht ist das die einfachste Methode.
Bei komplexeren "Schnittstellen" muss man natürlich einiges programmieren.

[mk]

Hallo,

habe jetzt vom Kollegen zum CPYTOIMPF folgendes gehört.

IBM hat bei dem Command die Funktionalität des ADDCOLNAM wieder entfernt
obwohl man den Parameter noch angeben kann.

Hat jemand weitere Infos dazu ?

[camouflage]

So ein Quatsch!
Damit würde IBM ja jedes Commitment zur rückwärts Kompatibilität ad adsurbum führen.

Natürlich ist der Parameter im Command vorhanden und funktioniert auch. V7R1.

[hel400]

... und außerdem - wenn mich nicht alles täuscht - gibt es diesen Parameter ja erst ab V7R1 !

[BenderD]

... da hat wohl jemand Kraut und Rüben durcheinander gebracht...

D*B

[camouflage]

@ludger
Wenn du magst, kann ich dir das entsprechende Programmteil auch als Open Source zustellen.
Bei Interesse einfach PN an mich.