COMIA 
COMMON
IA      ' RUN JOB IN CURRENT MODE OF ORIGIN    '=(*N=NO,NO,YES,*K=YES), 
