× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Oops,

Nevermind.

I misread your post, and we do not include the SST field in the Select
statement.

Sorry.



Thanx,

Nick



Nick Radich
Sr. Programmer/Analyst
EPC Molding, Inc.
Direct (320) 679-6683
Toll free (800) 388-2155 ext. 6683
Fax (320) 679-4516
nick_radich@xxxxxxxxxxxxxx



From: Nick_Radich@xxxxxxxxxxxxxx
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Date: 02/23/2012 04:19 PM
Subject: Re: SST In Logical FIle with Select
Sent by: rpg400-l-bounces@xxxxxxxxxxxx



Hi Shannon,

Here is the layout for a LF that we have, and it has been working for
years.


A R ITEMASEA PFILE(ITEMASA)
A*
A MOLD I SST(ITNBR 2 4)
a TEXT('Mold')
a COLHDG('Mold')
A ITNBR
A RECID
A INVFG
A LOLEV
A NOSLC
A NOPWU
A NODET
A NOROP
A RACNO
A FOTAB
A ITDSC
A*
A* KEY FIELD
A*
A K MOLD
A K ITNBR
A* Selection
A S ITCLS COMP(NE 'TOOL')
A O ALL
A*

HTH

Thanx,

Nick



Nick Radich
Sr. Programmer/Analyst
EPC Molding, Inc.
Direct (320) 679-6683
Toll free (800) 388-2155 ext. 6683
Fax (320) 679-4516
nick_radich@xxxxxxxxxxxxxx



From: "Shannon ODonnell" <sodonnell@xxxxxxxxxxxxxxxxxxxxxxxxx>
To: <rpg400-l@xxxxxxxxxxxx>
Date: 02/23/2012 04:04 PM
Subject: SST In Logical FIle with Select
Sent by: rpg400-l-bounces@xxxxxxxxxxxx



Hi,



It's been a really long time since I needed to do this and my skills are
rusty. I could use some knowledgeable help!



I have physical file that contains a something like 10 fields in it. In
one field, that is 6 characters long, I need to check the first two
characters of that field and then only include records where the first two
characters contain a specific value.



I thought I could use the SST and then a Select in the logical but it's
not
working. Instead I am getting all the records in that file, not just the
ones with the derived field containing a specific value.



This is my source and it doesn't work.



Physical File named File1:



R RFILE

FIELD1 1a

FIELD2 2a

FIELD3 3a

FIELD4 4a

FIELD5 5a

FIELD6 6a

FIELD7 7a

FIELD8 8a

FIELD9 9a

FIELD10 10a

K FIELD1

K FIELD2







Logical file:



R RFILE PFILE(FILE1)

FIELD1

FIELD2

FIELD6

FIELD8

FIELD10



DRVFLD I SST(FIELD6 1 2)



K FIELD1

K FIELD10

S DRVFLD COMP(EQ 'EV')







How do I code the logical so that it only pulls records where the derived
field DRVFLD = 'EV'?



Thanks!



Shannon O'Donnell






As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.