‎2007 Jun 05 4:50 PM
Hi,
i have a selection screen in which i have an input field which asks for the user to select a file and it will call different funtion modules based on the radio button selection i have.
if i'm changing the selection (radio buttons ) it still is not considering that selection, it considers as if the default has been selected. can someone give a sample code for that.
thanks,
ravi.
‎2007 Jun 05 4:53 PM
Hello,
Do like this:
SELECTION-SCREEN BEGIN OF BLOCK BLCK1 WITH FRAME TITLE TEXT-002.
PARAMETERS: FILENAME LIKE EPSF-EPSDIRNAM
DEFAULT '\FS000P01D48ANSKASAP_R3_ANSKA_FILES.TXT'.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN ULINE.
PARAMETERS: AP RADIOBUTTON GROUP GRP1, " Check here
PC RADIOBUTTON GROUP GRP.
START-OF-SELECTION.
IF NOT AP IS INITIAL.
PERFORM GET_FILENAME CHANGING FILENAME
RC.
PERFORM UPLOAD_APPLICATION_SERVER TABLES IT_FILE
USING FILENAME
CHANGING RC.
ENDIF.
IF NOT PC IS INITIAL.
PERFORM UPLOAD_WORKSTATION TABLES IT_FILE
USING FILENAME
CHANGING RC.
ENDIF.
Regards,
Vasanth
‎2007 Jun 05 4:53 PM
hI
sEE THE SAMPLE CODE AND CHANGE YOUR SCREEN ACCORDINGLY
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: pa_file TYPE rlgrap-filename MODIF ID abc,
pa_lifnr TYPE lfa1-lifnr MODIF ID abc,
pa_vkorg TYPE vbak-vkorg MODIF ID abc.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
PARAMETERS: pa_kunnr TYPE vbak-kunnr MODIF ID def.
SELECT-OPTIONS: s_lifnr FOR gs_lfa1-lifnr MODIF ID def,
s_date FOR gs_lfa1-erdat MODIF ID def,
s_augru FOR gs_vbak-augru MODIF ID def,
s_vbeln FOR gs_vbak-vbeln MODIF ID def.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_upd RADIOBUTTON GROUP g1 USER-COMMAND uc01 DEFAULT 'X'."#EC *
SELECTION-SCREEN COMMENT 3(60) text-004 FOR FIELD pa_upd.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_rep RADIOBUTTON GROUP g1 ."#EC *
SELECTION-SCREEN COMMENT 3(60) text-005 FOR FIELD pa_rep.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b3.
IF pa_rep EQ gc_x.
LOOP AT SCREEN.
IF screen-group1 = gc_abc.
screen-input = gc_zero_num.
ELSEIF screen-group1 = gc_def.
screen-active = gc_one_num.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ELSEIF pa_upd EQ gc_x.
*For Reprocessing
LOOP AT SCREEN.
IF screen-group1 = gc_def.
screen-input = gc_zero_num.
ELSEIF screen-group1 = gc_abc.
screen-active = gc_one_num.
ENDIF.
MODIFY SCREEN.
CLEAR pa_upd.
ENDLOOP.
ENDIF.
Reward points if useful
Regards
Anji
‎2007 Jun 05 4:53 PM
Hello,
Do like this:
SELECTION-SCREEN BEGIN OF BLOCK BLCK1 WITH FRAME TITLE TEXT-002.
PARAMETERS: FILENAME LIKE EPSF-EPSDIRNAM
DEFAULT '\FS000P01D48ANSKASAP_R3_ANSKA_FILES.TXT'.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN ULINE.
PARAMETERS: AP RADIOBUTTON GROUP GRP1, " Check here
PC RADIOBUTTON GROUP GRP.
START-OF-SELECTION.
IF NOT AP IS INITIAL.
PERFORM GET_FILENAME CHANGING FILENAME
RC.
PERFORM UPLOAD_APPLICATION_SERVER TABLES IT_FILE
USING FILENAME
CHANGING RC.
ENDIF.
IF NOT PC IS INITIAL.
PERFORM UPLOAD_WORKSTATION TABLES IT_FILE
USING FILENAME
CHANGING RC.
ENDIF.
Regards,
Vasanth
‎2007 Jun 05 4:54 PM
you need to hit enter button when you change radio button then it will work,otherwise it will not work