zOs/JCL/TSOCA

//A540769C  JOB (CP00,KE50),TIME=60                                     00010001
//*MAIN=LOG
//S        EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSPROC  DD DISP=SHR,DSN=DSN.CADB2.CS.EXEC
//SYSTSIN  DD *
   %utPun wie gehtsdir +
         auf der zweiten Zeile
     und input line 1

     und input line 2 nach leer
     und input line 3  end