RE: SETLL not working?...must be me

[Scott Mildenberger <Smildenber@xxxxxxxxxxxx>]

Yup, I agree with a reade or read (in fact all my loops now do a setll/read
or setll/read combo.) but not chain.  Chain doesn't set %eof either.  Is it
getting late in the day :)

Scott Mildenberger

> -----Original Message-----
> From: Booth Martin [mailto:Booth@MartinVT.com]
> Sent: Wednesday, October 17, 2001 3:46 PM
> To: rpg400-l@midrange.com
> Subject: RE: SETLL not working?...must be me
>
>
> oops.
>
> Need to do a reade or read too.  Or a Chain.
>
> --------------------------------------------
> Booth Martin
> Boothm@Goddard.edu
> 802-454-8315 x235
> --------------------------------------------
> -------Original Message-------
> From: rpg400-l@midrange.com
> Date: Wednesday, October 17, 2001 04:44:01 PM
> To: 'rpg400-l@midrange.com'
> Subject: RE: SETLL not working?...must be me
> %eof doesn't get set by SETLL.
> > -----Original Message-----
> > From: Booth Martin [mailto:Booth@MartinVT.com]
> > Sent: Wednesday, October 17, 2001 2:36 PM
> > To: rpg400-l@midrange.com
> > Subject: Re: SETLL not working?...must be me
> >
> >
> > Try using the %BIF %EOF. I've found it much easier.
> > --------------------------------------------
> > Booth Martin
> > Boothm@Goddard.edu
> > 802-454-8315 x235
> > --------------------------------------------
> > -------Original Message-------
> > From: rpg400-l@midrange.com
> > Date: Wednesday, October 17, 2001 04:15:56 PM
> > To: rpg400-l@midrange.com
> > Subject: SETLL not working?...must be me
> > i'v stared at this too long now....what am i missing?
> > scenario:
> > indexed file (JDEdwards F4211LP) with key of:
> > account#
> > document type
> > item#
> > date(julian)
> > using account# (8,0) for SETLL operation (i.e. partial key)
> > key_4211 klist
> > kfld a5an8
> > Code:
> > key_4211 setll i4211
> > if not%found(F4211LP)
> > (do some stuff here)
> > endif
> > The code performs as though it FOUND a record, even though
> i know (and
> > DFU confirms it) that there is NO record in the
> > file for the selected account number
> _______________________
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>