‎2009 Dec 02 4:06 PM
Hi friends,
i have 4 radio buttons on the selection screen
PARAMETERS :
r1 RADIOBUTTON GROUP g1 DEFAULT 'X' USER-COMMAND DEV,
r2 RADIOBUTTON GROUP g1,
r3 RADIOBUTTON GROUP g1,
r4 RADIOBUTTON GROUP g1.
PARAMETERS :
file1 TYPE rlgrap-filename MODIF ID A1,
file2 TYPE rlgrap-filename MODIF ID A2,
file3 TYPE rlgrap-filename MODIF ID A3,
file4 TYPE rlgrap-filename MODIF ID A4,
Iam using loop at screen and displaying one file1 when r1 is active on the selection screen
simlarly
file2 when r2 is active on the selection screen
file3 when r3 is active on the selection screen
file4 when r4 is active on the selection screen
Its working fine.. perfect.
But my problem is i need to provide F4 help for all files dynamiaclly
ie :
when file 1 is active then i need to provide f4 help using at selection screen on value request for file1
when file 2 is active then i need to provide f4 help using at selection screen on value request for file2
when file 3 is active then i need to provide f4 help using at selection screen on value request for file3
when file 4 is active then i need to provide f4 help using at selection screen on value request for file4
iam using the following code but its showing me some error
can any one correct it and let me know.
data :
w_file type rlgrap-filename.
if R1 = 'X'.
W_FILE = 'FILE1'.
ELSEIF R2 = 'X'.
W_FILE = 'FILE2'.
ELSEIF R3 = 'X'.
W_FILE = 'FILE3'.
ELSEIF R4 = 'X'.
W_FILE = FILE4'.
ENDIF.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR W_FILE.
Its showing me error " On Value Request Shoud Be Follwed By Paramter Or Select option -low or High "
How Can i pass the file name based on the radio button check for AT selection screen on value request Event
Regards
Kumar
‎2009 Dec 02 4:12 PM
Hi
U need to use that event four times for every "file" parameter:
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE4.but u can define a routine to be used for all above events
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE1.
PERFORM GET_FILE USING FILE1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE3.
PERFORM GET_FILE USING FILE2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE2.
PERFORM GET_FILE USING FILE3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE4.
PERFORM GET_FILE USING FILE4.Max
‎2009 Dec 02 4:12 PM
Hi
U need to use that event four times for every "file" parameter:
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE4.but u can define a routine to be used for all above events
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE1.
PERFORM GET_FILE USING FILE1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE3.
PERFORM GET_FILE USING FILE2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE2.
PERFORM GET_FILE USING FILE3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE4.
PERFORM GET_FILE USING FILE4.Max
‎2009 Dec 02 4:36 PM
Hi MAX,
Very Thanks For your answer.... I was just looking for any other alternative instead of calling the event 4 times.
Cheers...
Kumar
‎2009 Dec 02 5:16 PM
hI max,
Please let me know how should i pass the file name to KD_GET_FILENAME_ON_F4 function module.
iam facing some problem..
can you please let me know.
Regards
Kumar
‎2009 Dec 02 6:12 PM
Hi
This works:
PARAMETERS :
R1 RADIOBUTTON GROUP G1 DEFAULT 'X' USER-COMMAND DEV,
R2 RADIOBUTTON GROUP G1,
R3 RADIOBUTTON GROUP G1,
R4 RADIOBUTTON GROUP G1.
PARAMETERS : FILE1 TYPE RLGRAP-FILENAME MODIF ID A1,
FILE2 TYPE RLGRAP-FILENAME MODIF ID A2,
FILE3 TYPE RLGRAP-FILENAME MODIF ID A3,
FILE4 TYPE RLGRAP-FILENAME MODIF ID A4.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE1.
PERFORM GET_FILE USING FILE1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE2.
PERFORM GET_FILE USING FILE2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE3.
PERFORM GET_FILE USING FILE3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE4.
PERFORM GET_FILE USING FILE4.
FORM GET_FILE USING P_FILE.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
CHANGING
FILE_NAME = P_FILE
EXCEPTIONS
MASK_TOO_LONG = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
EXIT.
ENDIF.
ENDFORM. " GET_FILEMax