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 |
how can you identify wheather the program is using search or search all in the cobol program?
consider the following two statements MOVE 10 TO N PERFORM PARA-X N TIMES STOP RUN PARA-X MOVE 5 TO N how many times PARA-X willbe exicuted? a.10 b.5 c.infinate d.execution error
What is SQL Code -904 and -903 in DB2 And how to handle it?
How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Numerics ?
how many subpgms we can use in a main pgm ? how do u link sub pgm to main pgm ? how can i use the parameters declared in main pgm to sub pgm ?
What does the IS NUMERIC clause establish ?
Have you used comp and comp-3 in your project? And how?
What is Static and Dynamic linking ?
How do you define a variable of COMP-1? COMP-2?
How can you add a particular field in copybook?
What type of Call you would use if you don;t want the control back to the calling program?
How to display string in the reverse order using occurs clause?