PGM PARM(&IP)
DCL VAR(&IP) TYPE(*CHAR) LEN(16)
CHGCURLIB CURLIB(GHI)
OVRDBF FILE(INPUT) TOFILE(QCLSRC/LIBRARY) +
MBR(FTPCMD)
FTP RMTSYS(*INTNETADR) INTNETADR(&IP)
ENDPGM
Buat satu member type TXT di QCLSRC/LIBRARY dengan nama, misalnya FTPCMD yang isinya adalah comand2 ftp yang anda ketik, misalnya:
Administrator supervisor
BIN
PUT OBJECTA
QUIT
Note:
&IP itu adalah IP PC anda. Baris pertama adalah user dan password untuk PC anda.
Tentu saja PC anda harus punya FTP services jalan. Dan tentukan default directory. Progam ini harus dijalankan secara batch.
SBMJOB CMD(CALL PGM(LIBRARY/CL001C) PARM('192.168.205.222'))
Gutlak
Stephanus <[EMAIL PROTECTED]> wrote:
gw lupa sich caranya, gw ada document contohnya, tapi lupa caranya, gw waktu itu pernah pake di bank bisa untuk bayar cukai, konsepnya sich data dari mesin AS/400 di upload/transfer ke pc yang nantinya data tersebut dikirim ke bea cukai. nanti gw coba deh liat, ingetin yah.
Stephanus
----- Original Message -----
From: ardyan go
To: [email protected]
Sent: Thursday, June 01, 2006 4:50 PM
Subject: [BinusNet] Tanya tentang AS/400
Rekan Binusian,
Saya mau nanya tentang AS/400...
Jadi misalnya di AS/400 ada object A di Library GHI.
Mesin AS/400 IPnya : 192.168.10.111
User : ABC
Password : DEF
Nama program CL yang berisi informasi FTP diatas
namanya CL001C.
Apabila kita mau membuat program CL tersebut (CL001C)
supaya otomatis FTP dari mesin AS/400 ke PC gimana ya
caranya?
Jadi kita tinggal Call CL001C, Object A tersebut
otomatis masuk ke PC kita.
Karena biasanya FTPnya manual lewat DOS.
Terima kasih sebelumnya.
Best Regards,
Ago
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
BinusNet founded on Dec 28, 1998 Owner : Johan Setiawan
Moderator BinusNet : Suryadi Liawatimena & Surya Iskandar
Stop or Unsubscribe: send blank email to [EMAIL PROTECTED]
Questions or Suggestions, send e-mail to [EMAIL PROTECTED]
-=-=-=-=-=-=-=-=-=-=--==-=--==-=-=--=-=-=-=-=-=
Bina Nusantara mempersembahkan
25 Tahun Bersama Binus untuk Indonesia
1981 - 2006
Venue: Plenary Hall, Jakarta Convention Center
Date : 25 February 2006
-=-=-=-=-=-=-=-=-=-=--==-=--==-=-=--=-=-=-=-=-=
SPONSORED LINKS Bali indonesia hotel Bali indonesia Indonesia hotel
Bali indonesia vacation Bali indonesia travel
------------------------------------------------------------------------------
YAHOO! GROUPS LINKS
a.. Visit your group "binusnet" on the web.
b.. To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
------------------------------------------------------------------------------
[Non-text portions of this message have been removed]
BinusNet founded on Dec 28, 1998 Owner : Johan Setiawan
Moderator BinusNet : Suryadi Liawatimena & Surya Iskandar
Stop or Unsubscribe: send blank email to [EMAIL PROTECTED]
Questions or Suggestions, send e-mail to [EMAIL PROTECTED]
-=-=-=-=-=-=-=-=-=-=--==-=--==-=-=--=-=-=-=-=-=
Bina Nusantara mempersembahkan
25 Tahun Bersama Binus untuk Indonesia
1981 - 2006
Venue: Plenary Hall, Jakarta Convention Center
Date : 25 February 2006
-=-=-=-=-=-=-=-=-=-=--==-=--==-=-=--=-=-=-=-=-=
SPONSORED LINKS
Bali indonesia hotel Bali indonesia Indonesia hotel Bali indonesia vacation Bali indonesia travel
---------------------------------
YAHOO! GROUPS LINKS
Visit your group "binusnet" on the web.
To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
---------------------------------
---------------------------------
Sneak preview the all-new Yahoo.com. It's not radically different. Just radically better.
[Non-text portions of this message have been removed]
BinusNet founded on Dec 28, 1998 Owner : Johan Setiawan
Moderator BinusNet : Suryadi Liawatimena & Surya Iskandar
Stop or Unsubscribe: send blank email to [EMAIL PROTECTED]
Questions or Suggestions, send e-mail to [EMAIL PROTECTED]
-=-=-=-=-=-=-=-=-=-=--==-=--==-=-=--=-=-=-=-=-=
Bina Nusantara mempersembahkan
25 Tahun Bersama Binus untuk Indonesia
1981 - 2006
Venue: Plenary Hall, Jakarta Convention Center
Date : 25 February 2006
-=-=-=-=-=-=-=-=-=-=--==-=--==-=-=--=-=-=-=-=-=
SPONSORED LINKS
| Bali indonesia hotel | Bali indonesia | Indonesia hotel |
| Bali indonesia vacation | Bali indonesia travel |
YAHOO! GROUPS LINKS
- Visit your group "binusnet" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
