Encrypt data of application server..

Hi,
Is there any way to encrypt data of application server using a .exe file from user desktop..

A similiar requirement was imposed by the German tax law (=> http://www.elster.de): encrypted transmission of (tax) data.
But: due to German export control regulations SAP is not permitted to ship cryptographic software with its products. However, once you've "promised" to comply with those regulations (=> you need to contact the SAP contract department via your local subsidiary) you will be enabled to download the SAPCRYPTOLIB (without any extra charges).
The SAPSECULIB (part of the shipment) allows only "harmless" cryptographic operations, such as digital signatures.
The SAPCRYPTOLIB (subject of export control, see above) offers a superset of functionality (compared with SAPSECULIB), particularly the capability to encrypt data.
The challenging part is the (public) key management. If you only have one single intended recipient (like in the ELSTER scnenario) the configuration is comparably simple. However if you have many potential recipients you need a more sophisticated PKI.
Regards, Wolfgang

Similar Messages

How to upload data from application server

Hi,
please help me out in uploading the data from application server which is a tab delemited file into an internal table.
Thanks
kumar

hi,
Use this sample code as an example.
table declaration
tables: mara.
*data declaration
data: begin of it_lfa1 occurs 0,
vendor like lfa1-lifnr,
land1 like lfa1-land1,
name1 like lfa1-name1,
ort01 like lfa1-ort01,
end of it_lfa1.
selection screen
selection-screen: begin of block b1 with frame.
parameters: p_file type rlgrap-filename obligatory.
selection-screen: end of block b1.
at selection screen
at selection-screen on value-request for p_file.
*& start-of-selection
start-of-selection.
perform transfer_file using p_file.
perform write.
*& Form transfer_file
text
-->P_P_FILE text
form transfer_file using p_p_file.
data: l_message(30) type c.
***opening dataset for reading
open dataset p_p_file for input in text mode encoding default message
l_message.
if sy-subrc ne 0.
message i001(zerr2) with p_p_file.
endif.
*******transferring data from file to app server.
do.
read dataset p_p_file into it_lfa1.
if sy-subrc = 0.
append it_lfa1.
clear it_lfa1.
else.
exit.
endif.
enddo.
*******closing dataset
close dataset p_p_file.
endform. " transfer_file
*& Form write
text
--> p1 text
<-- p2 text
form write .
loop at it_lfa1.
write:/ it_lfa1-vendor,
it_lfa1-land1,
it_lfa1-name1,
it_lfa1-ort01.
endloop.
endform. " write
Thanks
Aneesh.

How to get data from application server

hi experts,
when i load data from application server(.csv file) to ODS, data all goes one column.
in infopackage exterdata tabstrip i have given the below values.
escape sign is "
data separator is ,
separator for thousands is ,
my sample data:
"1010000";"A410";"03.2008";"113.5704531"
"1010000";"A410";"04.2008";"93.1146410"
any ideas..
Siri

Hi Siri,
You should look in the T.Code :RSCUSTV1
BW:Settings for Flat File
Thousand separator
Dec. point separator
Field separator
Field delimiter
Then you can use the Same Characterstics while creating the Flat file & also passing the same in Info Package
This will resolve your issue
Regards
Hari

How to bring the data from application server to presentation server

hi,
i have one problem,i have written the program which will open the files in the application server when we run the program in the background(sm37),the same data from application server i want to bring into presentation server in the format of (.csv),how to bring the data from application to presentation server can any body help me on this topic.folowing is the code .
*& Report ZPFA_HIER_LOAD
REPORT ZFPA_HIER_LOAD.
*---- Declaration of Oracle connectioN
DATA con_name LIKE dbcon-con_name VALUE 'COMSHARE'.
DATA: MFL1(9),MFL2(5),MFL3(9),MFL4(2),MFL5(8) TYPE c.
DATA : mfilename type string.
data: begin of matab1 occurs 0,
 MFL1(9) TYPE C,
 MFL2(5) TYPE C,
 MFL3(9) TYPE C,
 MFL4(2) TYPE C,
 MFL5(8) TYPE C ,
 end of matab1 .
data: setid(8) type c.
data: begin of source occurs 0,
 setid(8) type c,
 end of source.
*PARAMETERS : p_pfile LIKE filename-FILEEXTERN.
*PARAMETERS : m_bsenty(8). " type c obligatory.
*mfilename = P_PFILE.
EXEC SQL.
SET CONNECTION :con_name
ENDEXEC.
EXEC SQL.
CONNECT TO :con_name
ENDEXEC.
EXEC SQL PERFORMING get_source.
SELECT set_id FROM UNIT_SET INTO
:setid
ORDER BY SET_ID
ENDEXEC.
start-of-selection.
LOOP AT SOURCE.
REFRESH matab1. CLEAR matab1.
EXEC SQL PERFORMING evaluate.
SELECT TO_CHAR(MEM_ID),TRIM(TO_CHAR(MEM_PID)) FROM UNIT_TREE INTO :MFL1,
:MFL5
where set_id = :SOURCE-SETID ORDER BY MEM_ID
ENDEXEC.
if SOURCE-SETID = '80000000'.
 mfilename = '/tmp/aesorg'.
elseif SOURCE-SETID = '80000006'.
 mfilename = '/tmp/Consolidation_Manager'.
elseif SOURCE-SETID = '80000010'.
 mfilename = '/tmp/10org'.
elseif SOURCE-SETID = '80000012'.
 mfilename = '/tmp/20org'.
elseif SOURCE-SETID = '80000018'.
 mfilename = '/tmp/30org'.
elseif SOURCE-SETID = '80000025'.
 mfilename = '/tmp/40org'.
Endif.
mfilename = '/usr/test.dat'.
************************This was i tried***********************
open dataset mfilename for output in text mode encoding default." IN
*TEXT MODE ENCODING DEFAULT.
if sy-subrc <> 0.
exit.
endif.
close dataset mfilename.
CALL FUNCTION 'GUI_DOWNLOAD'
 EXPORTING
 FILENAME = MFILENAME
 FILETYPE = 'ASC'
 TABLES
 data_tab = matab1
 EXCEPTIONS
 file_write_error = 1
 invalid_type = 2
 no_authority = 3
 unknown_error = 4
 OTHERS = 10.
loop at matab1 .
transfer matab1 to mfilename.
endloop.
clear matab1.
ENDLOOP.
loop at matab1 .
transfer matab1 to mfilename.
endloop.
close dataset mfilename.
 MFL5 = '0'.
 CLEAR MFL5.
FORM evaluate.
if MFL5 = -1.
 MFL5 = ''.
ENDIF.
concatenate MFL1 ',' into MFL1.
concatenate MFL1 ',' into MFL3.
matab1-MFL1 = MFL1.
matab1-MFL2 = 'ZBUE,'.
matab1-MFL3 = MFL3.
matab1-MFL4 = ' ,'.
matab1-MFL5 = MFL5.
append matab1 .
CLEAR MFL1.
CLEAR MFL2.
CLEAR MFL3.
CLEAR MFL4.
CLEAR MFL5.
ENDFORM.
 "evaluate
*& Form GET_SOURCE
 text
FORM GET_SOURCE.
source-setid = setid.
append source.
clear source.
ENDFORM. "GET_SOURCE

Hi Rammohan,
You cannot use OPEN DATASET to transfer data from application server to presentation server.
You can do the following :
Do 1st point in BACKGROUND
1. Read the data file from application server into an internal table using OPEN DATASET
Do 2nd point in Foreground
2. Once you get the data into an internal table, then use FM GUI_DOWNLOAD to download it on presentation server
You cannot use the above 2 point together in Background because its not possible. Hence you need program it partially in background and partially in foreground.
Best regards,
Prashant

Download 350MB of data from Application Server to Presentation server

i want to Download 350MB(Around 2.5Million record of Table BSEG) of data from Application Server to Presentation server..
i have tried with the transaction CG3Y and program using open dataset,read dataset,close dataset,ws_download...but went in vain,,,ended with TIMEOUT ERROR..will OPEN DATASET 'path' FOR OUTPUT FILTER 'Compress' be helpful
..please help me ..its urgent..

you can do the FTP with Unix commands..
initially connect to the application server by using command
FTP <app server ip>,then it willl ask for username and password... after successful connection you can use the following commnads to transfer file
lcd <destination path name>(set the dest path)
cd <source path>(set the sorce path),
get <filename to be transfererd>( do the transfer)....
You can do same with ABAP code also, for this you need to use some function modules like..
FTP_CONNECT ( to establish the connection)
FTP_COMMAND ( to execute the commands like cd, lcd get,put)
finally FTP_DISCONNECT to close the open connection...
for further details refer standard program RSFTP002,RSFTP003....
reward points if helpful...

How to Down load Data in Application server into the Internal Table

hi freinds,
iam having a file in the application server.
now i need to send the data in the file to the internal table.
is there any Function Module?
i need with out using the OPEN DATA SET and CLOSE DATA SET Keywords.
is there any possible?
Regard's,
Ranjith.

Hi,
There is no other option for uploading the data from the application server to the internal table without using OPEN DATASET and CLOSE DATASET. Even if you find the FM internal logic in FM uses these keywords to read the data from Application server.

How can I download the data to Application Server and Network Drive

Hi Experts
I am having problem with download the data to Application Server and Network Drive in back ground. its working in foregorund but not in back ground.please suggest me . Thanks for advance.
Thanks & Regards
Raghava

Hi Experts
I am using like this
P_Back is a check box on the selection-screen.
it_fihrst_out-its internal table
sy-batch -Program is running in the background
IF sy-batch IS INITIAL.
    IF p_back = 'X'.
      OPEN DATASET file_01 FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
      IF sy-subrc = 0.
        LOOP AT it_fihrst_out.
          TRANSFER it_fihrst_out TO file_01.
        ENDLOOP.
      ENDIF.
      CLOSE DATASET file_01.
      CASE sy-subrc.
        WHEN 0.
          WRITE: / file_01, / 'successfully generated.'.
        WHEN OTHERS.
          WRITE: / file_01, 'Unexpected error occurred.'.
      ENDCASE.
    ELSE.
      CALL FUNCTION 'WS_DOWNLOAD'
        EXPORTING
          filename                = file_01
          filetype                = 'ASC'
        TABLES
          data_tab                = it_fihrst_out
        EXCEPTIONS
          file_open_error         = 1
          file_write_error        = 2
          invalid_filesize        = 3
          invalid_type            = 4
          no_batch                = 5
          unknown_error           = 6
          invalid_table_width     = 7
          gui_refuse_filetransfer = 8
          customer_error          = 9
          OTHERS                  = 10.
      CASE sy-subrc.
        WHEN 0.
          WRITE: / file_01, / 'successfully generated.'.
        WHEN 2.
          WRITE: / file_01, 'Output Error: File still open'.
        WHEN OTHERS.
          WRITE: / file_01, 'Unexpected error occurred.'.
      ENDCASE.
    ENDIF.
ELSE.
    LOOP AT it_fihrst_out.
      WRITE:/ it_fihrst_out.
    ENDLOOP.
ENDIF.
This is the code .

Error while loading data from application server

Hi all,
Am facing a problem while loading data from application server.
The error i get is ....
*" The argument ' Rental/Lease ' cannot be interpreted as a number while assigning character to application structure*.
'Rental/Lease' is a value for a character infoobject length 30. I checked for the sequence of fields in data source and the sequnce of values am receiving in application server and the sequence match.
when i copy these values into a CSV onto a desktop and load,load is successful.
Please let me know your views.
Thanks&Regards,
Praveen

It looks like the system is trying to convert Rental/Lease to a number format. Is the info object type CHAR or NUMC or ??? I would look there.
Also, make sure / is in RSKC.
Brian

Sending internal table data to application server as an XML file

Hi All,
I am trying to send the internal table data to application server which should be stored in XML format.
I am using the following code:
DATA:
 result TYPE xstring.
 CALL TRANSFORMATION id
 SOURCE tab = p_output-xsfdata
 RESULT XML result.
 OPEN DATASET l_xml_full_path FOR OUTPUT IN BINARY MODE.
 TRANSFER result TO l_xml_full_path.
 CLOSE DATASET l_xml_full_path.
And the content in the internal table is :
3C3F786D6C2076657273696F6E3D22312E30223F3E3C736620786D6C6E733D2275726E3A736
73796D206E616D653D22534653592D44415445223E30362F31302F323030393C2F73796D3E2
50617961626C653C6E65772D6C696E652F3E50617274206F6620746865204E616D653C6E657
.......and so on
With this a file is getting created on the application server, but the data is not correct. I am getting the data something like:
<?xml version="1.0" encoding="utf-8"?>
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0"><asx:values><TAB><item>
PD94bWwgdmVyc2lvbj0iMS4wIj8+PHNmIHhtbG5zPSJ1cm46c2FwLWNv
MDA6eHNmIj48c21hcnR4c2Y+PGhlYWRlcj48Z2VuZXJhbD48dmVyc2lvbj4xLjE0LjI8L3ZlcnNp
b24PGZvcm0WkJMX1NESU5WX0xfMzwvZm9ybT48bGFuZ3VhZ2U+RU48L2xhbmd1YWdlPjxkZXZp
Y2UUFJJTlRFUjwvZGV2aWNlPjxvdXRwdXQtZGV2aWNlPlNYU0Y8L291dHB1dC1kZXZpY2UPC9n
ZW5lcmFsPjxwYWdlIG5hbWU9IkZJUlNUIiBpZD0iMDAxIi8PC9oZWFkZXIPGRhdGEgeG1sOnNw
YWNlPSJwcmVzZXJ2ZSIgc3R5bGU9Ii9TTUIxMS9CTF9TRiI+PGdyYXBoaWNzIG5hbWU9IkNPTUxP
R08iIG9iam5hbWU9Ii9TTUI0MC9MRUFGIiBvYmplY3Q9IkdSQVBISUNTIiBpZD0iQk1BUCIgdHlw
ZT0iQkNPTCIgcGFnZT0iRklSU1QiIHBhZ2UtaWQ9IjAwMSIgcmVzb2x1dGlvbj0iMDEwMCIvPjx3
aW5kb3cgbmFtZT0iU0VOREVSIiBwYWdlPSJGSVJTVCIgcGFnZS1pZD0iMDAxIj48dGV4dCBuYW1l
PSJDT01BRERSIiBzdHlsZT0iL1NNQjExL0JMX1NGIiBvYmpuYW1lPSIvU01CMTEvQkxfU0VOREVS
IiBsYW5nPSJFTiIPHAgbmFtZT0iWlMiPkJhc2VsaW5lIENvbXBhbnk8L3APHAgbmFtZT0iWlMi
PjM0NzUgRGVlciBDcmVlazx0YWIvPlBob25lOjx0YWIvPisxICg2NTApIDg0OS00MDAwPC9wPjxw
IG5hbWU9IlpTIj5QYWxvIEFsdG8sIENBIDk0MzA0PHRhYi8+RmF4Ojx0YWIvPisxICg2NTApIDg0
OS00MjAwPC9wPjxwIG5hbWU9IlpTIj5VU0E8dGFiLz5JbnRlcm5ldDo8dGFiLz5odHRwOi8vd3d3
LnNhcC5jb208L3A+PC90ZXh0Pjwvd2luZG93Pjx3aW5kb3cgbmFtZT0iUEFHRSIgcGFnZT0iRklS
U1QiIHBhZ2UtaWQ9IjAwMSI+PHRleHQgbmFtZT0iUEFHRU5VTUJFUiIgc3R5bGU9Ii9TTUIxMS9C
TF9TRiIgbGFuZz0iRU4iPjxwIG5hbWU9IlROIj5QYWdlIDxzeW0gbmFtZT0iU0ZTWS1QQUdFIj4x
PC9zeW0IG9mIDxzeW0gbmFtZT0iU0ZTWS1KT0JQQUdFUyIvPjwvcD48cCBuYW1lPSJUTiIPA==</item>
<item>c3ltIG5hbWU9IlNGU1ktREFURSI+MDYvMTAvMjAwOTwvc3ltPiA8c
RSIMTQ6MDg6MDM8L3N5bT48L3APC90ZXh0Pjwvd2luZG93Pjx3aW5kb3cgbmFtZT0iTkFNRSIg
cGFnZT0iRklSU1QiIHBhZ2UtaWQ9IjAwMSI+PHRleHQgbmFtZT0iRk9STVVMQVJUSVRFTCIgc3R5
bGU9Ii9TTUIxMS9CTF9TRiIgbGFuZz0iRU4iPjxwIG5hbWU9IlROIj48Y2hyIG5hbWU9Ik1MIj48
c3ltIG5hbWU9IlRJVExFIj5JbnZvaWNlPC9zeW0PC9jaHIPC9wPjwvdGV4dD48L3dpbmRvdz48
d2luZG93IG5hbWU9IkJJTExUT1BBUlRZIiBwYWdlPSJGSVJTVCIgcGFnZS1pZD0iMDAxIj48dGV4
dCBuYW1lPSJXSU5ET1dfVEVYVCIgc3R5bGU9Ii9TTUIxMS9CTF9TRiIgbGFuZz0iRU4iPjxwIG5h
bWU9IlRIIj5CaWxsLVRvLVBhcnR5PC9wPjwvdGV4dD48YWRkcmVzcyBuYW1lPSJCSUxMQUREUkVT
UyIgYWRkcm51bWJlcj0iMDAwMDAyMjQyNyI+PHRleHQgbmFtZT0iQklMTEFERFJFU1MiIHN0eWxl
PSIvU01CMTEvQkxfU0YiIGxhbmc9IkVOIj48cCBuYW1lPSJUMiI+VGVjaCBJbmM8bmV3LWxpbmUv
Could anyone tell me the reason why am I getting the data in this way?
Thanks in advance,
Swapna.
Edited by: NagaSwapna Thota on Jun 10, 2009 5:44 PM

HI,
Use this FM SAP_CONVERT_TO_XML_FORMAT to convert the data to XML format and then upload the convert data from the internal table to Application server.

FM to upload the Internal table data into application server.

Hi,
Could you please give me Function module to Upload the Internal table data into Application server ie., in Tcode AL11.
I know for downloading the Application server file into itab is "SUBST_GET_FILE_LIST" FM and using open dtaa set we get the data.
Regards,
deepthi.

Hi Deepthi
Incase you are looking to upload data in the AL11 through a program , then you can make use of OPEN DATASET...CLOSE DATASET statements.
Here's the code snippet:
IF tb_alvdisplay[] IS INITIAL.
 MESSAGE e999(/dcsea/zais_msg) WITH text-e01.
ELSE.
 IF NOT cb_ufile IS INITIAL "Download to file
 AND sy-pagno = 0. "Only down page headers for first page
 PERFORM fm_concatenate_path_name USING p_path
 p_file
 CHANGING v_file.
*Open file for download.
 PERFORM fm_open_file USING v_file .
 ENDIF.
 LOOP AT tb_alvdisplay.
 IF NOT cb_ufile IS INITIAL.
*Passing the values of the respective headings to the structure.
 ws_rec-vend_no = tb_alvdisplay-vendno.
 ws_rec-vend_nm = tb_alvdisplay-vendnm.
 ws_rec-title = tb_alvdisplay-vendtl.
 ws_rec-add = tb_alvdisplay-add.
 ws_rec-city1 = tb_alvdisplay-city1.
 ws_rec-region = tb_alvdisplay-region.
 ws_rec-country = tb_alvdisplay-country.
 ws_rec-pobox = tb_alvdisplay-po.
 ws_rec-phone = tb_alvdisplay-telf1.
 ws_rec-extn = tb_alvdisplay-extn.
 ws_rec-fax = tb_alvdisplay-telfx.
 ws_rec-zterm = tb_alvdisplay-zterm.
 ws_rec-remark = tb_alvdisplay-remark.
 ws_rec-email = tb_alvdisplay-email.
*Passing the separator 'PIPE' to the structure.
 ws_rec-sep01 = co_sep.
 ws_rec-sep02 = co_sep.
 ws_rec-sep03 = co_sep.
 ws_rec-sep04 = co_sep.
 ws_rec-sep05 = co_sep.
 ws_rec-sep06 = co_sep.
 ws_rec-sep07 = co_sep.
 ws_rec-sep08 = co_sep.
 ws_rec-sep09 = co_sep.
 ws_rec-sep10 = co_sep.
 ws_rec-sep11 = co_sep.
 ws_rec-sep12 = co_sep.
 ws_rec-sep13 = co_sep.
 TRANSFER ws_rec TO v_file.
 ENDIF.
 AT LAST.
 IF NOT cb_ufile IS INITIAL.
*Closing the DATASET file.
 CLOSE DATASET v_file.
 IF sy-subrc <> 0.
*Failure Message.
 MESSAGE e999(/dcsea/zais_msg) WITH text-t04 text-t06.
 ELSE.
*Success message.
 MESSAGE s999(/dcsea/zais_msg) WITH text-t05.
 ENDIF.
 ENDIF.
 ENDAT.
 ENDLOOP.
ENDIF.
Also as Gautham suggested you can use tcode CG3Z or CG3Y incase you are looking to upload the data directly.
FInally, you can search SCN using the keywords, "Upload to AL11" and you'll get loads of results.
Hope this helps.
Harsh

Dump while downloading data from Application Server File in 4.6 system

Hi,
When we are trying to upload data from Application Server to internal table using dataset statements, it is resulting in a dump. System we are using is 4.6c.
When we faced similar kind of issue in ECC version, we have used the statement, Ignoring Conversion Errors.
Please let me know how to handle this situation in 4.6 System.
Thanks for your inputs.
Regards,
Phani

Hi All,
I am sorry. My question was wrong. It should be while uploading data from internal table to application server, if there are any special characters, it is going to dump.
I will let you know the dump details and code at the earliesst.
Sorry and Thanks again for your prompt response.
Regards,
Phani.

Uploading data to application server

Hi,
I am working on a report,where in I have to upload the data to application server.Here data is getting uploaded to application server ,but everything is getting clubbed.There is no space between each field.Can anyone send an example for this?
Regards,
Hema

Hi Hema,
To upload into application server with space, you have to store into another internal table from base inernal table.
suppose you have int_table is the table from where u are currently uploading data, then move into another internal table.
the new internal table will be with one field of length more than total lenght of all fields of base table.
move the data from base table to another internal table.
loop at int_table into wa_table
move wa_table to wa_table1 separated by space
append wa_table1 to int_table1
endloop
now upload from int_table1.
Hope it will work fine.
Regards
krishnendu

Transfer data to Application Server

Hi All,
I need to send data to Application Server. Each record should be length 504. But i am not able to send data more than 255 characters in length in a single line.
Is there any way to send more than 255 characters in a single record(single line) to the Application server.
Thanks
Arun

Application Server File will be stored upto the maximum length,
but we can not view the length more than 255 charecters
OPEN DATASET outfile_fcsr FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
LOOP AT t_zdlqran3.
TRANSFER t_zdlqran3 TO outfile_fcsr LENGTH 700.
ENDLOOP.
CLOSE DATASET outfile_fcsr.

Need Sample code to upload the data to Application Server

Hi ,
I need to upload the data to application server.
The output should be an XML file.
Can anybody send me sample code for this.
Reward points are assured.
Best Regards
Bhagat.

may be this code wil help ,first to downjload the XML fine -
1)
REPORT zhr_test2_tk.
TYPE-POOLS: ixml.
TYPES: BEGIN OF xml_line,
 data(256) TYPE x,
 END OF xml_line.
DATA: l_ixml TYPE REF TO if_ixml,
 l_streamfactory TYPE REF TO if_ixml_stream_factory,
 l_ostream TYPE REF TO if_ixml_ostream,
 l_renderer TYPE REF TO if_ixml_renderer,
 l_document TYPE REF TO if_ixml_document.
DATA: l_element_position TYPE REF TO if_ixml_element,
 l_element_title TYPE REF TO if_ixml_element,
 l_element_flight TYPE REF TO if_ixml_element,
 l_element_from TYPE REF TO if_ixml_element,
 l_element_to TYPE REF TO if_ixml_element,
 l_element_dummy TYPE REF TO if_ixml_element,
 l_value TYPE string.
DATA: l_xml_table TYPE TABLE OF xml_line,
 l_xml_size TYPE i,
 l_rc TYPE i.
DATA: lt_erec TYPE TABLE OF hrp5126,
 l_erec TYPE hrp5126.
DATA: date(10),
 time(4),
 filepath TYPE string.
CONSTANTS: filedir TYPE string VALUE 'C:\tmp\',
 filename TYPE string VALUE 'ZHR_test'.
START-OF-SELECTION.
fill internal table
SELECT * FROM hrp5126 INTO TABLE lt_erec.
Start filling xml DOM object from internal table lt_erec.
LOOP AT lt_erec INTO l_erec.
*Create the root node 'position'
 IF sy-tabix EQ 1.
 create an ixml factory
 l_ixml = cl_ixml=>create( ).
 create Document Object Model
 l_document = l_ixml->create_document( ).
 Fill root node with value 'position'
 l_element_position = l_document->create_simple_element(
 name = 'position'
 parent = l_document ).
 ENDIF.
 IF sy-tabix GT 1.
 create element jobtitle as child of position
 l_value = l_erec-jobtitle.
 l_element_title = l_document->create_simple_element(
 name = 'job_title'
 parent = l_element_position
 value = l_value ).
 l_value = l_erec-empl_start_date.
 l_element_dummy = l_document->create_simple_element(
 name = 'StartDate'
 parent = l_element_title
 value = l_value ).
 l_value = l_erec-empl_end_date.
 l_element_dummy = l_document->create_simple_element(
 name = 'EndDate'
 parent = l_element_title
 value = l_value ).
 ENDIF.
ENDLOOP.
IF sy-subrc NE 0.
 WRITE: 'No data in table hrp5125'.
ENDIF.
create a stream factory
l_streamfactory = l_ixml->create_stream_factory( ).
connect internal XML table to streamfactory
l_ostream = l_streamfactory->create_ostream_itable(
 table = l_xml_table ).
render the document
l_renderer = l_ixml->create_renderer( ostream = l_ostream
 document = l_document ).
l_rc = l_renderer->render( ).
Get time and date
WRITE sy-uzeit2(2) TO time2(2).
WRITE sy-uzeit0(2) TO time0(2).
WRITE sy-datum4(2) TO date0(2).
WRITE sy-datum6(2) TO date2(2).
WRITE sy-datum0(4) TO date4(4).
*Build filename with date and time reference
CONCATENATE filedir filename date time '.xml' INTO filepath.
* This is the code I hope to modify in order to save the xml structure on the application server, with a specified filepath.
 OPEN DATASET filepath FOR OUTPUT IN BINARY MODE.
LOOP AT lt_erec into l_erec.
 TRANSFER l_erec TO filepath.
ENDLOOP.
CLOSE DATASET filepath.
save XML document
l_xml_size = l_ostream->get_num_written_raw( ).
*This is the code for download to local computer
CALL METHOD cl_gui_frontend_services=>gui_download
 EXPORTING
 bin_filesize = l_xml_size
 filename = filepath
 filetype = 'BIN'
 CHANGING
 data_tab = l_xml_table
 EXCEPTIONS
 file_write_error = 1
 no_batch = 2
 gui_refuse_filetransfer = 3
 invalid_type = 4
 no_authority = 5
 unknown_error = 6
 header_not_allowed = 7
 separator_not_allowed = 8
 filesize_not_allowed = 9
 header_too_long = 10
 dp_error_create = 11
 dp_error_send = 12
 dp_error_write = 13
 unknown_dp_error = 14
 access_denied = 15
 dp_out_of_memory = 16
 disk_full = 17
 dp_timeout = 18
 file_not_found = 19
 dataprovider_exception = 20
 control_flush_error = 21
 OTHERS = 22.
IF sy-subrc <> 0.
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
2) uploading tht PC XML file to APPliaction server -
DATA rec like QISRS_XML_LINE.
OPEN DATASET filepath FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
LOOP AT l_xml_table into rec.
TRANSFER rec TO filepath.
ENDLOOP.
CLOSE DATASET filepath.

Load ODS data to Application server file

Hi,
I need to upload ODS data to application server.
I can not use Open Hub service. I need to do the upload process in background as there is around 5 million data in ODS. Can anybody please guide
deep

Hi,
You can use Analytic Process Designer for your requirement.
Use 'RSANWB'.
It will allow you to select the source as DSO and also you can choose target as some logical path where you can define Application server path as Physical path. Use "FILE'
Also you can schedule the process in background.
Further you can refere to :
http://help.sap.com/saphelp_nw04/helpdata/en/49/7e960481916448b20134d471d36a6b/frameset.htm
Regards,
anil

Encrypt data of application server..

Similar Messages

Maybe you are looking for