Interested to Buy Any Domain ? << Click Here >> for more details...
How do you define a table/array in COBOL?
- 5 Answers
- 31323 Views
- Hexaware, I also Faced
- E-Mail Answers
Answer Posted / dipak chowdhury
01 tab
02 OC-TAB.
05 FILLER PIC 9(10) VALUE 0102001002.
05 FILLER PIC 9(10) VALUE 0202001002.
05 FILLER PIC 9(10) VALUE 0302001073.
05 FILLER PIC 9(10) VALUE 0402001002.
05 FILLER PIC 9(10) VALUE 0502001002.
05 FILLER PIC 9(10) VALUE 0602001002.
05 FILLER PIC 9(10) VALUE 0702001002.
05 FILLER PIC 9(10) VALUE 1004301024.
05 FILLER PIC 9(10) VALUE 1102001002.
05 FILLER PIC 9(10) VALUE 1202001002.
05 FILLER PIC 9(10) VALUE 1302001002.
05 FILLER PIC 9(10) VALUE 1602001002.
05 FILLER PIC 9(10) VALUE 3101899012.
05 FILLER PIC 9(10) VALUE 4102001002.
05 FILLER PIC 9(10) VALUE 4402001002.
05 FILLER PIC 9(10) VALUE 5002001002.
05 FILLER PIC 9(10) VALUE 5102001002.
05 FILLER PIC 9(10) VALUE 5302101020.
05 FILLER PIC 9(10) VALUE 5502101003.
05 FILLER PIC 9(10) VALUE 5402101001.
05 FILLER PIC 9(10) VALUE 5602001029.
05 FILLER PIC 9(10) VALUE 5702001017.
05 FILLER PIC 9(10) VALUE 5902001021.
05 FILLER PIC 9(10) VALUE 6302001029.
05 FILLER PIC 9(10) VALUE 6502101001.
05 FILLER PIC 9(10) VALUE 6902001029.
05 FILLER PIC 9(10) VALUE 7402001002.
05 FILLER PIC 9(10) VALUE 9902001002.
02 OC-TABR REDEFINES OC-TAB OCCURS 28 TIMES
indexed by t.
05 OC-CDT PIC 99.
05 OC-FCD-AAA PIC 9(5).
05 OC-FCD-BB PIC 999.
| Is This Answer Correct ? | 34 Yes | 8 No |
Post New Answer View All Answers
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
how to refer the data field?
how to convert the recors form vsam file to db2 table tru file aid
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
What guidelines should be followed to write a structured cobol prgm?
What is the Purpose of POINTER Phrase in STRING command in COBOL?
Which division and paragraphs are mandatory for a COBOL program?
What is rmode(any) ?
What is the Purpose of Pointer in the string?
) How do u handle errors in BMS macro?
Explain how will you differentiate between an internal and an external sort, the pros and cons, internal sort syntax etc
What rules are followed by the search verb.
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
What is the default value(s) for an initialize? What keyword will allow for an override of the default?
