!* !* Chopsupe compile time options. !* CONSTINTEGER YES=1,NO=0 CONSTINTEGER SSERIES=NO CONSTINTEGER PST SEG=11 CONSTINTEGER PST VA=X'80000000'!PST SEG<<18 CONSTINTEGER EPAGESIZE=4 !*