Hallo Fuerchau,

die Daten werden wie oben geschrieben über den CPYFRMIMPF aus der Datei in eine PF geschrieben. Diese hat nur ein Feld, nämlich das Feld DATA 512A als CCSID=1208 definiert.

Aus dieser Datei werden nun Satz für Satz die XML Daten eingelesen und verarbeitet. Diese Daten die die Sonderzeichen beinhalten werden dann wiederum in Felder einer anderen PF (bzw. einer TABLE) geschrieben die CCSID 1200 haben.

Der CPYFRMIMPF sieht so aus:

Code:
CPYFRMIMPF FROMSTMF(&WRKF) TOFILE(QTEMP/DM0720PF) +       
           MBROPT(*REPLACE) FROMCCSID(1208) +           
           TOCCSID(1208) RCDDLM(*CRLF) STRDLM(*NONE) +  
           RMVBLANK(*NONE) FLDDLM(*TAB) +               
           RPLNULLVAL(*FLDDFT)
Gruß
Sebastian