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
Which division and paragraphs are mandatory for a COBOL program?
Name some of the examples of COBOl 11?
can you please let me know if there is any walkins for COBOL/PLI/DB2/IMS/JCL in pune other than IBM and ITC infotech
What is the default value(s) for an initialize and what keyword allows for an override of the default?
how to access the file from prodution from changeman tool and to submit a file to production
HOw can I get the negative sign while deduct high value from low value
Mention the guidelines to write a structured cobol program?
what is s000 u4087 error? please give the all error codes in cobol,jcl.
In which area will you utilize 88 level items in cobol?
IF I mention stop run in CICS what happens?
How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)
What is a SSRANGE and NOSSRANGE?
How do define dynamic array in cobol.
How can we find that module can be called – whether DYNAMICALLY or STATICALLY?
how do you reference the variable block file formats from cobol programs