For those interested in seeing what a COBOL program with support for decimal floating point (DFP) and packed decimal (PD) can do, you can try out zcobol compiler which is free open source component included with z390 portable mainframe assembler. The z390 and zcobol free open source tools can be downloaded via www.z390.org and installed and run on any Windows, Linux, or Apple OSX PC. The only pre-requisite is a version of J2SE java 1.6+ which can be downloaded for free from www.oracle.com.
The zcobol compiler supports 15 numberic data types including HFP, BFP, and DFP floating point and packed decimal. The compiler generates HLASM compatible mainframe source assembler with data field labels and paragraph label for readability. The HLASM source can then be assembled, linked, and executed using z390 emulator on PC or the source can be ported to mainframe. There is a paper with example described here: http://www.z390.org/zcobol/demo/callcomp/zCOBOL_COMPUTE.pdf The example is available in machine readable form including COBOL source and all generated files and listings: http://www.z390.org/zcobol/demo/callcomp/CALLCOMP.ZIP Don Higgins [email protected] ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
