RE: SST In Logical FIle with Select

Ah...you did an Omit ALL. Does that mean you exclude all records then
that do not match 'TOOL'?

I did not remember that technique at all but I'll try it right now and let
you know. The file has several million records in it so it takes about 40
minutes to build the path.

Thanks!

Shannon O'Donnell

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Nick_Radich@xxxxxxxxxxxxxx
Sent: Thursday, February 23, 2012 4:18 PM
To: RPG programming on the IBM i / System i
Subject: Re: SST In Logical FIle with Select

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