Named Indicators
If you have to use *IN
then the following technique lets you use named indicators:
dcl-s indicatorsPtr pointer inz(%addr(*IN)); dcl-ds indicators based(indicatorsPtr); allIndicators char(99); exitRequested overlay(allIndicators : 3); end-ds;