Re: Embedded SQL in RPG

[rob@xxxxxxxxx]

Two different solutions:

1)  Replace the null with a default value
Select a.field1, coalasce(b.fieldq,"I am null")
from ...

2)  Use a null indicator variable
Select a.field1, b.fieldq
...
into :field1, :fieldq :fieldqnullind
...
Notice, no comma between fieldq and fieldqnullind?  If fieldqnullind < 0
then it is null

http://publib.boulder.ibm.com/infocenter/iseries/v5r3/ic2924/info/rzajp/rzajpexampindicatorirpg.htm#rzajpexampindicatorirpg


Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com


|-----------------------------+-------------------------------------------|
|   "Erhardt, Bill"           |                                           |
|   <Bill.Erhardt@xxxxxxxxx>  |                                           |
|   Sent by:                  |                                         To|
|   midrange-l-bounces@midrang|                                   "Midrang|
|   e.com                     |                                   e List  |
|                             |                                   Question|
|   08/10/2004 12:49 PM       |                                   s       |
|                             |                                   (MIDRANG|
|         Please respond to   |                                   E-L@midr|
|         Midrange Systems    |                                   ange.com|
|       Technical Discussion  |                                   )"      |
|      <midrange-l@xxxxxxxxxxx|                                   <MIDRANG|
|                m>           |                                   E-L@midr|
|                             |                                   ange.com|
|                             |                                   >       |
|                             |                                         cc|
|                             |                                           |
|                             |                                     Fax to|
|                             |                                           |
|                             |                                    Subject|
|                             |                                   Embedded|
|                             |                                   SQL in  |
|                             |                                   RPG     |
|                             |                                           |
|                             |                                           |
|                             |                                           |
|                             |                                           |
|                             |                                           |
|                             |                                           |
|-----------------------------+-------------------------------------------|






I'm trying to find out how to code the following SQL statement.  I'm doing
a
left outer join of file a to file b.  on filed Z.  Some of the values for
field Z do not exist in file b so SQL is returning null values for those
fields.  My RPG program is getting a negative value in the SULKED field and
when I look at the job log I get the following:
Indicator variable required
My question is how do I define the indicator variable?



-----------------------------------------
This message was scanned for viruses.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.