//RCI003A JOB ,COLDWELL,CLASS=A,REGION=2048K,MSGCLASS=H
/*JOBPARM TIME=009,LINES=5,CARDS=4000                                           
//*ROUTE  PRINT N1R0
// EXEC VSFCG,
//      CPARM='OPT(3)'
//SYSPRINT DD SYSOUT=H
/*INCLUDE HELLO.FOR
//GO.SYSIN DD *
//GO.FT06F001 DD SYSOUT=H,DCB=(RECFM=UA,BLKSIZE=133)
/*EOF