Re: SETLL question

[Charles Wilt <charles.wilt@xxxxxxxxx>]

You've always been able to do that.

Just use a KLIST that has only the first 2 fields defined.

Sounds like there's a mismatch in the field definitions.

That is not allowed when using KLIST or %KDS().

You don't have to worry about size when using literals in the a free format
 SETLL/READEQ.

Charles

On Mon, Feb 1, 2016 at 1:50 PM, Alan Shore <ashore@xxxxxxxx> wrote:

> Hi Hotel (sorry - cannot see a name)
> This is still available - well at least on V5r4
> This usually means exactly what it says
> What is the second key defined as and what is the definition of the field
> that you are using to access the file?
> Generally speaking - neither field has the same definition as each other
>
> Alan Shore
> E-mail : ASHORE@xxxxxxxx
> Phone [O] : (631) 200-5019
> Phone [C] : (631) 880-8640
> 'If you're going through hell, keep going.'
> Winston Churchill
>
> -----Original Message-----
> From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
> Hoteltravelfundotcom
> Sent: Monday, February 01, 2016 1:38 PM
> To: RPG programming on the IBM i / System i
> Subject: SETLL question
>
> If a logical has 3 fields as keys, I want to setll on the first 2.
>
> I thought this was allowed but I am getting error:
> *RNF7073 30      1 Length of KFLD is not equal to corresponding key field
> in
>                    file.
>
> I just need to read one record of an order because they all have the order
> type.
>
> I need to prevent an F3 if there is a certain order type.
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
> unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives at
> http://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.