Discussion :

[vivirarazeze]

Je voudrais exécuter 2 FTP à la suite depuis un CL avec dans mon premier fichier txt les infos de connexion et dans le second les commandes (mput, get, etc).
Le but étant d'avoir dans un seul fichier les infos de connexion. Est ce possible ?


Merci

[FORMULARY]

Bonjour.
On ne peut pas avoir 2 fichiers pour faire le FTP, par contre, on peut faire un CLP qui copie le membre de connection dans qtemp, puis copie le nom du membre en ajout au fichier de qtemp, et se fait le FTP en utilisant le fichier de qtemp ...

[vivirarazeze]

tu utiliserais quoi pour copier ?

[Hédhili Jaïdane]

Bonjour.

Pour coller à la réponse de FORMULARY, un simple CPYF :
- le premier pour copier le fichier : CPYF avec MBROPT(*REPLACE) et CRTFILE(*YES), CRTDUPOBJ peut le faire aussi
- le second pour ajouter : CPYF avec MBROPT(*ADD) et CRTFILE(*NO)

[vivirarazeze]

Tout à fait je créé un fichier CRTPF
Je fais mes deux copies pour concatener le tout

Mais pour le OVRDBF INPUT il faut un fichier .txt. C'est là que je bloque



CRTPF FILE(QTEMP/FTPIN) RCDLEN(255)
CRTPF FILE(QTEMP/FTPOUT) RCDLEN(255)
MONMSG CPF0000

CPYF FROMFILE(DCSRC/DCTXT) TOFILE(QTEMP/FTPIN) FROMMBR(DCO000) +
TOMBR(*FIRST) MBROPT(*REPLACE) FMTOPT(*CVTSRC)
MONMSG MSGID(CPF2817)

CPYF FROMFILE(DCSRC/DCTXT) TOFILE(QTEMP/FTPIN) FROMMBR(DCO140) +
TOMBR(*FIRST) MBROPT(*ADD) FMTOPT(*CVTSRC)
MONMSG MSGID(CPF2817)

OVRDBF INPUT QTEMP/FTPIN
OVRDBF OUTPUT QTEMP/FTPOUT
FTP RMTSYS('')

[Hédhili Jaïdane]

Dans ce cas, dans ton CRTPF ajoute FILETYPE(*SRC) ou crée le par CRTSRCPF
Attention aux *CVTSRC, c'est pour convertir des fichiers DATA en SRC ou inversement lors du CPYF quand les fichiers sont de types différents

PS : Utilise les balises code pour insérer du code