radiobutton, captura de datos
 

Hola tengo el siguiente codigo, pero me sale el siguiente error

Unable to interpret "+NOMBRE". Possible causes: Incorrect spelling or

que se encuentra en el start-of-selection, lo que en realidad quiero, es poder mostrar en pantalla los datos que me acabo de ingresar el usuario, además me aparece otro error en la parte en que quiero validar si el usuario ingreso si es empleado o no en un radiobutton.

The field "SI=" is unknown, but there is a field with the similar name

gracias por su tolerancia y comprension, a una novata!


REPORT YACSAP0001.

* DEFINICION DE LAS VARIABLES

PARAMETERS: Nombre(30) TYPE c OBLIGATORY,
FechaNac TYPE d.


TYPE-POOLS: VRM.

DATA: NAME TYPE VRM_ID,
LIST TYPE VRM_VALUES,
VALUE LIKE LINE OF LIST.

* DEFINICION DE LA LISTA DE JOB
PARAMETERS: JOB(10) AS LISTBOX VISIBLE LENGTH 10.

AT SELECTION-SCREEN OUTPUT.

NAME = 'JOB'.

VALUE-TEXT = 'NATACION'.
APPEND VALUE TO LIST.

VALUE-TEXT = 'PATINAJE'.
APPEND VALUE TO LIST.

VALUE-TEXT = 'TV'.
APPEND VALUE TO LIST.

VALUE-TEXT = 'NINGUNO'.
APPEND VALUE TO LIST.

CALL FUNCTION 'VRM_SET_VALUES' EXPORTING ID = NAME VALUES = LIST.

START-OF-SELECTION.
WRITE:/ 'NOMBRE'+Nombre.
WRITE:/ 'Edad' + FechaNac.
WRITE:/ 'JOB:', JOB.
END-OF-SELECTION.

* DEFINICION DEL RADIOBUTTON PARA INDICAR SI ES O NO EMPLEADO

WRITE: 'ES UD EMPLEADO?: '.

SELECTION-SCREEN BEGIN OF BLOCK empl WITH FRAME TITLE estado.
PARAMETERS: SI RADIOBUTTON GROUP ee, " ee estado del empleado, empleado o desempleado
NO RADIOBUTTON GROUP ee.
SELECTION-SCREEN END OF BLOCK empl.

* validacion del radiobutton
IF SI='X'.
WRITE:/ 'EMPLEADO'.
ELSE.
WRITE:/ 'DESEMPLEADO'.
ENDIF.

Buenas, si no he entiendido mal quieres escribir el literar NOMBRE y al lado el valor de la variable: deberia ser asi:

START-OF-SELECTION.
WRITE:/ 'NOMBRE', NOMBRE.

Saludos,

LouieBoy.

Hola Claudia,
Solo es cuestion de syntaxis, ten cuidado con los espacios...;)

Este codigo compila...

* DEFINICION DE LAS VARIABLES

PARAMETERS: Nombre(30) TYPE c OBLIGATORY,
FechaNac TYPE d.


TYPE-POOLS: VRM.

DATA: NAME TYPE VRM_ID,
LIST TYPE VRM_VALUES,
VALUE LIKE LINE OF LIST.

* DEFINICION DE LA LISTA DE JOB
PARAMETERS: JOB(10) AS LISTBOX VISIBLE LENGTH 10.

AT SELECTION-SCREEN OUTPUT.

NAME = 'JOB'.

VALUE-TEXT = 'NATACION'.
APPEND VALUE TO LIST.

VALUE-TEXT = 'PATINAJE'.
APPEND VALUE TO LIST.

VALUE-TEXT = 'TV'.
APPEND VALUE TO LIST.

VALUE-TEXT = 'NINGUNO'.
APPEND VALUE TO LIST.

CALL FUNCTION 'VRM_SET_VALUES' EXPORTING ID = NAME VALUES = LIST.

START-OF-SELECTION.
WRITE:/ 'NOMBRE', Nombre.
WRITE:/ 'Edad', FechaNac.
WRITE:/ 'JOB:', JOB.
END-OF-SELECTION.

* DEFINICION DEL RADIOBUTTON PARA INDICAR SI ES O NO EMPLEADO

WRITE: 'ES UD EMPLEADO?: '.

SELECTION-SCREEN BEGIN OF BLOCK empl WITH FRAME TITLE estado.
PARAMETERS: SI RADIOBUTTON GROUP ee, " ee estado del empleado, empleado o desempleado
NO RADIOBUTTON GROUP ee.
SELECTION-SCREEN END OF BLOCK empl.

* validacion del radiobutton
IF SI = 'X'.
WRITE:/ 'EMPLEADO'.
ELSE.
WRITE:/ 'DESEMPLEADO'.
ENDIF.

Talogo,
Sealons.

No he probado el código, pero hay un error que es claramente identificable:

The field "SI=" is unknown, but there is a field with the similar name

Debería ser "SI =".

:D Un saludo

Muchas Gracias
 

QUE PENA LA DESPISTADA, Y POR SEMESJANTES BOBADAS, MUCHISIMAS GRACIAS, NO HABIA VISTO LOS ERRORES. :p