Interested to Buy Any Domain ? << Click Here >> for more details...
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.
- 10 Answers
- 41178 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
What is timing concept in mainframe?
I have a cobol db2 program(PGM A) where other program (PGM B) will call this program and passes some 50 fields data to PGM A. PGM A has some layout in which it receives the data from PGM B. And this layout has been copied in the linkage section pf PGM A. After getting the data, PGM A writes the data in a flat file in the same layout which it receives from PGM B. PGM B is a simple COBOL pgm. Please provide a JCL to run these programs.
which parameter is used to check the syntax of a jcl without executing it?
My Question is 1. How to cound no. of records in JCL. Please explain with an example. 2. How to execute only odd steps in JCL? I know EDIT TYPE = Inculde, Step Name = 1,3,5 and COND code for all even step. Anyone knows other than this.
WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99 VALUE 123.45. PROCEDURE DIVISION. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. compiler : IGYGR1080-S A "VALUE" clause literal was not compatible with the data category o subject data item. The "VALUE" clause was discarded. WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99. PROCEDURE DIVISION. MOVE 123.45 TO W-B. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. 2375
Explain how can values be passed from the job stream to an executable program?
Explain about LMFREE�free data set from its association with data ID
How can the attributes of one sms dataset be copied to another dataset?
What are steplib and joblib?
what disp parameter we mention for creation of temporary dataset so that we can use it in later steps?
why should SYSIN DD * statement should not be included inside a PROCedure snippet??? please answer this.. i need to know.
what is use of dsn parameter in dd statement?
What statement marks the beginning of a job step; assigns a name to the step; identifies the program or catalogued or in-stream procedure to be executed in the step?
in ways data can be passed to a COBOL program from JCL?
How can return codes be tested before execution of a job step?
