Problem when using Redefines

mvmadhavi · New User Joined: 09 Nov 2006 Posts: 21

Hi,

I am preparing an XML to an external system.
Say i have an 3 records.

I have definition like
10 XML-ORDRE-STATUS-SUCCESS.
15 XML-ORDRE-SUCCES PIC X(21).
15 FILLER PIC X(39)
VALUE '</status>'.

10 XML-ORDRE-STATUS-FAIL REDEFINES XML-ORDRE-STATUS-SUCCESS.
15 XML-ORDRE-FAILED PIC X(17).
15 XML-record PIC X(39) .
15 FILLER PIC X(4).

move </status> is moved to xml-record
I have 3 records
successful
failed
successful

i send xml as below

<status>successful </status>
for 2nd order
<status> failed </status>
for 3rd order
<status> successfulatus

after 2nd record xml for failed is sent. in the 3rd record first 4 characters
of </st> is not coming.

is there a problem with redefines. is there a better way to do?

Robert Sample · Posted: Mon Jul 06, 2009 4:40 pm

There's no problem with REDEFINES. There is a problem with the way you're using it, but REDEFINES did exactly what you told it to do. If you check your character count, you'll see the fields don't align. Fix your problem with the alignment and your issue goes away.