RE: Invalid subfile options and SFLMSG

["Sharon Wintermute" <SWintermute@xxxxxxxxxxxx>]

Since you are doing a CHAIN, it needs to look something like this.

CHAIN subfile record;
*in70 = Off;

Check for error
if found;
  *in70 = Yes;
Endif;

UPDATE subfile record;

Sharon


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Booth Martin
Sent: Thursday, March 08, 2007 1:01 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Invalid subfile options and SFLMSG


Why wouldn't the indicator be shut off when the message displays?  The 
book says it will.

But, beyond that, I tried what you suggest and that made no difference.

Sharon Wintermute wrote:
> I assume your *in70 is the error indicator.
>
> When you loop thru your subfile records, you need to turn off *in70 when you 
> initially read it in.
>
>
> Sharon