Puedes crear tantos cursores como te permita el lenguaje que utilizes. Solo 
tienes que controlar su uso, open y close, etc. y ojo con los commit.
Pero para evitar el problema que tienes, no uses WHENEVER, inmediatamente a la 
sentencia pero fuera de ella (sql) incluye un if/eval... sqlcode not equal 0 (o 
lo que quiereas, mirate la lista de codigos en el manual de sql) y entonces 
bifurca, ejecuta etc.
 

Saludos, 
Rafael Cubero 
ADSF Madrid. 

 

________________________________

From: [email protected] 
[mailto:[email protected]] On Behalf Of Josep Sanchez
Sent: jueves, 26 de febrero de 2009 9:32
To: forum.help400
Subject: Manejar 2 cursores SQL en un mismo programa SQLRPG


 
Buenos dias, 
 
Estoy intentando manejar 2 cursores, pero tengo un error de compilación. por 
culpa de la sentencia:
 
0300.25      C/EXEC SQL                                 
0300.26      C+ WHENEVER NOT FOUND GO TO CLOSER         
0300.27      C/END-EXEC                                 
 
y en el otro cursor tengo otra
 
0300.73      C/EXEC SQL                                        
0300.74      C+ WHENEVER NOT FOUND GO TO CLOSE2                
0300.75      C/END-EXEC                                        
 
Me da el error:
 * QRG7049 Gravedad:  30   Número:    2                                         
           Mensaje . . . . :   El GOTO bifurca de subrutina a otra subrutina.   
             Se ignora la especificación.
 
Y en el listado de donde estan los errores dice:
* 7049     30069   EL DESTINO CLOSER DE GOTO O CABXX EN SUBRUTINA ESTA EN OTRA 
SUBRUTINA.
* 7049     30069   EL DESTINO CLOSER DE GOTO O CABXX EN SUBRUTINA ESTA EN OTRA 
SUBRUTINA.
 
Pero he verificado que closer esta en la MISMA subrutina, ademas la sentencia 
30069 domde
da el error es la de abrir el segundo cursor:
 
0300.69      C/EXEC SQL                              
0300.70      C+ OPEN C2                              
0300.71      C/END-EXEC                              
 
Alguien sabe si no se pueden abrir 2 cursores o como obviar este problema ??
 
Muchas gracias por cualquier ayuda o sugerencia.
 
Saludos.
 
J. Sanchez
__________________________________________________
Forum.HELP400 es un servicio más de ServerNEWS.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a