Hallo,

so sieht der Zeit mein Versuch aus:

PRTF:
A R ZEILE
A DATEN 80 1TRNSPY

RPG:

...

DCrLf S 2

...

C EPL Begsr
*
C Eval CrLf=X'0D'+X'0A'
*
C Open ICH21PRT
*
C Eval Daten=CrLf
C Write Zeile
C Eval Daten='N'+CrLf
C Write Zeile
C Eval Daten='A50,0,0,1,1,1,N,"Test"'+CrLf
C Write Zeile
C Eval Daten='P1'+CrLf
C Write Zeile
*
C Close ICH21PRT
*
C Endsr

Gruß

Björn