‎2008 Nov 20 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
‎2008 Nov 20 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.
‎2008 Nov 20 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
‎2008 Nov 20 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
‎2008 Nov 20 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
‎2008 Nov 20 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
‎2008 Nov 20 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.
‎2008 Nov 20 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
‎2008 Nov 20 12:24 PM