hola Carlos

en el programa RPG en la hoja H debes de poner el parametro ALWNULL(*USRCTL)


o cuando lo compiles

                    Crear programa RPG enlazado (CRTBNDRPG)

Teclee elecciones, pulse Intro.

Permitir valores nulos . . . . . ALWNULL        *USRCTL


 espero te sirva
saludos



________________________________
De: forum.help400-boun...@listas.combios.es 
<forum.help400-boun...@listas.combios.es> en nombre de Carlos C. 
<paipuk...@hotmail.com>
Enviado: jueves, 29 de junio de 2017 10:59 a. m.
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