Re: Automating an FTP transfer

[Jeffry Kennedy <jkennedy@xxxxxxxxxxxxx>]

These are the CL programs I use to transfer to a VSE Host.
MEMBER POTRAN QGPL/QCLSRC

*************** Beginning of data ********************************
             PGM

             CLRPFM     FILE(QFTPSRC) MBR(E3POLOG)
             OVRDBF     FILE(INPUT) TOFILE(QFTPSRC) MBR(E3POTRAN)
             OVRDBF     FILE(OUTPUT) TOFILE(QFTPSRC) MBR(E3POLOG)
             FTP        RMTSYS('172.22.1.9')
             DLTOVR     FILE(*ALL)

 ENDCLPGM:   RETURN
             ENDPGM



Member E3POTRAN QGPL/QFTPSRC

user jeff
lcd e3xcertco
cd e3trim
site lrecl 714
put e3xorhnp e3xorh
site lrecl 447
put e3xordnp e3xord
close
quit

Adam Lang wrote:

> How would we automate the AS/400 ftping a file to an OS/390 once a month?
> They both have all the appropriate software installed.
>
> We figured make a CL program and stick it in the scheduler.  Not sure what
> to put in the CL though.
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo.cgi/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.