How to add particular field or value to all the records:

//STEP1 EXEC PGM=SORT
//SORTIN DD DSN=inputdatasetname,DISP=SHR
//SORTOUT DD DSN=outputdatasetname,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
  SORT FIELDS=COPY
  OUTREC FIELDS(1:1,2114,
         2115:C'20190912',
         2123:2123,605)
/*