How to declare if emp-name = AAAAA""BBB in working-storage
section. After display emp-name should print like AAAAA""BB
Answers were Sorted based on User's Feedback
Answer / sukhwinder singh
IDENTIFICATION DIVISION.
PROGRAM-ID. M3TUD.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-VARS PIC X(10) VALUE 'AAAAA""BBB'.
PROCEDURE DIVISION.
0000-MAIN.
DISPLAY WS-VARS(1:9).
stop run.
Is This Answer Correct ? | 11 Yes | 0 No |
Answer / 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 |
Answer / reena
IDENTIFICATION DIVISION.
PROGRAM-ID.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 VAR1 PIC X(10) VALUE 'AAAAA""BBB'.
01 VAR2 REDEFINES VAR1 PIC X(9).
PROCEDURE DIVISION.
0000-MAIN.
DISPLAY VAR2.
STOP RUN.
Is This Answer Correct ? | 5 Yes | 2 No |
Answer / jaanu
IDENTIFICATION DIVISION.
PROGRAM-ID. M3TUD.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-VARS PIC X(9) VALUE 'AAAAA""BBB'.
PROCEDURE DIVISION.
0000-MAIN.
DISPLAY WS-VARS.
stop run.
Is This Answer Correct ? | 3 Yes | 1 No |
Answer / srivatsa
IDENTIFICATION DIVISION.
PROGRAM-ID. M3TUD.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-VARS PIC X(10) VALUE 'AAAAA""BBB'.
PROCEDURE DIVISION.
0000-MAIN.
DISPLAY WS-VARS(1:9).
stop run.
Is This Answer Correct ? | 1 Yes | 0 No |
Answer / arun
IDENTIFICATION DIVISION.
PROGRAM-ID. M3TUD.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-VARS PIC X(10) VALUE 'AAAAA""BBB'.
PROCEDURE DIVISION.
0000-MAIN.
DISPLAY WS-VARS
.
SYSOUT
AAAAA""BBB
Is This Answer Correct ? | 5 Yes | 9 No |
What is 66 level number and where it is used in real time by software developers?
2 Answers ITC Indian Tobacco Company, TCS,
How many bytes do a s9 (7) comp-3 field occupy?
what are difference organizations in cobol and access mode in cobol? can you expalin what organization means while declaring for ksds,esds,rrds?
What type of SDLC u followed? Why?
if you code move high-values to variable,can you move it into numeric variable or alphanumeric variable?
What is the difference between next sentence and continue in cobol programing language?
can internal sort be applied to sort ksds files?
What is SQL Code -904 and -903 in DB2 And how to handle it?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
What is the reference modification.
Which of the following paragraphs is compulsory in every COBOL program? (a) SPECIAL-NAMES (b) PROGRAM-ID (c) FILE-CONTROL (d) OBJECT-COMPUTER
What is difference between COBOL and VS COBOL II?.