Vor den PUT-Befehl:

"quote type c 850"

Die AS/400 erwartet dann ASCII-Text im Gegensatz zu ANSI-Text (CCSID 1252).

Allerdings:

Nicht verwirren lassen, wenn man die Datei mit DSPPFM anschaut. Prüfe die CCSID der Datei mittels DSPFD sowie die CCSID deines Jobs.
DSPPFM führt keine Codewandlung durch, aber z.B. RUNQRY oder SQL sowie ein eigenes Programm setzt die Daten korrekt um.
Voraussetzung: Dein Job hat nicht CCSID 65535 !!!