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
Answer Posted / 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 |
Post New Answer View All Answers
Write a program that uses move corresponding.
How do we get current date from system with century in COBOL?
Can you please let me know the centre name of INS certification in Kolkata.
i want a program using by if, evaluate , string, unstring, perform, occurs?
Differentiate cobol and cobol-ii. (Most of our programs are written in cobolii, so, it is good to know, how, this is different from cobol)?
How many bytes S(8) comp field occupy and its maximum value?
Which Search verb is equivalent to PERFORM…VARYING?
What is the compute verb? How is it used?
Write a program to explain size error.
what is search and searchall?what is the diffrence between them?give an best example?
What is the difference between Call and a Link?
How to remove 2 duplicate records and copy only one using job control language?
What is rmode(24)
) How do u handle errors in BMS macro?
how do you reference the esds vsam file formats from cobol programs