Falsche CCSID bei schreiben IFS-Textdatei

[Fuerchau]

Der "Open" öffnet leider im Binary-Format.
Versuche es mit "fopen()".

[Bruno Jakob]

Oder erstelle die Datei vorher mit dem qsh-Befehl touch unter Angabe der korrekten CCSID.

Bruno

[elmaro]

Hallo Bruno, fuerchau,

danke für die Tips, habe das Problem jetzt folgendermassen gelöst:
im open-befehl habe ich jetzt die CCSID für file UND open angegeben, dann ist die Textdatei auf Windows lesbar.

eval flag=O_CREAT+O_RDWR+O_CCSID+ O_TEXTDATA+O_TEXT_CREAT+O_EXCL
eval mode=S_IRUSR+S_IWUSR+S_IXUSR

eval cp_file = 367
eval cp_open = 37

eval fd = open(pathptr:flag:mode:cp_file:cp_open)

** schreiben
eval buf='hallo1' + X'0D25'
callp write(fd: bufpointer: %LEN(%TRIMR(buf)))

callp close(fd)


Wenn jetzt die Umwandlungstabelle gefunden wird, geht das super !

Ist eigentlich die codepage 367 OK, weil alle von der 1252 reden, für die habe ich aber keine conversion-table gefunden....

[Fuerchau]

367 ? Kenn ich nicht.
1252 ist Windows CP für ANSI.
037 ist USA-Englisch.

Sind deine Dateien ggf. 273 !?
Prüfe vor allem auf Umlaute und Sonderzeichen.

Normalerweise gibts Umwandlungstabellen von 273->1252.

[elmaro]

Hallo Fuerchau,
sorry für die späte Antwort, bin gerade im Urlaub.
Unsere Dateien sind durchwegs CCSID 273.

Lt. Wikipedia:
Many European languages use the EBCDIC-encoded CCSID 37. CCSID 367 is identical to ASCII. CCSID 819 is identical to ISO 8859-1. CCSID 923 is identical to ISO 8859-15. CCSID 1208 is identical to UTF-8.

Habe das anfangs mit 1252 versucht, dann hatte ich einen Programmabruch mit der Meldung: Umsetzung nicht möglich.

Mit der 367 klappt das.
Danke für deine Antworten.