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
Why is it necessary that file needs to be opened in I-O mode for REWRITE?
Define cobol?
Write a program to explain size error.
i want to learn mainframe..any websites and material to learn from basic..? my mail id : rajeswaribe2010@gmail.com
What is the LINKAGE SECTION used in COBOL?
how to convert the recors form vsam file to db2 table tru file aid
What is comp-1 and comp-2?
What is the difference between a binary search and a sequential search what are the pertinent cobol?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
how do you reference the esds vsam file formats from cobol programs
How arrays can be defined in COBOL?
What rules are to be followed while using the corresponding options?
what is the use of outrecord?
Explain how will you differentiate between an internal and an external sort, the pros and cons, internal sort syntax etc