Schau mal per WRKTBL QEBCDIC die ASCII->EBCDIC-Umsetzung an.
Da du EBCDIC-Daten abgibst, musst du für die entsprechenden Zeichen den EBCDIC-Code an Stelle des ASCII-Codes übergeben, dann müsste es klappen.

x'1D' und x'1E' sind OK, aber an Stelle von x'17' müsstest du x'26' wählen.