On Mon, 19 Nov 2007 18:10:09 -0600, Greg Saccomanno wrote:
>>
>>QUOTE SITE STRU R
>>
>I tried pulling the file down and pushing the file back up using a command
>window from M$ Windows and it worked as indicated (the file matched once
>re-uploaded). I tried various incarnations from an MVS batch job and have
>had no luck at all. Is there a way to do this from an MVS batch job or TSO
>FTP ( where I guess MVS is the client instead of the server)? If not I guess I
>will have to continue using XMIT and/or TERSE were applicable but for smaller
>files it would be nice to eliminate the extra step and be able to submit batch
>jobs from our MVS scheduling package.
>
I would expect you can submit multiple step jobs from the scheduling
package.
Otherwise, you still need multiple copies, but you can do it all
within MVS FTP by using an MVS server (untested):
//PUT EXEC PGM=FTP,PARM='127.0.0.1 (EXIT'
//TEMPFILE DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//INPUT DD *
ebcdic
quote site stru R
get INPUT.DATA.SET.NAME //DD:TEMPFILE
close
open open.system
binary
put //DD:TEMPFILE remote.file.name
Reload by reversing the process:
//GET EXEC PGM=FTP,PARM='OPEN.SYSTEM (EXIT'
//TEMPFILE DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//INPUT DD *
binary
quote site stru R
get remote.file.name //DD:TEMPFILE
close
open 127.0.0.1
ebcdic
quote site stru R
put //DD:TEMPFILE OUTPUT.DATA.SET.NAME
-- gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
