Willie, I am not sure I understand what you are asking. Please correct/clarify anything if I am going down the wrong path. You want to process a CL program that contains a display file and have certain fields displayed depending upon the status of indicator 80. The problem you are having is that you need to set &in80 before the CL is called. There are at least 2 common ways to handle this situation: the easiest way is to feed &in80 as a parameter to the CL. The second way would be to set the *LDA to a value so that it could be picked up inside the CL. Here are some of the relevant pieces of code.
/* The calling CL program */dcl var(&in80)chgvar var(&in80) value('1') /* or '0' if you want it off */Call pgm(calledpgm) (&in80) /* The called CL program */pgm parm(&in80)/* &IN80 does not need to be DCL'd because the display file defines it */ That's how you would do it with a passed parameter. Bill William Moore wrote: I need to seton an indicator then a cl program is read. It has to be right after the DCL statements. When SNDRCVF is reads and displays the prompt, I want to display different fields depending on if IN80 in on/off. If any suggestion on a better way, I am open to them. Thanks..... Willie