08-16-2007 11:37 AM
Hi
I am trying to put password field with asterisk and i dont know how to do it
( I mean like the logon to sap )
Thanks
Have a nice day
08-16-2007 11:59 AM
Hello Yossi Balan,
Consider this code. It uses class CL_HTTP_UTILITY.
Just execute this code in SE38.
REPORT zarun_pass .
PARAMETERS : pass(32) TYPE c.
DATA : passwd TYPE string,
encoded TYPE string,
decoded TYPE string.
passwd = pass.
CONDENSE passwd.
CALL METHOD cl_http_utility=>if_http_utility~encode_base64 "Method for Encryption
EXPORTING
unencoded = passwd
RECEIVING
encoded = encoded.
CALL METHOD cl_http_utility=>if_http_utility~decode_base64 "Method for Decryption
EXPORTING
encoded = encoded
RECEIVING
decoded = decoded.
WRITE : / 'Password Entered :' , pass,
/ 'Encrypted Password :' , encoded,
/ 'Decrypted Password :' , decoded.
Reward If Helpful.
Regards
--
Sasidhar Reddy Matli.
08-16-2007 11:40 AM
Hi
use screen-INVISIBLE = 1.
IF EQU_TYPE_IE01 EQ 'Y'.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'GRP'.
SCREEN-INVISIBLE = '1'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
reward points to all helpful answers
kiran.M
08-16-2007 11:42 AM
Hi,
E.g: Consider parameter as P_INPUT
You need to write code in AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
CHECK SCREEN-NAME = 'P_INPUT'.
SCREEN-INVISIBLE = 1.
MODIFY SCREEN.
ENDLOOP.
Thanks,
Reward If Helpful.
08-16-2007 11:42 AM
Hi..
PARAMETERS : P_NAME(10).
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN .
IF SCREEN-NAME = 'P_NAME'.
SCREEN-INVISIBLE = 1.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
<b>Reward if Helpful</b>
08-16-2007 11:51 AM
Hi try this
it would work fine
Parameters: p_passw like sy-uname.
AT SELECTION-SCREEN OUTPUT.
loop at screen.
check screen-name eq 'P_PASSW'.
move: 1 to screen-invisible.
modify screen.
endloop.
08-16-2007 11:59 AM
Hello Yossi Balan,
Consider this code. It uses class CL_HTTP_UTILITY.
Just execute this code in SE38.
REPORT zarun_pass .
PARAMETERS : pass(32) TYPE c.
DATA : passwd TYPE string,
encoded TYPE string,
decoded TYPE string.
passwd = pass.
CONDENSE passwd.
CALL METHOD cl_http_utility=>if_http_utility~encode_base64 "Method for Encryption
EXPORTING
unencoded = passwd
RECEIVING
encoded = encoded.
CALL METHOD cl_http_utility=>if_http_utility~decode_base64 "Method for Decryption
EXPORTING
encoded = encoded
RECEIVING
decoded = decoded.
WRITE : / 'Password Entered :' , pass,
/ 'Encrypted Password :' , encoded,
/ 'Decrypted Password :' , decoded.
Reward If Helpful.
Regards
--
Sasidhar Reddy Matli.