View previous topic :: View next topic
|
Author |
Message |
kabyab
New User
Joined: 31 Aug 2005 Posts: 34 Location: Pune, India
|
|
|
|
Hi, I am getting the following compilation error (RC=0012) for using the REDEFINE clause.
IGYDS1066-S REDEFINES" OBJECT "A-CURR-ADJ-MSG-TXT" WAS NOT THE IMMEDIATELY PRECEDING LEVEL-10 DATA ITEM. THE "REDEFINES" CLAUSE WAS DISCARDED
I did a cursory check on another piece of code that was redefining the same variable. The one that is compiling correctly is
10 A-CURR-ADJ-MSG-TXT.
15 A-CURR-SVC-MSG-DESC PIC X(31)
OCCURS 3 TIMES.
10 A-PBD-TEXT-AREA REDEFINES A-CURR-ADJ-MSG-TXT.
15 A-ADJ-DR-NM PIC X(24).
15 A-DR-PERD-LIT-TX PIC X(16).
15 A-ISS-DT-TX PIC X(6).
15 FILLER PIC X(47).
I have coded as follows:
10 A-CON-FEE-GRP.
REDEFINES A-CURR-ADJ-MSG-TXT.
15 FILLER PIC X(31)
15 A-BO-REV-DETL-CD PIC X(3).
15 A-CONV-FEE-TAX-IND.
25 A-FED-TAX-EXMT-IND PIC X(1).
25 A-CITY-TAX-EXMT-IND PIC X(1).
25 A-STATE-TAX-EXMT-IND PIC X(1).
25 A-CA-SCHG-EXMT-IND PIC X(1).
25 A-CPUC-SCHG-EXMT-IND PIC X(1).
25 A-LIFLN-SCHG-IND PIC X(1).
25 A-HCAP-SCHG-EXMT-IND PIC X(1).
25 A-CHCFB-SCHG-EXMT-IN PIC X(1).
25 A-USSC-SCHG-EXMT-IND PIC X(1).
25 A-CTF-SCHG-EXMT-IND PIC X(1).
25 A-TRNST-EU-SCHG-CD PIC X(1).
25 A-SA-FEE-EXMT-IND PIC X(1).
25 A-STATE-USF-SCHG-IND PIC X(1).
25 A-RGLTY-SCHG-IND PIC X(1).
I am getting the error as mentioned above. The only difference I could note that is the presence of sub-levels 25 after level 15, is it because of that? I am not sure. I have even tried out commenting the level 25 but it is still giving me the same error.
It would be really helpful if someone can reply back to me on this.
Thanks, |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
10 A-CON-FEE-GRP. <<<<<<<<<remove period
REDEFINES A-CURR-ADJ-MSG-TXT. |
|
Back to top |
|
|
kabyab
New User
Joined: 31 Aug 2005 Posts: 34 Location: Pune, India
|
|
|
|
Thanks for your help dbzTHEdinosauer.
The dot was definitely a problem which was typo error but the actual problem was something very silly that I made. There were so many variables in the Working Storage, that by mistake I redefined the variable A-CURR-ADJ-MSG-TXT much after the place where it was defined. A separate 05 level variable came in between the Definition and Redefinition of A-CURR-ADJ-MSG-TXT. Ideally I should have redefined it just after the definition.
While removing the dot I found out the mistake.
I have corrected the mistake and the code is working fine now.
I had been pulling my hair out since today morning trying to figure out the mistake.
Thanks a lot once again for replying, you saved me from going completely bald |
|
Back to top |
|
|
Amit Banerjee
New User
Joined: 12 Jan 2008 Posts: 14 Location: india
|
|
|
|
Well...in that case u din't give the whole code of urs and it was impossible to find out from what u had given :-) |
|
Back to top |
|
|
kabyab
New User
Joined: 31 Aug 2005 Posts: 34 Location: Pune, India
|
|
|
|
Yes Amit, you are right, it didn't occur to me that I may have misplaced the code for the REDEFINE. But thanks anyway to everyone for at least having a look at my post. |
|
Back to top |
|
|
|