problemas envio a servidor ftp

[pancho6102]

Que tal buen dia developers tengo una duda que ojala y ustedes me la puedan solucionar mediante un reporte lleno una tabla que tienes almacenes y materiales despues con esa misma tabla genero un archivo por cada almacen con sus respectivos materiales en txt esto lo hago en una carpeta del servidorl, no habia tenido ningun problema, ahora me piden que lo envie a un servidor ftp.

en el foro he leido que mi password debe de estar encriptado ya busque la funcion y lo hice 'HTTP_SCRAMBLE' . lo que sigue me he atorado se que debo ocupar un funcion que abra ftp conect_ftp, una para realizar mis comandos que ya los estudie command_ftp y una final que es el disconnect_ftp para finalizar la sesion.

he encontrado en muchos casos que algunos desarrolladores usan otra funcion la FTP_R3_TO_SERVER necesito de su ayuda si me pueden hechar la mano a entender mas este asunto como va estructurados y los parametros y cual funcion debo ocupar.

gracias.
toda opinion es bien recibida. ojala y se tomen el tiempo en hecharme la mano en esto si lo resulelvo antes tengan por seguro que lo posteo, para las personas que anden en las mismas que yo se apoyen.

[felipe.carrales]

ve a la se37 pegas ZFI_CONVIERTE_ARCHIVO
luego en referencia de utilizacion hay te manda unos ejemplos
espero te sirvan, si no mas al rato busco un ejemplo.
Saludos

[pancho6102]

gracias felipe.carrales lo he resuelto con las siguientes lineas de comando y les comparto el codigo sin usar FTP_R3_TO_SERVER

FORM SEND_FILE_FTP .
CONSTANTS I_RFC_DESTINATION LIKE RFCDES-RFCDEST VALUE 'SAPFTPA'.
CONSTANTS c_KEY TYPE I value '26101957'.
DATA W_HANDLE TYPE I.
data: slen type i,
command_index type i.

DATA: BEGIN OF MTAB_DATA OCCURS 0,
LINE(132) TYPE C,
END OF MTAB_DATA.
TYPES: BEGIN OF comm,
LINE type c LENGTH 100,
END OF comm.
data COMMANDS type TABLE OF comm WITH HEADER LINE.

slen = strlen( "password de entrada" )."longitud de password.
CALL FUNCTION 'HTTP_SCRAMBLE'"encriptar contraseña
EXPORTING
SOURCE = "passwor de entrada
SOURCELEN = "longitud de le passwor de entrada
KEY = "modo de encriptacion me funciono con '26101957'
IMPORTING
DESTINATION = "salida de el password ya encriptado



CALL FUNCTION 'FTP_CONNECT'"conectar con servidor ftp
EXPORTING
user = "usuario de acceso
password = "se pone el password ya encriptado
host = "host de el server ftp o ip
rfc_destination = i_rfc_destination
IMPORTING
handle = w_handle
EXCEPTIONS
not_connected = 1
OTHERS = 2.


* Si hubo error de conexión, captura la excepción y sale.
IF sy-subrc NE 0.
RAISE not_connected.
ELSE.
REFRESH commands.
* Se Agrega el Comando a la Ruta de donde se va a dejar el archivo.
CLEAR commands.
CONCATENATE 'cd <"carpeta a dejar el archivo en server ftp">' '' INTO commands-line SEPARATED BY space.
APPEND commands.
* Se agrega el Comando al Nombre del Archivo que se va a dejar.
CLEAR commands.
CONCATENATE 'put' <"ruta servidor de aplicacion SAP con nombre archivo y extension"> INTO commands-line SEPARATED BY space.
APPEND commands.


ENDIF.
CALL FUNCTION 'FTP_COMMAND_LIST'
EXPORTING
handle = w_handle
IMPORTING
command_index = command_index
TABLES
commands = commands"tabla con los comando a ejecutar
data = MTAB_DATA
EXCEPTIONS
command_error = 1
tcpip_error = 2
data_error = 3.
* Si hubo error al ejecutar los comandos, captura la excepción y sale
IF sy-subrc NE 0.
CASE sy-subrc.
WHEN 1.
RAISE command_error.
WHEN 2.
RAISE tcpip_error.
WHEN 3.
RAISE data_error.
ENDCASE.
ELSE.
LOOP AT MTAB_DATA.
WRITE: / MTAB_DATA."tabla que muestra los comando ejecutados en ftp
ENDLOOP.


CALL FUNCTION 'FTP_DISCONNECT'"dervidor desconectar con servidor ftp.
EXPORTING
handle = w_handle.
ENDIF.
espero y a alguien le sirva

[darona]

Hola a todos,
estoy intentando usar la función FTP_R3_TO_SERVER en 'character_mode' y me devuelve un error de TCP/IP.
¿Alguien sabe a qué puede ser debido?

Gracias.