zOs/JCL/IEBGENER

//A540769W JOB (CP00,KE50),'DB2 REO',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2,CLASS=M1
//CP       EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD *
 EINS
      ZWEI
          drei
             vier
//SYSUT2   DD DISP=SHR,DSN=A540769.TMP.TEXT(IEBGENER)