Le cambio el nombre y me arroja el mismo error, lo que quiero hacer, es llamar este campo y se refleje en el reporte
The IN operator with "SO_T_CTA" is followed neither by an internal
table nor by a value list.
Aqui les mando todo el codigo a ver si que en otro lugar del programa
TABLES: ZTHR_USUA_EMPL,PA0001,PA0002.
******* TABLA INTERNA******************
DATA: BEGIN OF T_DATA1 OCCURS 0,
BUKRS LIKE ZTHR_USUA_EMPL-BUKRS,
PERNR LIKE ZTHR_USUA_EMPL-PERNR,
USUARIO LIKE ZTHR_USUA_EMPL-USUARIO,
FEC_ING LIKE ZTHR_USUA_EMPL-FEC_ING,
TIP_CTA LIKE ZTHR_USUA_EMPL-TIP_CTA,
FECHA LIKE ZTHR_USUA_EMPL-FECHA,
HORA LIKE ZTHR_USUA_EMPL-HORA,
NACHN LIKE PA0002-NACHN,
ORGEH LIKE PA0001-ORGEH,
PERSNO LIKE PA0002-PERNR,
END OF T_DATA1.
******* VARIABLE**********************
DATA: CONTADOR TYPE I.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 3(15) TEXT-003.
SELECT-OPTIONS: s_tsoc FOR ZTHR_USUA_EMPL-BUKRS.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 3(15) TEXT-004.
SELECT-OPTIONS: s_templ FOR ZTHR_USUA_EMPL-PERNR.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE TEXT-002.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 3(16) TEXT-005.
PARAMETERS p_red AS CHECKBOX.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 3(16) TEXT-006.
PARAMETERS p_correo AS CHECKBOX.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b2.
START-OF-SELECTION.
PERFORM OBTENER_DATOS.
PERFORM IMPRIMIR_DATOS.
FORM OBTENER_DATOS.
SELECT BUKRS PERNR TIP_CTA
INTO T_DATA1
FROM ZTHR_USUA_EMPL
WHERE BUKRS IN S_TSOC
AND PERNR IN S_TEMPL
AND TIP_CTA IN so_T_CTA.
APPEND T_DATA1.
ENDSELECT.
LOOP AT T_DATA1.
CONTADOR = SY-TABIX.
MODIFY T_DATA1 INDEX CONTADOR.
ENDLOOP.
ENDFORM.
FORM IMPRIMIR_DATOS.
WRITE:/1'SOCIEDAD', 15'NUM_EMPL',40 'NOMBRE', 60 'TIP0'.
LOOP AT T_DATA1.
WRITE:/1 T_DATA1-BUKRS,15 T_DATA1-PERNR, 40 T_DATA1-NACHN, 60 T_DATA1-TIP_CTA .
ENDLOOP.
ENDFORM.
gracias
