Answer Posted / maveric
IDENTIFICATION DIVISION.
PROGRAM-ID. PGM003.
AUTHOR. PREMYADAV.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 GROUP1.
05 REC1.
10 ELEMENT1 PIC X(3) VALUE 'WWW'.
10 ELEMENT2 PIC X(9) VALUE 'TECH'.
05 REC2.
10 ELEMENT3 PIC X(6) VALUE 'HELP'.
10 ELEMENT4 PIC X(1) VALUE '.'.
10 ELEMENT5 PIC X(3) VALUE 'COM'.
66 GROUP2 RENAMES ELEMENT2 THRU ELEMENT5.
PROCEDURE DIVISION.
10000-MAIN-PARA.
DISPLAY 'RENAME CLAUSE DEPICTED BY ' GROUP2.
STOP RUN.
OUTPUT
RENAME CLAUSE DEPICTED BY TECHHELP.COM
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
Describe the cobol database components?
How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.
What is redefines clause in COBOL?
Explain how will you differentiate between an internal and an external sort, the pros and cons, internal sort syntax etc
What is the difference between comp and comp-3 usage?
What is the difference between comp and comp-3?
What is a SSRANGE and NOSSRANGE?
What is the difference between PIC 9.99 and 9v99 in COBOL?
Write some characteristics of cobol as means of business language.
Can we change the password using ALTER? anyone tried and changed?
How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?
what is the difference between COBOL2 AND COBOL390?
What are the pertinent COBOL
What is the Purpose of POINTER Phrase in STRING command in COBOL?
Write the code to count the sum of n natural numbers.