Re: Trying to setof *INKF

[Jay <tegger@xxxxxxxxxxx>]

If you read the Workstation file where KF is presumed to be defined, the KF will be set to 0 and you won't see it. 

A snippet of code would be helpful though.


> On 06/24/2021 12:36 PM dfreinkel@xxxxxxxxxxxxxxxxx wrote:
>
>  
> I have a program I am writing and I use F6 (*INKF) to confirm and add
> records to a file.
>
>  
>
> In the F6 (*INKF) process, I revalidate the input and if there are errors, I
> set off *INKF.
>
>  
>
> I watch the code in debug and *INKF is '0'.
>
>  
>
> However, when it gets to the DOU condition, the program drops out of the
> loop when it should not.
>
>  
>
> Any ideas why this is happening?
>
>  
>
> Thanks
>
>  
>
> Darryl Freinkel
>
> A4G
>
> Telephone: 770.321.8562 Mobile: 678.355.8562
>
>  
>
> -- 
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com