The Compiler has rejected the REENTRANT directive as it contains syntax that is not compatible with reentrant programs.
The REENTRANT directive is rejected if the program contains any of the following syntax elements:
- ALTER statements
- Debug facility (SOURCE-COMPUTER...WITH DEBUGGING)
- ON statements
- Segmentation
- Any of the following directives:
- PROTECT-LINKAGE
- STICKY-LINKAGE
- STICK-PERFORM
Also, if you are using the PROGRAM-ID. … IS INITIAL statement, you cannot use REENTRANT"1", and can only use REENTRANT "2" if the program does not contain nested programs.