|
NO SE BIEN A QUE TE REFIERES CON 'CONTROL' . .
PARA EL CASO DE CAMPOS . . SERIA MAS O MENOS ASI . . EN PBO
LOOP AT SCREEN.
CASE screen-name.
WHEN 'VAL1'.
IF r2 = 'X'.
screen-input = 0.
ELSE.
screen-input = 1.
ENDIF.
WHEN 'VAL2'.
IF r1 = 'X'.
screen-input = 0.
ELSE.
screen-input = 1.
ENDIF.
ENDCASE.
MODIFY SCREEN.
ENDLOOP.
NO OLVIDAR ASIGNAR EL FCODE . . . AL GRUPO DE RADDIOBUTTOM . . .
|