print

//JOB1 JOB
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//DD1 DD DSN=KC03H09.$MARIST$.LIBRARY(AREA),DISP=SHR
//SYSIN DD *
PRINT -
INFILE(DD1) CHAR
/*
//