Can we redefine an 77 level variable

narasridhar · New User Joined: 12 Oct 2006 Posts: 32 Location: India

guptae · Posted: Wed Oct 25, 2006 3:24 pm

Hi there,

I think we cant redefine 77 level variable.

superk · Posted: Wed Oct 25, 2006 3:29 pm

I don't see anything here that says you can't.

raghavendraun · New User Joined: 29 Apr 2005 Posts: 9

Hi,

I think u can redefine the 77 level item. But, that doesnt make any difference, since 77 level item cant have the sub-levels.

A code would look like the example below.

77 WS-CUST-NO-FLG PIC X(01) VALUE 'N'.
77 WS-CUST-NO-FLG-X REDEFINES WS-CUST-NO-FLG PIC X.

guptae · Posted: Wed Oct 25, 2006 4:40 pm

Hi Kevin & raghavendraun

Thanks for correcting me.

mallik_mca · New User Joined: 26 Sep 2006 Posts: 4

Hi Sirdhar,

You can't redefine level number 77,88,66.Are u still in accuture.

Thanks,
Mallikarjun,
Cognizant,
Chennai

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Hi Mallikarjun,

Can you provide some documentation (naming its source) to support your assertion? I could'nt find anything.

annujp · Posted: Mon Oct 30, 2006 5:28 pm

I tried this out.
You can redefine a level 77 item with another 77 level item alone.

77 WS-AMOUNT PIC 9(2) VALUE 12.
77 WS-AMOUNT-RED REDEFINES WS-AMOUNT
PIC X(2).

This did not show any error.

When I changed the level of WS-AMOUNT-RED from 77 to 01, I got a compilation error
"REDEFINES" object "WS-AMOUNT" was not the immediately preceding level-1 data item. The "REDEFINES" clause was discarded.

Hope this was helpful.

shreevamsi · Posted: Mon Oct 30, 2006 7:13 pm

Yes..annujp is correct...
We can redefine 77 level item.

But you can't redefine a Group element with 77 level item or vice versa.

~Vamsi