Can the Rename span across two 01 labels like below

ManojLenkaMainframes · Posted: Fri Feb 13, 2009 3:09 pm

Hi All,

01 Rec1.
02 A PIC 9(10).
02 B PIC 9(10).
02 C PIC 9(10).

01 Rec2.
02 X PIC 9(10).
02 Y PIC 9(10).
02 Z PIC 9(10).

66 var-1 RENAMES B thru Y.

Thanks
Manoj

dbzTHEdinosauer · Posted: Fri Feb 13, 2009 3:14 pm

ManojLenkaMainframes · Posted: Fri Feb 13, 2009 3:18 pm

Thanks Dick,

Can you please tell me why???

dbzTHEdinosauer · Posted: Fri Feb 13, 2009 3:30 pm

ManojLenka,

no, I think it would do you good to familiarize yourself with a COBOL manual. Links at top of page.

amar_401 · New User Joined: 20 Sep 2006 Posts: 7

Rename Clause 66 should start immediately after the variable you need to be Renamed.

dick scherrer · Posted: Sat Feb 14, 2009 1:48 am

Hello,

That will not work for the example posted. . .

Suggest you also review the cobol manual available via the IBM Manuals link at the top of the page. . .

Bill O'Boyle · Posted: Sat Feb 14, 2009 2:55 am

RENAMES is a facility in COBOL which you should NOT be using anymore.

You will get many of your colleagues very irritated at you.

Just because you CAN use it, doesn't mean you SHOULD use it.

Regards,