cancel
Showing results for 
Search instead for 
Did you mean: 

Team Calendar

Former Member
0 Kudos

Hey Every,

just looking for ideas to create a team Calendar.. Just simple, date and events on that date..

the specific time e.g. 12pm is not required...

i know the Date Navigator wont do this.. but i was thinking:

1. i could create a table. make it look like a calendar. but this will be the long way.. coz i am basically making everything from scratch.

2. i am sure in SAP there is already calendar functions.. e.g. tcode SSC1. is there a function that has web-dynpro application to it. so that team members access it online.. and not have to go to the SAP System??..

Thanks..

Ian Matari.

Accepted Solutions (1)

Accepted Solutions (1)

Former Member
0 Kudos

Hi imatari,

There is no component for this need. As you said the best choice is to create a table which look like a calendar. it does not very hard. You can use FM's to get days of month and then create dynamic context from these days.

Answers (1)

Answers (1)

Former Member
0 Kudos

Hi imatari

why dont you directly call that transaction in you web Dynpro.

create a service for that transaction and call that service in ur WebDynpro view on any button action or in init.

Tell me if require more help on service call.

Nawal Kishor Mittal

Former Member
0 Kudos

Hey Nawal,

a brief intro to servie call will be greatly appreciated.. i havent done that before.. i think i would like to try this route.. just to try something new..

thank you..

Thank you too Erhan..

Chaitanya_Priya
Product and Topic Expert
Product and Topic Expert
0 Kudos

Hi,

To know how to use service call you can refer to the PDF.

[http://www.octavia.de/fileadmin/octavia_files/content_bilder/Hauptnavigation/SAP_NetWeaver/WebDynpro/Web_Dynpro_Part_II.pdf]

Priya

Former Member
0 Kudos

Hi imatari

Do the following steps:

1. Goto transaction SICF.

2. Goto path DEFAULT_HOST->SAP->BC->GUI->SAP->ITS

3. Create here a service ZCALENDER of type Independent Service.

4. Gave Description and make GUI Link as 'YES'.

5. Goto GUI Configuration Button and write

STYLE : DHTML

~TRANSACTION : SSC1

~DISCONNECTONCLOSE: 1

~WEBGUI_SIMPLE_TOOLBAR: 232

~SINGLETRANSACTION: 1

~WEBGUI : 1

6. Goto handler List and gave Handler name as 'CL_HTTP_EXT_ITS'

7. Save your service and now it will be in specified path as inactive.

8. Right click on the service name and activate it and from there you can test that service also.

9. Now in ur web Dynpro where u want to call that service write the following code


DATA lv_url TYPE string.
DATA lo_window_manager TYPE REF TO if_wd_window_manager.
DATA lo_api_component  TYPE REF TO if_wd_component.
DATA lo_window         TYPE REF TO if_wd_window.

CALL FUNCTION 'ZGET_SERVICE_URL'
EXPORTING
pservice_name = 'ZCALENDER'  
IMPORTING
purl          = lv_url.

lo_api_component  = wd_comp_controller->wd_get_api( ).
lo_window_manager = lo_api_component->get_window_manager( ).
lo_window         = lo_window_manager->create_external_window(
url           = lv_url
has_statusbar = abap_false
has_menubar   = abap_false
has_toolbar   = abap_false
has_location  = abap_false ).
lo_window->set_close_in_any_case( close_in_any_case = abap_false ).
lo_window->open( ).

Nawal Kishor Mittal

Edited by: Nawal Kishor Mittal on Dec 15, 2009 10:59 AM

Former Member
0 Kudos


*****FUNCTION MODULE 'ZGET_SERVICE_URL'*****

*"--------------------------------------------------------------------
*"*"Local Interface:
*"  IMPORTING
*"     REFERENCE(PSERVICE_NAME) TYPE  ICFNAME
*"  EXPORTING
*"     REFERENCE(PURL) TYPE  STRING
*"--------------------------------------------------------------------
DATA lv_url TYPE string.
DATA lv_error TYPE c.
DATA ls_icfs TYPE icfservice.
DATA out_host TYPE string.
DATA out_port TYPE string.
DATA out_protocol TYPE string.
*Get icfservice parameters for given service name and frm corrosponding parent id in icfhandler

SELECT  SINGLE *
INTO    CORRESPONDING FIELDS OF ls_icfs
FROM    icfservice AS a
JOIN    icfhandler AS b
ON      a~icfparguid EQ  b~icfparguid
AND     a~icf_name   EQ  b~icf_name
WHERE   a~icf_name   EQ  pservice_name .

*Construct URL for service
PERFORM construct_path(rsicftree) USING ls_icfs CHANGING lv_url lv_error.
IF lv_error IS INITIAL.
CONCATENATE lv_url ls_icfs-orig_name INTO purl.
ENDIF.

*Get host port and protocol for URL
CALL METHOD cl_http_server=>if_http_server~get_location
IMPORTING
host         = out_host
port         = out_port
out_protocol = out_protocol.
CONCATENATE out_protocol '://' out_host ':' out_port '/' INTO lv_url.

*Construct absolute URL by replacing default host with host port and parameters
REPLACE '/default_host/' WITH lv_url INTO purl.

********************************************

Now u will get the desired screen

Nawal Kishor Mittal