CPYTOIMPF

[CaddyMajor]

Vielen Dank Fuerchau, Vielen Dank kuempi von stein.

Wieder einen Schritt weiter.

Ich möchte mich jetzt schonmal bedanken für eure super Unterstützung. Sowas ist nicht normal und sollte daher auch entsprechend Gewürdigt werden.

Ich habe nur noch eine Frage an euch:

Aktuell schaut es so aus.

Wenn im Feld1, Größe 20 Alpha, nur die ersten 8 Positionen mit Daten gefüllt sind, macht er die letzten 12 mit leerzeichen, dann den Tab () usw.

Ist es möglich, das er die Leerzeichen unterdrückt?

[Fuerchau]

Leider nein. Dies ist schon lange eine Forderung für CPYTOIMPF, aber die Spaltenbreiten sind leider nicht dynamisch.

Ich habe mir daher mit SQL (QM-Query) und CPYTOSTMF geholfen:

select
trim(mychar) || x'05' || trim(mychar2) || x'05' || trim(char(mynum)) || x'05' || trim(char(mynum2)) ...
from myfile
where ...

Das Ganze dann in eine Ausgabedatei umleiten und per CPYTOSTMF ins IFS kopieren.

Ist im übrigen eine etwas komfortablere Methode für ausgehende Schnittstellen als dieser CPYTOIMPF.

Beim CPYFRMIPMF sind solche Dinge nicht erforderlich.