How to declare if emp-name = AAAAA""BBB in working-storage
section. After display emp-name should print like AAAAA""BB
Answer Posted / premil
IDENTIFICATION DIVISION.
PROGRAM-ID. M3TUD.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-VARS PIC X(10) VALUE 'AAAAA""BBB'.
01 WS-VAR1 PIC X(9).
PROCEDURE DIVISION.
0000-MAIN.
MOVE WS-VARS TO WS-VAR1.
DISPLAY WS-VAR1.
stop run.
Is This Answer Correct ? | 8 Yes | 4 No |
Post New Answer View All Answers
How you can characterize tables in cobol?
How do you reference the fixed block file formats from cobol programs
How arrays can be defined in COBOL?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
What are 77 levels used for?
i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?
Write some characteristics of cobol as means of business language.
In COBOL, what is the different between index and subscript?
i want a program using by if, evaluate , string, unstring, perform, occurs?
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What is inspect in cobol ?
In COBOL programming, what is PERFORM? What is VARYING?
HOw can I get the negative sign while deduct high value from low value
What are the different open modes available in cobol?
What are the different rules for performing sort operation?