//ALLOC    EXEC PGM=IEBPTPCH
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=HLQ.TEST.FILE,DISP=SHR
//SYSUT2   DD SYSOUT=*
//SYSIN    DD *
 PRINT TYPORG=PS
/*
//* RESULTS 0004 IF SYSUT1 IS EMPTY