Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Enterprise COBOL, XML GENERATE command

Status
Not open for further replies.

oldcoderunner

Programmer
Mar 7, 2007
6
GB
We have recently installed Enterprise COBOL for Z/OS and I have been exploring the XML commands PARSE and GENERATE.
Whilst I have successfully used the PARSE command I have been unable to get the GENERATE command to work even on a most basic example. See below;

01 WA-ACCUMULATORS.
03 WA-NUMCHARS PIC 9(3).
01 WW-XML-DOCUMENT PIC X(999).
01 WW-CMPY-N PIC X(3).

MOVE '001' TO WW-CMPY-N
MOVE SPACES TO WW-XML-DOCUMENT

XML GENERATE WW-XML-DOCUMENT FROM WW-CMPY-N
COUNT IN WA-NUMCHARS

This returns an XML-CODE = 0175115059 (which is undocumented)
and WA-NUMCHARS = 0

Has anybody any suggestions?
 
The problem was caused by the JCL used to run the program using the runtime library for our previous version of COBOL instead of the Enterprise version. Doh!
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top