logo in selection screen

[Former Member]

hi experts ,

can we add logo in selection screen .

if yes the how it can be possible .

Thanks And Regards .

Priyank

[Former Member]

hi experts ,

can we add logo in selection screen .

if yes the how it can be possible .

Thanks And Regards .

Priyank

[bpawanchand]

Hi

Through selection-screen it is not possible but you can do it by using screen painter SE51

Regards

Pavan

[Former Member]

Hi Priyank,

Check this code for logo on selection screen:

http://sapprograms.blogspot.com/2008/04/logo-on-selection-screen.html

Check this thread also:

Regards,

Chandra Sekhar

[Former Member]

Hi,

Check the Demo program,

RSDEMO_CUSTOM_CONTROL

Regards

Adil

[p291102]

To create a logo u have to remember one thing is u have to upload that logo through OAER or SE78

for uploading logo in OAER

Enter class name as PICTURES

Class type as OT

Object key the name of ur logo want to upload

then press F8 or execute

Then it will automatically creates a folder for ur LOGO and upload ur logo in that folder

After that In the left side bottom of the page u can c the following options

1)Detail

2)Document Info

3)Keywords

4)Create

goto Detail in which u can find the Object Id

which u have to paste in the function module of this program

Check this program1

REPORT  YMS_LOGOSEL.

*REPORT  ZREPORT_LOGO.
DATA:
docking TYPE REF TO cl_gui_docking_container,
picture_control_1 TYPE REF TO cl_gui_picture,
url(256) TYPE c .
DATA : sum(4) , num1(4) , num2(4).
PARAMETERS: p_dummy(4) DEFAULT '4' .
PARAMETERS: p_dummy1(4) DEFAULT '5' .


AT SELECTION-SCREEN OUTPUT.




PERFORM show_pic.

START-OF-SELECTION.


num1 = p_dummy.
num2 = p_dummy1.

sum = num1 + num2.

WRITE : / sum.



*&---------------------------------------------------------------------*
*& Form show_pic
*&---------------------------------------------------------------------*
FORM show_pic.

DATA: repid LIKE sy-repid.

repid = sy-repid.


CREATE OBJECT picture_control_1 EXPORTING parent = docking.

CHECK sy-subrc = 0.
CALL METHOD picture_control_1->set_3d_border
EXPORTING
border = 5.

CALL METHOD picture_control_1->set_display_mode
EXPORTING
display_mode = cl_gui_picture=>display_mode_stretch.
CALL METHOD picture_control_1->set_position
EXPORTING
height = 100
left = 500
top = 10
width = 300.

CALL METHOD picture_control_1->load_picture_from_url
EXPORTING
url = 'c:/pic.bmp'.
IF sy-subrc NE 0.


ENDIF.

ENDFORM. "show_pic

[Former Member]

Hi,

plz look into below code :

DATA:docking TYPE REF TO cl_gui_docking_container,
picture_control_1 TYPE REF TO cl_gui_picture,
url(256) TYPE c .

DATA : begin of imakt occurs 0,
matnr like makt-matnr,
spras like makt-spras,
maktx like makt-maktx,
end of imakt.

DATA: itrepid LIKE sy-repid.

itrepid = sy-repid.

parameters:p_matnr like makt-matnr.

select matnr
spras
maktx
from makt
into table imakt
where matnr = p_matnr.

loop at imakt.
write:/ imakt-matnr,
imakt-spras,
imakt-maktx.
endloop.

AT SELECTION-SCREEN OUTPUT.
PERFORM show_pic.

*&---------------------------------------------------------------------
**& Form show_pic
*&---------------------------------------------------------------------
FORM show_pic.

CREATE OBJECT picture_control_1 EXPORTING parent = docking.
CHECK sy-subrc = 0.
CALL METHOD picture_control_1->set_3d_border
EXPORTING
border = 5.

CALL METHOD picture_control_1->set_display_mode
EXPORTING
display_mode = cl_gui_picture=>display_mode_stretch.
CALL METHOD picture_control_1->set_position
EXPORTING
height = 55
left = 750
top = 08
width = 350.

CALL METHOD picture_control_1->load_picture_from_url
EXPORTING
url = 'C:\zpic.gif'.

*here you give the path where your pic is stored on the desktop

IF sy-subrc NE 0.
ENDIF.
ENDFORM.

thanx.