topic Re: regarding Hardcoding selection-screen field. in Application Development and Automation Discussions

regarding Hardcoding selection-screen field.

Former Member — Sun, 06 Jan 2008 05:29:56 GMT

Hi frnds,

I want to hardcode vbak-erdat in my selection screen , i m using loop at screen . and i m also usiing INITIALIZATION EVENT,where i am initializing vbak-erdat.

so frnds can anyone help me in this regard.

Thanks,

satish

Re: regarding Hardcoding selection-screen field.

former_member156446 — Sun, 06 Jan 2008 05:36:55 GMT

PARAMETERS: pa_logic RADIOBUTTON GROUP e1 USER-COMMAND inv DEFAULT 'X',

pa_equip RADIOBUTTON GROUP e1,

pa_ob RADIOBUTTON GROUP e1.

PARAMETERS: pa_zpms AS CHECKBOX MODIF ID i1.

SELECTION-SCREEN BEGIN OF BLOCK a2 WITH FRAME TITLE text-002.

PARAMETERS :

pa_pex1 TYPE rlgrap-filename MODIF ID i2, " buyers list PC

pa_uex1(200) LOWER CASE MODIF ID i2. " buyers list Unix

SELECTION-SCREEN END OF BLOCK a2.

SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-001.

PARAMETERS:

pa_pex2 TYPE rlgrap-filename MODIF ID i2, "Commercial list PC

pa_uex2(200) LOWER CASE MODIF ID i2. "Commercial list Unix

SELECTION-SCREEN END OF BLOCK a1.

and now loop at screen

LOOP AT SCREEN.

IF screen-group1 = 'I1'.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDIF.

IF pa_logic <> 'X'.

LOOP AT SCREEN.

IF screen-group1 = 'I2'.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

Re: regarding Hardcoding selection-screen field.

Former Member — Sun, 06 Jan 2008 05:43:46 GMT

Hi jay,

Thanks for replying,

My senario is

WHEN Frst Radio button.

S_VBAK

S_ERDAT

When second Radiobutton pressed.

S_ERDAT

S_AUART

We have to do this using LOOP AT SCREEN.

frnds can anyone help me for the above.

Re: regarding Hardcoding selection-screen field.

former_member156446 — Sun, 06 Jan 2008 05:53:39 GMT

para : rb1 group g1,

rb2 group g1.

S_VBAK modif id i1.

S_ERDAT modif id i1.

S_ERDAT modif id i2.

S_AUART modif id i2.

LOOP AT SCREEN.

IF screen-group1 = 'I1'.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDIF.

LOOP AT SCREEN.

IF screen-group1 = 'I2'.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

Re: regarding Hardcoding selection-screen field.

Former Member — Sun, 06 Jan 2008 06:28:02 GMT

Hi,

Please look at the code below :

TABLES : bsis.

SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

PARAMETER : sp_sel radiobutton group rad USER-COMMAND radio DEFAULT 'X',

sp_all RADIOBUTTON GROUP rad.

SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.

SELECT-OPTIONS : so_bukrs FOR bsis-bukrs MODIF ID sp1.

SELECT-OPTIONS : so_hkont FOR bsis-hkont MODIF ID sp2.

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF sp_sel = 'X'.

IF screen-group1 = 'SP2'.

screen-input = '0'.

screen-invisible = '0'.

screen-required = '0'.

MODIFY SCREEN.

ENDIF.

elseif sp_all = 'X'.

IF screen-group1 = 'SP1'.

screen-input = '0'.

screen-invisible = '0'.

screen-required = '0'.

MODIFY SCREEN.

ENDIF.

endif.

ENDLOOP.

Thanks,

Sriram Ponna.

Re: regarding Hardcoding selection-screen field.

kesavadas_thekkillath — Sun, 06 Jan 2008 10:49:00 GMT

select-options:so_erdat for mkpf-budat no-extension.

initialization.

so_erdat-low = sy-datum.

so_erdat-high = sy-datum

append so_erdat.