User Tools

Site Tools


named_indicators

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;                

See Midrange Wiki - Indicators

named_indicators.txt · Last modified: 2018/01/24 07:36 by mihael