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
I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue
Define cobol?
example for sub strings ? and refernce modifications whit output pls
how do you reference the variable block file formats from cobol programs
How do define dynamic array in cobol.
what is the use of outrecord?
How do you get the data to code the BMS macro?
What kind of error is trapped by on size error option?
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
Write down the divisions of cobol program?
Write the code to count the sum of n natural numbers.
How are the next sentence and continue different from each other?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
What are INPUT PROCEDURE and OUTPUT PROCEDURE?
What are 77 levels used for?