CPYTOIMPF UTF-8

[alfredo]

Nach der Umstellung auf V5R4 wollte ich eine Datei in UTF-8 kopieren.
Basis ist CCSID(13488)
CPYTOIMPF FROMFILE(WASPXMLG) TOSTMF(&PATH) +
MBROPT(*REPLACE) +
STMFCODPAG(1208) RCDDLM(*CRLF) STRDLM(*NONE)

Zu meinem Erstaunen setzt er nur die Zeichen laut aktueller Jobumgebung richtig um. Er geht also vor der Umsetzung auf UTF-8 von Unicode auf Single-Byte zurück.
Oder bin ich blöd?

[malzusrex]

Ich tippe mal das er unter 5.4 generell Probleme hat. Wie ich schon in einem anderen Beitrag erwähnt habe, habe ich bei einem Kunden ein ähnliches Problem. Ich habe dann erst einmal das Programm auf den CPYTPSTMF umgestellt.

Mal sehen was sich in den nächsten Tagen dazu ergibt. Vielleicht ist es ja doch nur ein BUG.

Gruß Ronald

[alfredo]

Ich wollte noch ergänzen, es ist kein Problem nach Umstellung von V5R3(wir sind von V5R2 umgestiegen).
Daher habe ich es erst jetzt probiert.
Wie könnte es mit CPYTOSTMF funktionieren, 13488 akzeptiert er bei mir nicht als Von-CCSID?

lg

[Fuerchau]

Das klappt mit ein paar Umwegen:

Lege eine PF mit CCSID 1208 an, das wird unterstützt.
Per SQL mit
insert into TBL1208
select * from TBL13488
die Daten kopieren.

CSV-Daten kann man per
trim(char(mynum)) concat ';' concat trim(mychar) concat ';'
zusammenbauen.

Die neue Datei hat nun CCSID1208-Daten.

Erstelle eine weitere PF mit CCSID 65535 (ohne Source) und kopiere per CPYF FMTOPT(*NOCHK) die Daten.
Diese Datei kannst du dann per CPYTOSTMF ausgeben.

[alfredo]

Danke!

Ich war schon auf der Schiene SQL.
Wollte das im Programm lösen(SQLCSR), aber das hab ich nicht hingekriegt, gab immer Fehler.

Mit Insert INTO FILEUTF (select * from FILEUCS2)
und CPYTOSTMF CVTDTA(*NONE) funzt es.

<Data ss:Type="String">Принтер</Data>


Selbst wenn man ein CPYTOIMPF von 1208 auf 1208 macht, erfolgt scheinbar eine Zwischenumwandlung auf die JOB-CCSID.

[Fuerchau]

Ich vermute, dass CPYTOIMPF ganz normale Leseroutinen verwendet und da erfolgt nun mal automatisch die Umwandlung.

Wenn man das per Programm macht, muss man die Felder explizit mit einer CCSID versehen.
Die reine automatische I/O-Definition (bei F-Bestimmungen) scheint da nicht zu reichen (ich habs mit V5R3 ausprobiert).

Mit embedded SQL kannst du die Felder manuell mit CCSID oder als externe Struktur definieren (wenn die externen Felder CCSID's haben), dies geht allerdings nur in SQLRPGLE.
Dann müsste es klappen.