z390 Portable Mainframe COBOL Compiler

zCOBOL Portable Mainframe COBOL
Demo, Regression Test, and EXEC CICS COBOL Programs

z390 Portable Mainframe Assembler and Emulator
 
Demo Programs Regression Test Programs EXEC CICS Programs

zcobol Demo Programs in zcobol\demo
 
HELLO Display "Hello World" and STOP RUN
DATETIME ACCEPT current date and time and display month, day of week, and year
COPYFILE Read line sequential ASCII file and copy it to an output line sequential file
POWERS Calculate and display powers of 2 up to 2**31

zcobol Regression Tests in zcobol\test
 
TESTASM4.MLC Assembler module statically linked with TESTCAL3.CBL
TESTCAL1 CALL TESTCAL2 statically linked
TESTCAL2 CALL TESTCAL3 dynamically
TESTCAL3 Dynamically loaded zcobol module which calls statically linked TESTASM4 assembler routine
TESTCMP1 ADD, SUBTRACT, MULTIPLY, and DIVIDE all formats
TESTCPY1 COPY
TESTCPY2 nested COPY
TESTDSP1 DISPLAY all formats
TESTFUN1 ACCEPT, TRANSFORM, NUMERIC, etc.
TESTGO1 GO TO DEPENDING ON
TESTIF1 Compound IF requiring use of intermediate T/F flags
TESTISP1 INSPECT TALLYING, REPLACING, TRANSFORMING
TESTMOV1 MOVE all formats
TESTPM1 PERFORM VARYING and PERFORM TIMES
TESTSIX1 Multiple subscripts
TESTTRC1 TRUNC
TESTTRC2 NOTRUNC with ONSIZE
TESTTRC3 TRUNC and NOR64 to test use of DXR versus DSG
TESTWS1 Working storage REDEFINE and OCCURS with padding

IBM, CICS, HLASM, MVS, OS/390, VSAM, z9, z10, and z/OS
 are registered trademarks  of International Business Machines Corporation

This page last updated Thursday February 19, 2009.   Webmaster
Copyright 2009 Automated Software Tools Corporation


This site is a member of WebRing.
To browse visit Here.