Hallo zusammen,

funktioniert jetzt. Ich ersetze einfach im WSCST Objekt die falschen HEX Werte durch die neuen.

0001.00 :WSCST DEVCLASS=TRANSFORM.
0002.00 :TRNSFRMTBL.
0003.00 :INITPRT
0004.00 DATA ='00'X.
0005.00 :SPACE
0006.00 DATA ='20'X.
0007.00 :CARRTN
0008.00 DATA =''X.
0009.00 :FORMFEED
0010.00 DATA ='0C'X.
0011.00 :LINEFEED
0012.00 DATA ='0A'X.
0013.00
0014.00 :ASCCPINFO.
0015.00
0016.00 /* TAG FUER CODEPAGE MACHE NIX */
0017.00 :CODEPAGE
0018.00 CODEPAGE=850
0019.00 DATA=''X.
0020.00
0021.00 /* KONVERTIERE DEUTSCHE UMLAUTE */
0022.00 :ASCIICTL
0023.00 ASCII='9A'X
0024.00 DATA='DC'X.
0025.00 :ASCIICTL
0026.00 ASCII='81'X
0027.00 DATA='FC'X.
0028.00 :ASCIICTL
0029.00 ASCII='94'X
0030.00 DATA='F6'X.
0031.00 :ASCIICTL
0032.00 ASCII='84'X
0033.00 DATA='E4'X.
0034.00
0035.00 :EASCCPINFO.
0036.00
0037.00 :EWSCST.

Infos darüber: http://publib.boulder.ibm.com/iserie...s/c4156050.pdf

@Thomas: Danke nochmal für die SAVFs.

Gruß

Linguin