selection screen default value maintain,user cant chage the default value

[Former Member]

hi Friends

SELECTION-SCREEN BEGIN OF BLOCK SCLDBLOCK WITH FRAME.

SELECT-OPTIONS: S_WERKS FOR EBAN-WERKS DEFAULT 'IN01' NO INTERVALS NO-EXTENSION ,

S_MATNR FOR EBAN-MATNR,

S_BANFN FOR EBAN-BANFN,

S_EBELN FOR EBAN-EBELN,

S_LIFNR FOR EBAN-LIFNR,

S_BSART FOR EKKO-BSART DEFAULT 'IN03' OBLIGATORY NO INTERVALS NO-EXTENSION,

S_EINDT FOR EKET-EINDT OBLIGATORY.

SELECTION-SCREEN END OF BLOCK SCLDBLOCK.

here i need to maintain bsart in03 ,user cant able to chage anything instead of in03.what can i do for that one

Regards

ds

[Former Member]

just execute this and checkout


REPORT YCHATEST.

TABLES : EBAN , EKKO,EKET.

SELECTION-SCREEN BEGIN OF BLOCK SCLDBLOCK WITH FRAME.

SELECT-OPTIONS: S_WERKS FOR EBAN-WERKS DEFAULT 'IN01' NO INTERVALS
NO-EXTENSION ,
S_MATNR FOR EBAN-MATNR,
S_BANFN FOR EBAN-BANFN,
S_EBELN FOR EBAN-EBELN,
S_LIFNR FOR EBAN-LIFNR,
S_BSART FOR EKKO-BSART DEFAULT 'IN03' OBLIGATORY NO INTERVALS
NO-EXTENSION,
S_EINDT FOR EKET-EINDT OBLIGATORY.

SELECTION-SCREEN END OF BLOCK SCLDBLOCK.

AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF SCREEN-NAME = 'S_BSART-LOW'.
      SCREEN-INPUT = 0.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.

[raymond_giuseppi]

Create a transaction with a system variant and lock the field in the variant. User wont be able to change it, execpt if they gain access to SE38/SA38

regards

[Former Member]

HI,

REPORT ZETA LINE-SIZE 350.

TABLES : EBAN , EKKO,EKET.

SELECTION-SCREEN BEGIN OF BLOCK SCLDBLOCK WITH FRAME.

SELECT-OPTIONS: S_WERKS FOR EBAN-WERKS DEFAULT 'IN01' NO INTERVALS

NO-EXTENSION ,

S_MATNR FOR EBAN-MATNR,

S_BANFN FOR EBAN-BANFN,

S_EBELN FOR EBAN-EBELN,

S_LIFNR FOR EBAN-LIFNR,

S_BSART FOR EKKO-BSART DEFAULT 'IN03' OBLIGATORY NO INTERVALS

NO-EXTENSION,

S_EINDT FOR EKET-EINDT OBLIGATORY.

SELECTION-SCREEN END OF BLOCK SCLDBLOCK.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF SCREEN-NAME = 'S_BSART-LOW'.

SCREEN-INPUT = '0'.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ELSE.

LOOP AT SCREEN.

IF SCREEN-NAME = 'S_BSART-HIGH'.

SCREEN-INPUT = '1'.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

[Former Member]

Hi,

Plz use the following code AT SELECTION SCREEN ON OUTPUT.

loop at screen.
if screen-name = 'S_BSART-LOW'.
   screen-input = '0'.
   modify screen.
endif.

Regards

Bhupal Reddy

[Former Member]

SELECTION-SCREEN BEGIN OF BLOCK SCLDBLOCK WITH FRAME.

SELECT-OPTIONS: S_WERKS FOR EBAN-WERKS DEFAULT 'IN01' NO INTERVALS NO-EXTENSION ,

S_MATNR FOR EBAN-MATNR,

S_BANFN FOR EBAN-BANFN,

S_EBELN FOR EBAN-EBELN,

S_LIFNR FOR EBAN-LIFNR,

<b>S_BSART FOR EKKO-BSART no-display,</b>

S_EINDT FOR EKET-EINDT OBLIGATORY.

SELECTION-SCREEN END OF BLOCK SCLDBLOCK.

<b>initialization.

S_BSART-low = 'in03'.

apped S_BSART</b>