consider the following progrm statements
MOVE 0 TO SW.NO.OF.REC
PERFORM PRI-OUT UNTIL SW=1
DISPALY NO.OF.REC
STOP RUN
PRE-OUT
READ IN-FILE AT END
MOVE 1 TO SW
WRITE OUO-REC FROM IN-REC
ADD 1 TO NO.OF REC
if the IN-FILE contains 1000 records what value will be
displayed after the
PERFORM is over? assume that N0.OF.REC has PIC 9(4)
a.1000
b.1001
c.1
d.none of the above



consider the following progrm statements MOVE 0 TO SW.NO.OF.REC PERFORM PRI-OUT UNTIL SW=1 DISPAL..

Answer / dimpy19

d.none of the above
since there is a syntax error

Is This Answer Correct ?    0 Yes 0 No

Post New Answer

More JCL Interview Questions

Can we change a FB file to VB file in JCL? Please help

1 Answers  


how to run batch program without jcl?

3 Answers   HSBC, IBM,


We can use PASS with permanent datasets also. THEN Which is the condition in which we may use PASS (instead of KEEP) with permanent data sets, while there is no need to specify UNIT and VOL for them like temporary data sets (in cas we use KEEP for permanent data sets) ?

0 Answers   IBM,


can we copy a file from fixed block to variable block and vice versa ....asap

1 Answers  


On the DD statement, what is the main difference between creating a new sequential flat file and a partitioned dataset?

2 Answers  






There are a set of 10 files and a customer will be selecting random no of files(i.e they may be more than 2, may not be in the order).Sometimes he might just select one file or sometimes no files at all.How do you code a JCL for this? Is it possible to code just JCL alone for this problem?

9 Answers   Infosys,


Explain the function of //cntl statement?

0 Answers  


How to compare two files in SYNCSORT and on the mismatch record should be deleted from second file.

0 Answers   CSC, SPIC,


what is the control cards?

3 Answers  


How does the jcl specify the job to os?

0 Answers  


What are steplib and joblib? What for they are used?

0 Answers  


What does the statements: typrun=scan and typrun=hold do in a JCL statement

2 Answers  


Categories