[tomasm]

Primer problema:
Hazte una copia del programa estandar.

Zestandar.

Y luego puedes probar esto.

********************************
REPORT zrepru .

DATA: valor.

SUBMIT zrepru2 AND RETURN.

IMPORT valor FROM MEMORY ID 'RET'.
* en la variable valor tienes el sy-subrc de lo que pasó en ZREPRU2.
*
**********************************


REPORT ZREPRU2 .
DATA: valor.

TABLES: PA0001.

START-OF-SELECTION.

select * from pa0001 where pernr = 'xxxx'.
endselect.

valor = SY-SUBRC.

EXPORT valor TO MEMORY ID 'RET'.

*

Si te vale, pues tu mismo.

Saludos !!!!