PROGRAM MAIN INCLUDE 'TESTINCLUDE' !Testing Include Statement ZERO = 0 NOTZERO = 1 END