RE: Idicator variable

["John Brandt Sr." <pgmr@xxxxxxxxxxxxxxx>]

Doesn't that mean those of us who drink beer and smoke are suffering
double-jeopardy taxation?
John

-----Original Message-----
From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
Sent: Friday, August 29, 2003 4:35 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Idicator variable


I went to the V5R2 infocenter and searched for SQL indicator variable
This link was for ILE RPG
http://publib.boulder.ibm.com/iseries/v5r2/ic2924/info/rzajp/rzajpmst143.htm

HTH

PS:  Allow me a little humor at your expense.  The word you were looking 
for is syntax.  Sintax is a tax on beer and cigarettes.  The theory is 
that you're taxing sin, or offences against God.


Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 





Raul A Jager <raul@xxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
08/29/2003 04:26 PM
Please respond to RPG programming on the AS400 / iSeries
 
        To:     RPG programming on the AS400 / iSeries 
<rpg400-l@xxxxxxxxxxxx>
        cc: 
        Fax to: 
        Subject:        Idicator variable


I have a program that uses SQL and gives a message in the joblog every 
time it tryes to read a NULL. 

This is the SQL:
____________________________________________________________________________
____
c/exec sql
c+ select trim(name) || ' ' || lname into :nombre
c+   from salary/emple_ncl where usuario = ucase( :id)
c/end-exec
____________________________________________________________________________
_______
and this is the message:
____________________________________________________________________________
__

 SQL0305    Diagnóstico             30   29/08/03  17:08:10,109712 
QSQRUN2      QSYS        *STMT    QSQRUN2     QSYS        *STMT
                                      Desde módulo. . . . . . . . : 
QSQFETCH
                                      Desde procedimiento . . . . : 
CK_DEBUG
                                      Sentencia . . . . . . . . . : 15341
                                      A módulo. . . . . . . . . . : 
QSQFETCH
                                      A procedimiento . . . . . . : 
CK_DEBUG
                                      Sentencia . . . . . . . . . : 15341
                                      Mensaje . . . . :   Variable 
indicadora necesaria.
                                      Causa . . . . . :   Una sentencia 
FETCH, SELECT intercalada, CALL, o SET o
                                        VALUES INTO ha dado como 
resultado un valor nulo, pero no se especificó una
                                        variable indicadora para la 
variable del lenguaje principal IDENT.  La
                                        posición relativa de la variable 
del lenguaje principal en la cláusula INTO
                                        o en la lista de parámetros es 
2. Si el nombre de variable del lenguaje
                                        principal es *N, se especificó 
una SQLDA.Recuperación  . :   Especifique una
                                        variable indicadora y vuelva a 
precompilar el programa.
____________________________________________________________________________
__________________________

I understand that I need to specify an indicator variable, but I could 
not find how to specify the indicator.  do you remember the sintax? 
Thanks.





_______________________________________________
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.


_______________________________________________
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.

---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.514 / Virus Database: 312 - Release Date: 8/28/03
 

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.512 / Virus Database: 309 - Release Date: 8/19/03