Application Development Blog Posts
Learn and share on deeper, cross technology development topics such as integration and connectivity, automation, cloud extensibility, developing at scale, and security.
cancel
Showing results for 
Search instead for 
Did you mean: 
Former Member

In this example, I will show how to use the classes in package SWEBDAV_CLIENT to write document to a webdav server. The targeted webdav server is a Livelink server.

 

First, open a connection using the class cl_swdcl_connection static method create_by_user:

      lo_connection = cl_swdcl_connection=>create_by_user(
        i_server     
= p_host
        i_user       
= p_unam
        i_password   
= p_pwd
     
).

You can also use static method create_by_destination if you prefer to use a HTTP connection stored in SM59, which is much more secure.

 

After the connection is created, use the class cl_swdcl_client to get a client instance to webdav server:

 

      lo_client = cl_swdcl_client=>get_instance( lo_connection ).

 

The verb to write documents on a webdav server is PUT. It is an operation on the namespace. For that, I'll use class cl_swdcl_namespace_client, it is bound to the webdav client instance:

     lo_namespace = cl_swdcl_namespace_client=>create( lo_client ).

I then use method WRITE_CONTENT to write the document in the Webdav server:

      lo_namespace->write_content(
          i_url           
= p_url
          i_lock_token    
= 'TEST'
          i_content_type  
= 'text/plain'
          i_content       
= l_content ).

 

Mandatory parameters are URL, content type and content. The content must be a Xstring value. Content converter to Xstring are mandatory before using the method (eg function module TREX_TEXT_TO_XSTRING). The lock is optional and only intended if you want to reserve a document. The content type is the mime type.

Parameters for the report

After execution of the report, the result on the Livelink server:


Content of the file:

Full source code of the report for this example:

REPORT  ztest_webdav.


PARAMETERS:
p_host
TYPE string DEFAULT 'http://doclink' LOWER CASE ,
p_url 
TYPE string DEFAULT '/livelinkdav/nodes/31824299/Hello%20Word.txt' LOWER CASE,
p_unam
TYPE string DEFAULT '<Webdav user name>' ,
p_pwd 
TYPE string LOWER CASE.


DATA:
  lo_connection
TYPE REF TO if_swdcl_connection,
  lo_client    
TYPE REF TO if_swdcl_client,
  lo_namespace 
TYPE REF TO if_swdcl_namespace_client,
  l_content    
TYPE xstring,
  lo_error     
TYPE REF TO cx_root.


START-OF-SELECTION.
 
TRY.
      lo_connection
= cl_swdcl_connection=>create_by_user(
        i_server     
= p_host
        i_user       
= p_unam
        i_password   
= p_pwd

     
).


      lo_client
= cl_swdcl_client=>get_instance( lo_connection ).

      lo_namespace
= cl_swdcl_namespace_client=>create( lo_client ).

     
CALL FUNCTION 'TREX_TEXT_TO_XSTRING'
       
EXPORTING
         
text   = 'Hello World'
       
IMPORTING
         
buffer = l_content
       
EXCEPTIONS
         
OTHERS = 0.

      lo_namespace
->write_content(
          i_url           
= p_url
          i_lock_token    
= 'TEST'
          i_content_type  
= 'text/plain'
          i_content       
= l_content ).
   
CATCH cx_root INTO lo_error.
     
MESSAGE lo_error TYPE 'E'.
 
ENDTRY.