-
STFP - Datei von System i zu Server übertragen per SFTP
Hallo,
kann mir jemand Muster senden mit Routinen, die per SFTP eine Datei von AS/400 auf einen
anderen Server überträgt. Die Verarbeitung mit FTP ist keine Problem, das habe
ich im Griff (CL, RPG und Anweisungen in Quellendatei). Es ist V7R1M0 im Einsatz.
Danke
-
-
Hallo Georg,
danke, werde mir das ansehen.
Gruß
Johann
-
-
Schönen guten Morgen.
Wir verwenden hier das OPENSSH mit Expect.
Wir haben uns da ein Script gebastelt/kopiert mit Umgebungs-Variablen:
---
#!/usr/local/bin/expect -f
log_file -a -noappend $env(SSH_LOG)
set timeout 20
spawn sftp $env(SSH_USER)@$env(SSH_HOST)
expect {
default {exit 2}
"continue connecting (yes/no)?" {send "yes\n"; exp_continue}
"assword:" {send "$env(SSH_PASS)\n"; exp_continue}
"sftp>"
}
send "put $env(SSH_FILE)\n"
expect {
default {exit 2}
"not found" {exit 3}
"sftp>"
}
send "quit\n"
exit 0
---
In einem CLP befüllen wir die Umgebungsvariablen inkl. Aufrufbefehl für die QSH
z.B.:
CHGVAR VAR(&CMD) VALUE('PATH=$PATH:/usr/local/bin: +
&& expect -f /Expect/Scripts/sftpput.sh')
ADDENVVAR ENVVAR(SSH_LOG) VALUE(&LOG) REPLACE(*YES)
ADDENVVAR ENVVAR(SSH_FILE) VALUE(&DIRFILE) REPLACE(*YES)
ADDENVVAR ENVVAR(SSH_USER) VALUE(&USER) REPLACE(*YES)
ADDENVVAR ENVVAR(SSH_HOST) VALUE(&HOST) REPLACE(*YES)
ADDENVVAR ENVVAR(SSH_PASS) VALUE(&PASS) REPLACE(*YES)
ADDENVVAR ENVVAR(QIBM_QSH_CMD_OUTPUT) +
VALUE('NONE') REPLACE(*YES)
ADDENVVAR ENVVAR(QIBM_QSH_CMD_ESCAPE_MSG) VALUE(Y) +
REPLACE(*YES)
Und dann gehts los:
QSH CMD(&CMD)
Funktioniert wunderbar
Similar Threads
-
By Malte in forum NEWSboard Programmierung
Antworten: 2
Letzter Beitrag: 04-11-13, 15:46
-
By hs in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 18-11-02, 14:44
-
By hs in forum IBM i Hauptforum
Antworten: 4
Letzter Beitrag: 31-10-02, 07:56
-
By VauH in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 29-10-01, 10:07
-
By Markus H in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 19-07-01, 19:21
Tags for this Thread
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks