All Here is another alternative for coding and testing all 3 flavors of IBM mainframe floating point including HFP, BFP, and DFP. The free open source zcobol compiler written in structured z390 portable mainframe assembler supports all the floating point formats using the latest COBOL draft standard for defining each of the 9 different floating point types in the data division. In the procedure division you can code compute statements to perform any floating point calculations you like mixing and matching any of the floating point types along with traditional data types.
You can use if statements to test results, and you can use display statements to display results of compute statements. The zcobol compiler generates HLASM compatible assembler source code with data labels and paragraph labels so the generated code can be run using z390 emulator on Windows or Linux or you can take the generated assembler source to mainframe and assemble and execute it using HLASM. The zcobol code generator supports the latest z9, z10, and z196 instructions and uses the very powerful PFPO for conversions between floating point data types as required. When you download and install z390 via www.z390.org, it includes zcobol plus a number of demo and regression test programs such as the following: 1. z390\zcobol\test\TESTHFP1.CBL - test hex HFP data type calculations 2. z390\zcobol\test\TESTBFP1.CBL - test binary BFP data type calculations 3. z390\zcobol\test\TESTDFP1.CBL - test decimal DFP data type caculations Once z390 is installed on Windows or Linux, you can run zcobol demos with the command ZCRT390.BAT from GUI or command line. You can also run all the zcobol regression tests including the above 3 with the command ZCRTTEST.BAT. Note z390 v1.5.03 has new z196 instructions added, but the next release v1.5.04 will add some missing extended opcodes which are documented in SHARE presentation but are not in the latest POP. Don Higgins d...@higgins.net ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html