‎2008 Apr 10 4:03 PM
Hi all,
How send file to application server?
Reply me soon,
Thx,
S.Suresh.
‎2008 Apr 10 4:13 PM
‎2008 Apr 10 4:13 PM
‎2008 Apr 10 4:26 PM
Hi micky,
See below this code..
DATA : FP_V_FILEPATH TYPE STRING.
data : path type string,
path1 type string,
fnam type string.
FP_V_FILEPATH = 'C:\BDC1.prn'.
DATA : BEGIN OF IT_DATA OCCURS 0,
AGE(4) ,
NAME(15),
END OF IT_DATA.
DATA : BEGIN OF WA_DATA,
AGE(4) ,
NAME(15),
END OF WA_DATA.
OPEN DATASET FP_V_FILEPATH
FOR
INPUT IN TEXT MODE ENCODING DEFAULT.
IF SY-SUBRC = 0.
DO.
READ DATASET
FP_V_FILEPATH
INTO WA_DATA .
IF SY-SUBRC = 0.
APPEND WA_DATA TO IT_DATA.
CLEAR WA_DATA.
ELSE.
EXIT.
ENDIF.
ENDDO.
ENDIF.
loop at it_data into wa_data.
write : / wa_data-age , wa_data-name.
endloop.
if wa_data is not INITIAL.
write: 'This file have in application server'.
else.
concatenate '
' sy-host FP_V_FILEPATH into path1.
condense path1 no-gaps.
call method : cl_gui_frontend_services=>file_copy exporting source = path
destination = path1.
write: ' Now This file is sent'.
endif.
This error code is displayed for bond format.
How is change it?
Reply me,
Thx,
S.Suresh
‎2008 Apr 10 4:38 PM
Hi,
Please refer code below:
* Download internal table to Application server file(Unix)
DATA: e_file like rlgrap-filename value '/usr/sap/tmp/file.txt'.
open dataset e_file for output in text mode.
lOOP AT it_datatab......
transfer it_datatab to e_file.
ENDLOOP.
close dataset e_file.
Thanks,
Sriram Ponna.