#2
|
||||
|
||||
HOLA AQUI ESTA EL CODIGO CORREGIDO
SELECTION-SCREEN: BEGIN OF BLOCK bloq1 WITH FRAME TITLE text-001. PARAMETERS: carga RADIOBUTTON GROUP g1 USER-COMMAND ent, modifica RADIOBUTTON GROUP g1, casa RADIOBUTTON GROUP g1, anula RADIOBUTTON GROUP g1. PARAMETERS: p_file(128) TYPE C default ' ' MODIF ID g2. "parametro con la ruta completa del fichero SELECTION-SCREEN: END OF BLOCK bloq1. INITIALIZATION. LOOP AT SCREEN. IF SCREEN-NAME = 'P_FILE' OR SCREEN-NAME = '%_P_FILE_%_APP_%-TEXT'. SCREEN-INVISIBLE = 1. SCREEN-INPUT = 0. ENDIF. * Se actualizan las modificaciones en la tabla SCREEN MODIFY SCREEN. ENDLOOP. AT SELECTION-SCREEN OUTPUT. LOOP AT SCREEN. IF carga = 'X'. IF SCREEN-NAME = 'P_FILE' OR SCREEN-NAME = '%_P_FILE_%_APP_%-TEXT'. SCREEN-INVISIBLE = 0. SCREEN-INPUT = 1. ENDIF. ELSE. IF SCREEN-NAME = 'P_FILE' OR SCREEN-NAME = '%_P_FILE_%_APP_%-TEXT'. SCREEN-INVISIBLE = 1. SCREEN-INPUT = 0. ENDIF. ENDIF. * Se actualizan las modificaciones en la tabla SCREEN MODIFY SCREEN. ENDLOOP. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|