//STEP1 EXEC PGM=IDCAMS //DD1 DD DSN=FILE1 //SYSPRINT DD SYSOUT=* //

How to test thru JCL if any file(PS or VSAM) is empty or
not. I do not want to use any COBOL prog or Ezytrieve and
want to do using utility.

Question Posted / manid

10 Answers
40791 Views
Lehman Brothers, I also Faced
E-Mail Answers

Answer Posted / manid

//STEP1 EXEC PGM=IDCAMS
//DD1 DD DSN=FILE1
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
PRINT INFILE(DD1) COUNT(*)
/*

IF STEP1 RETURNS RC=4 THEN FILE1 IS EMPTY FILE

I HOPE THIS WILL HELP YOU

Thanks
ManiD

Is This Answer Correct ?

3 Yes

4 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

can any one plzzzzzz tell the jcl code for creating ps using idcams

11654

What is the maximum length of a single line of jcl?

1349

What is the function of a dd statement?

1196

which parameter is used to check the syntax of a jcl without executing it?

1353

How can unused space allocation be returned to the system when a dataset is closed?

1480

how can a gdg base be created in a jcl. What is the difference between empty and scratch parameter while defining/altering gdg base?

1272

I have a COBOL program that ACCEPTs some input data. How do you code the JCL statement for this?

1186

What is Cataloged Procedures?

1158

What is concatenating?

1071

what is “Cond= even” and “Cond=only”?

1302

How do you submit a job for execution?

1102

List the different jcl statements that are not permitted in the procedures?

1074

Explain the function of dd disp parameter?

1114

Can we call instream to catalog and catalog to instream?

1137

How do you run a COBOL batch program from a JCL? How do you run a COBOL/DB2 program?

1250