Is this allowed?
01 WS-TABLE.
03 FILLER-X PIC X(5) VALUE 'AAAAA'.
03 WS-EX REDEFINES FILLER-X OCCURS 5 TIMES PIC X(1).
can redefines clause be used with occurs clause?
Answer Posted / sandy
Bob, using occurs under redefines is also possible.
example.
01 WS-REF-TABLE.
05 WS-DATA1 PIC X(8) VALUE 'TEST '.
05 WS-DATA2 PIC X(8) VALUE 'COBOL '.
01 WS-RED-TABLE REDEFINES WS-REF-TABLE.
10 WS-RED-DATA OCCURS 2 TIMES PIC X(8).
| Is This Answer Correct ? | 3 Yes | 1 No |
Post New Answer View All Answers
How many bytes S(8) comp field occupy and its maximum value?
Describe the cobol database components?
How do you differentiate between cobol and cobol-ii?
How can i load all the data from a file to Table (array) in cobol.How i manage the occurs clause with out reading the file.Any options avilable ? Please can any one help me it is urgent?
What is the Purpose of POINTER Phrase in STRING command in COBOL?
i need a small 3d program using inline and outline.
how do you define single dimensional array and multidimensional array in your cobol?
What is the problem of ordered sequential files access?
Name the divisions, which are available in a cobol program?
In COBOL, what is the different between index and subscript?
If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly
What is the utilization of copybook in cobol?
Write the code to count the sum of n natural numbers.
What guidelines should be followed to write a structured cobol prgm?
if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.