muchas gracias Javier.

Saludos


________________________________
From: forum.help400-boun...@listas.combios.es 
<forum.help400-boun...@listas.combios.es> on behalf of Javier Mora 
<jm...@musgrave.es>
Sent: Thursday, June 29, 2017 12:41 PM
To: forum.help400
Subject: RE: Valor Nulo en SQL


Tienes dos opciones



1.       Utilizar las funciones IFNULL o COALESCE para convertir los nulos en 
un valor válido para RPG.

2.       Utilizar una DS para controlar los campos nulos. Esto se consigue 
añadiendo en la sentencia SQL una DS de enteros que indicará si el campo es 
nulo (valor = 1) o no (valor = 0). En los manuales de programación de SQL lo 
explica con más detalle.



Javier



De: forum.help400-boun...@listas.combios.es 
[mailto:forum.help400-boun...@listas.combios.es] En nombre de Carlos C.
Enviado el: jueves, 29 de junio de 2017 18:00
Para: forum.help400
Asunto: Valor Nulo en SQL





Buenos dias Foro

Una consulta, tema SQL.

Tengo una tabla creada a traves de DDS y tiene valores nulos.
Al ejecutar la sentencia en forma manual el SQL selecciona y despliega los 
registros sin problemas.

Pero en el programaRPG obvia los registros con valores nulos; la consulta es? 
debo agregar una condicion al programa?

Esta es la sentencia.

Exec Sql Declare C1 Cursor For
   select *
   From mylib/mytabla
     Where MFCICC =:v1
           and v2 Not in ('W', 'I')
     Order by
           case
           when :orca1255 = 'xxxxx' then xxxxx
           end
   FOR READ ONLY;


 Exec sql Open C1;                    // Abre Cursor

 For I to 9999999 ;                            // Abre un Loop para leer
   Exec sql Fetch C1 INTO :datoDs;    // Estructura de datos definido como 
externo en la hoja D


     If SqlStt = '02000' ;
        Leave;
     Endif;
EndFor ;


Saludos y gracias !!! por la ayuda



____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a