RE: Difference between Select and Omit in LF

["Lokesh Gupta" <Lokesh.Gupta@xxxxxxxxxx>]

Actually,
>A          S PSATFG                    COMP(EQ 'A') 
>A          S PSSTCD                    COMP(LT '30')
would be same as
>A          O PSATFG                    COMP(NE 'A') 
>A             PSSTCD                    COMP(GE '30')


and would also give the same result, the first logical is PSATFG = 'A' or 
PSSTCD < '30'
and the second would be PSATFG <> 'A' and PSSTCD > '30'


regards,
Lokesh 

regards,
Lokesh Gupta,
Infosys Technologies Ltd.,
Work: 239-274-4855
Mobile: 239-839-7673
www.infosys.com



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Tom Liotta
Sent: Wednesday, May 12, 2004 4:22 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Difference between Select and Omit in LF


rpg400-l-request@xxxxxxxxxxxx wrote:

>   9. Difference between Select and Omit in LF (Peter Colpaert)
>
>A          S PSATFG                    COMP(EQ 'A') 
>A          S PSSTCD                    COMP(LT '30')
>
>as opposed to
>
>A          O PSATFG                    COMP(NE 'A') 
>A          O PSSTCD                    COMP(GE '30')

Do these select identical sets of records? Isn't the first (PSATFG = 'A' *or 
PSSTCD < 30) and the second is (*not(PSATFG <> 'A') *or *not(PSSTCD >= 30))

Consider these records:

RRN PSATFG    PSSTCD
 1    A         29
 2    A         30
 3    A         31
 4    B         29
 5    B         30
 6    B         31

The first will select RRNs 1, 2, 3 and 4. The second will select only RRN 1. 
The *or between the tests makes the problem appear.

No?

Tom Liotta

-- 
Tom Liotta
The PowerTech Group, Inc.
19426 68th Avenue South
Kent, WA 98032
Phone  253-872-7788 x313
Fax    253-872-7904
http://www.powertech.com



__________________________________________________________________
Introducing the New Netscape Internet Service. 
Only $9.95 a month -- Sign up today at http://isp.netscape.com/register

Netscape. Just the Net You Need. 

New! Netscape Toolbar for Internet Explorer
Search from anywhere on the Web and block those annoying pop-ups.
Download now at http://channels.netscape.com/ns/search/install.jsp
_______________________________________________
This is the RPG programming on the AS400 / 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.