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

["Mark A. Manske" <mmanske@xxxxxxxxxxxxxxxxxx>]

This is a multi-part message in MIME format.
--
Without seeing ALL the code, let me ask you this -
Do you loop through this routine more than once,
if so, the BIF does not always seem to get set properly,
I do not know if this is a bug or a feature, but we are on V4R5
and I have to set the bif off with a valid chain/read (setll does not appear
to do this)
or just go with (sorry for swearing - an indicator... though I prefer the
read before the doxxxx code)


HTH

Mark A. Manske
Fleming CSD - Plymouth Division
Sr. Project Lead
http://www.minter-weisman.com
mailto:mmanske@minter-weisman.com





-----Original Message-----
From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
Behalf Of Graves, Chuck
Sent: Wednesday, October 17, 2001 3:15 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.

--
[ winmail.dat of type application/ms-tnef deleted ]
--