wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?
Answers were Sorted based on User's Feedback
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 |
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 |
Differentiate between structured cobol programming and object-oriented cobol programming.
What is tne need to use sub programs in Cobol?
how many bytes do SPPPP999 will store?
I have two questions here. 1. How to read a flat file in reverse order? 2. How to read a VSAM KSDS file in reverse order? In both the cases we donot know the total number of records.
How many times the loop runs here 01 a pic 9(2) value 1. perform para1 until a=10 move 1 to a. stop run. para1: move 10 to a.
what is call by value and call by reference ?
3 Answers Infosys, ITC Indian Tobacco Company,
What is the reference modification.
01 a pic s9(5) value -12345, if we disply a , the sign will overpunched with last digit but i need to get the miuns sign in the result?
I have a field with data type X(10). I want to perform arithmetic operation on this field? I tried doing it by moving the value into a numeric field. but it didn't work out. I am getting a S0C7 abend. Pls let me know if there is any way of getting this done?
I want ALL ERROR codes in VSAM
3 Answers American Express, TCS,
88 level entry is used for (a) data items in WORKING-STORAGE SECTION (b) items with RENAMES clause (c) condition-names (d) None of the above
how do you reference the variable block file formats from cobol programs