11-20-2008 4:38 AM
Moderator message: please do not offer or request points
Dear Sir,
We have written a ABAP executeable program . In this we have defined a Selection Screen , for taking the Input Parameter .
The syntax defined is as under :
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(33) text-000 FOR FIELD s_bldat.
PARAMETERS: s_bldat TYPE mkpf-bldat .
SELECTION-SCREEN END OF LINE.
We want that by default in s_bldat , there must be current system date and users should not be allowed to change this default displayed date .
Kindly guide us , as how can we address this requirement .
<<text removed>>
Rgds
B Mittal
Edited by: Matt on Nov 20, 2008 1:23 PM
11-20-2008 4:41 AM
PARAMETERS: s_bldat TYPE mkpf-bldat DEFAULT sy-datum."system date as default
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF screen-name = 'S_BLDAT'.
screen-input = '0'. "date field in display mode
ENDIF.
MODIFY SCREEN.
ENDLOOP.
11-20-2008 4:46 AM
Hi,
try this...
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(33) text-000 FOR FIELD s_bldat.
PARAMETERS: s_bldat TYPE mkpf-bldat DEFAULT sy-datum .
SELECTION-SCREEN END OF LINE.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF screen-name = 'S_BLDAT'.
screen-input = '0'.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
Arunima
11-20-2008 4:51 AM
Hi mittal
try this code
PARAMETERS : para TYPE sy-datum DEFAULT sy-datum MODIF ID 001.
AT SELECTION-SCREEN OUTPUT.
LOOP AT screen.
CHECK screen-group1 EQ '001'.
screen-input = '0'.
MODIFY screen.
ENDLOOP.
Thanks
Rasheed
11-20-2008 5:01 AM
Hi
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(33) text-000 FOR FIELD s_bldat.
PARAMETERS: s_bldat TYPE mkpf-bldat DEFAULT sy-datum modif id S1.
SELECTION-SCREEN END OF LINE.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF screen-group1 = 'S1'.
screen-input = '0'.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
if you do like this the parameter value will be current date and it will be in diaply mode.
so there won't be any possible to change any user
11-20-2008 5:51 AM
hi,
in your selection screen add default sy-datum for perameter s_bldat as showm below.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(33) text-000 FOR FIELD s_bldat.
PARAMETERS: s_bldat TYPE mkpf-bldat default sy-datum .
SELECTION-SCREEN END OF LINE.
in at selection sereen event-----
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF screen-name = 'S_BLDAT'.
screen-input = '0'.
ELSE.
screen-input = '1'.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
tHIS MAY SOLVE YOUR PROBLEM
Thnaks & regards
11-20-2008 6:16 AM
REPORT ZSRK_071 .
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(33) TEXT-000 FOR FIELD S_BLDAT.
PARAMETERS: S_BLDAT TYPE MKPF-BLDAT DEFAULT SY-DATUM .
SELECTION-SCREEN END OF LINE.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-NAME CS 'S_BLDAT'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
11-20-2008 8:51 AM
Hi
I hope you got correct inputs.My input 100% solve your issue.
Close the thread and give points accordingly
Thanks
Rasheed
11-20-2008 12:24 PM