Re: RPG SQL Question

["R. Bruce Hoffman, Jr." <rbruceh@xxxxxxxxxxxxx>]

----- Original Message -----
From: <THarteau@felkerbrothers.com>
To: <RPG400-L@midrange.com>
Sent: Friday, January 25, 2002 4:20 PM
Subject: RPG SQL Question

> C+    AND FRDTE > LRDTE

so if there is no record returned from the ECL file, LRDTE is null, not a
value.
Is FRDTE > null? Not in SQL it isn't.
Could use .... coalesce(lrdte, 0) as lrdte... in the select, that would give
you a zero when the record is not found and you can then compare the frdte
field to it.

as an aside.... you should avoid using logical files in select statements.
that can lead to suprises. Use the physcials and spell out the selection
logic. That way the optimizer can use whatever logical fits or build it's
own, but the selection logic is spelled out and there aren't any suprises
then.

> C/EXEC SQL DECLARE A CURSOR FOR
> C+  SELECT FPROD, FPBUYC, FQTY, FRDTE, FDATE, LORD, LLINE, LRDTE, LSDTE
> C+  FROM KFPL01
> C+  LEFT OUTER JOIN
> C+    ECLL01 ON LPROD = FPROD
> C+  WHERE FTYPE = 'F' AND FPBUYC IN ('G', 'F')
> C+    AND FRDTE > LRDTE
> C+  ORDER BY FPROD
> C/END-EXEC
>
> I want to print all records that meet the criteria from KFP, and the
> associated ECL information. There is one KFP record that has no associated
> ECL record.  This record is not printing.  Both KFPL01 & ECLL01 are
logical
> files that contain only active records. The missing ECL record is coded as
> inactive, so is in the file, but shouldn't be found using the logical.
I've
> never used the outer join before, but from what I have read, I thought
this
> would work. Any ideas on what I am doing wrong? Thanks!
>
> <===================================================>
>
> Terri Harteau
> ****************
> "There's no point in being grown up if you can't be childish sometimes."
> - Dr. Who
> ****************
>
>
>
>
>
> _______________________________________________
> 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.
>