Interested to Buy Any Domain ? << Click Here >> for more details...
How to declare if emp-name = AAAAA""BBB in working-storage
section. After display emp-name should print like AAAAA""BB
- 6 Answers
- 10001 Views
- Polaris, I also Faced
- E-Mail Answers
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 |
2 input fles: 2 flat files, with different number of records. both are having unique key for each record and already sorted in ascending order . match these files using unique key and in output only matching key value has to be written. please procide cobol logic
How to print 10 to 1 if the input have only 10 digit number?
Why is it necessary that file needs to be opened in I-O mode for REWRITE?
What is difference between static and dynamic call in cobol?
I had 100 records and i want to execute last three records by using cobol programming?what will be coding?
what is a load module ?
what will happen if i give program name and member name as different? program runs successful or w'll abend?
What is perform what is varying?
How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)
can we read records in a file from botom to top. if possible how can we read
Describe the cobol database components?
input:-AABBCCDDEFGHIIJ output:- ABCDEFGHIJ Here in input we hav the duplicate characters i.e repeating characters.SO we should eliminate the duplicate characters and should display the output in ascending order.
COBOL 
