Buenos dias;

Yo utilizo esto no se si es lo que quieres

MOVE  ZEROS  TO  SQCONTA.

EXEC SQL
     SELECT COUNT(*)
       INTO :SQCONTA
       FROM LIB1/FILE_1
      WHERE CAMPO1 = :SQDATO
END-EXEC.


Un saludo









El 4 de abril de 2014, 19:57, <[email protected]> escribió:

> Hola foro
>  Se puede saber la cantidad de registros en esta sentencia de RPGLE
> embebido ?
> EXEC SQL
> DECLARE  cur_001  CURSOR FOR
> SELECT A.field FROM LIB1/FILE_1  A FOR UPDATE OF field
>
> EXEC SQL  GET DIAGNOSTICS   ?  ?  ?
>
> Gracias
> Saludos
>
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a