IFS-File mit RPG-Progr geschrieben: keine Umlaute

[Fuerchau]

Die Ziel-CCSID sollte eher 1252 (ANSI) sein. Das klappt aber solange nicht, wie die Job-CCSID noch auf 65535 (HEX) steht.

[HerbertW]

Ich habe die JOB-CCSID auf 273 gestellt und die Ziel-CCSID auf 1252
Ergebnis: unverändert, keine Umlaute

2.Versuch
wie oben, jedoch die Textdatei im Filesystem /Root (auf AS400) ablegen.
Ergebnis: einwandfrei! Umlaute vorhanden.

3. Versuch
wie Versuch 2, jedoch JOB-CCSID auf 65535 lassen.
Ergebnis: einwandfrei! Umlaute vorhanden.

Es scheint am QNTC-Filesystem zu liegen, wo die Datei auf einen Windows-Server geschrieben wird.

Muss ich auf /Root ausgeben und dann die Datei zum Zielserver kopieren, oder kann man es noch irgendwie drehen, ohne Umweg über /root gleich auf dem richtigen Server auszugeben?

[BenderD]

...das ist ja auch nur die halbe Sache. Die Datei muss nach der Erstellung geschlossen werden und dann nochmal mit TEXTDATA geöffnet werden.

D*B

[HerbertW]

Den o_text_creat gibt es seit V5R2
Es geht dann in einem Aufwasch.

Wenn ich es aber so mache. dann ist es auch nicht besser:

fd = open(pathfile:
O_CREAT+O_WRONLY+O_CCSID:
S_IWUSR+S_IRUSR+S_IRGRP+S_IROTH:
1252) ;

callp close(fd);

fd = open(pathfile:
O_WRONLY+O_TEXTDATA);

Egal wie, auf QNTC keine Umlaute.

Man kann auch nicht per CPY-Befehl von /root nach /qntc kopieren. Entweder geht es gar nicht, wegen CPFA098 (Die CCSID der Zieldatei konnte nicht mit der CCSID der
Quellendatei abgeglichen werden. )
oder, wenn man TOCODEPAGE(*STDASCII) angibt, dann gehen die Umlaute verloren.

[Fuerchau]

QNTC unterstützt keine CCSID.
Erstelle die Datei am Besten in /Home/MyVerz und kopiere sie anschliessend ins QNTC.
Hier geht es je nach Release manchmal nur mit QSHELL CMD('cp /fromdir/file /todir').

[HerbertW]

Vielen Dank für den Hinweis mit QSHELL.

Hat funktioniert.