AS/400 - Cursores de SQL en un RPG

Buenos días.
Mi pregunta es la siguiente. En un programa RPG se puede incluir una sentencia SQL y despues procesarla con un Cursor. Hasta aqui sin problemas. El problema surge cuando en el mismo programa quiero utilizar dos veces el mismo nombre de Cursor. Por supuesto el Cursor se declara, se abre y se cierra, pero al querer utilizarlo una segunda vez me da un error de compilación. ¿Es una limitación del RPG?

Gracias por vuestro tiempo.

Un codigo asi te puede ayudar

d strSql s 100
c eval strsql='Select * from miArchivo'
c exsr creaCursor
c*aqui procesar open, fetch, close
c eval strsql='Select * from miArchivo2'
c*aqui procesar open, fetch, close
c exsr creaCursor
c eval *inlr=*on


c creaCursor begsr
c/exec sql
C+ PREPARE stmSQL FROM :strSql
c/end-exec
c/exec sql
c+ DECLARE cur CURSOR FOR stmSql
c/end-exec
c endsr d strSql s 100
c eval strsql='Select * from miArchivo'
c exsr creaCursor
c eval strsql='Select * from miArchivo2'
c exsr creaCursor
c eval *inlr=*on
c creaCursor begsr
c/exec sql
C+ PREPARE stmSQL FROM :strSql
c/end-exec
c/exec sql
c+ DECLARE cur CURSOR FOR stmSql
c/end-exec
c endsr

¡¡Fantastico!!
Muchas gracias Gustavo. Es una solucion muy ingeniosa, facil, sencilla y ademas funciona. No se puede pedir nada más.