Pole hasła z "*" dla parameters

[se38]

Witam

poszukuję sposobu na wyświetlenie na
ekranie selekcji dla Parameters gwiazdek
tak jak w polu logowania do SAP.

oczywiście musze później tą zmienną przepisać
wieć pole musi zawierać hasło a nie gwiazdki

Pozdrawiam
SE38 ukierunkowany na SE80

[kierownik1]

Bardzo proszę

REPORT jstest.

PARAMETERS: p_pwd(10) TYPE c LOWER CASE OBLIGATORY DEFAULT 'Sikora' MODIF ID 999.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.
IF screen-group1 = '999'.
screen-invisible = '1'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.



pozdrawiam
Jarek Sikora
http://www.icg.pl

[se38]

Dziekuję pomogło

Mam teraz inny problem .

Jeżeli parametr przekroczy pewną wartość musze zablokować kolejne pole selekcji do edycji.

Oczywiście chodzi mi o ekrany selekcji.

I drugi problem muszę zrobic ekran selekcji z 3 zakładkami ?
Wdzięczny będe za pomoc

[abaper]

Jedyny minus tego rozwiązania to że musisz
wykonac PAI (nacisnac np. enter)


PARAMETERS: p_data like sy-datum,
p_time like sy-uzeit MODIF ID 888.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.
IF screen-group1 = '888'.
if not p_data is initial and p_data > sy-datum.
screen-input = '0'.
MODIFY SCREEN.
endif.
ENDIF.
ENDLOOP.

[abaper]

i jeszce jeden na zakładki
wziety z help


SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN.
PARAMETERS: p1(10) TYPE c,
p2(10) TYPE c,
p3(10) TYPE c.
SELECTION-SCREEN END OF SCREEN 100.

SELECTION-SCREEN BEGIN OF SCREEN 200 AS SUBSCREEN.
PARAMETERS: q1(10) TYPE c,
q2(10) TYPE c,
q3(10) TYPE c.
SELECTION-SCREEN END OF SCREEN 200.

SELECTION-SCREEN: BEGIN OF TABBED BLOCK mytab FOR 10 LINES,
TAB (20) button1 USER-COMMAND push1,
TAB (20) button2 USER-COMMAND push2,
END OF BLOCK mytab.

INITIALIZATION.
button1 = 'Selection Screen 1'.
button2 = 'Selection Screen 2'.
mytab-prog = sy-repid.
mytab-dynnr = 100.
mytab-activetab = 'PUSH1'.

AT SELECTION-SCREEN.
CASE sy-dynnr.
WHEN 1000.
CASE sy-ucomm.
WHEN 'PUSH1'.
mytab-dynnr = 100.
WHEN 'PUSH2'.
mytab-dynnr = 200.
WHEN OTHERS.
...
ENDCASE.
...
ENDCASE.