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 |
What is the use of LINKAGE SECTION?
What is the linkage section?
How can you add a particular field/coloumn in copybook?
which one is better among static call and dynamic call?
How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?
Extract only those records from a PS file which are having word 'TEXT' in the records using COBOL? The word TEXT is not present in a particular position in all the records.
What is an index for tables?
why occurs clause not mentioned in 01 level
6 Answers HCL, NIIT, TCS, Tesco,
What is the difference between PIC 9.99 and 9v99?
What compiler option would you use for dynamic linking?
What is CALL statement in COBOL?
how to transfer the file from pc to mainframe??