Interested to Buy Any Domain ? << Click Here >> for more details...
i have the following varibles in the working storage
05 ws-A PIC X(30)
VALUE 'ABCDEFGHIJKLMNOPQRESTUVWXYZ '
05 WS-B REDEFINES WS-A
10 WS-B1 PIC X(10).
10 WS-B2 PIC 9(10).
10 WS-B3 PIC X(10).
If I Display B1, B2 and B3 respectively, what is the value
displayed in B2
- 9 Answers
- 13168 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / sandy
It will not show variable mismatch error.
It will display KLMNOPQRES.
| Is This Answer Correct ? | 16 Yes | 2 No |
Answer / jibin jacob
there is no error.....
it will display 'klmnopqrst'
***********code************
identification division.
program-id. fst.
environment division.
data division.
working-storage section.
01 qs pic x(30) value
'abcdefghijklmnopqrstuvwxyzabcd'.
01 qs-r redefines qs.
02 qs-r1 pic x(10).
02 qs-r2 pic 9(10).
02 qs-r3 pic x(10).
01 aa pic 9.
procedure division.
p1.
accept aa.
display "r1=" qs-r1.
display "r2=" qs-r2.
display "r3=" qs-r3.
stop run.
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / mr.perfect
i have compiled and run it , it is workign fine.
the output format is
B1:ABCDEFGHIJ
B2:KLMNOPQRES
B3:TUVWXYZ
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / anand
isn't this a compilation error? A value clause cannot be
associated with a variable that is redefined.
| Is This Answer Correct ? | 1 Yes | 6 No |
How can I find the maximum value of a field in a file while reading the file dynamically? without using sort function. Suppose i have a file with fields Timestamp, description, teamname, teamnumber.. i have read the file till end and find the maximun value of timestamp which is not in sorted order.. can we use function max(timestamp)?
HOW TO MOVE REDEFINES CLAUSE FROM INPUT TO OUTPUT ?
I have a sequential file of 100 records. How do I load the records into a two dimensional array ?
Explain how to differentiate call by context by comparing it to other calls?
i declare a Table as OCCURS 2000 TIMES.If the input file has more than 2000 records will the COBOL program fail?
Re: 01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING". 01 NAME2 PIC X(13). now I want to display the value of NAME1 in reverse order i.e value should be displayed as "GNIMMARGORP LOBOC" HOW can I do that ??? please let me know if any one knows it.
Mention the guidelines to write a structured cobol program?
what is dynamic array in cobol? what is the difference b/w array and table in cobol?
In a program, variables are used but no DB2 involved in it. Can you call it as host variables??
What are different data types in cobol?
Why occurs can not be used in 01 level ?
How does IDMS communicate with CICS?
COBOL 
