how will u retreive value from a table.write it with syntex.
01 ws-table
05 ws-table1 occurs 10 times.
05 ws-table2 occurs 10 times.
the above is 2 dimensional array..how will u retrieve 1st
element of an array
Answer Posted / talluri
01 ws-array
05 ws-table1 occurs 10 times.
05 ws-table2 occures 10 times.
01 i pic 9(2).
01 j pic 9(2).
procedure division.
perform varing i from 1 by 1 until i>10
perform varing j from 1 by 1 until i>10
accept ws-table1(i,J)
accept ws-table2(i,J)
end-perform
end-perform.
perform varing i from 1 by 1 until i>10
display ws-table1(i,J)
end-perfrom.
| Is This Answer Correct ? | 4 Yes | 2 No |
Post New Answer View All Answers
How do get the result of your program directly on your pc?
What happens when we move a comp-3 field to an edited (say z (9). Zz-)?
How do u write test cases?
State the various causes of s0c1, s0c5 and s0c7.
IF I mention stop run in CICS what happens?
What are the different data types in cobol?
What are the pertinent COBOL
For rewrite, why is it mandatory that file needs to be opened?
What is link edit in cobol?
What is the difference between external and global variables in COBOL?
What are all the divisions of a COBOL program?
write a cobol logic. i have file that has 10 records .1 record go to first output file and second record goes to 2 output and etc
What is rmode(24)
how can i see junk values in dclgen or in hostvariable of comp ?
Explain how you can characterize tables in cobol?