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.
Answers were Sorted based on User's Feedback
Answer / vani
By IDcams its is possible
// STEP EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//FILE1 DD DSN=INPUT-FILE,DISP=SHR
//SYSIN DD *
PRINT INFILE(FILE1)
DUMP COUNT(1)
/*
IF THE FILE IS EMPTY JCL GIVES RC=4
| Is This Answer Correct ? | 21 Yes | 6 No |
Answer / ram g
u can use ams command repro thru idcams utility and check
for rc
| Is This Answer Correct ? | 19 Yes | 5 No |
Answer / ekluba
With proper Syntax answer #5 is correct:
//SYSPRINT DD SYSOUT=*
//DD1 DD DSN=???.EMPTY,DISP=SHR
//SYSIN DD *
PRINT INFILE(DD1) COUNT(1)
/*
| Is This Answer Correct ? | 9 Yes | 2 No |
Answer / suga
you can use IEBPTPCH utility.it is used to check whether it
is empty or not.If the return code is 4 then the file is
empty.
| Is This Answer Correct ? | 10 Yes | 4 No |
Answer / deb
First SORT the input file.
Assume the sorted o/p is in MY.SORT.FILE, then run this step
//CHEKEMTY EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//MYFILE DD DSN=MY.SORT.FILE,DISP=SHR
//SYSIN DD *
PRINT INFILE(MYFILE) CHARACTER COUNT(1)
if the above step returns a RC=4, then the file is
empty
| Is This Answer Correct ? | 10 Yes | 5 No |
Answer / nagendra
Hi vani,
When i tried executing ur JCL i am getting this error while
giving JJ.
'DUMP' IS NOT A RECOGNIZED IDCAMS STATEMENT NAME
What shall i do????
| Is This Answer Correct ? | 5 Yes | 2 No |
Answer / 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 |
Answer / sivakumar
Use comparex/ISRSUPC utility and compare ur file with an
empty file of the same DCB parameter. Retrun code of 28
means the file is empty. return code of 1 means the file is
not empty.
| Is This Answer Correct ? | 5 Yes | 7 No |
what is the JCL statement consists of?
What are the parameters that are used in creating a gdg?
What does SYSIN * indicate?
how many max steps can we use in a job? pls answer to my question
Suppose there are 2 Input files Infile-1 and Infile-2. Both the Files contain Employee Records. You need to compare both the files and Write the Common Records in third file named Outfile. How can we do this using File-Aid?
i want apply mainframe devolper with 3+ but i dont have that much of knowledge what isthe solution to get that much of knoweldge?
I have two files each contains 10 records. I would like to copy both files into one output file but in alternate sequence. for e.g. first record from file1 then record 2 from file2.....
Describe the EXEC statement, its meaning, syntax and keywords?
How gdg are concatenated?
Can an individual step be restricted from using all the jobs allowed cpu time?
Please go thru the below points and let me know how to code this. 1. Sort the input dataset for the condition : Starting position is 37,length of the field is 13 based on character and in the ascending order , starting from position 25 length of 12 ,character and in the ascending order. Use a temporary dataset to hold the sorted file. 2. Use the temporary file created in the above step as the input for the next step. The next step is to execute a program and produce an output file. Use the temporary file created in the above as work file 1 and the output of the file to be created in this step work file 2.Also, pass a parameter to the program that is to be executed in this step. The parameter should have the current date in YYYYMMDD format. For the sake of convenience, you can use the below Job Name : Sample1 Input DSN : PCABDT11.CABD.TEST.INPUT Temporary DSN : Sort1 Output DSN : PCABDT11.CABD.TEST.OUTPUT Program Name : SAMPLE Thanks in Advance for your response.
How can the disposition of sysout datasets be set for an entire jobstream?