Retrieving File from remove server into String

Hi, I've tried a few strategies to solve this problem but haven't been able to figure it out yet.
Here is what I'm trying to do. From my website, I would like to call a JavaScript function from another external server. When this javascript function is called, it returns something like this:
document.write('<a target=_top href="http://somesite.com/somelink.html">Link in this window</a>');
This works if I use something like <script src="location.of.external.script"></script>
BUT, I would like to take what that script returns to me, and manipulate it in JSP before putting those lines onto my page. Effectively, I want to change it so that the link always opens up into a new window.
Do you have any suggestions? I think this can be done with JSP - but I haven't been able to figure it out yet. How can I call this javascript function using JSP and trap the text that sends it back so I can manipulate it?

Hi, I've tried a few strategies to solve this problem
but haven't been able to figure it out yet.
Here is what I'm trying to do. From my website, I
would like to call a JavaScript function from another
external server. When this javascript function is
called, it returns something like this:
document.write('<a target=_top
href="http://somesite.com/somelink.html">Link in this
window</a>');
This works if I use something like <script
src="location.of.external.script"></script>
BUT, I would like to take what that script returns to
me, and manipulate it in JSP before putting those
lines onto my page. Effectively, I want to change it
so that the link always opens up into a new window.
Do you have any suggestions? I think this can be done
with JSPBut you would be wrong. Javascript runs on the client, AFTER the JSP (which runs on the server) has been executed, the HTML response formulated, and sent to the browser. Once on its way you can not interact with the Javascript (or the web page in general).

Similar Messages

Fetching of multiple files from Application Server into SAP Program

Hi All,
I have a issue related <b>Fetching of multiple files from Application Server into SAP Program</b>.
Actual issue is as below.
In the <b>selection screen</b> of <b>my program</b> i will give <b>Application Server Path</b> as :
<b>/PW/DATA/SAP/D1S/PP/DOWN/eppi0720*</b>
Then the based on above input it should pick up all the files that are matching <b>eppi0720*</b> criteria.
Suppose if i am having <b>5</b> files with above scenario, i have to fetch all those <b>5</b> files at a time and place in my SAP Program.
All those 5 file's data should come into SAP at a time.
Can anybody tell me how can we solve above issue.
If any body has come across same issue please provide me with solution.
Thanks in advance.
Thanks & Regards,
Rayeez.

If you want to get around the authorization check, you can do something like this.
report zrich_0001 .
parameters: p_path type epsf-epsdirnam
                  default '/usr/sap/TST/SYS/global'.
parameters: p_file type epsf-epsfilnam default 'CO*'.
start-of-selection.
perform get_file_list.
*       FORM get_file_list                                            *
form get_file_list.
types: name_of_dir(1024)        type c,
         name_of_file(260)        type c,
         name_of_path(1285)       type c.
data: begin of file_list occurs 100,
          dirname     type name_of_dir, " name of directory. (possibly
                                         " truncated.)
          name        type name_of_file, " name of entry. (possibly
                                         " truncated.)
          type(10)    type c,            " type of entry.
          len(8)      type p,            " length in bytes.
          owner(8)    type c,            " owner of the entry.
        mtime(6)    type p, " last modification date, seconds since 1970
          mode(9)     type c, " like "rwx-r-x--x": protection mode.
          useable(1) type c,
          subrc(4)    type c,
          errno(3)    type c,
          errmsg(40) type c,
          mod_date    type d,
          mod_time(8) type c,            " hh:mm:ss
          seen(1)     type c,
          changed(1) type c,
        end of file_list.
data: begin of file,
          dirname     type name_of_dir, " name of directory. (possibly
                                         " truncated.)
          name        type name_of_file, " name of entry. (possibly
                                         " truncated.)
          type(10)    type c,            " type of entry.
          len(8)      type p,            " length in bytes.
          owner(8)    type c,            " owner of the entry.
        mtime(6)    type p, " last modification date, seconds since 1970
          mode(9)     type c, " like "rwx-r-x--x": protection mode.
          useable(1) type c,
          subrc(4)    type c,
          errno(3)    type c,
          errmsg(40) type c,
          mod_date    type d,
          mod_time(8) type c,            " hh:mm:ss
          seen(1)     type c,
          changed(1) type c,
        end of file.
call 'C_DIR_READ_FINISH'             " just to be sure
       id 'ERRNO' field file_list-errno
       id 'ERRMSG' field file_list-errmsg.
call 'C_DIR_READ_START' id 'DIR'    field p_path
                          id 'FILE'   field p_file
                          id 'ERRNO' field file-errno
                          id 'ERRMSG' field file-errmsg.
if sy-subrc <> 0.
    sy-subrc = 4.
    exit.
endif.
* Read the file list and add to internal table.
do.
    clear file.
    call 'C_DIR_READ_NEXT'
      id 'TYPE'   field file-type
      id 'NAME'   field file-name
      id 'LEN'    field file-len
      id 'OWNER' field file-owner
      id 'MTIME' field file-mtime
      id 'MODE'   field file-mode
      id 'ERRNO' field file-errno
      id 'ERRMSG' field file-errmsg.
    if sy-subrc = 1.
      exit.
    endif.
    append file to file_list.
enddo.
* Write out the file list
loop at file_list.
    write:/ file_list-name.
endloop.
endform.
Regards,
Rich Heilman

Error while reading excel file from application server into internal table.

Hi experts,
My requirement is to read an excel file from application server into internal table.
Hence I have created an excel file fm_test_excel.xls in desktop and uploaded to app server using CG3Z tcode (as BIN file type).
Now in my program I have used :
OPEN DATASET v_filename FOR INPUT IN text mode encoding default.
DO.
READ DATASET v_filename INTO wa_tab.
The statement OPEN DATASET works fine but I get a dump (conversion code page error) at READ DATASET statement.
Error details:
A character set conversion is not possible.
At the conversion of a text from codepage '4110' to codepage '4103':
- a character was found that cannot be displayed in one of the two
codepages;
- or it was detected that this conversion is not supported
The running ABAP program 'Y_READ_FILE' had to be terminated as the conversion
would have produced incorrect data.
The number of characters that could not be displayed (and therefore not
be converted), is 445. If this number is 0, the second error case, as
mentioned above, has occurred.
An exception occurred that is explained in detail below.
The exception, which is assigned to class 'CX_SY_CONVERSION_CODEPAGE', was not
caught and
therefore caused a runtime error.
The reason for the exception is:
Characters are always displayed in only a certain codepage. Many
codepages only define a limited set of characters. If a text from a
codepage should be converted into another codepage, and if this text
contains characters that are not defined in one of the two codepages, a
conversion error occurs.
Moreover, a conversion error can occur if one of the needed codepages
'4110' or '4103' is not known to the system.
If the conversion error occurred at read or write of screen, the file
name was '/usr/sap/read_files/fm_test_excel.xls'. (further information about
the file: "X 549 16896rw-rw----201105170908082011051707480320110517074803")
Also let me know whether this is the proper way of reading excel file from app server, if not please suggest an alternative .
Regards,
Karthik

Hi,
Try to use OPEN DATASET v_filename FOR INPUT IN BINARY mode encoding default. instead of OPEN DATASET v_filename FOR INPUT IN text mode encoding default.
As I think you are uploading the file in BIN format to Application server and trying to open text file.
Regards,
Umang Mehta

File from Application server into BW

Hi All,
I have a urgent requirement and I do not know much of ABAP
The requirement is
selecting existing file from application server Dynamically in BW server. This will be done by writing an ABAP code at the InfoPackage level in the External Data Tab but I am in need some ABAP code for the same
Also let me know which table stores AL11 files
I know USER_DIR stores directories but I required the table for the files within the directories.
Any help is appreciated

Hi DPN,
If we have a condition like depending on System Date we have to get a file some thing like that then we can do that by using the ABAP Routine. But in your Scenario there are no specific conditions to select a file.
If we have some variable which stores the value which we give and gets the specified file... That Would be Great.
But in Routine we can not use Variables..(As Far As I Know)
So better Select manually every time...
Hope This Helps.
Regards,
rik.

Issue with uploading XML file from application server into internal table

i Need to fetch the XML file from the application server and place into internal table and i am getting error message while using the functional module   SMUM_XML_PARSE and the error message is "line   1 col   1-unexpected symbol; expected '<', '</', entity reference, character data, CDATA section, processing instruction or comment" and could you please let me know how to resolve this issue?
    TYPES: BEGIN OF T_XML,
             raw(2000) TYPE C,
           END OF T_XML.
DATA:GW_XML_TAB TYPE T_XML.
DATA: GI_XML_TAB TYPE TABLE OF T_XML INITIAL SIZE 0.
DATA:GI_STR TYPE STRING.
data: GV_XML_STRING TYPE XSTRING.
DATA: GI_XML_DATA TYPE TABLE OF SMUM_XMLTB INITIAL SIZE 0.
data:GI_RETURN TYPE STANDARD TABLE OF BAPIRET2.
    OPEN DATASET LV_FILE1 FOR INPUT IN TEXT MODE ENCODING DEFAULT.
    IF SY-SUBRC NE 0.
      MESSAGE 'File does not exist' TYPE 'E'.
    ELSE.
      DO.
* Transfer the contents from the file to the work area of the internal table
        READ DATASET LV_FILE1 INTO GW_XML_TAB.
        IF SY-SUBRC EQ 0.
          CONDENSE GW_XML_TAB.
*       Append the contents of the work area to the internal table
          APPEND GW_XML_TAB TO GI_XML_TAB.
        ELSE.
          EXIT.
        ENDIF.
      ENDDO.
    ENDIF.
* Close the file after reading the data
    CLOSE DATASET LV_FILE1.
    IF NOT GI_XML_TAB IS INITIAL.
      CONCATENATE LINES OF GI_XML_TAB INTO GI_STR SEPARATED BY SPACE.
    ENDIF.
* The function module is used to convert string to xstring
    CALL FUNCTION 'SCMS_STRING_TO_XSTRING'
      EXPORTING
        TEXT   = GI_STR
      IMPORTING
        BUFFER = GV_XML_STRING
      EXCEPTIONS
        FAILED = 1
        OTHERS = 2.
    IF SY-SUBRC <> 0.
      MESSAGE 'Error in the XML file' TYPE 'E'.
    ENDIF.
ENDIF.
IF GV_SUBRC = 0.
* Convert XML to internal table
    CALL FUNCTION 'SMUM_XML_PARSE'
      EXPORTING
        XML_INPUT = GV_XML_STRING
      TABLES
        XML_TABLE = GI_XML_DATA
        RETURN    = GI_RETURN.
ENDIF.
READ TABLE GI_RETURN TRANSPORTING NO FIELDS WITH KEY TYPE = 'E'.
IF SY-SUBRC EQ 0.
    MESSAGE 'Error converting the input XML file' TYPE 'E'.
ELSE.
    DELETE GI_XML_DATA WHERE TYPE <> 'V'.
    REFRESH GI_RETURN.
ENDIF.

Could you please tel me why the first 8 lines were removed, till <Soap:Body and also added the line <?xml version="1.0" encoding="UTF-8"?> in the beggining .
Becuase there will be lot of XML files will be coming from the Vendor daily and that should be uploaded in the application server and should update in the SAP tables based on the data in the XML file.
what information i need to give to vendor that do not add the first 8 lines in the XML file and add the line in the beggining <?xml version="1.0" encoding="UTF-8"?>   ??????
Is there any other way we can do with out removing the lines?

Retrieve files from application server

Hello SDNites,
I have to retrieve all the files from the application server corecponding to a predefined path.
I have tried using FM RZL_READ_DIR_LOCAL and am getting the output but one of my file name length exceeds the limit set of 32 chars and hence does not retrieve the entire file name. My file name lenth is 36 chars. Can someone help me in this.
I tried creating custom FM of this standard FM but it does't work as there is some SAP system statement,
CALL 'ALERTS' ID 'ADMODE'       FIELD AD_RZL
                 ID 'OPCODE'       FIELD RZL_OP_RD_DIR
                 ID 'FILE_NAME'    FIELD FULL_NAME
                 ID 'DIR_TBL'      FIELD LINE_TBL-SYS.
Can someone help me in resolving the above specified issue.
Reagards,
Abhishek

Hi,
Use below snippet. You will get up to 40 char path name
PARAMETERS: pa_dir TYPE epsf-epsdirnam VISIBLE LENGTH 60 OBLIGATORY, "max 60 chars as input path
DATA: BEGIN OF dir_list OCCURS 0.
        INCLUDE STRUCTURE epsfili.
DATA END OF dir_list.
CALL FUNCTION 'EPS_GET_DIRECTORY_LISTING'
    EXPORTING
      dir_name               = pa_dir
    TABLES
      dir_list               = dir_list       "here is your result set, it will return max 40char dir name, so will suffice for you
    EXCEPTIONS
      invalid_eps_subdir     = 1
      sapgparam_failed       = 2
      build_directory_failed = 3
      no_authorization       = 4
      read_directory_failed = 5
      too_many_read_errors   = 6
      empty_directory_list   = 7
      OTHERS                 = 8.
IF sy-subrc <> 0.
    MESSAGE 'No such directory' TYPE 'I' DISPLAY LIKE 'E'.
    LEAVE TO SCREEN 0.
ENDIF.
Regards
Marcin

Download file from application server to internal table in background

hi all,
i want to download a file from appliaction server into my internal table but in background.
i had tryed CG3Z and CG3Y t-code but screen that is coming is asking for the parameters, and i want that screen should not appear and file should be saved in the predefined path by me.
if there any way to do so,
Points will be rewarded as per the Aswers.
thaks in advance.

Hi Sudeep,
   Use this code to get file data from application server.
REPORT ZE0232_BDC_APPLSERVER.
DATA: FILE_PATH TYPE STRING.
FILE_PATH = 'c:\bdc_mat.prn'.
DATA: BEGIN OF ITAB OCCURS 0,
            END OF ITAB.
OPEN DATASET FILE_PATH FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF SY-SUBRC = 0.
DO.
READ DATASET FILE_PATH INTO ITAB.
IF ITAB-RESNO NE SPACE.
   APPEND ITAB.
ELSE.
EXIT.
ENDIF.
ENDDO.
ENDIF.
CLOSE DATASET FILE_PATH.
LOOP AT ITAB.
WRITE:/ ITAB.
ENDLOOP.
FILE PATH IS application server path.
IF USEFULL REWARD

Upload files from FTP server

Hi Friends,
We are loading some files from FTP server into the BW (Datasource)
In the infopackage we have given the setting as 'Load from application server' and have given the file path as it is in application server. No routine has been created.
Files are successfully loading from FTP server to the BW datasource.
My question is:
In the infopackage we have only maintained that it should be loaded from application server and the file path.
But how the system(infopackage) gets to know that from which server(FTP) it should pick. Is there any table to maintain these entries. i.e when infopackage is scheduled it only pings the required server and picks the file with the help of given file path.But how does it know which server it should ping.
Pls help.
Thanks & Regards,
Niku

Hello Niku,
It seems in your case you have only one FTP, and the system is pointing by default to that FTP and picking the required files fro your Info Package.
Normally a Standard ABAP Program RSFTP002 is used to communicate to the FTP Server with the help of RFC . In the Same program you can maintain the credentials ( USerName and password) along with the Source and Destination related properties .
Back to your query , you can check the same in above program ( RSFTP002 ) through SE38 and cross verify your FTP .
Hope this helps !
Regards
YN

Reading XML file from application server and put into internal table-4.6C

Dear All,
Is there any way of reading XML file from application server to SAP? I am using 4.6C. Function module SCMS_STRING_TO_XSTRING function module is not available. Please suggest.
Thanks and regards,
Atanu

Hi Atanu!
Simply use the XSLT transformation 'ID'.
FIELD-SYMBOLS <ls_result> TYPE ANY.
CREATE DATA lref_data TYPE (your_structure).
ASSIGN lref_data->* TO <ls_result>.
CALL TRANSFORMATION id
SOURCE XML xmlstr
RESULT result = <ls_result>.
"xmlstr" contains your XML file. Just read it into it via standard I/O operations. "<ls_result>" will contain your DDIC formatted content.
Best regards
Torsten

I need to retrieve files from my iPad but I forgot my password. I tried to restore it but then it said I had to turn off Find my iPad on my iPad. I can't do this because I can't get into it. What do I do?

I need to retrieve files from my iPad but I forgot my password. I tried to restore it but then it said I had to turn off Find my iPad on my iPad. I can't do this because I can't get into it. What do I do?

If the iPad was running iOS 7, iCloud: Find My iPhone Activation Lock in iOS 7
http://support.apple.com/kb/HT5818
How can I unlock my iPad if I forgot the passcode?
http://www.everymac.com/systems/apple/ipad/ipad-troubleshooting-repair-faq/ipad- how-to-unlock-open-forgot-code-passcode-password-login.html
iOS: Device disabled after entering wrong passcode
http://support.apple.com/kb/ht1212
How can I unlock my iPad if I forgot the passcode?
http://tinyurl.com/7ndy8tb
How to Reset a Forgotten Password for an iOS Device
http://www.wikihow.com/Reset-a-Forgotten-Password-for-an-iOS-Device
Using iPhone/iPad Recovery Mode
http://ipod.about.com/od/iphonetroubleshooting/a/Iphone-Recovery-Mode.htm
Saw this solution on another post about an iPad in a school environment. Might work on your iPad so you won't lose everything.
~~~~~~~~~~~~~
‘iPad is disabled’ fix without resetting using iTunes
Today I met my match with an iPad that had a passcode entered too many times, resulting in it displaying the message ‘iPad is disabled – Connect to iTunes’. This was a student iPad and since they use Notability for most of their work there was a chance that her files were not all backed up to the cloud. I really wanted to just re-activate the iPad instead of totally resetting it back to our default image.
I reached out to my PLN on Twitter and had some help from a few people through retweets and a couple of clarification tweets. I love that so many are willing to help out so quickly. Through this I also learned that I look like Lt. Riker from Star Trek (thanks @FillineMachine).
Through some trial and error (and a little sheer luck), I was able to reactivate the iPad without loosing any data. Note, this will only work on the computer it last synced with. Here’s how:
1. Configurator is useless in reactivating a locked iPad. You will only be able to completely reformat the iPad using Configurator. If that’s ok with you, go for it – otherwise don’t waste your time trying to figure it out.
2. Open iTunes with the iPad disconnected.
3. Connect the iPad to the computer and wait for it to show up in the devices section in iTunes.
4. Click on the iPad name when it appears and you will be given the option to restore a backup or setup as a new iPad (since it is locked).
5. Click ‘Setup as new iPad’ and then click restore.
6. The iPad will start backing up before it does the full restore and sync. CANCEL THE BACKUP IMMEDIATELY. You do this by clicking the small x in the status window in iTunes.
7. When the backup cancels, it immediately starts syncing – cancel this as well using the same small x in the iTunes status window.
8. The first stage in the restore process unlocks the iPad, you are basically just cancelling out the restore process as soon as it reactivates the iPad.
If done correctly, you will experience no data loss and the result will be a reactivated iPad. I have now tried this with about 5 iPads that were locked identically by students and each time it worked like a charm.
~~~~~~~~~~~~~
Try it and good luck. You have nothing more to lose if it doesn't work for you.
 Cheers, Tom

Error in PDF Conversion while downloading file from application server

Hi,
I am facing a problem in which i have to download file from application server which is a PDF file (output of SAP Script). I am downloading this file using following code in BSP technology:
* event handler for data retrieval
EMPCD = REQUEST->GET_FORM_FIELD( 'emp' ).
MONTH = REQUEST->GET_FORM_FIELD( 'mn' ).
YEAR = REQUEST->GET_FORM_FIELD( 'yr' ).
W_IND = 'N' .
DATA : wa_zform16 type zform16.
DATA : file_path type string.
DATA : l_pdf_len type string.
DATA STR TYPE STRING.
DATA: OUTPUT    TYPE STRING ,
      L_XSTRING TYPE XSTRING ,
      APP_TYPE TYPE STRING.
DATA: PDF_TABLE TYPE RCL_BAG_TLINE.
DATA PHY_NAME_OUT     TYPE SAPB-SAPPFAD.
concatenate '/usr/sap/put/form16/' EMPCD '_' YEAR '.PDF' into file_path
*PHY_NAME_OUT = '/usr/sap/put/form16/01000200_2007.PDF'.
PHY_NAME_OUT = file_path.
OPEN DATASET PHY_NAME_OUT FOR INPUT IN TEXT MODE ENCODING default.
IF SY-SUBRC IS INITIAL.
DO.
    READ DATASET PHY_NAME_OUT INTO STR.
    IF SY-SUBRC IS INITIAL.
      CONCATENATE
          OUTPUT
          STR
          CL_ABAP_CHAR_UTILITIES=>CR_LF
      INTO OUTPUT.
    ELSE.
      EXIT.
    ENDIF.
ENDDO.
APP_TYPE = 'APPLICATION/PDF'.
CALL FUNCTION 'SCMS_STRING_TO_XSTRING'
    EXPORTING
      TEXT     = OUTPUT
            MIMETYPE = 'APPLICATION/PDF'
*            MIMETYPE = 'APPLICATION/PDF;charset=utf-16le'
    IMPORTING
      BUFFER   = L_XSTRING.
CALL METHOD CL_BSP_UTILITY=>DOWNLOAD
    EXPORTING
      OBJECT_S            = L_XSTRING
      CONTENT_TYPE        = APP_TYPE
      CONTENT_DISPOSITION = 'attachment;filename=webforms.pdf'
      RESPONSE            = _M_RESPONSE
      NAVIGATION          = NAVIGATION.
Result of this code is : there is a pop up asking to open or save pdf format and process is complete, but i have problem in downloaded file.
At the time of creation i have put BMP image for signature in PDF file and it is working fine but when i upload that file in Application server and then download it with above used code it save the PDF file but when i open that file so whereever i have used signature that page gives error and could not display that scanned signature.
Can anyone please help me in this regard.
or is there any possibility from which i can download that file just like File transfer from BSP.
Keep in mind that i am using BSP technology so all GUI based function module to download file are not working.
waiting for your reply.....
Regards,
Gagan

Hi Raja,
I have standard sap form for TDS Certificate on which i have include an BMP image for digital signature and download that script into pdf format.While i download that PDF looks ok but it is not working in BSP.
Regards,
Gagan

How to copy a file from application server to local system

Guys,
Need to copy a file from application server to local system.Is there an FM for the same.
Tried searching for it but couldn't find anything useful.
Code snippets will be highly appreciated.
Warm Regards,
P.
Moderator message: very frequently asked and answered question, obviously you did not search thoroughly, all points removed.
Edited by: Thomas Zloch on Dec 3, 2010 4:48 PM

hi,
You can use the transactions CG3Y or through program u can do like this..
DATA: BEGIN OF IT_FILE OCCURS 0,
                LINE TYPE STRING,
           END OF IT_FILE.
OPEN DATASET <file_name> FOR INPUT IN TEXT MODE ENCODING DEFAULT.
        IF SY-SUBRC IS INITIAL.
          DO.
            READ DATASET<file_name> INTO IT_FILE-LINE.
            IF SY-SUBRC = 0.
              APPEND IT_FILE.
              CLEAR IT_FILE.
            ELSE.
              EXIT.
            ENDIF.
          ENDDO.
        ENDIF.
CLOSE DATASET <file_name>.
Download it to local system using FM - GUI_DOWNLOAD

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

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

Reading tab delimited file from application server

Hi All,
I do know that we need to use Open data set to read a file from application server, but my question is when you use read DATASET v_file into wa_final - this wa_final is an work area and also i have mentione an internal table. so do we need to Split the record at tab into the corresponding fields. Append the records into an internal table i_input.????
Please let me know on this....
thanks in advance....
Poonam....

Hi,
first see the file contents in application server, how the contents whether the contents seperated by any symbol or not, if the contents seperated by any symbol then you have to split the data before appending to internal table.
check this code.
DATA: l_data_string TYPE string.
filename = p_file.
OPEN DATASET p_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc EQ 0.
    DO.
      READ DATASET filename INTO l_data_string.
      IF sy-subrc NE 0.
        EXIT.
      ENDIF.
      CLEAR k_input.
      SPLIT l_data_string AT '#' INTO k_input-agreement k_input-suffix k_input-status
            k_input-first_name k_input-last_name k_input-job_title k_input-tel k_input-fax k_input-email_address k_input-mob_number.
      APPEND k_input TO i_input.
    ENDDO.
ENDIF.
Regards,
Venu

Retrieving File from remove server into String

Similar Messages

Maybe you are looking for