Sending Files from a server to a client (PrintWriter)

I've only been using Java for a few months and this may be in the wrong forum (sorry if it is)... but I've run into a bit of a problem.
I've recently been asked to create Excel files using database records and output a file (HTML table) to a client's machine that is logged onto the web server. The thing is that we don't want to create (temporary) server files and just want to send the data straight to the client. For this, someone suggested using the HTTP Response PrintWriter. I'm having a couple of problems getting things working correctly:
1) IOException: After committing the output stream to the client (eg pWriter.flush();) and trying to forward the user to a new page I'm getting an IOException saying that the "response cannot be forwarded once it is already committed". This is as per the Java 1.4 documentation, so OK... but is there any way around it? i.e. after sending the data to the client can I automatically send them to another page or refresh the current one?
2) Loss of data: If the user does not save the file more or less as soon as the save/open dialogue appears on the screen, a lot of the data is being lost, with just ~150 out of 3000 records being sent to the client in the file. Any ideas why this might be? Presumably writing the data to a temporary file on the server then "copying" this over the PrintWriter to the client would solve this problem... but as stated above, we don't really want to be creating files in the clustered server environment (for some reason they don't usually seem to be getting deleted!?!)
Bit of Background Info: The records are being read from the database at 500 records per time, stored in an ArrayList in the pageFlow. The ArrayList is then "iterated" through and the Excel/HTML table row is created for each record in turn (using the pWriter.println() method). The PrintWriter is flushed and closed after the entire Excel file has been written to the PrintWriter. I then try and forward the user to the same page (i.e. refresh the page) so that the buttons are re-activated and some on-screen information is updated (this leads to problem (1)).
Also, I'm currently setting the Response Header property "Content-Disposition" to tell the client that the PrintWriter is sending an attachment (thus making the save/open dialogue box appear and a default filename being used), but I've noticed that this property is supposed to have been Depreciated some time ago... can anyone tell me what I should be using instead? The websites I've looked at don't seem to give me this info (maybe I'm just missing the obvious!?!)
Hope that all makes sense, any help appreciated!

Have any sample code?

Similar Messages

Send Message from RMI Server to RMI Client

Hi,
I want to send message to RMI Client throw RMI server to refresh client's data object as it is database application. I guessed i could implement an interface on client side and i can register my client to the server by sending object to the server. It is not helping it is throwing NULL Pointer exception on server side and it is not refreshing. It seems like it is not passing by reference.
Can any one please guide me with how to send messages to clinet. What is the best way to do it?
-A Thakkar.

You need to elaborate the object model of your client. When you run into this situiation where you might have to sublass two different objects, then you should take a look at breaking the client itself into more than one object.
Let me put it another way: A JFrame is a GUI object; why would you ever try to callback a GUI object? Can't you create - say - a CallbackHandler, and let it initiate further action in the client?

File Transfer From Unix server to Windows Client System Using WebUtil

Hi all,
I want to Transfer a File from Unix Server to Window Client System using Webutil. But below mention code is not working.
DECLARE
     V_Server_Path VARCHAR2(500) := Null;
     V_Client_Path VARCHAR2(500) := Null;
BEGIN
     V_Server_Path := '/proj/oraapps/viper/dev/reports/cache/Saveauftr.txt';
     V_Client_Path := 'C:\Migration\EU_Applications\Lima\OAS_WorkArea\Client\Saveauftr.txt';
     IF WebUtil_File_Transfer.Is_AS_Readable(V_Server_Path) THEN
     IF WebUtil_File_Transfer.AS_To_Client(V_Client_Path,V_Server_Path) THEN
          Message('Downloading the File ..... .... ... .. .');
          Message('Downloading Was Successfull ...');
          Message('File Transfer from Server Was Successfull ...');
     END IF;
END IF;
END;
Can anyone suggest me,Why the above code is not working and what to do for solve the Problem.
Regards
Gany

Hello,
You have more chances to get an answer in the Oracle Forms OTN Forum :
Forms
Regards

Download text file from application server to client server.

Hi all,
I am facing a format issue while downloading text file from application server to the client machine.
The issue is that, say I have 6 to 10 lines in my text file in application server. but when i store it on the hard drive,
it shoes all the data in a single line. Where as i need to download data in same format as in application server.
Awaiting for your responses.
Regards,
Jose

Hi,
If we want to upload file data from the application server to the internal table, there is no function module or class static method which we can use, we must wirte the code by ourselves.
1. For the file data which has no seperator between field columns.
PARAMETERS p_file TYPE dxfile-filename.
START-OF-SELECTION.
OPEN DATASET p_file IN TEXT MODE ENCODING DEFAULT FOR INPUT.
DO.
    READ DATASET p_file INTO gds_data.
    IF sy-subrc <> 0.
      EXIT.
    ENDIF.
    APPEND gds_data TO gdt_data.
ENDDO.
CLOSE DATASET p_file.2. For the file data which has tab separator between field columns.
DATA: gds_field_split type gts_data.
FIELD-SYMBOLS: <fs_field> TYPE gts_data.
PARAMETERS p_file TYPE dxfile-filename.
START-OF-SELECTION.
OPEN DATASET prf_file IN TEXT MODE ENCODING DEFAULT FOR INPUT.
DO.
    READ DATASET p_file INTO gds_field.
    SPLIT gds_field AT cl_abap_char_utilities=>horizontal_tab
         INTO TABLE gdt_field_split.
   LOOP AT gdt_field_split into gds_field_split.
       gdf_index = gdf_index + 1.
       ASSIGN COMPONENT gdf_index OF STRUCTURE
             gds_data to <fs_field>.
      IF sy-subrc = 0.
          <fs_field> = gds_field_split.
      ENDIF.
   ENDLOOP.
    APPEND gds_data TO gdt_data.
ENDDO.
CLOSE DATASET p_file.
Thanks & regards,
ShreeMohan

How to delete file from application server(Unix)

Hi All,
Using the below code downloading a file from application server(Unix) to client machine. I want to delete the file from application server once it is downloaded to client
We work on Forms 11.1.1.4.0 and Oracle DB 10g. Client machine are Windows 7.
BEGIN
IF webutil_file_transfer.AS_to_Client
(clientFile => Name_In('global.g_file_name')
,serverFile => ls_AppServer_Loc)THEN
message('Data exported Successfully');
ELSE
message('File download from Application Server failed');
END IF;
EXCEPTION
WHEN OTHERS THEN
message('File download failed: '||SUBSTR(sqlerrm,1,200));
END;
I have search for solution on OTN. Few suggested to use HOST.
Can any one help me how to use Host() built_in to delete the file.
Thanks,
Maddy

Can any one help me how to use Host() built_in to delete the file.
Host('/bin/rm <complete file path>');

Transfer a file from App Server to a FTP site.

Hi, Abapers.
I need your help. Probably, this topic has already been posted in a similar way, but we need an answer to solve our problem.
We have to sent a PDF file from a directory of our app server (AIX) to a FTP directory... which would the FM sequence we should use to goal it?
Best Regards.

Hi Santiago,
create fm to send file from APP server to FTP site.
if you want to Post file from desktop to Appl use Transaction - CG3Y
if you want to Post file from Appl to Desktop use Transaction - CG3Z
copy the code below....
* Author: Prabhudas                            Date: 02/21/2006 *
* Name: Z_FTP_FILE_TO_SERVER                                          *
* Title: FTP File on R/3 Application Server to External Server        *
*"*"Local Interface:
*" IMPORTING
*"     REFERENCE(DEST_HOST) TYPE C
*"     REFERENCE(DEST_USER) TYPE C
*"     REFERENCE(DEST_PASSWORD) TYPE C
*"     REFERENCE(DEST_PATH) TYPE C
*"     REFERENCE(SOURCE_PATH) TYPE C
*"     REFERENCE(FILE) TYPE C
*"     REFERENCE(BINARY) TYPE CHAR1 OPTIONAL
*"     REFERENCE(REMOVE_FILE) TYPE CHAR1 OPTIONAL
*" TABLES
*"      FTP_SESSION STRUCTURE ZMSG_TEXT OPTIONAL
*" EXCEPTIONS
*"      CANNOT_CONNECT
*"      SOURCE_PATH_UNKNOWN
*"      DEST_PATH_UNKNOWN
*"      TRANSFER_FAILED
*"      COMMAND_FAILED
DATA: w_password     TYPE zftppassword,
        w_length       TYPE i,
        w_key          TYPE i                  VALUE 26101957,
        w_handle       TYPE i,
        w_command(500) TYPE c.
REFRESH ftp_session.
* Scramble password (new Unicode-compliant routine)
w_length = STRLEN( dest_password ).
CALL FUNCTION 'HTTP_SCRAMBLE'
    EXPORTING
      SOURCE      = dest_password
      sourcelen   = w_length
      key         = w_key
    IMPORTING
      destination = w_password.
* Connect to FTP destination (DEST_HOST)
CALL FUNCTION 'FTP_CONNECT'
    EXPORTING
      user            = dest_user
      password        = w_password
      host            = dest_host
      rfc_destination = 'SAPFTPA'
    IMPORTING
      handle          = w_handle
    EXCEPTIONS
      not_connected   = 1
      OTHERS          = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
      WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
      RAISING cannot_connect.
ENDIF.
* Optionally, specify binary file transfer
IF binary = 'X'.
    w_command = 'bin'.
    CALL FUNCTION 'FTP_COMMAND'
      EXPORTING
        handle        = w_handle
        command       = w_command
      TABLES
        data          = ftp_session
      EXCEPTIONS
        command_error = 1
        tcpip_error   = 2.
    IF sy-subrc <> 0.
      CONCATENATE 'FTP command failed:' w_command
        INTO w_command SEPARATED BY space.
      MESSAGE ID 'ZW' TYPE 'E' NUMBER '042'
          WITH w_command
          RAISING command_failed.
    ENDIF.
ENDIF.
* Navigate to source directory
CONCATENATE 'lcd' source_path INTO w_command SEPARATED BY space.
CALL FUNCTION 'FTP_COMMAND'
    EXPORTING
      handle        = w_handle
      command       = w_command
    TABLES
      data          = ftp_session
    EXCEPTIONS
      command_error = 1
      tcpip_error   = 2.
IF sy-subrc <> 0.
    CONCATENATE 'FTP command failed:' w_command
      INTO w_command SEPARATED BY space.
    MESSAGE ID 'ZW' TYPE 'E' NUMBER '042'
        WITH w_command
        RAISING source_path_unknown.
ENDIF.
* Navigate to destination directory
CONCATENATE 'cd' dest_path INTO w_command SEPARATED BY space.
CALL FUNCTION 'FTP_COMMAND'
    EXPORTING
      handle        = w_handle
      command       = w_command
    TABLES
      data          = ftp_session
    EXCEPTIONS
      command_error = 1
      tcpip_error   = 2.
IF sy-subrc <> 0.
    CONCATENATE 'FTP command failed:' w_command
      INTO w_command SEPARATED BY space.
    MESSAGE ID 'ZW' TYPE 'E' NUMBER '042'
        WITH w_command
        RAISING dest_path_unknown.
ENDIF.
* Transfer file
CONCATENATE 'put' file INTO w_command SEPARATED BY space.
CALL FUNCTION 'FTP_COMMAND'
    EXPORTING
      handle        = w_handle
      command       = w_command
    TABLES
      data          = ftp_session
    EXCEPTIONS
      command_error = 1
      tcpip_error   = 2.
IF sy-subrc <> 0.
    CONCATENATE 'FTP command failed:' w_command
      INTO w_command SEPARATED BY space.
    MESSAGE ID 'ZW' TYPE 'E' NUMBER '042'
        WITH w_command
        RAISING transfer_failed.
ENDIF.
* Disconnect from destination host
CALL FUNCTION 'FTP_DISCONNECT'
    EXPORTING
      handle = w_handle.
* Optionally, remove file from source directory
IF remove_file = 'X'.
   CONCATENATE source_path '/' file INTO w_command.
CONCATENATE 'rm' w_command INTO w_command SEPARATED BY space.
   OPEN DATASET '/dev/null' FOR OUTPUT FILTER w_command.
   CLOSE DATASET '/dev/null'.
ENDIF.
Regards,
Prabhudas

Sending EMail "Text-File" from Application Server!

Hi Experts,
how can I sending a Text-File from Application Server via Email?
Is there existing a Function Modul?
With Kind regards
Ersin
Moderator message: sending emails = FAQ, please search before posting.
Edited by: Thomas Zloch on Nov 25, 2010 4:23 PM

STF (Search the forum)! This type of question has been asked...and answered....many times.

[HELP] Send email with attachment files from application server

How can i send email to users with pdf/xls attachment files through job with pl/sql , but the files are on application server.
I've tried using UTL_MAIL but it's not working, cause the file & DIRectory setting should be inside of database server. Should I copy the files from report server to database file system or any other techniques so there's no need to use the physical files?
Please help!
Thank you

Hi,
Thanks for your help, hoek & alvinder...
I've tried the java send mail suggest by alvinder, and i got an error if i fill the Sender parameter with AutoMail :
status:1 javax.mail.SendFailedException: Sending failed;
nested exception is:
javax.mail.MessagingException: 553 5.5.4 <AutoMail>... Domain name required
Then i changed the Sender with valid email address :
status:1 javax.mail.SendFailedException: Sending failed;
nested exception is:
javax.mail.MessagingException: 501 5.1.8 Domain of sender address [email protected] does not exist
What could be wrong with this? Please help me... since i dont understand java programming :)
I 'm still trying to find out
Thank you very much

How can open a html, pdf files from the server (c:\foldername\filename)

Hi all,
I am developing an application. in this app i have to implement RMI.
My problem is this, How can a client open a files from the server.
all the html, pdf files are stored in the server's directory like C:\audit\filename.
There is a folder on the server's C directory which contains all the html , pdf files.
please tell me how can a client open a file from the server using RMI.
Please send me the solution as soon as possible.
Thanks & Regards
Bhavishya

That's doing it the hard way. Why not use HTTP or FTP?

How to download a file from a server

Hi,
I have a question with a general design implementation. Hope anyone more skilled than me helps me.
I want to do an application based on an android client and a java server. Local wifi transmission, no 3G.
Basically, the client must connect to the server and request a file to download using a code.
How can I do that?
Things I know:
* I must create a background thread in the client to create a file in the SD card and update a progress bar using a Handler to communicate with the UI thread.
* The server must be multithread and non-blocking.
* The file is a binary file like a mp3 audio. So the server has to:
1. Send information about the file: name and total length.
2. Open the file, read and send bytes while it does not reach the end.
* The client has to:
1. Receive the information about the file and create an empty file.
2. Read bytes and dump them into the empty file. Update progress bar.
3. When all bytes are recieved close the file.
I have knowledge implementing a client and server in C (very awful) but I am beginning with a real client-server application done in java.
Questions:
* How can I download a binary file like an mp3 from a server to a client?
* Where I have to put my server application? I supose that I must create a jar, save it on a folder and execute it at PC start-up, right?
Thanks!
PD: I know this is not an android forum but I only need help with the download process.
Edited by: user13425637 on 06-dic-2010 11:08

Questions:
* How can I download a binary file like an mp3 from a server to a client?There are a ton of examples on the internet on how to download files. If you are having a problem, please post your code.
>
* Where I have to put my server application? I supose that I must create a jar, save it on a folder and execute it at PC start-up, right?Your server application will exist on a server and will run the application. hence the reason for the server. The best best for you is to read some online tutorials on client/server and how it works.

Can we send files from iphone to another phone like samsung

can we send files from iphone to another phone like samsung?

Actually we are not mapping machine name something in webutil.cfg file. We just need to specify the path that from where we will transfer the file from application server to client. And the time time of transfer the path you will
choose for client webutil will transfer the file on that location automatically.
-Ammad

File from application server-- Email ?

Hi,
I need to pickup a file from application server and Email the same to the intended receipents through ABAP program
For that i had used the following code:
REPORT ZEMAIL_APP_SER_FAIL.
DATA :is_doc_chng        TYPE sodocchgi1,
      it_objtxt          TYPE STANDARD TABLE OF solisti1,
      is_objtxt          TYPE solisti1,
      it_objpack         TYPE STANDARD TABLE OF sopcklsti1,
      is_objpack         TYPE sopcklsti1,
      it_objbin          TYPE STANDARD TABLE OF solisti1,
      is_objbin          TYPE solisti1,
      it_reclist         TYPE STANDARD TABLE OF somlreci1,
      is_reclist         TYPE somlreci1,
      w_lines_tx         TYPE i.
** Create Message Body
**   Title and Description
*is_doc_chng-obj_name = 'MAIL'.
is_doc_chng-obj_descr = 'Auto genareted Mail from Application server'.
** main text
is_objtxt-line = 'This is an automatically generated mail. Please do not reply to it.'(028).
APPEND is_objtxt TO it_objtxt.
is_objtxt-line = space.
APPEND is_objtxt TO it_objtxt.
*   write packing list (main)
DESCRIBE TABLE it_objtxt LINES w_lines_tx.
READ     TABLE it_objtxt INTO is_objtxt INDEX w_lines_tx.
is_doc_chng-doc_size = ( w_lines_tx - 1 ) * 255 + STRLEN( is_objtxt ).
CLEAR is_objpack-transf_bin.
is_objpack-head_start = 1.
is_objpack-head_num   = 0.
is_objpack-body_start = 1.
is_objpack-body_num   = w_lines_tx.
is_objpack-doc_type   = 'CVS'.
is_objpack-OBJ_NAME   = 'GIND_EXP'.
is_objpack-Obj_langu = 'E'.
APPEND is_objpack TO it_objpack.
is_reclist-receiver = 'XXX'@'YYY'.COM'.
is_reclist-rec_type = 'A'.
Break-point.
*is_reclist-REC_ID   = 'XXX@YYY'.COM'.
APPEND is_reclist TO it_reclist.
CLEAR is_reclist.
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
EXPORTING
   document_data              = is_doc_chng
   put_in_outbox              = 'X'
   commit_work                = 'X'
TABLES
   packing_list               = it_objpack
   contents_txt               = it_objtxt
   receivers                  = it_reclist
EXCEPTIONS
   too_many_receivers         = 1
   document_not_sent          = 2
   document_type_not_exist    = 3
   operation_no_authorization = 4
   parameter_error            = 5
   x_error                    = 6
   enqueue_error              = 7
   OTHERS                     = 8.
IF sy-subrc NE 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
         WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
when i execute this program:
I get the following error msg:
Activation setting not yet maintained
May i know what is the problem?

If you are sending an email, the receiver type should be U (internet mail address type). From your code it appears that you have input it as 'A'. I am not sure if the error message is related to this. Have you checked in transaction SOST, whether an email has been triggered from your program? At what point of execution is this error message triggered?

File from application server

Hi Guys,
I want to pick file from application server as an attachment and send as mail.
Thanks

*This program will allowed you to send email with attachment.
First, specify the attachment file from your local hardisk and execute.
Next, specify the sender email address and click the send button.
report z_mail.
data method1 like sy-ucomm.
data g_user like soudnamei1.
data g_user_data like soudatai1.
data g_owner like soud-usrnam.
data g_receipients like soos1 occurs 0 with header line.
data g_document like sood4 .
data g_header like sood2.
data g_folmam like sofm2.
data g_objcnt like soli occurs 0 with header line.
data g_objhead like soli occurs 0 with header line.
data g_objpara like selc occurs 0 with header line.
data g_objparb like soop1 occurs 0 with header line.
data g_attachments like sood5 occurs 0 with header line.
data g_references like soxrl occurs 0 with header line.
data g_authority like sofa-usracc.
data g_ref_document like sood4.
data g_new_parent like soodk.
data: begin of g_files occurs 10 ,
text(4096) type c,
end of g_files.
data : fold_number(12) type c,
fold_yr(2) type c,
fold_type(3) type c.
parameters ws_file(4096) type c default 'c:\debugger.txt'.
Can me any file fromyour pc ....either xls or word or ppt etc ...
g_user-sapname = sy-uname.
call function 'SO_USER_READ_API1'
exporting
user = g_user
PREPARE_FOR_FOLDER_ACCESS = ' '
importing
user_data = g_user_data
EXCEPTIONS
USER_NOT_EXIST = 1
PARAMETER_ERROR = 2
X_ERROR = 3
OTHERS = 4
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
fold_type = g_user_data-outboxfol+0(3).
fold_yr = g_user_data-outboxfol+3(2).
fold_number = g_user_data-outboxfol+5(12).
clear g_files.
refresh : g_objcnt,
g_objhead,
g_objpara,
g_objparb,
g_receipients,
g_attachments,
g_references,
g_files.
method1 = 'SAVE'.
g_document-foltp = fold_type.
g_document-folyr = fold_yr.
g_document-folno = fold_number.
g_document-objtp = g_user_data-object_typ.
*g_document-OBJYR = '27'.
*g_document-OBJNO = '000000002365'.
*g_document-OBJNAM = 'MESSAGE'.
g_document-objdes = 'sap-img.com testing by program'.
g_document-folrg = 'O'.
*g_document-okcode = 'CHNG'.
g_document-objlen = '0'.
g_document-file_ext = 'TXT'.
g_header-objdes = 'sap-img.com testing by program'.
g_header-file_ext = 'TXT'.
call function 'SO_DOCUMENT_REPOSITORY_MANAGER'
exporting
method = method1
office_user = sy-uname
ref_document = g_ref_document
new_parent = g_new_parent
importing
authority = g_authority
tables
objcont = g_objcnt
objhead = g_objhead
objpara = g_objpara
objparb = g_objparb
recipients = g_receipients
attachments = g_attachments
references = g_references
files = g_files
changing
document = g_document
header_data = g_header
FOLMEM_DATA =
RECEIVE_DATA =
File from the pc to send...
method1 = 'ATTCREATEFROMPC'.
g_files-text = ws_file.
append g_files.
call function 'SO_DOCUMENT_REPOSITORY_MANAGER'
exporting
method = method1
office_user = g_owner
ref_document = g_ref_document
new_parent = g_new_parent
importing
authority = g_authority
tables
objcont = g_objcnt
objhead = g_objhead
objpara = g_objpara
objparb = g_objparb
recipients = g_receipients
attachments = g_attachments
references = g_references
files = g_files
changing
document = g_document
header_data = g_header
method1 = 'SEND'.
g_receipients-recnam = 'MK085'.
g_receipients-recesc = 'B'.
g_receipients-sndex = 'X'.
append g_receipients.
call function 'SO_DOCUMENT_REPOSITORY_MANAGER'
exporting
method = method1
office_user = g_owner
ref_document = g_ref_document
new_parent = g_new_parent
importing
authority = g_authority
tables
objcont = g_objcnt
objhead = g_objhead
objpara = g_objpara
objparb = g_objparb
recipients = g_receipients
attachments = g_attachments
references = g_references
files = g_files
changing
document = g_document
header_data = g_header.
*-- End of Program

How to delete the Generated files from application server(open hub)?

hi experts,
when i try to execute process chain the DTP it is giving below dump. Exception CX_RSBK_REQUEST_LOCKED logged.
when i execute the DTP manually and trying to delete the previous request, it is giving for dump ITAB_DUPLICATE_KEY.
so to delete the generated file from application server, how to delete it for specific dates?
Information on where terminated
Termination occurred in the ABAP program "GPD6S3OE0BCVGC6L9DBNVYQARZM" - in
"START_ROUTINE".
The main program was "RSBATCH_EXECUTE_PROZESS ".
In the source code you have the termination point in line 2874
of the (Include) program "GPD6S3OE0BCVGC6L9DBNVYQARZM".
The program "GPD6S3OE0BCVGC6L9DBNVYQARZM" was started as a background job.
and when i check the dump it is point out at below code
" Populate the lookup table for 0STOR_LOC
SELECT * from /BI0/TSTOR_LOC
into CORRESPONDING FIELDS OF table L_0STOR_LOC_TEXT
FOR ALL ENTRIES IN SOURCE_PACKAGE WHERE
STOR_LOC = SOURCE_PACKAGE-STOR_LOC.
but the programme is syntactically correct only.
how to rectify the issue.
regards
venuscm
Edited by: venugopal vadlamudi on Sep 28, 2010 1:59 PM

hi experts,
We have written start routine to get the storage location text and sending to File located at Application server through OPEN HUB.
here is the code written in the Transformations
In the global section
Text for 0STOR_LOC
    DATA: l_0stor_loc_text TYPE HASHED TABLE OF /bi0/tstor_loc
          WITH UNIQUE KEY stor_loc.
    DATA: l_0stor_loc_text_wa TYPE /bi0/tstor_loc.
and in the code to get the text
" Populate the lookup table for 0STOR_LOC
    *SELECT * from /BI0/TSTOR_LOC*
      into CORRESPONDING FIELDS OF table L_0STOR_LOC_TEXT
      FOR ALL ENTRIES IN SOURCE_PACKAGE WHERE
              STOR_LOC = SOURCE_PACKAGE-STOR_LOC.
im sure there is problem with the Routine only. i think i need to change the code if so please provide me the modified one.
thanks
venuscm
Edited by: venugopal vadlamudi on Sep 29, 2010 9:37 AM

Regaring file from FTP server to application server

Hi frnds,
Below is my code where i am transferring Presentation server file to FTP server.
Now i want to transfer that file from FTP server to application server.
any help. below i am providing my code.
<code>
*& Report demo
report z_demo_ftp.
Variables declaration
data : mi_handle type i,
       pwd       type char30,
       slen      type i,
       key type i value 26101957,
       it_file2 type filetable,
       w_file2 like   line of it_file2,
       l_rc type i,
       v_index type i,
       v_file(30) type c,
       v_path(100) type c,
       v_path_tmp(100) type c.
*Internal table declaration
data: begin of mtab_data occurs 0,
       line(132) type c,
      end of mtab_data.
Selection scree parameters
parameters: p_file type string default 'C:\'.
Get the file path
at selection-screen on value-request for p_file.
data: p_file1 type string.
p_file1 = p_file.
call method cl_gui_frontend_services=>file_open_dialog
    exporting
      default_filename        = p_file1
    changing
      file_table              = it_file2
      rc                      = l_rc
    exceptions
      file_open_dialog_failed = 1
      cntl_error              = 2
      error_no_gui            = 3
      not_supported_by_gui    = 4.
if sy-subrc <> 0.
    message id sy-msgid type sy-msgty number sy-msgno
            with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
else.
    read table it_file2 into w_file2 index 1.
    p_file = w_file2-filename.
    clear w_file2.
    refresh it_file2.
    split p_file at '\' into table it_file2.
    describe table it_file2 lines v_index.
    read table it_file2 into w_file2 index v_index.
    concatenate 'put' w_file2-filename into v_file separated by space.
    delete it_file2 index v_index.
    clear w_file2.
    loop at it_file2 into w_file2.
    if sy-tabix = 1.
    v_path = w_file2-filename.
    endif.
    if sy-tabix ge 2.
    concatenate v_path '\' w_file2 into v_path.
    endif.
    endloop.
    concatenate 'lcd' v_path into v_path_tmp separated by space.
endif.
Start of selection
start-of-selection.
pwd = 'file456'.
slen = strlen( pwd ).
call function 'HTTP_SCRAMBLE'
exporting
    source      = pwd
    sourcelen   = slen
    key         = key
importing
    destination = pwd.
Connect to FTP
call function 'FTP_CONNECT'
exporting
    user            = 'client'
    password        = pwd
    host            = 'saturn'
    rfc_destination = 'SAPFTP'
importing
    handle          = mi_handle
exceptions
    not_connected   = 1
    others          = 2.
if sy-subrc = 0.
Excute FTP command
call function 'FTP_COMMAND'
    exporting
      handle        = mi_handle
      command       = 'cd staff
    tables
      data          = mtab_data
    exceptions
      tcpip_error   = 1
      command_error = 2
      data_error    = 3
      others        = 4.
Excute FTP command
      call function 'FTP_COMMAND'
    exporting
      handle        = mi_handle
      command       = v_path_tmp
    tables
      data          = mtab_data
    exceptions
      tcpip_error   = 1
      command_error = 2
      data_error    = 3
      others        = 4.
Excute FTP command
call function 'FTP_COMMAND'
    exporting
      handle        = mi_handle
      command       = v_file
    tables
      data          = mtab_data
    exceptions
      tcpip_error   = 1
      command_error = 2
      data_error    = 3
      others        = 4.
if sy-subrc = 0.
    loop at mtab_data.
      write: / mtab_data.
    endloop.
endif.
endif.
*FTP disconnect
call function 'FTP_DISCONNECT'
exporting
    handle = mi_handle
exceptions
    others = 1.call function 'FTP_DISCONNECT'
exporting
    handle = mi_handle
exceptions
    others = 1.
      end-of-selection.
</code>
so what more code shuld i write.
regards,
kamal

Hi Che Eky ,
                      Actually the above code is for putting the presentation server file to FTP Server.
But now i need to Put the same file present in the FTP server to Application server.
So any help or code which will be helpful.
regards,
kamal

Sending Files from a server to a client (PrintWriter)

Similar Messages

Maybe you are looking for