Skip to main content

Problem:

CBL2XML, using fonction "convert COBOL to COBOL with XML syntax" generates a warning "Warning : The redefines clause is not supported by this version of the COBOL runtime..."

when the COBOL COPYfile to be "converted" to XML contains REDEFINES clause(s)

Resolution:

...Let's say you have such a COPY file:

       01 LEV1-rec.

02 AnyData

pic x(100).

02 AnyDataRed   pic x(100) redefines AnyData.

...AND you use CBL2XML to "convert COBOL to COBOL with XML syntax"

      ie: generate an XML copy file describing the XML file

...YOU'LL GET THIS WARNING

Micro Focus CBL2XML Version 1.0

Copyright (c) 1984-2005 Micro Focus International Ltd.

Checking ...\\ACobolCopy.cpy for errors

Micro Focus Net Express V4

Version 4.0.38 Copyright (C) 1984-2005 Micro Focus International Ltd.

URN AXCGG/AA0/00000

* Checking complete with no errors

Warning : The redefines clause is not supported by this version of the COBOL runtime. The element "02 anydatared" and it's child data items will not be converted by CBL2XML.

0 error(s), 1 warning(s)

... THE WHY OF THIS BEHAVIOR IS:

X3J4 (the COBOL standards group) are prohibiting REDEFINES from appearing in an XD.

So for the short/medium term, our CBL2XML will not support conversion of REDEFINES

Old KB# 3831