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.
Answer Posted / 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 |
Post New Answer View All Answers
Explain how can the disposition of sysout datasets be set for an entire jobstream?
Hello Guys, I have 1+ Year Experience in MAINFRAME TESTING. After 1 Week I have an Interview With a Company on Mainframe Testing. Please Could You Guys Please Suggest me What Sections Should I prepare ?? ___Tell Me the Topic Or Appropriate Site & Links. ?? ---------------Thank You
Brief description of inline procedure of jcl.
Explain about LMFREE�free data set from its association with data ID
which utility is used a dummy utility?
When you specify multiple datasets in a JOBLIB or STEPLIB, what factor determines the order?
What do you understand by the terms: joblib and steplib?
What is the purpose of dd dummy statement?
Explain about LMQUERY�give a dialog information about a data set
What is the significance of addrspc parameter in exec statement?
what JCL Procedures?
What parameters can be used to limit the number of records written to a sysout dataset?
how you can direct the data to spool using SYSOUT option?
What is Cataloged Procedures?
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