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 |
i have a requrement in A as viswa!@#$%&^**reddy i need to move viswareddy in B without junk values pls say how to do ths reply fast
what is meant by binary search?
What is IMPACT analysis?
hi is there any means of deletin a record from a ps usin cobol not using jcl?eg if i am reading a record and if some condition is matched tat particular record must be deletd fom the ps
) how do u code after getting data?
Write a program to concert an Indexed file into Sequential file?
how to transfer the file from pc to mainframe??
in cobol perform stmt whether it first checks the condition or not
Define REDEFINE clause and Is it possible to have the redefine clause anywhere in the working storage section for a data name?
What is Pic 9v99 Indicates in COBOL?
0 Answers SwanSoft Technologies,
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
What is the difference between goback, stop run and exit program in cobol?