Interested to Buy Any Domain ? << Click Here >> for more details...
Can we dynamically increase the size of occurs clause? i.e
In case I an not sure of the size of array and want to
increase the size at run time.If yes , how?
- 1 Answers
- 6223 Views
- I also Faced
- E-Mail Answers
Answer / lu
yes, ...you declare an array like this:
77 ws-counter pic 9(04) value zeroes.
01 ws-array.
07 ws-field pic x (01) ouccurs 1 to 1000
depending on ws-counter.
Procedure Division.
Perform Read-file until ws-end-of-file = 'y'.
Read-file.
Read file at end
move 'y' to ws-end-of-file.
if ws-end-of-file not = 'y'
add 1 to ws-counter
move aa of file to ws-field (ws-counter).
the maximun is 1000 occurrences and minimun is 1...
| Is This Answer Correct ? | 14 Yes | 0 No |
Define REDEFINE clause and Is it possible to have the redefine clause anywhere in the working storage section for a data name?
Will the variable POS in the following code have a value of 2 or not? 01 POS PIC S9(4) COMP VALUE 2. 01 FIRST-NAME PIC X(10) VALUE 'ABC'. 01 LAST-NAME PIC X(10) VALUE 'XYZ'. 01 NAME PIC X(20) VALUE SPACES. STRING FIRST-NAME DELIMITED BY SPACES ' ' DELIMITED BY SIZE LAST-NAME DELIMITED BY SPACES INTO NAME WITH POINTER POS
What is the difference between copy and include in cobol?
Explain complete concept of table handling in COBOL with an example?
What is inspect in cobol ?
how can i see junk values in dclgen or in hostvariable of comp ?
Explain the configuration section of a cobol program with examples of syntax.
what is the purpose of linkage section?
What is length is cobol?
Can we change the password using ALTER? anyone tried and changed?
What is the difference between a binary search and a sequential search?
Write a program to explain size error.
COBOL 
