Interested to Buy Any Domain ? << Click Here >> for more details...
01 WS-NAME PIC X(10) OCCURES 2. by this we can get ws-name 2
times. My qustion is how can we access the second name
- 5 Answers
- 9743 Views
- TCS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / veena
occurs can never be used in the 01 level. and when the
clause is used in 02 level, the variable has to be in the
level below that.
01 ws-name1.
02 ws-name2 occurs 2 times.
03 ws-name. pic x(10).
and also pic clause cannot be used in the same statement of
the occurs clause.
| Is This Answer Correct ? | 16 Yes | 7 No |
Answer / venkat
The OCCUR keyword can not be used in 01 level variable. But
it can be used in level below 01.
Eg:
01 WS-NAME.
02 WS-NAM-X PIC X(10) occurs 2 times.
01 Ws-TEST PIC X(10) value spaces.
We can access the second name variable WS-NAM-X(2).
Eg 1. MOVE WS-NAM-X(2) to Ws-TEST.
2. Display WS-NAM-X(2).
| Is This Answer Correct ? | 8 Yes | 0 No |
Answer / sriharichallagundla
occurs can never be used in the 01 level. and when the
clause is used in 02 level, the variable has to be in the
level below that.
01 ws-name1.
02 ws-name2 occurs 2 times.
03 ws-name. pic x(10).
| Is This Answer Correct ? | 8 Yes | 1 No |
Answer / m.raghu
01 ws-name.
02 ws-name1 occurs 2 times.
03 ws-name2 pic x(10).
we can refer to second occurence element is: ws-name1(2).
| Is This Answer Correct ? | 4 Yes | 0 No |
how do you reference the variable unblock file formats from cobol programs
I want to declare a field with data type Double in my COBOL program. how shall i do that ?
What is SET TO TRUE all about, anyway?
give the examples for strings and unstrings in cobol
Define in-line perform?
What is the difference between structured cobol programming and object alternativelyiented cobol programming?
What is Pic 9v99 Indicates in COBOL?
0 Answers SwanSoft Technologies,
01 a pic s9(5) value '-12345' how it will be stored
What is 77 level used for ?
what is the maximum error code in mainframe
can internal sort be applied to sort ksds files?
Why would you use find and get rather than to obtain?
COBOL 
