what is the use of renames clause

purushoth_jp · New User Joined: 12 Dec 2004 Posts: 22

hi all

can anyone explain me what is the use of renames clause.

regards
purushoth

ovreddy · Posted: Thu Dec 16, 2004 12:51 pm Post subject: Here is your answer...

Hi,

RENAMES in cobol is used to declare a new data item in terms of an existing data item. The level number should be 66.

Eg: 01 MY-REC.
02 X PIC 9(3).
02 Y PIC X(10).
02 Z PIC X(20).
I want to declare a U-REC with same structure as MY-REC then

66 U-REC RENAMES MY-REC.
This is equilant to declaring U-REC with same structure of MY-REC.

If you want to declare U-REC with a part of MY-REC then u can declare it as...

66 U-REC RENAMES X THROUGH Y.
It means your record will contain only X,Y sub data items.

I Think its clear for you. For more information on renames u can visit http://www.helsinki.fi/atk/unix/dec_manuals/cobv27ua/cobrm_014.htm

Bye,
Reddy.

muthukumarapandian · Posted: Tue Mar 01, 2005 6:21 pm Post subject: regarding renames

Hi reddy,

It is not possible to use renames in level numbers other than 02 to 49.

anuradha · Global Moderator Joined: 06 Jan 2004 Posts: 257

Hi muthukumarapandian

muthukumarapandian · Posted: Wed Mar 02, 2005 6:35 pm Post subject:

Hi ,

I am telling that u can rename the elements declared in 02 to 49 level.

mcmillan · Site Admin Joined: 18 May 2003 Posts: 932 Location: India

But the question is: "What's the use of Renames Clause"

The uses of RENAMES Clause:

1. To create a new group from one or more existing groups
2. To create an alias name

But the main purpose of RENAMES Clause, it can be used in DISPLAY statement effectively.

For example, assume that I have a group with 5 subjects. I want to display the second, third and forth subjects only.