* *Copyright (C) 2005 Krapinskij (krapinskij@yahoo.it) * *This program is free software; you can redistribute it and/or *modify it under the terms of the GNU General Public License *as published by the Free Software Foundation; either version 2 *of the License, or (at your option) any later version. * *This program is distributed in the hope that it will be useful, *but WITHOUT ANY WARRANTY; without even the implied warranty of *MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *GNU General Public License for more details. * *You should have received a copy of the GNU General Public License *along with this program; if not, write to the Free Software *Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA * REPORT z_get_srv_file . PARAMETERS: file TYPE SAPB-SAPPFAD default '/usr/sap/trans/data/R916228.PD1'. PARAMETERS: lfile TYPE SAPB-SAPPFAD default 'c:\R916228.PD1'. START-OF-SELECTION. CALL FUNCTION 'ARCHIVFILE_SERVER_TO_CLIENT' EXPORTING path = file TARGETPATH = lfile EXCEPTIONS ERROR_FILE = 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. ENDIF.