wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?

Answers were Sorted based on User's Feedback



wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?..

Answer / neo devan

Evaluate verb is one of conditional statement used in cobol.
It is used whenever there are many conditions to check, its
used instead of nested if statements.
The syntax : evaluate true
when name="Robert" display "Robert".
when name="Langdon" display "Langdon".
end evaluate.

evaluate fname also lname
when "Robert" also "Langdon"
display "Robert Langdon".
when "Leonardo" also "Da Vinci"
display "Leonardo Da Vinci".
end evaluate.

Is This Answer Correct ?    6 Yes 1 No

wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?..

Answer / kaarthik

Just to add to the already given answers,

Evaluate is mainly used to eliminate the use of Nested-if's
this is introduced as part of VS-COBOL 2 .

As for REC-FM,
While defining the file in COBOL,

Give RECORDING MODE IS F

In JCL, Give DCB=(RECFM = FB,LRECL=XX,BLKSIZE=xxx)

Is This Answer Correct ?    5 Yes 0 No

Post New Answer

More COBOL Interview Questions

how to convert vsam table into DB2 table?

1 Answers   IBM, Wipro,


wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?

2 Answers   EDS,


how can u redefine picx(10) with pic 9(6).

3 Answers   TCS,


How to Pass table from a cobol program to another cobol program and how to use that table in called program

8 Answers   Patni, SunGard,


i need a small 3d program using inline and outline.

0 Answers  






comp-3 field occupy?

5 Answers  


What is the difference between Call and a Link?

0 Answers  


How to display the index.(displacement from an array)

4 Answers   IBM,


How do define dynamic array in cobol. how do you define single dimensional array and multidimensional array in your cobol?

0 Answers  


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 displayedafter the PERFORM is over?assume that N0.OF.REC has PIC 9(4) a.1000 b.1001 c.1 d.none of the above since there is a syntex error

4 Answers   TCS,


What is difference between com and com3? Eg. s9(4) so what is the memory it will occupy com and com3.

2 Answers  


What are INPUT PROCEDURE and OUTPUT PROCEDURE?

0 Answers  


Categories