If i initialize the 01 level variable in array, will it
initialize all the array elements (occurs)?
Answers were Sorted based on User's Feedback
occurs clause of an array cant be coded in 01 level.
it should always be coded in work area 2
01 xxx-yyy.
03 XX-YYY-ARRAY OCCURS 10 TIMES.
05 XX-YYY-MEM1 COMP-3 PIC S9(9).
05 XX-YYY-MEM2 COMP-3 PIC S9(9)V9.
| Is This Answer Correct ? | 16 Yes | 1 No |
All ryt.Answer is no.array elements will not be initialised
automatically.
you can initialise the table with INITIALIZE verb.
INITIALIZE XXX-YYY
this will initialize your alphanumeric with space and
numeric with '0'.
apart from this by moving also u can initialise.
| Is This Answer Correct ? | 8 Yes | 2 No |
Answer / rakesh
I know we cant use occurs in 01 level. My question was, if
we initialize 01 level variable, in ur example, xxx-yyy,
will all the elements be initialized as well (xx-yyy-array,
xx-yyy-mem1 and xx-yyy-mem2)?
| Is This Answer Correct ? | 6 Yes | 3 No |
Answer / chandrababu naidu
we can't use array or table in 01 level item.
(or)
01 name.
02 name2 pic x(5) occurs 10 times.
INITIALIZE NAME.----> means the variable name contains 'spaces'.
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / nag(igate)
hi rakesh and sneha
we can initialize the array at group level.
01 xxx-yyy VALUE "ABCDEFGH"
03 XX-YYY-ARRAY OCCURS 2 TIMES.
05 XX-YYY-MEM1 PIC X(2).
05 XX-YYY-MEM2 PIC X(2).
the initialize value should depend on the number of times
the, occurs clause repeat.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / sharath
Assuming we have to initialize the array variables with
zeroes.
MOVE ALL '0' to the '01' group variable will initialize the
whole array.
| Is This Answer Correct ? | 1 Yes | 5 No |
Explain call by context by comparing it to other calls.
write a program to eliminate duplicate records in a input file and send them to output file.
soc-7 is a bad data,invalid data. when ever we are moving the alphabets in the position of numeric then we got this abend. so my question is if o1 ws-data pic 9(1) value passing the alphabet some x. then we got soc-7 or not? i want clarification ?
What is the LINKAGE SECTION used in COBOL?
Write down the divisions of cobol program?
can you declare redefine in level 01?
What are the differences bitween cobol and cobol-2?
What is 66 level number and where it is used in real time by software developers?
2 Answers ITC Indian Tobacco Company, TCS,
diffrence between renames and redifnes with examples
I HAVE FOLLOWING DECLARATION. 02. A PIC X(10) VALUE 'XXXXXXXXXX'. 02. B REDEFINES A. 05. C PIC X(3). 05. D PIC X(3). 05. E PIC 9(3). IN MY PROG, I HAVE MOVE 1 TO E. DISPLAY A. WHAT WILL BE DISPLAYED AS A RESULT OF THIS? PLEASE EXPLAIN THE ANSWER. THANKS.
Can the OCCURS clause be at the 01 level?
how do you reference the esds vsam file formats from cobol programs