Defines | |
| #define | SafENV_CAS 0 |
| Executing under CAS w/o MTO. | |
| #define | SafENV_MFDS (1<< 0) |
| Executing under MFDS. | |
| #define | SafENV_CICS (1<< 1) |
| Executing under CAS w/ CICS. | |
| #define | SafENV_IMS (1<< 2) |
| Executing under CAS w/ IMS. | |
| #define | SafENV_JES (1<< 3) |
| Executing under CAS w/ IMS. | |
| #define | SafENV_SOLO (1ul<<31) |
| Executing standalone. | |
| #define | SafENV_MTOMASK 0x0eul |
| Mask for MTO personalities. | |
These are a bit confusing, since they changed from being a simple set of identifiers to a set of bit flags, some of which are mutually exclusive.
If either SafENV_MFDS or SafENV_SOLO is set, no other bits should be set, and we're running in the indicated environment.
If no bits are set, we're running under CAS without any of the MTO personalities (CICS, IMS, or JES).
If any combination of one or more of SafENV_CICS, SafENV_IMS, or SafENV_JES is set, we're running under CAS with MTO and the specified personalities are enabled.