Ver Mensaje Individual
  #10  
Viejo 11/01/08, 10:40:42
iparedes iparedes is offline
Member
 
Fecha de Ingreso: dic 2006
Mensajes: 59
Thumbs up Radiobutton

[color="Blue"]Hola!!!
Les cuento que vì la manera de hacer algo que remplace a mi primera idea, ahi les paso el codigo:COLOR]

SELECTION-SCREEN BEGIN OF BLOCK 0001 WITH FRAME TITLE text-001.
SELECT-OPTIONS so_KSCHL FOR A306-KSCHL.
SELECTION-SCREEN END OF BLOCK 0001.

SELECTION-SCREEN: BEGIN OF BLOCK bloq1 WITH FRAME TITLE text-001.
PARAMETERS: Inicio RADIOBUTTON GROUP g1 USER-COMMAND ent,
Clte_Mat RADIOBUTTON GROUP g1,
PrMonMat RADIOBUTTON GROUP g1,
Material RADIOBUTTON GROUP g1.
*PARAMETERS: p_file(128) TYPE C default ' ' MODIF ID g2. "parametro con
*la ruta completa del fichero
PARAMETERS: P_VKORG TYPE A306-VKORG MODIF ID g2, " Org. Ventas TYPE C
*default ' ',
P_VTWEG TYPE A306-VTWEG MODIF ID g2, " CANAL DE DISTRIBUCION
P_KUNNR TYPE A305-KUNNR MODIF ID g2, " CLIENTE
P_PLTYP TYPE A306-PLTYP MODIF ID g2, " LISTA DE PRECIOS
P_WAERK TYPE A306-WAERK MODIF ID g2. " MONEDA

SELECTION-SCREEN: END OF BLOCK bloq1.

INITIALIZATION.
LOOP AT SCREEN.
IF SCREEN-NAME = 'P_VKORG' OR SCREEN-NAME =
'%_P_VKORG_%_APP_%-TEXT' or SCREEN-NAME = 'P_VTWEG' OR SCREEN-NAME =
'%_P_VTWEG_%_APP_%-TEXT' or SCREEN-NAME = 'P_KUNNR' OR SCREEN-NAME =
'%_P_KUNNR_%_APP_%-TEXT' or SCREEN-NAME = 'P_PLTYP' OR SCREEN-NAME =
'%_P_PLTYP_%_APP_%-TEXT' or SCREEN-NAME = 'P_WAERK' OR SCREEN-NAME =
'%_P_WAERK_%_APP_%-TEXT'.
SCREEN-INVISIBLE = 0.
SCREEN-INPUT = 0.
ENDIF.
* Se actualizan las modificaciones en la tabla SCREEN
MODIFY SCREEN.
ENDLOOP.

AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF Clte_Mat = 'X'.
IF SCREEN-NAME = 'P_PLTYP' OR SCREEN-NAME =
'%_P_PLTYP_%_APP_%-TEXT' OR SCREEN-NAME = 'P_WAERK'
OR SCREEN-NAME ='%_P_WAERK_%_APP_%-TEXT' .
SCREEN-INVISIBLE = 0.
SCREEN-INPUT = 0.
ENDIF.
ELSE.
IF PrMonMat = 'X'.
IF SCREEN-NAME = 'P_KUNNR'
OR SCREEN-NAME ='%_P_KUNNR_%_APP_%-TEXT'

. SCREEN-INVISIBLE = 0.
SCREEN-INPUT = 0.
ENDIF.

ELSE.
IF SCREEN-NAME ='P_PLTYP' OR SCREEN-NAME =
'%_P_PLTYP_%_APP_%-TEXT' OR
SCREEN-NAME ='P_WAERK' OR SCREEN-NAME =
'%_P_WAERK_%_APP_%-TEXT' or SCREEN-NAME = 'P_KUNNR'
OR SCREEN-NAME ='%_P_KUNNR_%_APP_%-TEXT'
.
SCREEN-INVISIBLE = 0.
SCREEN-INPUT = 0.
ENDIF.
ENDIF.
ENDIF.
* Se actualizan las modificaciones en la tabla SCREEN
MODIFY SCREEN.
ENDLOOP.

Lo que hace esto es, segun la opcion que elijas, te muestra los parametros que hay que ingresarles, y los otros los bloquea, pero mi problema està en como puedo recuperar esos valores que ingreso, como hago para levantarlos???