Lo que debes hacer es crear un archivo en el IFS en una carpeta y utilizarlo
dentro de la sentencia del SFTP.
Te paso el ejemplo de como realizarlo.
Las intrucciones para el archivo por lostes son las mismas que las que utilizas
para realizar el ftp, el LCD, el CD, el PUT, el GET es exactamente igual.
Por ejemplo:
lcd /HOME/XXXX
cd /HOME/YYYY
put PEPE.TXT JUAN.TXT
del PEPE.TXT
bye
El tema ahora esta en el armado de la instrucción para realizar el SFTP, es de
la siguiente manera:
/qopensys/usr/bin/sftp -F /home/xxxx/ssh_config -b /home/xxxx/nombre_archivo
usuario@direccion_de_ip
Te explico que es cada cosa:
/qopensys/usr/bin/sftp = Es el lugar dónde esta alojado el comand.
-F /home/xxxx/ssh_config = Es el archivo de configuración, en ssh_config o el
nombre que elijas, podes configurar varios parámetros, entre ellos si queres
podes configurar el número de puerta para ingresar por uno distinto y no
exponer tu sftp al exterior. El xxxx es un directorio en el IFS que vos crees
para alojar el archivo.
-b /home/xxxx/nombre_archivo = Esta parte es el lugar dónde esta el archivo por
lotes que debes crear con las instrucciones ftp para cambiar de directorio,
hacer un put, un del, etc, etc.
usuario@direccion_de_ip = Usuario de conexión y dirección de ip del host hacia
dónde vas a realizar el sftp.
ahh... me olvidaba, la instruccion cl para realiza el sftp es STRQSH y quedaría
de la siguiente manera:
STRQSH CMD('/qopensys/usr/bin/sftp -F /home/xxxx/ssh_config -b
/home/xxxx/nombre_archivo usuario@direccion_de_ip')
Espero que te sea de ayuda, cualquier cosa por favor escribime que te ayudo en
lo que pueda.
Saludos.
Sergio
From: [email protected]
To: [email protected]
Date: Thu, 24 Feb 2011 10:03:36 -0500
Subject: ayuda programación qshell en as400
A una consulta:
Estoy implementando SFTP en el as400 y el mismo tengo que realizarla con
programación QSHELL, alguien puede facilitar algún link o manual para poder
realizar dicha programación.
Necesito hacer lo mismo que se hace con FTP en un CL, es decir:
Con FTP:
CLRPFM FILE(QTEMP/SEGF06)
OVRDBF FILE(INPUT) TOFILE(SEGF05)
OVRDBF FILE(OUTPUT) TOFILE(SEGF06)
STRTCPFTP RMTSYS(&DIR)
Con SFTP:
CHGVAR VAR(&CMD) VALUE('sftp usuario@ip' )
QSH CMD(&CMD)
Necesito que el SFTP tome el archivo de entrada (SEGF05, en dicho archivo tengo
las instrucciones que se debe hacer en el FTP y en el archivo SEGF06 tengo el
resultado del FTP, es decir el log).
Gracias.
Saludos
Mauro Peñaherrera Ruiz
Tecnologia Desarrollo y Mantenimiento
Diners Club - Interdin
+593 (2) 2981300 ext 4153
www.dinersclub.com.ec
Quito-Ecuador
En Diners Club cuidamos el planeta; REDUCIMOS, RECICLAMOS Y REUTILIZAMOS los
recursos que usamos.
Nota de descargo: La información contenida en este e-mail y sus anexos es
confidencial y sólo puede ser utilizada por el destinatario del mismo. Esta
información no debe ser distribuida, ni copiada total o parcialmente por ningún
medio sin la autorización de DINERS/INTERDIN. Además, DINERS/INTERDIN no asume
responsabilidad sobre información, opiniones o criterios contenidos en este
e-mail.
Disclaimer: The information contained in this e-mail and its attached files are
confidential and intended only for the use of the person to which it is
addressed. This information can not be totally or partially distributed nor
copied by any media without the authorization from DINERS/INTERDIN. In
addition, DINERS/INTERDIN does not assume responsibility about this
information, opinions or criteria contented in this e-mail.
____________________________________________________ �nete a Recursos AS400,
nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 � Publicaciones
Help400, S.L. ____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
