Since I was rejected, here is the bat file instream. You may want to insert lines for readability: *don*
@If [%1]==[/?] Goto helpp @CLS @SET func= @SET user= @SET pw= @SET zos= @SET mem= @SET /P func=Enter mput or mget: @IF [%func%]==[] Goto helpp @SET /P user=Enter TSO userid: @IF [%user%]==[] Goto helpp @SET /P pw=Enter TSO password: @IF [%pw%]==[] Goto helpp @SET /P zos=Enter z/OS filename (in quotes): @IF [%zos%]==[] Goto helpp @SET /P mem=Enter PDS member name mask(for mget): @SET /P loc=Enter local filename (full path in doublequotes): @IF [%loc%]==[] Goto helpp @IF EXIST %loc% GOTO go_on @MD %loc% :go_on @echo USER %user% %pw%>C:\ftpdir.dat @echo ASC >>C:\ftpdir.dat @echo prompt >>c:\ftpdir.dat @echo.>>C:\ftpdir.dat @echo cd %zos%>>c:\ftpdir.dat @echo lcd %loc%>>c:\ftpdir.dat @echo.>>C:\ftpdir.dat @GOTO %func% :mput @echo.>>C:\ftpdir.dat @echo mput *.*>>c:\ftpdir.dat @GOTO Done :mget @echo.>>C:\ftpdir.dat @echo mget %mem%* (REPLACE>>c:\ftpdir.dat @GOTO Done :done @echo.>>C:\ftpdir.dat @echo bye>>c:\ftpdir.dat ftp -n -s:C:\ftpdir.dat ca11.ca.com @pause CD %loc% REN * *.txt @GOTO XXIT :Helpp @CLS @ECHO This batch file will upload/download z/OS PDS files to PC directories. @ECHO. @ECHO You will need to enter your TSO userid and password (NOT HIDDEN), @ECHO and then you will enter the z/OS filename (in quotes) and a member @ECHO name mask (or leave blank for all) to FTP to the PC. @ECHO After entering the PC directory (in double quotes), the FTP process will @ECHO transfer the members to the PC directory (overwriting the members if @ECHO they exist), and will then rename all single-node files to *.txt. @ECHO. @ECHO Usage %0 @ECHO. @pause :XXIT REM @CLS On Tue, Jan 18, 2011 at 9:11 AM, Donald Johnson <dej....@gmail.com> wrote: > Here is a bat file I use to FTP and rename...You need to remove the last > node (.file) from this attachment. > *don* > > On Tue, Jan 18, 2011 at 8:51 AM, Rob Schramm <rob.schr...@gmail.com>wrote: > >> Barry, >> >> I couldn't find it. I didn't find it in any RFC either. Nmap must be an >> extension that isn't always supported. I don't see it as part of the >> windows client. The only references I see are for unix. >> >> Rob Schramm >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO >> Search the archives at http://bama.ua.edu/archives/ibm-main.html >> > > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
