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

Similar Messages

Datas in Application Server file is not aligned

Dear all,
           I have created a program in SE38 and transfer the data to the Application server file using Transfer statement.
           The datas are transferd to Application Server file , but datas are not aligned.
           In out Application server file thd datas are displaied one after another..
           But i want to display the datas in single row.
          I have include program for your reference.
With Regards,
Baskaran.
report zsutest34 message-id ztcpo.
                DATA AND VARIABLES DECLARATION
data: begin of leban occurs 0.
        include structure eban.
data end of leban.
data new(1).
                SELECTION-SCREEN
selection-screen begin of block 001 with frame title text-001.
selection-screen skip 1.
parameters filename(128) default '
192.168.100.33\SAPMNT\IDS\dvebmgs00\data\santhosh.dat'. "\SYS\GLOBAL\testfile1.txt' LOWER CASE.
select-options ldat for sy-datum.
parameters lwerks type eban-werks.
selection-screen skip 1.
selection-screen end of block 001.
START-OF-SELECTION
select * from eban into leban where erdat in ldat and werks = lwerks.
append leban.
endselect.
sort leban by banfn bnfpo.
clear leban.
                REGARDING DATASET
perform value1.
form value1.
open dataset filename for output in text mode encoding default. " MESSAGE D_MSG_TEXT.
data: l_msg(255) type c.
    if sy-subrc ne 0.
      message i001.
      exit.
    endif.
concatenate 'The following file was opened:'(002) filename into l_msg separated by space.
        write: l_msg.
uline.
                TRANSFORMING TO APPLICATION SERVER FILE
loop at leban.
      transfer leban-banfn to filename.
      transfer leban-bnfpo to filename.
      transfer leban-ekgrp to filename.
      transfer leban-matnr to filename.
      transfer leban-werks to filename.
AT FIRST.
   WRITE: /10 TEXT-001, 30 TEXT-002, 45 TEXT-003, 50 TEXT-004, 65 TEXT-005.
   '            ITEMNO GRP MATERIAL           PLANT           QTY ' COLOR = 2.
ENDAT.
at new banfn.
    uline.
    write:/1 'PRNO-',leban-banfn.
    new = 'x'.
    uline.
    skip.
endat.
if new = 'x'.
    WRITE:/ '            ITEMNO GRP MATERIAL           PLANT           QTY ' color = 2.
    write:/14 leban-bnfpo, leban-ekgrp, leban-matnr, leban-werks, leban-menge.
    clear new.
else.
    write:/14 leban-bnfpo, leban-ekgrp, leban-matnr, leban-werks, leban-menge.
endif.
endloop.
                DATASET CLOSING
close dataset filename.
endform.

wa_string type string
loop at leban.
concatenate leban-banfn
          leban-bnfpo
          leban-ekgrp
             leban-matnr
             leban-werks into wa_string
             separated by CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB.
transfer wa_string to filename.
endloop.

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.

Application Server : File writes only 255 characters

Hi Friends,
I am trying to writes data to application server file .
My line size is 1100 charqacters.
When I use open dataset for output in text mode encoding default
and transfer contents to file.
I am only able to write contents upto 255 characters.
Whatever is beyond that I do not see it in AL11.
Is there a way to write more than 255 characters.
I tried CG3Y to view files but it also shows only 255 characters.
Please help.

Hi,
Just find the string length.
In 4.6C version there is a limit of 1500 characters i. e. U can transfer max of 1500 characters in a single transfer. For that we applied below solution. Check this it may help u.
l_len = strlen( p_data ).
DO.
    IF l_len LT 1500.
      TRANSFER p_data+l_offset(l_len) TO p_file.
      MOVE 0 TO l_len.
    ELSE.
      TRANSFER p_data+l_offset(1500) TO p_file.
      SUBTRACT 1500 FROM l_len.
      ADD 1500 TO l_offset.
    ENDIF.
    CHECK l_len EQ 0.
    EXIT.
ENDDO.
p_data has the content to be trasfered of around 6000 characters and the length is dynamic.
Also download the data using CG3Y with BIN to .txt file and see.
If problem is still there then paste ur code of OPEN DATASET, TRANSFER statements.
Try to open the file in TEXT MODE.
eg: OPEN DATASET l_file IN TEXT MODE.
Thanks,
Vinod.
Edited by: Vinod Reddy Vemuru on Jul 25, 2008 12:34 PM

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.

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.

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

Uploading the data from Application server to Database

Hi,
I am trying to upload tab delimited file from application server into database.
I have upload the file from presentation to application server by CGZ3
and i am able to see file in app server with #s and it appers in application server as
10140#A#E#120#abcd#
10146#M#P#300#a.b#
10152#M#P#200#dat123.com##
140#A#P#300#blicksat123.com#
10140#A#E#260#cust1at123.com##
And my notepad records looks like
10140     A     E     120     abcd
10146     M     P     300     a.b
10152     M     P     200     dat123.com
140     A     P     300      blicksat123.com
10140     A     E      260     cust1at123.com
I am using open data set and read dataset to read the file as shown below
DATA:
    l_htab      TYPE c,                " Horizontal tab
    l_line(100) TYPE c.                " Content in the file
l_htab = cl_abap_char_utilities=>horizontal_tab.
Open dataset
OPEN DATASET pp_afname FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc EQ 0.
    DO.
Read dataset
      READ DATASET pp_afname INTO l_line.
      IF sy-subrc EQ 0.
        SPLIT l_line AT l_htab
                   INTO fs_file-carrid
                        fs_file-autoind
                        fs_file-commtype
                        fs_file-resptime
                        fs_file-smtpaddr.
        APPEND fs_file TO pt_afile.
      ELSE.
        EXIT.
      ENDIF.                           " IF SY-SUBRC EQ 0.
    ENDDO.                             " DO.
    CLOSE DATASET pp_afname.
ELSE.
    MESSAGE 'Problem in opening the App.Server file' TYPE con_msgtyp_i.
ENDIF.                               " IF sy-subrc EQ 0.
Load the data to the database
PERFORM load_data_to_database USING t_afile.
When i am trying to upload it is taking me to dump and the errpr analysis is like
"The program attempted to interpret the value "26 0 " as a number, but
since the value contravenes the rules for correct number formats,
this was not possible."
Any suggestions on this
Regards
VEnk@

Hi,
Thats the line feed character. After reading the application server file, use this
data: lv_feed type c value CL_ABAP_CHAR_UTILITIES=>CR_LF.
loop at itab.
replace all occurrences of lv_feed in itab-field with space.
modify itab.
endloop.
Vikranth

Error while accessing the application server file

Hello,
When I try to load the data from CSV file to PSA , I am getting following error message
"Error while accessing the application server file"
"Errors in source system"
I gave the right file path
I am not sure about this error message.
Thanks,

Hi ram,
if you have more than one application server running in your BI system (see at transaction SM51) be aware that your infopackage will be executed on the right one. Each application server has its own file system and your job need to run on the server your file is stored on.
Also check if the os user of the SAP system itself (<sid>adm on Unix) has rights to read that file.
Bye
Frank

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

Application server file path vaidation

I have written the code for application server file path validation.
DATA : l_fname TYPE filename-fileintern." type c.
DATA : l_filpath TYPE filename-fileintern,
         l_filname(40) TYPE c.
PARAMETER : p_sucfil LIKE rfpdo-rfbifile OBLIGATORY. " rlgrap-filename
AT SELECTION-SCREEN ON p_sucfil.
l_fname = p_sucfil.
CALL FUNCTION 'FILE_GET_NAME'
EXPORTING
CLIENT                        = SY-MANDT
    logical_filename              = l_fname
   OPERATING_SYSTEM              = SY-OPSYS
PARAMETER_1                   = ' '
PARAMETER_2                   = ' '
PARAMETER_3                   = ' '
USE_PRESENTATION_SERVER       = ' '
   WITH_FILE_EXTENSION           = 'X'
USE_BUFFER                    = ' '
ELEMINATE_BLANKS              = 'X'
IMPORTING
EMERGENCY_FLAG                =
FILE_FORMAT                   =
   FILE_NAME                     = l_filpath
EXCEPTIONS
   FILE_NOT_FOUND                = 1
   OTHERS                        = 2
IF sy-subrc <> 0.
message 'Invalid file name' type 'E'.
ENDIF.
But always i will get Invalid file name.
Y is it so.
pls help me.

Praveen,
I have checked ur code and I found that if i give a logical file name from
tran. FILE under folder 'Logical file name definition, cross client' then ur code works. Pl. check.
Regards,
Joy.
DATA : l_fname TYPE filename-fileintern." type c.
DATA : l_filpath TYPE filename-fileintern,
l_filname(40) TYPE c.
PARAMETER : p_sucfil LIKE rfpdo-rfbifile OBLIGATORY. " rlgrap-filename
AT SELECTION-SCREEN ON p_sucfil.
l_fname = p_sucfil.
CALL FUNCTION 'FILE_GET_NAME'
EXPORTING
logical_filename = l_fname
operating_system = sy-opsys
with_file_extension = 'X'
IMPORTING
file_name = l_filpath
EXCEPTIONS
file_not_found = 1
OTHERS = 2
IF sy-subrc <> 0.
    MESSAGE 'Invalid file name' TYPE 'E'.
ENDIF.

Validate application server file

Hi,
I have to validate the application server file path on selection screen.
I am using following code :
form VALID_APP_FILEPATH   using    p_filpath TYPE FILENAME-FILEINTERN.
data : l_fname(60).
CALL FUNCTION 'FILE_GET_NAME'
    EXPORTING
      LOGICAL_FILENAME = p_filpath
      OPERATING_SYSTEM = SY-OPSYS
    IMPORTING
      FILE_NAME        = L_FNAME
    EXCEPTIONS
      FILE_NOT_FOUND   = 1
      OTHERS           = 2.
IF SY-SUBRC ne 0.
      MESSAGE 'Enter the valid file path'(e01) TYPE 'E'.
ENDIF.
endform.                    " VALID_APP_FILEPATH
but if i choose correct file path from F4 help also.
It displays error message.
Sy-subrc always equals 1.
Help me out

Hi,
I have implemented the code mentioned by you and am not having any problems even when I use F4 to get the fle name.
Pls recheck and get back if the error persists.
Reward if found helpful.
Warm Regards,
R Adarsh

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 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 :
<b>Do 1st point in BACKGROUND</b>
1. Read the data file from application server into an internal table using OPEN DATASET
<b>Do 2nd point in Foreground</b>
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

Load ODS data to Application server file

Similar Messages

Maybe you are looking for