what is the size of W-REC in the following
01 W-REC
05 A PIC 9(4)V99
05 B READLINES A
10 C PIC XX
10 D PIC S9(4)
05 E OCCURS 7 PIC ZZ.ZZ
05 F OCCURS 5
10 G PIC ZZ.ZZZ99
10 H OCCURS 3
15 J PIC 9(3)
15 K PIC V99
Answers were Sorted based on User's Feedback
Answer / vel
Let us come from bottom
K=2
J=3
so H = 3 * 5 =15
G = 8
SO F = 5 * ( 8 + 15) =115
E = 7 * 5 = 35
A=B= 6
SO TOTAL SIZE =156
| Is This Answer Correct ? | 17 Yes | 1 No |
Answer / rahul
Here B is redefining A so 6 will be added only once
| Is This Answer Correct ? | 0 Yes | 0 No |
Scenario: I have 3 Input Files.Read the first i/p file and depending on certain business logic, I want to read wither i/p file-2 or i/p file-3.Now, depending on certain business logic applied to the record read from either file-2 or file-3, I decide to write them to either output file-2 or output file-2. Question: How many job steps are necessary to implement a solution for the above.
What are the different rules to perform a Search?
u have passed sme charecters thru parm parameter in jcl. how do u code in cobol to recieve the values u gave in parm ?
Which is the best IBM mainframe Training Institute in Ameerpet, Hyderabad
What is SSRANGE, NOSSRANGE ?
how the control comes back from subprogram to mainprogram
COMP-3 field occupy ?
if a>b continue display x. dispaly y. end-if display 1 display 2. display 3. what should be my output ?
What is the difference between a subscript and an index in a table definition?
How can we increase the size of an existing PDS to include more no. of modules. I tried the answer posted by Jagan(TSO PDS 'pds name') but did not find it working. The answer posted by kamal i know very well. Please suggest me a answer so that we don't need to delete the existing PDS and still we can change the size as well.
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?
TYPES OF SORTINGS. which is more prefarable.